� >StartUp
� � �$ " Error code: ";�:�

� 15:�
(�load_panels
2	�13:�
<�set_screen
F� 24,160;268;1116;766;
P� 128+0 Ȝ 0:�
Z:ș "OS_SpriteOp",256+40,panel_area,"loading1" � ,,,w,h
dDș "OS_SpriteOp",256+34,panel_area,"loading1",(1280-4*w)/2,400,8
nș "OS_Byte",112,1
xș "OS_Byte",113,2
��128+0 Ȝ 0:�
�ȗ ȓ 100,292,1080,440
��"<RunGame$Dir>.!RunImage"
��
�
�� �set_screen
�ș "OS_Byte",112,1
�ș "OS_Byte",113,2
�7ș "OS_SpriteOp",256+34,panel_area,"panelA",0,768,8
�5ș "OS_SpriteOp",256+34,panel_area,"panelB",0,0,8
�7ș "OS_SpriteOp",256+34,panel_area,"panelC",0,268,8
�:ș "OS_SpriteOp",256+34,panel_area,"panelD",1120,268,8
�ș "OS_Byte",112,2

ș "OS_Byte",113,1

7ș "OS_SpriteOp",256+34,panel_area,"panelA",0,768,8

5ș "OS_SpriteOp",256+34,panel_area,"panelB",0,0,8

"7ș "OS_SpriteOp",256+34,panel_area,"panelC",0,268,8

,:ș "OS_SpriteOp",256+34,panel_area,"panelD",1120,268,8

6�

@

J� �load_panels

T� Find size of panel file

^:ș "OS_File",5,"<RunGame$Dir>.Panels" � ftype,,,,splen

h&� ftype=0 � 255,"No 'Panels' file"

r

|;� Reserve space for panels, allowing for 16-byte header

�!splen+= 16:� panel_area splen

�

�4� Initialise the panel area and load the sprites

�E!panel_area=splen:panel_area!4=0:panel_area!8=16:panel_area!12=16

�@� SYS "OS_SpriteOp",256+10,panel_area,"<RunGame$Dir>.Panels"

�4�("LOAD <RunGame$Dir>.Panels "+�~(panel_area+4))

��

�

�� �load_title

�

�=ș "OS_File",5,"<RunGame$Dir>.LoadScreen" � ftype,,,,tlen

�� ftype=0 �

�
tlen+= 16:� title_area tlen

D!title_area=tlen:title_area!4=0:title_area!8=16:title_area!12=16
&D� SYS "OS_SpriteOp",256+10,title_area,"<RunGame$Dir>.LoadScreen"
08�("LOAD <RunGame$Dir>.LoadScreen "+�~(title_area+4))
:�
D
N� �wait(seconds)
X
� time
b
time=�
l� � �>time+seconds*100
v�
�
�

00000000  0d 00 0a 0e f4 20 3e 53  74 61 72 74 55 70 0d 00  |..... >StartUp..|
00000010  14 1f ee 20 85 20 f1 f6  24 20 22 20 45 72 72 6f  |... . ..$ " Erro|
00000020  72 20 63 6f 64 65 3a 20  22 3b 9e 3a e0 0d 00 1e  |r code: ";.:....|
00000030  0a eb 20 31 35 3a 87 0d  00 28 10 f2 6c 6f 61 64  |.. 15:...(..load|
00000040  5f 70 61 6e 65 6c 73 0d  00 32 09 eb 31 33 3a 87  |_panels..2..13:.|
00000050  0d 00 3c 0f f2 73 65 74  5f 73 63 72 65 65 6e 0d  |..<..set_screen.|
00000060  00 46 1a ef 20 32 34 2c  31 36 30 3b 32 36 38 3b  |.F.. 24,160;268;|
00000070  31 31 31 36 3b 37 36 36  3b 0d 00 50 12 e6 20 31  |1116;766;..P.. 1|
00000080  32 38 2b 30 20 c8 9c 20  30 3a da 0d 00 5a 3a c8  |28+0 .. 0:...Z:.|
00000090  99 20 22 4f 53 5f 53 70  72 69 74 65 4f 70 22 2c  |. "OS_SpriteOp",|
000000a0  32 35 36 2b 34 30 2c 70  61 6e 65 6c 5f 61 72 65  |256+40,panel_are|
000000b0  61 2c 22 6c 6f 61 64 69  6e 67 31 22 20 b8 20 2c  |a,"loading1" . ,|
000000c0  2c 2c 77 2c 68 0d 00 64  44 c8 99 20 22 4f 53 5f  |,,w,h..dD.. "OS_|
000000d0  53 70 72 69 74 65 4f 70  22 2c 32 35 36 2b 33 34  |SpriteOp",256+34|
000000e0  2c 70 61 6e 65 6c 5f 61  72 65 61 2c 22 6c 6f 61  |,panel_area,"loa|
000000f0  64 69 6e 67 31 22 2c 28  31 32 38 30 2d 34 2a 77  |ding1",(1280-4*w|
00000100  29 2f 32 2c 34 30 30 2c  38 0d 00 6e 16 c8 99 20  |)/2,400,8..n... |
00000110  22 4f 53 5f 42 79 74 65  22 2c 31 31 32 2c 31 0d  |"OS_Byte",112,1.|
00000120  00 78 16 c8 99 20 22 4f  53 5f 42 79 74 65 22 2c  |.x... "OS_Byte",|
00000130  31 31 33 2c 32 0d 00 82  11 e6 31 32 38 2b 30 20  |113,2.....128+0 |
00000140  c8 9c 20 30 3a da 0d 00  8c 1a c8 97 20 c8 93 20  |.. 0:....... .. |
00000150  31 30 30 2c 32 39 32 2c  31 30 38 30 2c 34 34 30  |100,292,1080,440|
00000160  0d 00 96 1e d7 22 3c 52  75 6e 47 61 6d 65 24 44  |....."<RunGame$D|
00000170  69 72 3e 2e 21 52 75 6e  49 6d 61 67 65 22 0d 00  |ir>.!RunImage"..|
00000180  a0 05 e0 0d 00 aa 04 0d  00 b4 11 dd 20 f2 73 65  |............ .se|
00000190  74 5f 73 63 72 65 65 6e  0d 00 be 16 c8 99 20 22  |t_screen...... "|
000001a0  4f 53 5f 42 79 74 65 22  2c 31 31 32 2c 31 0d 00  |OS_Byte",112,1..|
000001b0  c8 16 c8 99 20 22 4f 53  5f 42 79 74 65 22 2c 31  |.... "OS_Byte",1|
000001c0  31 33 2c 32 0d 00 d2 37  c8 99 20 22 4f 53 5f 53  |13,2...7.. "OS_S|
000001d0  70 72 69 74 65 4f 70 22  2c 32 35 36 2b 33 34 2c  |priteOp",256+34,|
000001e0  70 61 6e 65 6c 5f 61 72  65 61 2c 22 70 61 6e 65  |panel_area,"pane|
000001f0  6c 41 22 2c 30 2c 37 36  38 2c 38 0d 00 dc 35 c8  |lA",0,768,8...5.|
00000200  99 20 22 4f 53 5f 53 70  72 69 74 65 4f 70 22 2c  |. "OS_SpriteOp",|
00000210  32 35 36 2b 33 34 2c 70  61 6e 65 6c 5f 61 72 65  |256+34,panel_are|
00000220  61 2c 22 70 61 6e 65 6c  42 22 2c 30 2c 30 2c 38  |a,"panelB",0,0,8|
00000230  0d 00 e6 37 c8 99 20 22  4f 53 5f 53 70 72 69 74  |...7.. "OS_Sprit|
00000240  65 4f 70 22 2c 32 35 36  2b 33 34 2c 70 61 6e 65  |eOp",256+34,pane|
00000250  6c 5f 61 72 65 61 2c 22  70 61 6e 65 6c 43 22 2c  |l_area,"panelC",|
00000260  30 2c 32 36 38 2c 38 0d  00 f0 3a c8 99 20 22 4f  |0,268,8...:.. "O|
00000270  53 5f 53 70 72 69 74 65  4f 70 22 2c 32 35 36 2b  |S_SpriteOp",256+|
00000280  33 34 2c 70 61 6e 65 6c  5f 61 72 65 61 2c 22 70  |34,panel_area,"p|
00000290  61 6e 65 6c 44 22 2c 31  31 32 30 2c 32 36 38 2c  |anelD",1120,268,|
000002a0  38 0d 00 fa 16 c8 99 20  22 4f 53 5f 42 79 74 65  |8...... "OS_Byte|
000002b0  22 2c 31 31 32 2c 32 0d  01 04 16 c8 99 20 22 4f  |",112,2...... "O|
000002c0  53 5f 42 79 74 65 22 2c  31 31 33 2c 31 0d 01 0e  |S_Byte",113,1...|
000002d0  37 c8 99 20 22 4f 53 5f  53 70 72 69 74 65 4f 70  |7.. "OS_SpriteOp|
000002e0  22 2c 32 35 36 2b 33 34  2c 70 61 6e 65 6c 5f 61  |",256+34,panel_a|
000002f0  72 65 61 2c 22 70 61 6e  65 6c 41 22 2c 30 2c 37  |rea,"panelA",0,7|
00000300  36 38 2c 38 0d 01 18 35  c8 99 20 22 4f 53 5f 53  |68,8...5.. "OS_S|
00000310  70 72 69 74 65 4f 70 22  2c 32 35 36 2b 33 34 2c  |priteOp",256+34,|
00000320  70 61 6e 65 6c 5f 61 72  65 61 2c 22 70 61 6e 65  |panel_area,"pane|
00000330  6c 42 22 2c 30 2c 30 2c  38 0d 01 22 37 c8 99 20  |lB",0,0,8.."7.. |
00000340  22 4f 53 5f 53 70 72 69  74 65 4f 70 22 2c 32 35  |"OS_SpriteOp",25|
00000350  36 2b 33 34 2c 70 61 6e  65 6c 5f 61 72 65 61 2c  |6+34,panel_area,|
00000360  22 70 61 6e 65 6c 43 22  2c 30 2c 32 36 38 2c 38  |"panelC",0,268,8|
00000370  0d 01 2c 3a c8 99 20 22  4f 53 5f 53 70 72 69 74  |..,:.. "OS_Sprit|
00000380  65 4f 70 22 2c 32 35 36  2b 33 34 2c 70 61 6e 65  |eOp",256+34,pane|
00000390  6c 5f 61 72 65 61 2c 22  70 61 6e 65 6c 44 22 2c  |l_area,"panelD",|
000003a0  31 31 32 30 2c 32 36 38  2c 38 0d 01 36 05 e1 0d  |1120,268,8..6...|
000003b0  01 40 04 0d 01 4a 12 dd  20 f2 6c 6f 61 64 5f 70  |.@...J.. .load_p|
000003c0  61 6e 65 6c 73 0d 01 54  1d f4 20 46 69 6e 64 20  |anels..T.. Find |
000003d0  73 69 7a 65 20 6f 66 20  70 61 6e 65 6c 20 66 69  |size of panel fi|
000003e0  6c 65 0d 01 5e 3a c8 99  20 22 4f 53 5f 46 69 6c  |le..^:.. "OS_Fil|
000003f0  65 22 2c 35 2c 22 3c 52  75 6e 47 61 6d 65 24 44  |e",5,"<RunGame$D|
00000400  69 72 3e 2e 50 61 6e 65  6c 73 22 20 b8 20 66 74  |ir>.Panels" . ft|
00000410  79 70 65 2c 2c 2c 2c 73  70 6c 65 6e 0d 01 68 26  |ype,,,,splen..h&|
00000420  e7 20 66 74 79 70 65 3d  30 20 85 20 32 35 35 2c  |. ftype=0 . 255,|
00000430  22 4e 6f 20 27 50 61 6e  65 6c 73 27 20 66 69 6c  |"No 'Panels' fil|
00000440  65 22 0d 01 72 04 0d 01  7c 3b f4 20 52 65 73 65  |e"..r...|;. Rese|
00000450  72 76 65 20 73 70 61 63  65 20 66 6f 72 20 70 61  |rve space for pa|
00000460  6e 65 6c 73 2c 20 61 6c  6c 6f 77 69 6e 67 20 66  |nels, allowing f|
00000470  6f 72 20 31 36 2d 62 79  74 65 20 68 65 61 64 65  |or 16-byte heade|
00000480  72 0d 01 86 21 73 70 6c  65 6e 2b 3d 20 31 36 3a  |r...!splen+= 16:|
00000490  de 20 70 61 6e 65 6c 5f  61 72 65 61 20 73 70 6c  |. panel_area spl|
000004a0  65 6e 0d 01 90 04 0d 01  9a 34 f4 20 49 6e 69 74  |en.......4. Init|
000004b0  69 61 6c 69 73 65 20 74  68 65 20 70 61 6e 65 6c  |ialise the panel|
000004c0  20 61 72 65 61 20 61 6e  64 20 6c 6f 61 64 20 74  | area and load t|
000004d0  68 65 20 73 70 72 69 74  65 73 0d 01 a4 45 21 70  |he sprites...E!p|
000004e0  61 6e 65 6c 5f 61 72 65  61 3d 73 70 6c 65 6e 3a  |anel_area=splen:|
000004f0  70 61 6e 65 6c 5f 61 72  65 61 21 34 3d 30 3a 70  |panel_area!4=0:p|
00000500  61 6e 65 6c 5f 61 72 65  61 21 38 3d 31 36 3a 70  |anel_area!8=16:p|
00000510  61 6e 65 6c 5f 61 72 65  61 21 31 32 3d 31 36 0d  |anel_area!12=16.|
00000520  01 ae 40 f4 20 53 59 53  20 22 4f 53 5f 53 70 72  |..@. SYS "OS_Spr|
00000530  69 74 65 4f 70 22 2c 32  35 36 2b 31 30 2c 70 61  |iteOp",256+10,pa|
00000540  6e 65 6c 5f 61 72 65 61  2c 22 3c 52 75 6e 47 61  |nel_area,"<RunGa|
00000550  6d 65 24 44 69 72 3e 2e  50 61 6e 65 6c 73 22 0d  |me$Dir>.Panels".|
00000560  01 b8 34 ff 28 22 4c 4f  41 44 20 3c 52 75 6e 47  |..4.("LOAD <RunG|
00000570  61 6d 65 24 44 69 72 3e  2e 50 61 6e 65 6c 73 20  |ame$Dir>.Panels |
00000580  22 2b c3 7e 28 70 61 6e  65 6c 5f 61 72 65 61 2b  |"+.~(panel_area+|
00000590  34 29 29 0d 01 c2 05 e1  0d 01 cc 04 0d 01 d6 11  |4)).............|
000005a0  dd 20 f2 6c 6f 61 64 5f  74 69 74 6c 65 0d 01 e0  |. .load_title...|
000005b0  04 0d 01 ea 3d c8 99 20  22 4f 53 5f 46 69 6c 65  |....=.. "OS_File|
000005c0  22 2c 35 2c 22 3c 52 75  6e 47 61 6d 65 24 44 69  |",5,"<RunGame$Di|
000005d0  72 3e 2e 4c 6f 61 64 53  63 72 65 65 6e 22 20 b8  |r>.LoadScreen" .|
000005e0  20 66 74 79 70 65 2c 2c  2c 2c 74 6c 65 6e 0d 01  | ftype,,,,tlen..|
000005f0  f4 0f e7 20 66 74 79 70  65 3d 30 20 e1 0d 01 fe  |... ftype=0 ....|
00000600  04 0d 02 08 1f 74 6c 65  6e 2b 3d 20 31 36 3a de  |.....tlen+= 16:.|
00000610  20 74 69 74 6c 65 5f 61  72 65 61 20 74 6c 65 6e  | title_area tlen|
00000620  0d 02 12 04 0d 02 1c 44  21 74 69 74 6c 65 5f 61  |.......D!title_a|
00000630  72 65 61 3d 74 6c 65 6e  3a 74 69 74 6c 65 5f 61  |rea=tlen:title_a|
00000640  72 65 61 21 34 3d 30 3a  74 69 74 6c 65 5f 61 72  |rea!4=0:title_ar|
00000650  65 61 21 38 3d 31 36 3a  74 69 74 6c 65 5f 61 72  |ea!8=16:title_ar|
00000660  65 61 21 31 32 3d 31 36  0d 02 26 44 f4 20 53 59  |ea!12=16..&D. SY|
00000670  53 20 22 4f 53 5f 53 70  72 69 74 65 4f 70 22 2c  |S "OS_SpriteOp",|
00000680  32 35 36 2b 31 30 2c 74  69 74 6c 65 5f 61 72 65  |256+10,title_are|
00000690  61 2c 22 3c 52 75 6e 47  61 6d 65 24 44 69 72 3e  |a,"<RunGame$Dir>|
000006a0  2e 4c 6f 61 64 53 63 72  65 65 6e 22 0d 02 30 38  |.LoadScreen"..08|
000006b0  ff 28 22 4c 4f 41 44 20  3c 52 75 6e 47 61 6d 65  |.("LOAD <RunGame|
000006c0  24 44 69 72 3e 2e 4c 6f  61 64 53 63 72 65 65 6e  |$Dir>.LoadScreen|
000006d0  20 22 2b c3 7e 28 74 69  74 6c 65 5f 61 72 65 61  | "+.~(title_area|
000006e0  2b 34 29 29 0d 02 3a 05  e1 0d 02 44 04 0d 02 4e  |+4))..:....D...N|
000006f0  14 dd 20 f2 77 61 69 74  28 73 65 63 6f 6e 64 73  |.. .wait(seconds|
00000700  29 0d 02 58 0a ea 20 74  69 6d 65 0d 02 62 0a 74  |)..X.. time..b.t|
00000710  69 6d 65 3d 91 0d 02 6c  1a f5 20 fd 20 91 3e 74  |ime=...l.. . .>t|
00000720  69 6d 65 2b 73 65 63 6f  6e 64 73 2a 31 30 30 0d  |ime+seconds*100.|
00000730  02 76 05 e1 0d 02 80 04  0d ff                    |.v........|
0000073a