# L = light, S = sphere, M = mesh, T = triangle
# cs/cd = color specular/difuse [white]
# I = intensity [1], pt = location [0 0 0]
# ks/kd = constants spec/dif [.5/.5]
# ref = reflectance factor [0]

L l0 cs 1 1 1 cd 1 1 1 I 0.5 pt 20 -20  20
L l1 cs 1 1 1 cd 1 1 1 I 0.5 pt 20  20  20
L l2 cs 1 1 1 cd 1 1 1 I 0.5 pt 20 -20 -20
L l3 cs 1 1 1 cd 1 1 1 I 0.5 pt 20  20 -20
L l4 cs 1 1 1 cd 1 1 1 I 0.5 pt 1   0   4

# W = insert following items into world object list
W +L l0 l1 l2 l3 l4

SX globe f "world32k.jpg"

S sph0 c 0 3 -.5 r 1.5 ks 0 kd 1 n 20 ref 0
S sph0 cd 1 1 1 cs 1 1 1
S sph0 Xz 0 0 1 Xx -1 0 0 X globe

S sph1 c 0 -3 -.5 r 1.5 ks 0 kd 1 n 20 ref 0
S sph1 cd 1 1 1 cs 1 1 1
S sph1 Xz 0 0 1 Xx 1 0 0 X globe

S sph2 c 0 0 -1 r 1 ks 0 kd 1 n 20 ref 0
S sph2 cd 1 1 1 cs 1 1 1
S sph2 Xz 1 0 0 Xx 0 0 1 X globe

S sph3 c -10 0 3 r 6 ks .9 kd .1 n 100 ref .9
S sph3 cd 1 1 1 cs 1 1 1

W + sph0 sph1 sph2 sph3

MX ev0 - t1 pt (0,-1,3)
MX ev0 . t2 t1 t1
MX ev0 ^ t2 t2 .5
MX ev0 * t2 t2 20
MX ev0 sin t2 t2
MX ev0 + t2 t2 1
MX ev0 / t2 t2 2
MX ev0 pack t3 t2 t2 t2
MX ev0 * t3 t3 (0,1,0)
MX ev0 + t0 t3 (0,0,1)

M cow f "cow.smf" ks .5 kd .5 n 50 ref 0
M cow phong 1 cd 1 0 0 cs 1 0 0 X ev0

MX ev1 getz t0 pt
MX ev1 * t0 t0 5
MX ev1 tan t0 t0
MX ev1 % t0 t0 1
MX ev1 * t0 t0 (0,1,0)

M bunny f "bunny_5k.smf" ks .5 kd .5 n 50 ref 0
M bunny phong 1 cs 0 0 1 cd 0 0 1 X ev1

Z trcow r 1 0 0 -1.5707963267949 s 4 tr 0 -3 3
Z trbunny r 1 0 0 -1.5707963267949 s 8 tr 0 3 2
T etcow e cow z trcow
T etbunny e bunny z trbunny
W + etcow etbunny

V a 0.0 0.0 0 c 10 0 0 e 0 0 0
V sw 1024 sh 1024 sf 1 ad 1