� SHADOW FAX
� By Rog Frost
� (c) Micro User
(� �>&E00 �D|F
2� � � �TvF
<
�1:*FX4,1
F�23;8202;0;0;0;
P
�instruct
Z�setupa
d�setupb
n	�menu
x�
���setupa
�
shadow%=�
��29,10;512;
� �19,2,4;0;19,1,6;0;19,3,2;0;
�score%=0
�
*FX202,32
��0,0
��
���setupb
�.�ray%(4),X%(5),Y%(5),word$(10),correct$(5)
��N%=1�10:�word$(N%):�
�'�N%=1�5:�X%(N%),Y%(N%),correct$(N%)
��

(lsize%=100:lx%=20:osize%=300:ox%=700


pos%=1

*FX11,0

"�

, ��drawlight(lx%,lsize%,col%)

6�0,col%

@!ltop%=lsize%:lbottom%=-lsize%

J6�lx%,ltop%:�lx%-20,0:�85,lx%+20,0:�85,lx%,lbottom%

T �5:�lx%-10,lsize%+70:�"L":�4

^�

h!��drawobject(ox%,osize%,col%)

r�0,col%

|!otop%=osize%:obottom%=-osize%

�6�ox%,otop%:�ox%-10,0:�85,ox%+10,0:�85,ox%,obottom%

� �5:�ox%-10,osize%+70:�"O":�4

��

���screen

��0,3

��1000,512:�1000,-512

��

���points

�4ray%(2)=(1000-lx%)*(otop%-ltop%)/(ox%-lx%)+ltop%

�7ray%(4)=(1000-lx%)*(obottom%-ltop%)/(ox%-lx%)+ltop%

�:ray%(1)=(1000-lx%)*(otop%-lbottom%)/(ox%-lx%)+lbottom%

�=ray%(3)=(1000-lx%)*(obottom%-lbottom%)/(ox%-lx%)+lbottom%

��

��rays
�lx%,ltop%:�1000,ray%(4)
�lx%,ltop%:�1000,ray%(2)
&�lx%,lbottom%:�1000,ray%(3)
0�lx%,lbottom%:�1000,ray%(1)
:�
D��shadow
N
shadow%=�
X�points
b�19,0,7;0;
l�0,1
v-�1000,ray%(1):�ox%,otop%:�85,1000,ray%(2)
�*�0,2:�85,ox%,obottom%:�85,1000,ray%(3)
��0,1:�85,1000,ray%(4)
�6�drawlight(lx%,lsize%,3):�drawobject(ox%,osize%,3)
�	�rays
�6�129:�2,28)" ":�128:�1:�3,28)" = partial shadow"
�4�130:�2,30)" ":�128:�2:�3,30)" = total shadow"
�	*fx15
����=32:�menu
��
�
��menu
�h� shadow%=� �19,0,0;0;:�0,128:�:�drawlight(lx%,lsize%,3):�drawobject(ox%,osize%,3):�screen:shadow%=�
��128:�3
�*FX15,0
*FX138,0,32
�32,2)"OPTIONS"
�33,4)"TEST"�33,5)"PAGE"
 �33,9)"MOVE"�33,10)"LIGHT"
*!�33,14)"MOVE"�33,15)"OBJECT"
4!�33,19)"MOVE"�33,20)"SWITCH"
>[�32,25)"Space"�32,26)"selects"�32,27)"======="�32,28)"Use"�32,29)"Cursor"�32,30)"keys"
H�
R
key%=�
\&� key%=32 oldpos%=pos%:pos%=pos%+5
f� pos%>21 pos%=6
p|�128:�32,oldpos%-3)"        "�32,oldpos%-2)" "�39,oldpos%-2)" "�32,oldpos%-1)" "�39,oldpos%-1)" "�32,oldpos%)"        "
zj�129:�32,pos%-3)"        "�32,pos%-2)" "�39,pos%-2)" "�32,pos%-1)" "�39,pos%-1)" "�32,pos%)"        "
�
�key%<>32
�� pos%=6 �test
�� pos%=11 �light
�� pos%=16 �object
�� pos%=21 �shadow
��
���light
��
�olx%=lx%:olsize%=lsize%
�6� �-58 lsize%=lsize%+20:� lsize%>300 �7:lsize%=300
�4� �-42 lsize%=lsize%-20:� lsize%<20 �7:lsize%=20
�(� �-26 lx%=lx%-20:� lx%<20 �7:lx%=20
�5� �-122 lx%=lx%+20:� lx%>(ox%-60) �7:lx%=(ox%-60)
<� olx%<>lx% � olsize%<>lsize% �drawlight(olx%,olsize%,0)
�drawlight(lx%,lsize%,3)
��(0)=32
$	�menu
.�
8��object
B�
Loox%=ox%:oosize%=osize%
V6� �-58 osize%=osize%+20:� osize%>300 �7:osize%=300
`4� �-42 osize%=osize%-20:� osize%<20 �7:osize%=20
j4� �-26 ox%=ox%-20:� ox%<(lx%+60) �7:ox%=(lx%+60)
t+� �-122 ox%=ox%+20:� ox%>970 �7:ox%=970
~> � oox%<>ox% � oosize%<>osize% �drawobject(oox%,oosize%,0)
��drawobject(ox%,osize%,3)
���(0)=32
�	�menu
��
���instruct:�19,0,4;0;
�=�11,1)"SHADOW INVESTIGATION"�11,2)"~~~~~~~~~~~~~~~~~~~~"
��28,0,31,39,3
�{�''"To investigate shadows you may move a"''"light, an object to cast the shadow"''"and a switch to turn the light on."
�B�'"You may also alter the size of the light"'"and the object."
�Q�''"Use Space to move the menu selection"''"box, then use the Cursor keys to"
�@�'"move the light or the object or to"''"alter their sizes."
�$�7,27)"Press Space to continue"
���=32:�

��''"Your aim is to find out why some shadows"'"have sharp edges and other shadows"''"are very blurred, with a lot of"''"partial shadow."
��''"At any time you may attempt a short"''"test by selecting the 'Take Test'"''"option. If you do not score well"''"more investigations will help."
$�7,27)"Press Space to continue"
(���=32:�26:�:�
2
��test
<�20:�19,0,4;0;:�128:�
FK�11,1)"SHADOW INVESTIGATION"�11,2)"~~~~~~~~~~~~~~~~~~~~":�28,0,31,27,3
P��'"To produce a shadow which is"'"sharp, either the light must"'"be (1)      or the (2)      "'"between the light and the"''"object must be big."
Zg�'"Blurred shadows result from"''"a large (3)      or the"''"(4)      being (5)     "''"the light."
d�28,29,26,39,3:�129:�
n
�'"WORDS"
xA�'"A..shadow"''"B..small"''"C..big"''"D..near"''"E..distance"
�>�"F..light"''"G..object"''"H..sun"''"I..rays"''"J..colour"
��26:�128
�)�0,22)"===========================" 
��128
��N%=1�5
�7�0,26)"Select letter of word for"''"position ";N%;
��" ";letter$
�:� �(letter$)<65 � �(letter$)>75 � �0,26);�(120):�ttE
��129
�(�X%(N%),Y%(N%))word$(�(letter$)-64)
�6�word$(�(letter$)-64)=correct$(N%) score%=score%+1
��128
��0,26);�(120)
�
.�0,26)"You got ";score%;" words correct."
U� score%<5 �0,28)"Press space to continue investigating.":���=32:�setupa:�menu:�
"c� score%=5 �0,28)"You understand shadows."''"Press space for next person to start.":���=32:�:�
,�
6� ERROR HANDLER
@	*FX12
J�6
T�:�" at line ";�
^�
h@�shadow,small,big,near,distance,light,object,sun,rays,colour
r>�3,8,small,19,8,distance,8,16,light,0,18,object,15,18,near
|'� DOWN LOAD MEMORY FOR DISC SYSTEMS
�	*TAPE
�D� I%=0 � �P-� � 4:I%!&E00=I%!�:�:?&13=?&13-(�-&E00)�256:�=&E00:�
�

00000000  0d 00 0a 10 f4 20 53 48  41 44 4f 57 20 46 41 58  |..... SHADOW FAX|
00000010  0d 00 14 12 f4 20 42 79  20 52 6f 67 20 46 72 6f  |..... By Rog Fro|
00000020  73 74 0d 00 1e 14 f4 20  28 63 29 20 4d 69 63 72  |st..... (c) Micr|
00000030  6f 20 55 73 65 72 0d 00  28 12 e7 20 90 3e 26 45  |o User..(.. .>&E|
00000040  30 30 20 e5 8d 44 7c 46  0d 00 32 0e ee 20 85 20  |00 ..D|F..2.. . |
00000050  e5 20 8d 54 76 46 0d 00  3c 0d eb 31 3a 2a 46 58  |. .TvF..<..1:*FX|
00000060  34 2c 31 0d 00 46 13 ef  32 33 3b 38 32 30 32 3b  |4,1..F..23;8202;|
00000070  30 3b 30 3b 30 3b 0d 00  50 0d f2 69 6e 73 74 72  |0;0;0;..P..instr|
00000080  75 63 74 0d 00 5a 0b f2  73 65 74 75 70 61 0d 00  |uct..Z..setupa..|
00000090  64 0b f2 73 65 74 75 70  62 0d 00 6e 09 f2 6d 65  |d..setupb..n..me|
000000a0  6e 75 0d 00 78 05 e0 0d  00 82 0c dd f2 73 65 74  |nu..x........set|
000000b0  75 70 61 0d 00 8c 0d 73  68 61 64 6f 77 25 3d b9  |upa....shadow%=.|
000000c0  0d 00 96 0f ef 32 39 2c  31 30 3b 35 31 32 3b 0d  |.....29,10;512;.|
000000d0  00 a0 20 ef 31 39 2c 32  2c 34 3b 30 3b 31 39 2c  |.. .19,2,4;0;19,|
000000e0  31 2c 36 3b 30 3b 31 39  2c 33 2c 32 3b 30 3b 0d  |1,6;0;19,3,2;0;.|
000000f0  00 aa 0c 73 63 6f 72 65  25 3d 30 0d 00 b4 0d 2a  |...score%=0....*|
00000100  46 58 32 30 32 2c 33 32  0d 00 be 08 ec 30 2c 30  |FX202,32.....0,0|
00000110  0d 00 c8 05 e1 0d 00 d2  0c dd f2 73 65 74 75 70  |...........setup|
00000120  62 0d 00 dc 2e de 72 61  79 25 28 34 29 2c 58 25  |b.....ray%(4),X%|
00000130  28 35 29 2c 59 25 28 35  29 2c 77 6f 72 64 24 28  |(5),Y%(5),word$(|
00000140  31 30 29 2c 63 6f 72 72  65 63 74 24 28 35 29 0d  |10),correct$(5).|
00000150  00 e6 19 e3 4e 25 3d 31  b8 31 30 3a f3 77 6f 72  |....N%=1.10:.wor|
00000160  64 24 28 4e 25 29 3a ed  0d 00 f0 27 e3 4e 25 3d  |d$(N%):....'.N%=|
00000170  31 b8 35 3a f3 58 25 28  4e 25 29 2c 59 25 28 4e  |1.5:.X%(N%),Y%(N|
00000180  25 29 2c 63 6f 72 72 65  63 74 24 28 4e 25 29 0d  |%),correct$(N%).|
00000190  00 fa 05 ed 0d 01 04 28  6c 73 69 7a 65 25 3d 31  |.......(lsize%=1|
000001a0  30 30 3a 6c 78 25 3d 32  30 3a 6f 73 69 7a 65 25  |00:lx%=20:osize%|
000001b0  3d 33 30 30 3a 6f 78 25  3d 37 30 30 0d 01 0e 0a  |=300:ox%=700....|
000001c0  70 6f 73 25 3d 31 0d 01  18 0b 2a 46 58 31 31 2c  |pos%=1....*FX11,|
000001d0  30 0d 01 22 05 e1 0d 01  2c 20 dd f2 64 72 61 77  |0.."...., ..draw|
000001e0  6c 69 67 68 74 28 6c 78  25 2c 6c 73 69 7a 65 25  |light(lx%,lsize%|
000001f0  2c 63 6f 6c 25 29 0d 01  36 0b e6 30 2c 63 6f 6c  |,col%)..6..0,col|
00000200  25 0d 01 40 21 6c 74 6f  70 25 3d 6c 73 69 7a 65  |%..@!ltop%=lsize|
00000210  25 3a 6c 62 6f 74 74 6f  6d 25 3d 2d 6c 73 69 7a  |%:lbottom%=-lsiz|
00000220  65 25 0d 01 4a 36 ec 6c  78 25 2c 6c 74 6f 70 25  |e%..J6.lx%,ltop%|
00000230  3a ec 6c 78 25 2d 32 30  2c 30 3a f0 38 35 2c 6c  |:.lx%-20,0:.85,l|
00000240  78 25 2b 32 30 2c 30 3a  f0 38 35 2c 6c 78 25 2c  |x%+20,0:.85,lx%,|
00000250  6c 62 6f 74 74 6f 6d 25  0d 01 54 20 ef 35 3a ec  |lbottom%..T .5:.|
00000260  6c 78 25 2d 31 30 2c 6c  73 69 7a 65 25 2b 37 30  |lx%-10,lsize%+70|
00000270  3a f1 22 4c 22 3a ef 34  0d 01 5e 05 e1 0d 01 68  |:."L":.4..^....h|
00000280  21 dd f2 64 72 61 77 6f  62 6a 65 63 74 28 6f 78  |!..drawobject(ox|
00000290  25 2c 6f 73 69 7a 65 25  2c 63 6f 6c 25 29 0d 01  |%,osize%,col%)..|
000002a0  72 0b e6 30 2c 63 6f 6c  25 0d 01 7c 21 6f 74 6f  |r..0,col%..|!oto|
000002b0  70 25 3d 6f 73 69 7a 65  25 3a 6f 62 6f 74 74 6f  |p%=osize%:obotto|
000002c0  6d 25 3d 2d 6f 73 69 7a  65 25 0d 01 86 36 ec 6f  |m%=-osize%...6.o|
000002d0  78 25 2c 6f 74 6f 70 25  3a ec 6f 78 25 2d 31 30  |x%,otop%:.ox%-10|
000002e0  2c 30 3a f0 38 35 2c 6f  78 25 2b 31 30 2c 30 3a  |,0:.85,ox%+10,0:|
000002f0  f0 38 35 2c 6f 78 25 2c  6f 62 6f 74 74 6f 6d 25  |.85,ox%,obottom%|
00000300  0d 01 90 20 ef 35 3a ec  6f 78 25 2d 31 30 2c 6f  |... .5:.ox%-10,o|
00000310  73 69 7a 65 25 2b 37 30  3a f1 22 4f 22 3a ef 34  |size%+70:."O":.4|
00000320  0d 01 9a 05 e1 0d 01 a4  0c dd f2 73 63 72 65 65  |...........scree|
00000330  6e 0d 01 ae 08 e6 30 2c  33 0d 01 b8 18 ec 31 30  |n.....0,3.....10|
00000340  30 30 2c 35 31 32 3a df  31 30 30 30 2c 2d 35 31  |00,512:.1000,-51|
00000350  32 0d 01 c2 05 e1 0d 01  cc 0c dd f2 70 6f 69 6e  |2...........poin|
00000360  74 73 0d 01 d6 34 72 61  79 25 28 32 29 3d 28 31  |ts...4ray%(2)=(1|
00000370  30 30 30 2d 6c 78 25 29  2a 28 6f 74 6f 70 25 2d  |000-lx%)*(otop%-|
00000380  6c 74 6f 70 25 29 2f 28  6f 78 25 2d 6c 78 25 29  |ltop%)/(ox%-lx%)|
00000390  2b 6c 74 6f 70 25 0d 01  e0 37 72 61 79 25 28 34  |+ltop%...7ray%(4|
000003a0  29 3d 28 31 30 30 30 2d  6c 78 25 29 2a 28 6f 62  |)=(1000-lx%)*(ob|
000003b0  6f 74 74 6f 6d 25 2d 6c  74 6f 70 25 29 2f 28 6f  |ottom%-ltop%)/(o|
000003c0  78 25 2d 6c 78 25 29 2b  6c 74 6f 70 25 0d 01 ea  |x%-lx%)+ltop%...|
000003d0  3a 72 61 79 25 28 31 29  3d 28 31 30 30 30 2d 6c  |:ray%(1)=(1000-l|
000003e0  78 25 29 2a 28 6f 74 6f  70 25 2d 6c 62 6f 74 74  |x%)*(otop%-lbott|
000003f0  6f 6d 25 29 2f 28 6f 78  25 2d 6c 78 25 29 2b 6c  |om%)/(ox%-lx%)+l|
00000400  62 6f 74 74 6f 6d 25 0d  01 f4 3d 72 61 79 25 28  |bottom%...=ray%(|
00000410  33 29 3d 28 31 30 30 30  2d 6c 78 25 29 2a 28 6f  |3)=(1000-lx%)*(o|
00000420  62 6f 74 74 6f 6d 25 2d  6c 62 6f 74 74 6f 6d 25  |bottom%-lbottom%|
00000430  29 2f 28 6f 78 25 2d 6c  78 25 29 2b 6c 62 6f 74  |)/(ox%-lx%)+lbot|
00000440  74 6f 6d 25 0d 01 fe 05  e1 0d 02 08 0a dd f2 72  |tom%...........r|
00000450  61 79 73 0d 02 12 1c ec  6c 78 25 2c 6c 74 6f 70  |ays.....lx%,ltop|
00000460  25 3a df 31 30 30 30 2c  72 61 79 25 28 34 29 0d  |%:.1000,ray%(4).|
00000470  02 1c 1c ec 6c 78 25 2c  6c 74 6f 70 25 3a df 31  |....lx%,ltop%:.1|
00000480  30 30 30 2c 72 61 79 25  28 32 29 0d 02 26 1f ec  |000,ray%(2)..&..|
00000490  6c 78 25 2c 6c 62 6f 74  74 6f 6d 25 3a df 31 30  |lx%,lbottom%:.10|
000004a0  30 30 2c 72 61 79 25 28  33 29 0d 02 30 1f ec 6c  |00,ray%(3)..0..l|
000004b0  78 25 2c 6c 62 6f 74 74  6f 6d 25 3a df 31 30 30  |x%,lbottom%:.100|
000004c0  30 2c 72 61 79 25 28 31  29 0d 02 3a 05 e1 0d 02  |0,ray%(1)..:....|
000004d0  44 0c dd f2 73 68 61 64  6f 77 0d 02 4e 0d 73 68  |D...shadow..N.sh|
000004e0  61 64 6f 77 25 3d b9 0d  02 58 0b f2 70 6f 69 6e  |adow%=...X..poin|
000004f0  74 73 0d 02 62 0e ef 31  39 2c 30 2c 37 3b 30 3b  |ts..b..19,0,7;0;|
00000500  0d 02 6c 08 e6 30 2c 31  0d 02 76 2d ec 31 30 30  |..l..0,1..v-.100|
00000510  30 2c 72 61 79 25 28 31  29 3a ec 6f 78 25 2c 6f  |0,ray%(1):.ox%,o|
00000520  74 6f 70 25 3a f0 38 35  2c 31 30 30 30 2c 72 61  |top%:.85,1000,ra|
00000530  79 25 28 32 29 0d 02 80  2a e6 30 2c 32 3a f0 38  |y%(2)...*.0,2:.8|
00000540  35 2c 6f 78 25 2c 6f 62  6f 74 74 6f 6d 25 3a f0  |5,ox%,obottom%:.|
00000550  38 35 2c 31 30 30 30 2c  72 61 79 25 28 33 29 0d  |85,1000,ray%(3).|
00000560  02 8a 19 e6 30 2c 31 3a  f0 38 35 2c 31 30 30 30  |....0,1:.85,1000|
00000570  2c 72 61 79 25 28 34 29  0d 02 94 36 f2 64 72 61  |,ray%(4)...6.dra|
00000580  77 6c 69 67 68 74 28 6c  78 25 2c 6c 73 69 7a 65  |wlight(lx%,lsize|
00000590  25 2c 33 29 3a f2 64 72  61 77 6f 62 6a 65 63 74  |%,3):.drawobject|
000005a0  28 6f 78 25 2c 6f 73 69  7a 65 25 2c 33 29 0d 02  |(ox%,osize%,3)..|
000005b0  9e 09 f2 72 61 79 73 0d  02 a8 36 fb 31 32 39 3a  |...rays...6.129:|
000005c0  f1 8a 32 2c 32 38 29 22  20 22 3a fb 31 32 38 3a  |..2,28)" ":.128:|
000005d0  fb 31 3a f1 8a 33 2c 32  38 29 22 20 3d 20 70 61  |.1:..3,28)" = pa|
000005e0  72 74 69 61 6c 20 73 68  61 64 6f 77 22 0d 02 b2  |rtial shadow"...|
000005f0  34 fb 31 33 30 3a f1 8a  32 2c 33 30 29 22 20 22  |4.130:..2,30)" "|
00000600  3a fb 31 32 38 3a fb 32  3a f1 8a 33 2c 33 30 29  |:.128:.2:..3,30)|
00000610  22 20 3d 20 74 6f 74 61  6c 20 73 68 61 64 6f 77  |" = total shadow|
00000620  22 0d 02 bc 09 2a 66 78  31 35 0d 02 c6 10 f5 fd  |"....*fx15......|
00000630  a5 3d 33 32 3a f2 6d 65  6e 75 0d 02 d0 05 e1 0d  |.=32:.menu......|
00000640  02 da 0a dd f2 6d 65 6e  75 0d 02 e4 68 e7 20 73  |.....menu...h. s|
00000650  68 61 64 6f 77 25 3d b9  20 ef 31 39 2c 30 2c 30  |hadow%=. .19,0,0|
00000660  3b 30 3b 3a e6 30 2c 31  32 38 3a da 3a f2 64 72  |;0;:.0,128:.:.dr|
00000670  61 77 6c 69 67 68 74 28  6c 78 25 2c 6c 73 69 7a  |awlight(lx%,lsiz|
00000680  65 25 2c 33 29 3a f2 64  72 61 77 6f 62 6a 65 63  |e%,3):.drawobjec|
00000690  74 28 6f 78 25 2c 6f 73  69 7a 65 25 2c 33 29 3a  |t(ox%,osize%,3):|
000006a0  f2 73 63 72 65 65 6e 3a  73 68 61 64 6f 77 25 3d  |.screen:shadow%=|
000006b0  a3 0d 02 ee 0b fb 31 32  38 3a fb 33 0d 02 f8 0b  |......128:.3....|
000006c0  2a 46 58 31 35 2c 30 0d  03 02 0f 2a 46 58 31 33  |*FX15,0....*FX13|
000006d0  38 2c 30 2c 33 32 0d 03  0c 14 f1 8a 33 32 2c 32  |8,0,32......32,2|
000006e0  29 22 4f 50 54 49 4f 4e  53 22 0d 03 16 1d f1 8a  |)"OPTIONS"......|
000006f0  33 33 2c 34 29 22 54 45  53 54 22 8a 33 33 2c 35  |33,4)"TEST".33,5|
00000700  29 22 50 41 47 45 22 0d  03 20 1f f1 8a 33 33 2c  |)"PAGE".. ...33,|
00000710  39 29 22 4d 4f 56 45 22  8a 33 33 2c 31 30 29 22  |9)"MOVE".33,10)"|
00000720  4c 49 47 48 54 22 0d 03  2a 21 f1 8a 33 33 2c 31  |LIGHT"..*!..33,1|
00000730  34 29 22 4d 4f 56 45 22  8a 33 33 2c 31 35 29 22  |4)"MOVE".33,15)"|
00000740  4f 42 4a 45 43 54 22 0d  03 34 21 f1 8a 33 33 2c  |OBJECT"..4!..33,|
00000750  31 39 29 22 4d 4f 56 45  22 8a 33 33 2c 32 30 29  |19)"MOVE".33,20)|
00000760  22 53 57 49 54 43 48 22  0d 03 3e 5b f1 8a 33 32  |"SWITCH"..>[..32|
00000770  2c 32 35 29 22 53 70 61  63 65 22 8a 33 32 2c 32  |,25)"Space".32,2|
00000780  36 29 22 73 65 6c 65 63  74 73 22 8a 33 32 2c 32  |6)"selects".32,2|
00000790  37 29 22 3d 3d 3d 3d 3d  3d 3d 22 8a 33 32 2c 32  |7)"=======".32,2|
000007a0  38 29 22 55 73 65 22 8a  33 32 2c 32 39 29 22 43  |8)"Use".32,29)"C|
000007b0  75 72 73 6f 72 22 8a 33  32 2c 33 30 29 22 6b 65  |ursor".32,30)"ke|
000007c0  79 73 22 0d 03 48 05 f5  0d 03 52 0a 6b 65 79 25  |ys"..H....R.key%|
000007d0  3d a5 0d 03 5c 26 e7 20  6b 65 79 25 3d 33 32 20  |=...\&. key%=32 |
000007e0  6f 6c 64 70 6f 73 25 3d  70 6f 73 25 3a 70 6f 73  |oldpos%=pos%:pos|
000007f0  25 3d 70 6f 73 25 2b 35  0d 03 66 14 e7 20 70 6f  |%=pos%+5..f.. po|
00000800  73 25 3e 32 31 20 70 6f  73 25 3d 36 0d 03 70 7c  |s%>21 pos%=6..p||
00000810  fb 31 32 38 3a f1 8a 33  32 2c 6f 6c 64 70 6f 73  |.128:..32,oldpos|
00000820  25 2d 33 29 22 20 20 20  20 20 20 20 20 22 8a 33  |%-3)"        ".3|
00000830  32 2c 6f 6c 64 70 6f 73  25 2d 32 29 22 20 22 8a  |2,oldpos%-2)" ".|
00000840  33 39 2c 6f 6c 64 70 6f  73 25 2d 32 29 22 20 22  |39,oldpos%-2)" "|
00000850  8a 33 32 2c 6f 6c 64 70  6f 73 25 2d 31 29 22 20  |.32,oldpos%-1)" |
00000860  22 8a 33 39 2c 6f 6c 64  70 6f 73 25 2d 31 29 22  |".39,oldpos%-1)"|
00000870  20 22 8a 33 32 2c 6f 6c  64 70 6f 73 25 29 22 20  | ".32,oldpos%)" |
00000880  20 20 20 20 20 20 20 22  0d 03 7a 6a fb 31 32 39  |       "..zj.129|
00000890  3a f1 8a 33 32 2c 70 6f  73 25 2d 33 29 22 20 20  |:..32,pos%-3)"  |
000008a0  20 20 20 20 20 20 22 8a  33 32 2c 70 6f 73 25 2d  |      ".32,pos%-|
000008b0  32 29 22 20 22 8a 33 39  2c 70 6f 73 25 2d 32 29  |2)" ".39,pos%-2)|
000008c0  22 20 22 8a 33 32 2c 70  6f 73 25 2d 31 29 22 20  |" ".32,pos%-1)" |
000008d0  22 8a 33 39 2c 70 6f 73  25 2d 31 29 22 20 22 8a  |".39,pos%-1)" ".|
000008e0  33 32 2c 70 6f 73 25 29  22 20 20 20 20 20 20 20  |32,pos%)"       |
000008f0  20 22 0d 03 84 0d fd 6b  65 79 25 3c 3e 33 32 0d  | ".....key%<>32.|
00000900  03 8e 12 e7 20 70 6f 73  25 3d 36 20 f2 74 65 73  |.... pos%=6 .tes|
00000910  74 0d 03 98 14 e7 20 70  6f 73 25 3d 31 31 20 f2  |t..... pos%=11 .|
00000920  6c 69 67 68 74 0d 03 a2  15 e7 20 70 6f 73 25 3d  |light..... pos%=|
00000930  31 36 20 f2 6f 62 6a 65  63 74 0d 03 ac 15 e7 20  |16 .object..... |
00000940  70 6f 73 25 3d 32 31 20  f2 73 68 61 64 6f 77 0d  |pos%=21 .shadow.|
00000950  03 b6 05 e1 0d 03 c0 0b  dd f2 6c 69 67 68 74 0d  |..........light.|
00000960  03 ca 05 f5 0d 03 d4 1b  6f 6c 78 25 3d 6c 78 25  |........olx%=lx%|
00000970  3a 6f 6c 73 69 7a 65 25  3d 6c 73 69 7a 65 25 0d  |:olsize%=lsize%.|
00000980  03 de 36 e7 20 a6 2d 35  38 20 6c 73 69 7a 65 25  |..6. .-58 lsize%|
00000990  3d 6c 73 69 7a 65 25 2b  32 30 3a e7 20 6c 73 69  |=lsize%+20:. lsi|
000009a0  7a 65 25 3e 33 30 30 20  ef 37 3a 6c 73 69 7a 65  |ze%>300 .7:lsize|
000009b0  25 3d 33 30 30 0d 03 e8  34 e7 20 a6 2d 34 32 20  |%=300...4. .-42 |
000009c0  6c 73 69 7a 65 25 3d 6c  73 69 7a 65 25 2d 32 30  |lsize%=lsize%-20|
000009d0  3a e7 20 6c 73 69 7a 65  25 3c 32 30 20 ef 37 3a  |:. lsize%<20 .7:|
000009e0  6c 73 69 7a 65 25 3d 32  30 0d 03 f2 28 e7 20 a6  |lsize%=20...(. .|
000009f0  2d 32 36 20 6c 78 25 3d  6c 78 25 2d 32 30 3a e7  |-26 lx%=lx%-20:.|
00000a00  20 6c 78 25 3c 32 30 20  ef 37 3a 6c 78 25 3d 32  | lx%<20 .7:lx%=2|
00000a10  30 0d 03 fc 35 e7 20 a6  2d 31 32 32 20 6c 78 25  |0...5. .-122 lx%|
00000a20  3d 6c 78 25 2b 32 30 3a  e7 20 6c 78 25 3e 28 6f  |=lx%+20:. lx%>(o|
00000a30  78 25 2d 36 30 29 20 ef  37 3a 6c 78 25 3d 28 6f  |x%-60) .7:lx%=(o|
00000a40  78 25 2d 36 30 29 0d 04  06 3c e7 20 6f 6c 78 25  |x%-60)...<. olx%|
00000a50  3c 3e 6c 78 25 20 84 20  6f 6c 73 69 7a 65 25 3c  |<>lx% . olsize%<|
00000a60  3e 6c 73 69 7a 65 25 20  f2 64 72 61 77 6c 69 67  |>lsize% .drawlig|
00000a70  68 74 28 6f 6c 78 25 2c  6f 6c 73 69 7a 65 25 2c  |ht(olx%,olsize%,|
00000a80  30 29 0d 04 10 1c f2 64  72 61 77 6c 69 67 68 74  |0).....drawlight|
00000a90  28 6c 78 25 2c 6c 73 69  7a 65 25 2c 33 29 0d 04  |(lx%,lsize%,3)..|
00000aa0  1a 0c fd a6 28 30 29 3d  33 32 0d 04 24 09 f2 6d  |....(0)=32..$..m|
00000ab0  65 6e 75 0d 04 2e 05 e1  0d 04 38 0c dd f2 6f 62  |enu.......8...ob|
00000ac0  6a 65 63 74 0d 04 42 05  f5 0d 04 4c 1b 6f 6f 78  |ject..B....L.oox|
00000ad0  25 3d 6f 78 25 3a 6f 6f  73 69 7a 65 25 3d 6f 73  |%=ox%:oosize%=os|
00000ae0  69 7a 65 25 0d 04 56 36  e7 20 a6 2d 35 38 20 6f  |ize%..V6. .-58 o|
00000af0  73 69 7a 65 25 3d 6f 73  69 7a 65 25 2b 32 30 3a  |size%=osize%+20:|
00000b00  e7 20 6f 73 69 7a 65 25  3e 33 30 30 20 ef 37 3a  |. osize%>300 .7:|
00000b10  6f 73 69 7a 65 25 3d 33  30 30 0d 04 60 34 e7 20  |osize%=300..`4. |
00000b20  a6 2d 34 32 20 6f 73 69  7a 65 25 3d 6f 73 69 7a  |.-42 osize%=osiz|
00000b30  65 25 2d 32 30 3a e7 20  6f 73 69 7a 65 25 3c 32  |e%-20:. osize%<2|
00000b40  30 20 ef 37 3a 6f 73 69  7a 65 25 3d 32 30 0d 04  |0 .7:osize%=20..|
00000b50  6a 34 e7 20 a6 2d 32 36  20 6f 78 25 3d 6f 78 25  |j4. .-26 ox%=ox%|
00000b60  2d 32 30 3a e7 20 6f 78  25 3c 28 6c 78 25 2b 36  |-20:. ox%<(lx%+6|
00000b70  30 29 20 ef 37 3a 6f 78  25 3d 28 6c 78 25 2b 36  |0) .7:ox%=(lx%+6|
00000b80  30 29 0d 04 74 2b e7 20  a6 2d 31 32 32 20 6f 78  |0)..t+. .-122 ox|
00000b90  25 3d 6f 78 25 2b 32 30  3a e7 20 6f 78 25 3e 39  |%=ox%+20:. ox%>9|
00000ba0  37 30 20 ef 37 3a 6f 78  25 3d 39 37 30 0d 04 7e  |70 .7:ox%=970..~|
00000bb0  3e 20 e7 20 6f 6f 78 25  3c 3e 6f 78 25 20 84 20  |> . oox%<>ox% . |
00000bc0  6f 6f 73 69 7a 65 25 3c  3e 6f 73 69 7a 65 25 20  |oosize%<>osize% |
00000bd0  f2 64 72 61 77 6f 62 6a  65 63 74 28 6f 6f 78 25  |.drawobject(oox%|
00000be0  2c 6f 6f 73 69 7a 65 25  2c 30 29 0d 04 88 1d f2  |,oosize%,0).....|
00000bf0  64 72 61 77 6f 62 6a 65  63 74 28 6f 78 25 2c 6f  |drawobject(ox%,o|
00000c00  73 69 7a 65 25 2c 33 29  0d 04 92 0c fd a6 28 30  |size%,3)......(0|
00000c10  29 3d 33 32 0d 04 9c 09  f2 6d 65 6e 75 0d 04 a6  |)=32.....menu...|
00000c20  05 e1 0d 04 b0 19 dd f2  69 6e 73 74 72 75 63 74  |........instruct|
00000c30  3a ef 31 39 2c 30 2c 34  3b 30 3b 0d 04 ba 3d f1  |:.19,0,4;0;...=.|
00000c40  8a 31 31 2c 31 29 22 53  48 41 44 4f 57 20 49 4e  |.11,1)"SHADOW IN|
00000c50  56 45 53 54 49 47 41 54  49 4f 4e 22 8a 31 31 2c  |VESTIGATION".11,|
00000c60  32 29 22 7e 7e 7e 7e 7e  7e 7e 7e 7e 7e 7e 7e 7e  |2)"~~~~~~~~~~~~~|
00000c70  7e 7e 7e 7e 7e 7e 7e 22  0d 04 c4 11 ef 32 38 2c  |~~~~~~~".....28,|
00000c80  30 2c 33 31 2c 33 39 2c  33 0d 04 ce 7b f1 27 27  |0,31,39,3...{.''|
00000c90  22 54 6f 20 69 6e 76 65  73 74 69 67 61 74 65 20  |"To investigate |
00000ca0  73 68 61 64 6f 77 73 20  79 6f 75 20 6d 61 79 20  |shadows you may |
00000cb0  6d 6f 76 65 20 61 22 27  27 22 6c 69 67 68 74 2c  |move a"''"light,|
00000cc0  20 61 6e 20 6f 62 6a 65  63 74 20 74 6f 20 63 61  | an object to ca|
00000cd0  73 74 20 74 68 65 20 73  68 61 64 6f 77 22 27 27  |st the shadow"''|
00000ce0  22 61 6e 64 20 61 20 73  77 69 74 63 68 20 74 6f  |"and a switch to|
00000cf0  20 74 75 72 6e 20 74 68  65 20 6c 69 67 68 74 20  | turn the light |
00000d00  6f 6e 2e 22 0d 04 d8 42  f1 27 22 59 6f 75 20 6d  |on."...B.'"You m|
00000d10  61 79 20 61 6c 73 6f 20  61 6c 74 65 72 20 74 68  |ay also alter th|
00000d20  65 20 73 69 7a 65 20 6f  66 20 74 68 65 20 6c 69  |e size of the li|
00000d30  67 68 74 22 27 22 61 6e  64 20 74 68 65 20 6f 62  |ght"'"and the ob|
00000d40  6a 65 63 74 2e 22 0d 04  e2 51 f1 27 27 22 55 73  |ject."...Q.''"Us|
00000d50  65 20 53 70 61 63 65 20  74 6f 20 6d 6f 76 65 20  |e Space to move |
00000d60  74 68 65 20 6d 65 6e 75  20 73 65 6c 65 63 74 69  |the menu selecti|
00000d70  6f 6e 22 27 27 22 62 6f  78 2c 20 74 68 65 6e 20  |on"''"box, then |
00000d80  75 73 65 20 74 68 65 20  43 75 72 73 6f 72 20 6b  |use the Cursor k|
00000d90  65 79 73 20 74 6f 22 0d  04 ec 40 f1 27 22 6d 6f  |eys to"...@.'"mo|
00000da0  76 65 20 74 68 65 20 6c  69 67 68 74 20 6f 72 20  |ve the light or |
00000db0  74 68 65 20 6f 62 6a 65  63 74 20 6f 72 20 74 6f  |the object or to|
00000dc0  22 27 27 22 61 6c 74 65  72 20 74 68 65 69 72 20  |"''"alter their |
00000dd0  73 69 7a 65 73 2e 22 0d  04 f6 24 f1 8a 37 2c 32  |sizes."...$..7,2|
00000de0  37 29 22 50 72 65 73 73  20 53 70 61 63 65 20 74  |7)"Press Space t|
00000df0  6f 20 63 6f 6e 74 69 6e  75 65 22 0d 05 00 0c f5  |o continue".....|
00000e00  fd a5 3d 33 32 3a db 0d  05 0a 8c f1 27 27 22 59  |..=32:......''"Y|
00000e10  6f 75 72 20 61 69 6d 20  69 73 20 74 6f 20 66 69  |our aim is to fi|
00000e20  6e 64 20 6f 75 74 20 77  68 79 20 73 6f 6d 65 20  |nd out why some |
00000e30  73 68 61 64 6f 77 73 22  27 22 68 61 76 65 20 73  |shadows"'"have s|
00000e40  68 61 72 70 20 65 64 67  65 73 20 61 6e 64 20 6f  |harp edges and o|
00000e50  74 68 65 72 20 73 68 61  64 6f 77 73 22 27 27 22  |ther shadows"''"|
00000e60  61 72 65 20 76 65 72 79  20 62 6c 75 72 72 65 64  |are very blurred|
00000e70  2c 20 77 69 74 68 20 61  20 6c 6f 74 20 6f 66 22  |, with a lot of"|
00000e80  27 27 22 70 61 72 74 69  61 6c 20 73 68 61 64 6f  |''"partial shado|
00000e90  77 2e 22 0d 05 14 97 f1  27 27 22 41 74 20 61 6e  |w.".....''"At an|
00000ea0  79 20 74 69 6d 65 20 79  6f 75 20 6d 61 79 20 61  |y time you may a|
00000eb0  74 74 65 6d 70 74 20 61  20 73 68 6f 72 74 22 27  |ttempt a short"'|
00000ec0  27 22 74 65 73 74 20 62  79 20 73 65 6c 65 63 74  |'"test by select|
00000ed0  69 6e 67 20 74 68 65 20  27 54 61 6b 65 20 54 65  |ing the 'Take Te|
00000ee0  73 74 27 22 27 27 22 6f  70 74 69 6f 6e 2e 20 49  |st'"''"option. I|
00000ef0  66 20 79 6f 75 20 64 6f  20 6e 6f 74 20 73 63 6f  |f you do not sco|
00000f00  72 65 20 77 65 6c 6c 22  27 27 22 6d 6f 72 65 20  |re well"''"more |
00000f10  69 6e 76 65 73 74 69 67  61 74 69 6f 6e 73 20 77  |investigations w|
00000f20  69 6c 6c 20 68 65 6c 70  2e 22 0d 05 1e 24 f1 8a  |ill help."...$..|
00000f30  37 2c 32 37 29 22 50 72  65 73 73 20 53 70 61 63  |7,27)"Press Spac|
00000f40  65 20 74 6f 20 63 6f 6e  74 69 6e 75 65 22 0d 05  |e to continue"..|
00000f50  28 12 f5 fd a5 3d 33 32  3a ef 32 36 3a db 3a e1  |(....=32:.26:.:.|
00000f60  0d 05 32 0a dd f2 74 65  73 74 0d 05 3c 19 ef 32  |..2...test..<..2|
00000f70  30 3a ef 31 39 2c 30 2c  34 3b 30 3b 3a fb 31 32  |0:.19,0,4;0;:.12|
00000f80  38 3a db 0d 05 46 4b f1  8a 31 31 2c 31 29 22 53  |8:...FK..11,1)"S|
00000f90  48 41 44 4f 57 20 49 4e  56 45 53 54 49 47 41 54  |HADOW INVESTIGAT|
00000fa0  49 4f 4e 22 8a 31 31 2c  32 29 22 7e 7e 7e 7e 7e  |ION".11,2)"~~~~~|
00000fb0  7e 7e 7e 7e 7e 7e 7e 7e  7e 7e 7e 7e 7e 7e 7e 22  |~~~~~~~~~~~~~~~"|
00000fc0  3a ef 32 38 2c 30 2c 33  31 2c 32 37 2c 33 0d 05  |:.28,0,31,27,3..|
00000fd0  50 95 f1 27 22 54 6f 20  70 72 6f 64 75 63 65 20  |P..'"To produce |
00000fe0  61 20 73 68 61 64 6f 77  20 77 68 69 63 68 20 69  |a shadow which i|
00000ff0  73 22 27 22 73 68 61 72  70 2c 20 65 69 74 68 65  |s"'"sharp, eithe|
00001000  72 20 74 68 65 20 6c 69  67 68 74 20 6d 75 73 74  |r the light must|
00001010  22 27 22 62 65 20 28 31  29 20 20 20 20 20 20 6f  |"'"be (1)      o|
00001020  72 20 74 68 65 20 28 32  29 20 20 20 20 20 20 22  |r the (2)      "|
00001030  27 22 62 65 74 77 65 65  6e 20 74 68 65 20 6c 69  |'"between the li|
00001040  67 68 74 20 61 6e 64 20  74 68 65 22 27 27 22 6f  |ght and the"''"o|
00001050  62 6a 65 63 74 20 6d 75  73 74 20 62 65 20 62 69  |bject must be bi|
00001060  67 2e 22 0d 05 5a 67 f1  27 22 42 6c 75 72 72 65  |g."..Zg.'"Blurre|
00001070  64 20 73 68 61 64 6f 77  73 20 72 65 73 75 6c 74  |d shadows result|
00001080  20 66 72 6f 6d 22 27 27  22 61 20 6c 61 72 67 65  | from"''"a large|
00001090  20 28 33 29 20 20 20 20  20 20 6f 72 20 74 68 65  | (3)      or the|
000010a0  22 27 27 22 28 34 29 20  20 20 20 20 20 62 65 69  |"''"(4)      bei|
000010b0  6e 67 20 28 35 29 20 20  20 20 20 22 27 27 22 74  |ng (5)     "''"t|
000010c0  68 65 20 6c 69 67 68 74  2e 22 0d 05 64 19 ef 32  |he light."..d..2|
000010d0  38 2c 32 39 2c 32 36 2c  33 39 2c 33 3a fb 31 32  |8,29,26,39,3:.12|
000010e0  39 3a db 0d 05 6e 0d f1  27 22 57 4f 52 44 53 22  |9:...n..'"WORDS"|
000010f0  0d 05 78 41 f1 27 22 41  2e 2e 73 68 61 64 6f 77  |..xA.'"A..shadow|
00001100  22 27 27 22 42 2e 2e 73  6d 61 6c 6c 22 27 27 22  |"''"B..small"''"|
00001110  43 2e 2e 62 69 67 22 27  27 22 44 2e 2e 6e 65 61  |C..big"''"D..nea|
00001120  72 22 27 27 22 45 2e 2e  64 69 73 74 61 6e 63 65  |r"''"E..distance|
00001130  22 0d 05 82 3e f1 22 46  2e 2e 6c 69 67 68 74 22  |"...>."F..light"|
00001140  27 27 22 47 2e 2e 6f 62  6a 65 63 74 22 27 27 22  |''"G..object"''"|
00001150  48 2e 2e 73 75 6e 22 27  27 22 49 2e 2e 72 61 79  |H..sun"''"I..ray|
00001160  73 22 27 27 22 4a 2e 2e  63 6f 6c 6f 75 72 22 0d  |s"''"J..colour".|
00001170  05 8c 0c ef 32 36 3a fb  31 32 38 0d 05 96 29 f1  |....26:.128...).|
00001180  8a 30 2c 32 32 29 22 3d  3d 3d 3d 3d 3d 3d 3d 3d  |.0,22)"=========|
00001190  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 3d  |================|
000011a0  3d 3d 22 20 0d 05 a0 08  fb 31 32 38 0d 05 aa 0b  |==" .....128....|
000011b0  e3 4e 25 3d 31 b8 35 0d  05 b4 37 f1 8a 30 2c 32  |.N%=1.5...7..0,2|
000011c0  36 29 22 53 65 6c 65 63  74 20 6c 65 74 74 65 72  |6)"Select letter|
000011d0  20 6f 66 20 77 6f 72 64  20 66 6f 72 22 27 27 22  | of word for"''"|
000011e0  70 6f 73 69 74 69 6f 6e  20 22 3b 4e 25 3b 0d 05  |position ";N%;..|
000011f0  be 10 e8 22 20 22 3b 6c  65 74 74 65 72 24 0d 05  |..." ";letter$..|
00001200  c8 3a e7 20 97 28 6c 65  74 74 65 72 24 29 3c 36  |.:. .(letter$)<6|
00001210  35 20 84 20 97 28 6c 65  74 74 65 72 24 29 3e 37  |5 . .(letter$)>7|
00001220  35 20 8c 20 f1 8a 30 2c  32 36 29 3b 89 28 31 32  |5 . ..0,26);.(12|
00001230  30 29 3a e5 8d 74 74 45  0d 05 d2 08 fb 31 32 39  |0):..ttE.....129|
00001240  0d 05 dc 28 f1 8a 58 25  28 4e 25 29 2c 59 25 28  |...(..X%(N%),Y%(|
00001250  4e 25 29 29 77 6f 72 64  24 28 97 28 6c 65 74 74  |N%))word$(.(lett|
00001260  65 72 24 29 2d 36 34 29  0d 05 e6 36 e7 77 6f 72  |er$)-64)...6.wor|
00001270  64 24 28 97 28 6c 65 74  74 65 72 24 29 2d 36 34  |d$(.(letter$)-64|
00001280  29 3d 63 6f 72 72 65 63  74 24 28 4e 25 29 20 73  |)=correct$(N%) s|
00001290  63 6f 72 65 25 3d 73 63  6f 72 65 25 2b 31 0d 05  |core%=score%+1..|
000012a0  f0 08 fb 31 32 38 0d 05  fa 12 f1 8a 30 2c 32 36  |...128......0,26|
000012b0  29 3b 89 28 31 32 30 29  0d 06 04 05 ed 0d 06 0e  |);.(120)........|
000012c0  2e f1 8a 30 2c 32 36 29  22 59 6f 75 20 67 6f 74  |...0,26)"You got|
000012d0  20 22 3b 73 63 6f 72 65  25 3b 22 20 77 6f 72 64  | ";score%;" word|
000012e0  73 20 63 6f 72 72 65 63  74 2e 22 0d 06 18 55 e7  |s correct."...U.|
000012f0  20 73 63 6f 72 65 25 3c  35 20 f1 8a 30 2c 32 38  | score%<5 ..0,28|
00001300  29 22 50 72 65 73 73 20  73 70 61 63 65 20 74 6f  |)"Press space to|
00001310  20 63 6f 6e 74 69 6e 75  65 20 69 6e 76 65 73 74  | continue invest|
00001320  69 67 61 74 69 6e 67 2e  22 3a f5 fd a5 3d 33 32  |igating.":...=32|
00001330  3a f2 73 65 74 75 70 61  3a f2 6d 65 6e 75 3a e1  |:.setupa:.menu:.|
00001340  0d 06 22 63 e7 20 73 63  6f 72 65 25 3d 35 20 f1  |.."c. score%=5 .|
00001350  8a 30 2c 32 38 29 22 59  6f 75 20 75 6e 64 65 72  |.0,28)"You under|
00001360  73 74 61 6e 64 20 73 68  61 64 6f 77 73 2e 22 27  |stand shadows."'|
00001370  27 22 50 72 65 73 73 20  73 70 61 63 65 20 66 6f  |'"Press space fo|
00001380  72 20 6e 65 78 74 20 70  65 72 73 6f 6e 20 74 6f  |r next person to|
00001390  20 73 74 61 72 74 2e 22  3a f5 fd a5 3d 33 32 3a  | start.":...=32:|
000013a0  d8 3a f9 0d 06 2c 05 e1  0d 06 36 13 f4 20 45 52  |.:...,....6.. ER|
000013b0  52 4f 52 20 48 41 4e 44  4c 45 52 0d 06 40 09 2a  |ROR HANDLER..@.*|
000013c0  46 58 31 32 0d 06 4a 06  eb 36 0d 06 54 14 f6 3a  |FX12..J..6..T..:|
000013d0  f1 22 20 61 74 20 6c 69  6e 65 20 22 3b 9e 0d 06  |." at line ";...|
000013e0  5e 05 e0 0d 06 68 40 dc  73 68 61 64 6f 77 2c 73  |^....h@.shadow,s|
000013f0  6d 61 6c 6c 2c 62 69 67  2c 6e 65 61 72 2c 64 69  |mall,big,near,di|
00001400  73 74 61 6e 63 65 2c 6c  69 67 68 74 2c 6f 62 6a  |stance,light,obj|
00001410  65 63 74 2c 73 75 6e 2c  72 61 79 73 2c 63 6f 6c  |ect,sun,rays,col|
00001420  6f 75 72 0d 06 72 3e dc  33 2c 38 2c 73 6d 61 6c  |our..r>.3,8,smal|
00001430  6c 2c 31 39 2c 38 2c 64  69 73 74 61 6e 63 65 2c  |l,19,8,distance,|
00001440  38 2c 31 36 2c 6c 69 67  68 74 2c 30 2c 31 38 2c  |8,16,light,0,18,|
00001450  6f 62 6a 65 63 74 2c 31  35 2c 31 38 2c 6e 65 61  |object,15,18,nea|
00001460  72 0d 06 7c 27 f4 20 44  4f 57 4e 20 4c 4f 41 44  |r..|'. DOWN LOAD|
00001470  20 4d 45 4d 4f 52 59 20  46 4f 52 20 44 49 53 43  | MEMORY FOR DISC|
00001480  20 53 59 53 54 45 4d 53  0d 06 86 09 2a 54 41 50  | SYSTEMS....*TAP|
00001490  45 0d 06 90 44 e3 20 49  25 3d 30 20 b8 20 b8 50  |E...D. I%=0 . .P|
000014a0  2d 90 20 88 20 34 3a 49  25 21 26 45 30 30 3d 49  |-. . 4:I%!&E00=I|
000014b0  25 21 90 3a ed 3a 3f 26  31 33 3d 3f 26 31 33 2d  |%!.:.:?&13=?&13-|
000014c0  28 90 2d 26 45 30 30 29  81 32 35 36 3a d0 3d 26  |(.-&E00).256:.=&|
000014d0  45 30 30 3a f9 0d ff                              |E00:...|
000014d7