�   FireTrack Basic Loader
"�   (C) Aardvark Software 1987
�   Programmed by Orlando
(#�   Progressed by Marjacq Micro
2$�   Produced by Software Studios
<-�   Presented by Electric Dreams Software
F'�   (...what a Big Pie it must be!)
P 
Z?�  If you pirate this, you're STEALING MY WHOLE LIFE'S WORK
d<�  ...if you won't buy FIRETRACK, what WILL you buy?????
n2�       ((  ** Orlando **  il maestro primo ))
x 
�4�A%=0�9-1:�23,224+A%:�B%=�P+A%*8�B%+7�2:�!B%;:�,
�,� BLOCK 10,z% 7:�A%=0�7:z%?A%=2^(7-A%):�
�B� 4 : � 23;10,32,0;0;0; 19,0,4;0; 19,1,3;0; 23,-1,-1;-1;-1;-1;
�b$=�-1+�8+�11+�-1
�9�A%=0�99�5:�lines(12.8*A%,10.24*A%):�:�1279,0:�0,1023
�*�huge("FIRE",4,16):�huge("TRACK",0,34)
�;L%=3:D%=17:R%=39-L%:U%=31-D%:�28,L%-1,D%+1,R%+1,U%-1,12
�[� L%*1280�40-12,(31-D%)*1024�32-12:�boxrel((R%-L%+1)*1280�40+24,(D%-U%+1)*1024�32+24);
�&�28,L%,D%,R%,U%,12,31,4;17,129,17;
�5�" FireTrack ";�17;�128;�17;�1;" Now Loading..."'
��=0:���>100
�*RUN !FTLoad ,
�{�}

 

8ݤplot(M%,!&70,!&74)=�25+�M%+�?&70+�?&71+�?&74+�?&75

`ݤboxrel(X%,Y%)=�plot(0,0,Y%)+�plot(81,X%,-Y%)+�plot(1,-X%,Y%)+�plot(81,X%,0)+�plot(0,0,-Y%)

"B��lines(X%,Y%)�X%,0:�0,Y%:�1279-X%,1023:�1279,1023-Y%:� X%,0:�

,H��huge(A$,X%,Y%)�A%:�A%=1��A$:�letter(��A$,A%,1),X%+(A%-1)*8,Y%):�:�

68��letter(B%,x%,y%)�A%,X%,Y%:A%=10:X%=BLOCK:Y%=X%�256

@Y?X%=B%:�&FFF1:A%=X%+1:�Y%=0�7:B%=A%?Y%:�X%=0�7:�B%�z%?X%�x%+X%,y%-15+Y%*2)b$;:�,:��,

J�
�

00000000  0d 00 0a 1e f4 20 20 20  46 69 72 65 54 72 61 63  |.....   FireTrac|
00000010  6b 20 42 61 73 69 63 20  4c 6f 61 64 65 72 0d 00  |k Basic Loader..|
00000020  14 22 f4 20 20 20 28 43  29 20 41 61 72 64 76 61  |.".   (C) Aardva|
00000030  72 6b 20 53 6f 66 74 77  61 72 65 20 31 39 38 37  |rk Software 1987|
00000040  0d 00 1e 1d f4 20 20 20  50 72 6f 67 72 61 6d 6d  |.....   Programm|
00000050  65 64 20 62 79 20 4f 72  6c 61 6e 64 6f 0d 00 28  |ed by Orlando..(|
00000060  23 f4 20 20 20 50 72 6f  67 72 65 73 73 65 64 20  |#.   Progressed |
00000070  62 79 20 4d 61 72 6a 61  63 71 20 4d 69 63 72 6f  |by Marjacq Micro|
00000080  0d 00 32 24 f4 20 20 20  50 72 6f 64 75 63 65 64  |..2$.   Produced|
00000090  20 62 79 20 53 6f 66 74  77 61 72 65 20 53 74 75  | by Software Stu|
000000a0  64 69 6f 73 0d 00 3c 2d  f4 20 20 20 50 72 65 73  |dios..<-.   Pres|
000000b0  65 6e 74 65 64 20 62 79  20 45 6c 65 63 74 72 69  |ented by Electri|
000000c0  63 20 44 72 65 61 6d 73  20 53 6f 66 74 77 61 72  |c Dreams Softwar|
000000d0  65 0d 00 46 27 f4 20 20  20 28 2e 2e 2e 77 68 61  |e..F'.   (...wha|
000000e0  74 20 61 20 42 69 67 20  50 69 65 20 69 74 20 6d  |t a Big Pie it m|
000000f0  75 73 74 20 62 65 21 29  0d 00 50 05 20 0d 00 5a  |ust be!)..P. ..Z|
00000100  3f f4 20 20 49 66 20 79  6f 75 20 70 69 72 61 74  |?.  If you pirat|
00000110  65 20 74 68 69 73 2c 20  79 6f 75 27 72 65 20 53  |e this, you're S|
00000120  54 45 41 4c 49 4e 47 20  4d 59 20 57 48 4f 4c 45  |TEALING MY WHOLE|
00000130  20 4c 49 46 45 27 53 20  57 4f 52 4b 0d 00 64 3c  | LIFE'S WORK..d<|
00000140  f4 20 20 2e 2e 2e 69 66  20 79 6f 75 20 77 6f 6e  |.  ...if you won|
00000150  27 74 20 62 75 79 20 46  49 52 45 54 52 41 43 4b  |'t buy FIRETRACK|
00000160  2c 20 77 68 61 74 20 57  49 4c 4c 20 79 6f 75 20  |, what WILL you |
00000170  62 75 79 3f 3f 3f 3f 3f  0d 00 6e 32 f4 20 20 20  |buy?????..n2.   |
00000180  20 20 20 20 28 28 20 20  2a 2a 20 4f 72 6c 61 6e  |    ((  ** Orlan|
00000190  64 6f 20 2a 2a 20 20 69  6c 20 6d 61 65 73 74 72  |do **  il maestr|
000001a0  6f 20 70 72 69 6d 6f 20  29 29 0d 00 78 05 20 0d  |o primo ))..x. .|
000001b0  00 82 34 e3 41 25 3d 30  b8 39 2d 31 3a ef 32 33  |..4.A%=0.9-1:.23|
000001c0  2c 32 32 34 2b 41 25 3a  e3 42 25 3d b8 50 2b 41  |,224+A%:.B%=.P+A|
000001d0  25 2a 38 b8 42 25 2b 37  88 32 3a ef 21 42 25 3b  |%*8.B%+7.2:.!B%;|
000001e0  3a ed 2c 0d 00 8c 2c de  20 42 4c 4f 43 4b 20 31  |:.,...,. BLOCK 1|
000001f0  30 2c 7a 25 20 37 3a e3  41 25 3d 30 b8 37 3a 7a  |0,z% 7:.A%=0.7:z|
00000200  25 3f 41 25 3d 32 5e 28  37 2d 41 25 29 3a ed 0d  |%?A%=2^(7-A%):..|
00000210  00 96 42 eb 20 34 20 3a  20 ef 20 32 33 3b 31 30  |..B. 4 : . 23;10|
00000220  2c 33 32 2c 30 3b 30 3b  30 3b 20 31 39 2c 30 2c  |,32,0;0;0; 19,0,|
00000230  34 3b 30 3b 20 31 39 2c  31 2c 33 3b 30 3b 20 32  |4;0; 19,1,3;0; 2|
00000240  33 2c 2d 31 2c 2d 31 3b  2d 31 3b 2d 31 3b 2d 31  |3,-1,-1;-1;-1;-1|
00000250  3b 0d 00 a0 15 62 24 3d  bd 2d 31 2b bd 38 2b bd  |;....b$=.-1+.8+.|
00000260  31 31 2b bd 2d 31 0d 00  aa 39 e3 41 25 3d 30 b8  |11+.-1...9.A%=0.|
00000270  39 39 88 35 3a f2 6c 69  6e 65 73 28 31 32 2e 38  |99.5:.lines(12.8|
00000280  2a 41 25 2c 31 30 2e 32  34 2a 41 25 29 3a ed 3a  |*A%,10.24*A%):.:|
00000290  ec 31 32 37 39 2c 30 3a  df 30 2c 31 30 32 33 0d  |.1279,0:.0,1023.|
000002a0  00 b4 2a f2 68 75 67 65  28 22 46 49 52 45 22 2c  |..*.huge("FIRE",|
000002b0  34 2c 31 36 29 3a f2 68  75 67 65 28 22 54 52 41  |4,16):.huge("TRA|
000002c0  43 4b 22 2c 30 2c 33 34  29 0d 00 be 3b 4c 25 3d  |CK",0,34)...;L%=|
000002d0  33 3a 44 25 3d 31 37 3a  52 25 3d 33 39 2d 4c 25  |3:D%=17:R%=39-L%|
000002e0  3a 55 25 3d 33 31 2d 44  25 3a ef 32 38 2c 4c 25  |:U%=31-D%:.28,L%|
000002f0  2d 31 2c 44 25 2b 31 2c  52 25 2b 31 2c 55 25 2d  |-1,D%+1,R%+1,U%-|
00000300  31 2c 31 32 0d 00 c8 5b  ec 20 4c 25 2a 31 32 38  |1,12...[. L%*128|
00000310  30 81 34 30 2d 31 32 2c  28 33 31 2d 44 25 29 2a  |0.40-12,(31-D%)*|
00000320  31 30 32 34 81 33 32 2d  31 32 3a f1 a4 62 6f 78  |1024.32-12:..box|
00000330  72 65 6c 28 28 52 25 2d  4c 25 2b 31 29 2a 31 32  |rel((R%-L%+1)*12|
00000340  38 30 81 34 30 2b 32 34  2c 28 44 25 2d 55 25 2b  |80.40+24,(D%-U%+|
00000350  31 29 2a 31 30 32 34 81  33 32 2b 32 34 29 3b 0d  |1)*1024.32+24);.|
00000360  00 d2 26 ef 32 38 2c 4c  25 2c 44 25 2c 52 25 2c  |..&.28,L%,D%,R%,|
00000370  55 25 2c 31 32 2c 33 31  2c 34 3b 31 37 2c 31 32  |U%,12,31,4;17,12|
00000380  39 2c 31 37 3b 0d 00 dc  35 f1 22 20 46 69 72 65  |9,17;...5." Fire|
00000390  54 72 61 63 6b 20 22 3b  bd 31 37 3b bd 31 32 38  |Track ";.17;.128|
000003a0  3b bd 31 37 3b bd 31 3b  22 20 4e 6f 77 20 4c 6f  |;.17;.1;" Now Lo|
000003b0  61 64 69 6e 67 2e 2e 2e  22 27 0d 00 e6 0f d1 3d  |ading..."'.....=|
000003c0  30 3a f5 fd 91 3e 31 30  30 0d 00 f0 14 2a 52 55  |0:...>100....*RU|
000003d0  4e 20 21 46 54 4c 6f 61  64 20 2c 7f 7f 0d 00 fa  |N !FTLoad ,.....|
000003e0  07 7b e0 7d 0d 01 04 05  20 0d 01 0e 38 dd a4 70  |.{.}.... ...8..p|
000003f0  6c 6f 74 28 4d 25 2c 21  26 37 30 2c 21 26 37 34  |lot(M%,!&70,!&74|
00000400  29 3d bd 32 35 2b bd 4d  25 2b bd 3f 26 37 30 2b  |)=.25+.M%+.?&70+|
00000410  bd 3f 26 37 31 2b bd 3f  26 37 34 2b bd 3f 26 37  |.?&71+.?&74+.?&7|
00000420  35 0d 01 18 60 dd a4 62  6f 78 72 65 6c 28 58 25  |5...`..boxrel(X%|
00000430  2c 59 25 29 3d a4 70 6c  6f 74 28 30 2c 30 2c 59  |,Y%)=.plot(0,0,Y|
00000440  25 29 2b a4 70 6c 6f 74  28 38 31 2c 58 25 2c 2d  |%)+.plot(81,X%,-|
00000450  59 25 29 2b a4 70 6c 6f  74 28 31 2c 2d 58 25 2c  |Y%)+.plot(1,-X%,|
00000460  59 25 29 2b a4 70 6c 6f  74 28 38 31 2c 58 25 2c  |Y%)+.plot(81,X%,|
00000470  30 29 2b a4 70 6c 6f 74  28 30 2c 30 2c 2d 59 25  |0)+.plot(0,0,-Y%|
00000480  29 0d 01 22 42 dd f2 6c  69 6e 65 73 28 58 25 2c  |).."B..lines(X%,|
00000490  59 25 29 ec 58 25 2c 30  3a df 30 2c 59 25 3a df  |Y%).X%,0:.0,Y%:.|
000004a0  31 32 37 39 2d 58 25 2c  31 30 32 33 3a df 31 32  |1279-X%,1023:.12|
000004b0  37 39 2c 31 30 32 33 2d  59 25 3a df 20 58 25 2c  |79,1023-Y%:. X%,|
000004c0  30 3a e1 0d 01 2c 48 dd  f2 68 75 67 65 28 41 24  |0:...,H..huge(A$|
000004d0  2c 58 25 2c 59 25 29 ea  41 25 3a e3 41 25 3d 31  |,X%,Y%).A%:.A%=1|
000004e0  b8 a9 41 24 3a f2 6c 65  74 74 65 72 28 97 c1 41  |..A$:.letter(..A|
000004f0  24 2c 41 25 2c 31 29 2c  58 25 2b 28 41 25 2d 31  |$,A%,1),X%+(A%-1|
00000500  29 2a 38 2c 59 25 29 3a  ed 3a e1 0d 01 36 38 dd  |)*8,Y%):.:...68.|
00000510  f2 6c 65 74 74 65 72 28  42 25 2c 78 25 2c 79 25  |.letter(B%,x%,y%|
00000520  29 ea 41 25 2c 58 25 2c  59 25 3a 41 25 3d 31 30  |).A%,X%,Y%:A%=10|
00000530  3a 58 25 3d 42 4c 4f 43  4b 3a 59 25 3d 58 25 81  |:X%=BLOCK:Y%=X%.|
00000540  32 35 36 0d 01 40 59 3f  58 25 3d 42 25 3a d6 26  |256..@Y?X%=B%:.&|
00000550  46 46 46 31 3a 41 25 3d  58 25 2b 31 3a e3 59 25  |FFF1:A%=X%+1:.Y%|
00000560  3d 30 b8 37 3a 42 25 3d  41 25 3f 59 25 3a e3 58  |=0.7:B%=A%?Y%:.X|
00000570  25 3d 30 b8 37 3a e7 42  25 80 7a 25 3f 58 25 f1  |%=0.7:.B%.z%?X%.|
00000580  8a 78 25 2b 58 25 2c 79  25 2d 31 35 2b 59 25 2a  |.x%+X%,y%-15+Y%*|
00000590  32 29 62 24 3b 3a ed 2c  3a 8b ed 2c 0d 01 4a 05  |2)b$;:.,:..,..J.|
000005a0  e1 0d ff                                          |...|
000005a3