📄 fgllight.ps
字号:
%!PS-Adobe-1.0%%Creator: splat:n8 (Nate Robins,,,,,,,<engr>)%%Title: stdin (ditroff)%%CreationDate: Tue Jul 22 19:17:21 1997%%EndComments% Start of psdit.pro -- prolog for ditroff translator% Copyright (c) 1985,1987 Adobe Systems Incorporated. All Rights Reserved. % GOVERNMENT END USERS: See Notice file in TranScript library directory% -- probably /usr/lib/ps/Notice% $Revision: 1.2 $/$DITroff 140 dict def $DITroff begin/fontnum 1 def /fontsize 10 def /fontheight 10 def /fontslant 0 def/xi {0 72 11 mul translate 72 resolution div dup neg scale 0 0 moveto /fontnum 1 def /fontsize 10 def /fontheight 10 def /fontslant 0 def F /pagesave save def}def/PB{save /psv exch def currentpoint translate resolution 72 div dup neg scale 0 0 moveto}def/PE{psv restore}def/m1 matrix def /m2 matrix def /m3 matrix def /oldmat matrix def/tan{dup sin exch cos div}bind def/point{resolution 72 div mul}bind def/dround {transform round exch round exch itransform}bind def/xT{/devname exch def}def/xr{/mh exch def /my exch def /resolution exch def}def/xp{}def/xs{docsave restore end}def/xt{}def/xf{/fontname exch def /slotno exch def fontnames slotno get fontname eq not {fonts slotno fontname findfont put fontnames slotno fontname put}if}def/xH{/fontheight exch def F}bind def/xS{/fontslant exch def F}bind def/s{/fontsize exch def /fontheight fontsize def F}bind def/f{/fontnum exch def F}bind def/F{fontheight 0 le {/fontheight fontsize def}if fonts fontnum get fontsize point 0 0 fontheight point neg 0 0 m1 astore fontslant 0 ne{1 0 fontslant tan 1 0 0 m2 astore m3 concatmatrix}if makefont setfont .04 fontsize point mul 0 dround pop setlinewidth}bind def/X{exch currentpoint exch pop moveto show}bind def/N{3 1 roll moveto show}bind def/Y{exch currentpoint pop exch moveto show}bind def/S /show load def/ditpush{}def/ditpop{}def/AX{3 -1 roll currentpoint exch pop moveto 0 exch ashow}bind def/AN{4 2 roll moveto 0 exch ashow}bind def/AY{3 -1 roll currentpoint pop exch moveto 0 exch ashow}bind def/AS{0 exch ashow}bind def/MX{currentpoint exch pop moveto}bind def/MY{currentpoint pop exch moveto}bind def/MXY /moveto load def/cb{pop}def % action on unknown char -- nothing for now/n{}def/w{}def/p{pop showpage pagesave restore /pagesave save def}def/abspoint{currentpoint exch pop add exch currentpoint pop add exch}def/dstroke{currentpoint stroke moveto}bind def/Dl{2 copy gsave rlineto stroke grestore rmoveto}bind def/arcellipse{oldmat currentmatrix pop currentpoint translate 1 diamv diamh div scale /rad diamh 2 div def rad 0 rad -180 180 arc oldmat setmatrix}def/Dc{gsave dup /diamv exch def /diamh exch def arcellipse dstroke grestore diamh 0 rmoveto}def/De{gsave /diamv exch def /diamh exch def arcellipse dstroke grestore diamh 0 rmoveto}def/Da{currentpoint /by exch def /bx exch def /fy exch def /fx exch def /cy exch def /cx exch def /rad cx cx mul cy cy mul add sqrt def /ang1 cy neg cx neg atan def /ang2 fy fx atan def cx bx add cy by add 2 copy rad ang1 ang2 arcn stroke exch fx add exch fy add moveto}def/Barray 200 array def % 200 values in a wiggle/D~{mark}def/D~~{counttomark Barray exch 0 exch getinterval astore /Bcontrol exch def pop /Blen Bcontrol length def Blen 4 ge Blen 2 mod 0 eq and {Bcontrol 0 get Bcontrol 1 get abspoint /Ycont exch def /Xcont exch def Bcontrol 0 2 copy get 2 mul put Bcontrol 1 2 copy get 2 mul put Bcontrol Blen 2 sub 2 copy get 2 mul put Bcontrol Blen 1 sub 2 copy get 2 mul put /Ybi /Xbi currentpoint 3 1 roll def def 0 2 Blen 4 sub {/i exch def Bcontrol i get 3 div Bcontrol i 1 add get 3 div Bcontrol i get 3 mul Bcontrol i 2 add get add 6 div Bcontrol i 1 add get 3 mul Bcontrol i 3 add get add 6 div /Xbi Xcont Bcontrol i 2 add get 2 div add def /Ybi Ycont Bcontrol i 3 add get 2 div add def /Xcont Xcont Bcontrol i 2 add get add def /Ycont Ycont Bcontrol i 3 add get add def Xbi currentpoint pop sub Ybi currentpoint exch pop sub rcurveto }for dstroke}if}defend/ditstart{$DITroff begin /nfonts 60 def % NFONTS makedev/ditroff dependent! /fonts[nfonts{0}repeat]def /fontnames[nfonts{()}repeat]def/docsave save def}def% character outcalls/oc {/pswid exch def /cc exch def /name exch def /ditwid pswid fontsize mul resolution mul 72000 div def /ditsiz fontsize resolution mul 72 div def ocprocs name known{ocprocs name get exec}{name cb} ifelse}def/fractm [.65 0 0 .6 0 0] def/fraction {/fden exch def /fnum exch def gsave /cf currentfont def cf fractm makefont setfont 0 .3 dm 2 copy neg rmoveto fnum show rmoveto currentfont cf setfont(\244)show setfont fden show grestore ditwid 0 rmoveto} def/oce {grestore ditwid 0 rmoveto}def/dm {ditsiz mul}def/ocprocs 50 dict def ocprocs begin(14){(1)(4)fraction}def(12){(1)(2)fraction}def(34){(3)(4)fraction}def(13){(1)(3)fraction}def(23){(2)(3)fraction}def(18){(1)(8)fraction}def(38){(3)(8)fraction}def(58){(5)(8)fraction}def(78){(7)(8)fraction}def(sr){gsave .05 dm .16 dm rmoveto(\326)show oce}def(is){gsave 0 .15 dm rmoveto(\362)show oce}def(->){gsave 0 .02 dm rmoveto(\256)show oce}def(<-){gsave 0 .02 dm rmoveto(\254)show oce}def(==){gsave 0 .05 dm rmoveto(\272)show oce}defend% DIThacks fonts for some special chars50 dict dup begin/FontType 3 def/FontName /DIThacks def/FontMatrix [.001 0.0 0.0 .001 0.0 0.0] def/FontBBox [-220 -280 900 900] def% a lie but .../Encoding 256 array def0 1 255{Encoding exch /.notdef put}forEncoding dup 8#040/space put %space dup 8#110/rc put %right ceil dup 8#111/lt put %left top curl dup 8#112/bv put %bold vert dup 8#113/lk put %left mid curl dup 8#114/lb put %left bot curl dup 8#115/rt put %right top curl dup 8#116/rk put %right mid curl dup 8#117/rb put %right bot curl dup 8#120/rf put %right floor dup 8#121/lf put %left floor dup 8#122/lc put %left ceil dup 8#140/sq put %square dup 8#141/bx put %box dup 8#142/ci put %circle dup 8#143/br put %box rule dup 8#144/rn put %root extender dup 8#145/vr put %vertical rule dup 8#146/ob put %outline bullet dup 8#147/bu put %bullet dup 8#150/ru put %rule dup 8#151/ul put %underline pop/DITfd 100 dict def/BuildChar{0 begin /cc exch def /fd exch def /charname fd /Encoding get cc get def /charwid fd /Metrics get charname get def /charproc fd /CharProcs get charname get def charwid 0 fd /FontBBox get aload pop setcachedevice 40 setlinewidth newpath 0 0 moveto gsave charproc grestore end}def/BuildChar load 0 DITfd put%/UniqueID 5 def/CharProcs 50 dict defCharProcs begin/space{}def/.notdef{}def/ru{500 0 rls}def/rn{0 750 moveto 500 0 rls}def/vr{20 800 moveto 0 -770 rls}def/bv{20 800 moveto 0 -1000 rls}def/br{20 770 moveto 0 -1040 rls}def/ul{0 -250 moveto 500 0 rls}def/ob{200 250 rmoveto currentpoint newpath 200 0 360 arc closepath stroke}def/bu{200 250 rmoveto currentpoint newpath 200 0 360 arc closepath fill}def/sq{80 0 rmoveto currentpoint dround newpath moveto 640 0 rlineto 0 640 rlineto -640 0 rlineto closepath stroke}def/bx{80 0 rmoveto currentpoint dround newpath moveto 640 0 rlineto 0 640 rlineto -640 0 rlineto closepath fill}def/ci{355 333 rmoveto currentpoint newpath 333 0 360 arc 50 setlinewidth stroke}def/lt{20 -200 moveto 0 550 rlineto currx 800 2cx s4 add exch s4 a4p stroke}def/lb{20 800 moveto 0 -550 rlineto currx -200 2cx s4 add exch s4 a4p stroke}def/rt{20 -200 moveto 0 550 rlineto currx 800 2cx s4 sub exch s4 a4p stroke}def/rb{20 800 moveto 0 -500 rlineto currx -200 2cx s4 sub exch s4 a4p stroke}def/lk{20 800 moveto 20 300 -280 300 s4 arcto pop pop 1000 sub currentpoint stroke moveto 20 300 4 2 roll s4 a4p 20 -200 lineto stroke}def/rk{20 800 moveto 20 300 320 300 s4 arcto pop pop 1000 sub currentpoint stroke moveto 20 300 4 2 roll s4 a4p 20 -200 lineto stroke}def/lf{20 800 moveto 0 -1000 rlineto s4 0 rls}def/rf{20 800 moveto 0 -1000 rlineto s4 neg 0 rls}def/lc{20 -200 moveto 0 1000 rlineto s4 0 rls}def/rc{20 -200 moveto 0 1000 rlineto s4 neg 0 rls}defend/Metrics 50 dict def Metrics begin/.notdef 0 def/space 500 def/ru 500 def/br 0 def/lt 250 def/lb 250 def/rt 250 def/rb 250 def/lk 250 def/rk 250 def/rc 250 def/lc 250 def/rf 250 def/lf 250 def/bv 250 def/ob 350 def/bu 350 def/ci 750 def/bx 750 def/sq 750 def/rn 500 def/ul 500 def/vr 0 defendDITfd begin/s2 500 def /s4 250 def /s3 333 def/a4p{arcto pop pop pop pop}def/2cx{2 copy exch}def/rls{rlineto stroke}def/currx{currentpoint pop}def/dround{transform round exch round exch itransform} defendend/DIThacks exch definefont popditstart(psc)xT576 1 1 xr1(Times-Roman)xf 1 f2(Times-Italic)xf 2 f3(Times-Bold)xf 3 f4(Times-BoldItalic)xf 4 f5(Helvetica)xf 5 f6(Helvetica-Bold)xf 6 f7(Courier)xf 7 f8(Courier-Bold)xf 8 f9(Symbol)xf 9 f10(DIThacks)xf 10 f10 s1 fxi%%EndProlog%%Page: 1 110 s 0 xH 0 xS 1 f10 f96(h)Y24(hhh)X4176(h)X4200(hhh)X9 s1 f266 480(F)N268(FG)X310(GL)X364(LL)X410(LI)X456(IG)X482(GH)X536(HT)X590(T)X640(\()X642(\()X678(\))X680(\))X1885(U)X1887(UN)X1941(NI)X1995(IX)X2021(X)X2093(S)X2095(Sy)X2137(ys)X2175(st)X2205(te)X2227(em)X2261(m)X2337(V)X2339(V)X3572(F)X3574(FG)X3616(GL)X3670(LL)X3716(LI)X3762(IG)X3788(GH)X3842(HT)X3896(T)X3946(\()X3948(\()X3984(\))X3986(\))X266 864(N)N268(NA)X322(AM)X376(ME)X442(E)X3 f10 s554 960(fglLightf,)N896(fglLighti,)X1233(fglLightfv,)X1615(fglLightiv)X1 f9 f1972(-)X1 f2036(set)X2145(light)X2311(source)X2541(parameters)X9 s266 1190(F)N268(FO)X310(OR)X364(RT)X414(TR)X460(RA)X510(AN)X564(N)X648(S)X650(SP)X692(PE)X734(EC)X780(CI)X830(IF)X856(FI)X898(IC)X924(CA)X974(AT)X1028(TI)X1074(IO)X1100(ON)X1154(N)X10 s554 1286(SUBROUTINE)N3 f1081(fglLightf)X1 f1383(\()X1430(INTEGER*4)X2 f1873(light)X1 f2019(,)X1438 1382(INTEGER*4)N2 f1881(pname)X1 f2095(,)X1438 1478(REAL*4)N2 f1747(param)X1 f1976(\))X554 1574(SUBROUTINE)N3 f1081(fglLighti)X1 f1378(\()X1425(INTEGER*4)X2 f1868(light)X1 f2014(,)X1433 1670(INTEGER*4)N2 f1876(pname)X1 f2090(,)X1433 1766(INTEGER*4)N2 f1876(param)X1 f2105(\))X554 1958(delim)N756($$)X9 s266 2092(P)N268(PA)X310(AR)X364(RA)X414(AM)X468(ME)X534(ET)X580(TE)X626(ER)X672(RS)X722(S)X2 f10 s554 2188(light)N1 f834(Speci\256es)X1144(a)X1201(light.)X1408(The)X1554(number)X1820(of)X1908(lights)X2106(depends)X2391(on)X2493(the)X2613(implementation,)X3157(but)X3281(at)X3361(least)X3530(eight)X3712(lights)X3911(are)X834 2284(supported.)N1215(They)X1404(are)X1527(identi\256ed)X1853(by)X1957(symbolic)X2274(names)X2503(of)X2594(the)X2716(form)X3 f2896(GL_LIGHT)X1 f3312($i$)X3438(where)X3659(0)X9 f3723(\243)X1 f3791($)X3855(i)X3901($)X3965(<)X3 f834 2380(GL_MAX_LIGHTS)N1 f1526(.)X2 f554 2514(pname)N1 f834(Speci\256es)X1197(a)X1307(single-valued)X1813(light)X2033(source)X2317(parameter)X2713(for)X2 f2882(light)X1 f3028(.)X3 f3143(GL_SPOT_EXPONENT)X1 f3990(,)X3 f834 2610(GL_SPOT_CUTOFF)N1 f1566(,)X3 f1611(GL_CONSTANT_ATTENUATION)X1 f2845(,)X3 f2889(GL_LINEAR_ATTENUATION)X1 f3990(,)X834 2706(and)N3 f970(GL_QUADRATIC_ATTENUATION)X1 f2274(are)X2393(accepted.)X2 f554 2840(param)N1 f834(Speci\256es)X1143(the)X1261(value)X1455(that)X1595(parameter)X2 f1937(pname)X1 f2171(of)X2258(light)X2424(source)X2 f2654(light)X1 f2820(will)X2964(be)X3060(set)X3169(to.)X9 s266 2974(F)N268(FO)X310(OR)X364(RT)X414(TR)X460(RA)X510(AN)X564(N)X648(S)X650(SP)X692(PE)X734(EC)X780(CI)X830(IF)X856(FI)X898(IC)X924(CA)X974(AT)X1028(TI)X1074(IO)X1100(ON)X1154(N)X10 s554 3070(SUBROUTINE)N3 f1081(fglLightfv)X1 f1423(\()X1470(INTEGER*4)X2 f1913(light)X1 f2059(,)X1478 3166(INTEGER*4)N2 f1921(pname)X1 f2135(,)X1478 3262(CHARACTER*8)N2 f2062(params)X1 f2322(\))X554 3358(SUBROUTINE)N3 f1081(fglLightiv)X1 f1418(\()X1465(INTEGER*4)X2 f1908(light)X1 f2054(,)X1473 3454(INTEGER*4)N2 f1916(pname)X1 f2130(,)X1473 3550(CHARACTER*8)N2 f2057(params)X1 f2317(\))X9 s266 3780(P)N268(PA)X310(AR)X364(RA)X414(AM)X468(ME)X534(ET)X580(TE)X626(ER)X672(RS)X722(S)X2 f10 s554 3876(light)N1 f842(Speci\256es)X1152(a)X1209(light.)X1416(The)X1562(number)X1828(of)X1916(lights)X2114(depends)X2398(on)X2499(the)X2618(implementation,)X3161(but)X3284(at)X3363(least)X3531(eight)X3712(lights)X3911(are)X842 3972(supported.)N1222(They)X1411(are)X1534(identi\256ed)X1860(by)X1964(symbolic)X2281(names)X2510(of)X2601(the)X2723(form)X3 f2903(GL_LIGHT)X1 f3319($i$)X3444(where)X3664(0)X9 f3727(\243)X1 f3794($)X3857(i)X3902($)X3965(<)X3 f842 4068(GL_MAX_LIGHTS)N1 f1534(.)X2 f554 4202(pname)N1 f842(Speci\256es)X1153(a)X1211(light)X1380(source)X1613(parameter)X1958(for)X2 f2075(light)X1 f2221(.)X3 f2284(GL_AMBIENT)X1 f2821(,)X3 f2864(GL_DIFFUSE)X1 f3361(,)X3 f3404(GL_SPECULAR)X1 f3990(,)X3 f842 4298(GL_POSITION)N1 f1387(,)X3 f1440(GL_SPOT_CUTOFF)X1 f2172(,)X3 f2225(GL_SPOT_DIRECTION)X1 f3090(,)X3 f3143(GL_SPOT_EXPONENT)X1 f3990(,)X3 f842 4394(GL_CONSTANT_ATTENUATION)N1 f2076(,)X3 f2434(GL_LINEAR_ATTENUATION)X1 f3535(,)X3894(and)X3 f842 4490(GL_QUADRATIC_ATTENUATION)N1 f2146(are)X2265(accepted.)X2 f554 4624(params)N1 f842(Speci\256es)X1151(a)X1207(pointer)X1454(to)X1536(the)X1654(value)X1848(or)X1935(values)X2160(that)X2300(parameter)X2 f2642(pname)X1 f2876(of)X2963(light)X3129(source)X2 f3359(light)X1 f3525(will)X3669(be)X3765(set)X3874(to.)X9 s266 4758(D)N268(DE)X322(ES)X368(SC)X410(CR)X460(RI)X510(IP)X536(PT)X578(TI)X624(IO)X650(ON)X704(N)X3 f10 s554 4854(fglLight)N1 f849(sets)X989(the)X1107(values)X1332(of)X1419(individual)X1763(light)X1930(source)X2161(parameters.)X2 f2575(light)X1 f2742(names)X2968(the)X3087(light)X3254(and)X3391(is)X3465(a)X3522(symbolic)X3836(name)X554 4950(of)N646(the)X769(form)X3 f950(GL_LIGHT)X1 f1366($i$,)X1513(where)X1735(0)X9 f1800(\243)X1 f1868(i)X1914(<)X3 f1983(GL_MAX_LIGHTS)X1 f2675(.)X2 f2739(pname)X1 f2977(speci\256es)X3277(one)X3417(of)X3508(ten)X3630(light)X3800(source)X554 5046(parameters,)N950(again)X1147(by)X1250(symbolic)X1566(name.)X2 f1803(params)X1 f2066(is)X2142(either)X2348(a)X2408(single)X2623(value)X2821(or)X2912(a)X2972(pointer)X3223(to)X3309(an)X3409(array)X3599(that)X3743(contains)X554 5142(the)N672(new)X826(values.)X554 5276(To)N664(enable)X895(and)X1032(disable)X1280(lighting)X1550(calculation,)X1944(call)X3 f2082(fglEnable)X1 f2432(and)X3 f2570(fglDisable)X1 f2934(with)X3098(argument)X3 f3423(GL_LIGHTING)X1 f3990(.)X554 5372(Lighting)N856(is)X936(initially)X1211(disabled.)X1545(When)X1764(it)X1835(is)X1915(enabled,)X2212(light)X2385(sources)X2652(that)X2798(are)X2923(enabled)X3199(contribute)X3550(to)X3638(the)X3762(lighting)X554 5468(calculation.)N983(Light)X1193(source)X1440($i$)X1579(is)X1669(enabled)X1957(and)X2111(disabled)X2416(using)X3 f2627(fglEnable)X1 f2993(and)X3 f3147(fglDisable)X1 f3527(with)X3707(argument)X3 f554 5564(GL_LIGHT)N1 f970($i$.)X554 5698(The)N699(ten)X817(light)X983(parameters)X1356(are)X1475(as)X1562(follows:)X266 6144(Page)N442(1)X3577(July)X3730(22,)X3850(1997)X2 p%%Page: 2 210 s 0 xH 0 xS 1 f10 f0 96(h)N24(hhh)X4176(h)X4200(hhh)X9 s1 f266 480(F)N268(FG)X310(GL)X364(LL)X410(LI)X456(IG)X482(GH)X536(HT)X590(T)X640(\()X642(\()X678(\))X680(\))X1885(U)X1887(UN)X1941(NI)X1995(IX)X2021(X)X2093(S)X2095(Sy)X2137(ys)X2175(st)X2205(te)X2227(em)X2261(m)X2337(V)X2339(V)X3572(F)X3574(FG)X3616(GL)X3670(LL)X3716(LI)X3762(IG)X3788(GH)X3842(HT)X3896(T)X3946(\()X3948(\()X3984(\))X3986(\))X3 f10 s554 864(GL_AMBIENT)N2 f1354(params)X1 f1631(contains)X1935(four)X2106(integer)X2367(or)X2472(\257oating-point)X2945(values)X3188(that)X3346(specify)X3616(the)X3752(ambient)X1354 960(RGBA)N1611(intensity)X1921(of)X2023(the)X2156(light.)X2376(Integer)X2638(values)X2877(are)X3010(mapped)X3298(linearly)X3577(such)X3758(that)X3912(the)X1354 1056(most)N1529(positive)X1802(representable)X2251(value)X2445(maps)X2634(to)X2716(1.0,)X2856(and)X2993(the)X3112(most)X3288(negative)X3581(representable)X1354 1152(value)N1559(maps)X1759(to)X9 f1852(-)X1 f1896(1.0.)X2066(Floating-point)X2553(values)X2788(are)X2917(mapped)X
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -