home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1991-06-04 | 14.8 KB |
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was not able to be converted.
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 1c 00 00 00 28 00 00 00 | 48 00 00 00 42 75 72 73 |....(...|H...Burs|
|00000020| 74 55 74 69 6c 73 00 20 | 42 75 72 73 74 55 74 69 |tUtils. |BurstUti|
|00000030| 6c 73 09 30 2e 30 36 20 | 28 30 34 20 4a 75 6e 20 |ls.0.06 |(04 Jun |
|00000040| 31 39 39 31 29 00 6f 6e | a0 00 3e 34 6c 00 00 00 |1991).on|..>4l...|
|00000050| 00 00 00 00 66 00 00 00 | 60 00 00 00 00 00 00 00 |....f...|`.......|
|00000060| 2a 1b 00 20 a0 0d 1b 01 | 20 00 6d 65 5c 00 8f e2 |*.. ....| .me\...|
|00000070| 43 10 8f e2 09 20 a0 e3 | d4 00 00 ef 2c 00 a0 e3 |C.... ..|....,...|
|00000080| 01 00 c1 e4 44 00 8f e2 | 00 00 80 e2 3a 0c 80 e2 |....D...|....:...|
|00000090| 71 00 80 e2 09 20 a0 e3 | d4 00 00 ef 15 01 00 ef |q.... ..|........|
|000000a0| 04 00 8f e2 05 00 00 ef | 0e f0 a0 e1 2a 42 61 73 |........|....*Bas|
|000000b0| 69 63 20 2d 63 68 61 69 | 6e 20 40 00 00 00 00 00 |ic -chai|n @.....|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 0d 01 04 |........|........|
|000000d0| 0d 00 0a 0e f4 3e 4d 61 | 69 6e 50 72 6f 67 0d 00 |.....>Ma|inProg..|
|000000e0| 14 07 ef 20 36 0d 00 1e | 61 ee 20 85 20 eb 20 30 |... 6...|a. . . 0|
|000000f0| 3a f1 22 46 61 74 61 6c | 20 65 72 72 6f 72 20 3a |:."Fatal| error :|
|00000100| 20 50 6c 65 61 73 65 20 | 72 65 73 65 74 20 61 6e | Please |reset an|
|00000110| 64 20 72 75 6e 20 61 67 | 61 69 6e 20 28 73 6f 72 |d run ag|ain (sor|
|00000120| 72 79 20 21 20 49 20 64 | 69 64 20 6e 6f 74 20 65 |ry ! I d|id not e|
|00000130| 78 70 65 63 74 20 74 68 | 69 73 20 21 21 21 29 22 |xpect th|is !!!)"|
|00000140| 3a f5 3a fd 20 a3 0d 00 | 28 12 de 20 73 63 72 6f |:.:. ...|(.. scro|
|00000150| 6c 6c 25 20 33 30 30 30 | 0d 00 32 0a 74 76 61 6c |ll% 3000|..2.tval|
|00000160| 3d 34 0d 00 3c 53 de 20 | 68 69 24 28 31 31 29 2c |=4..<S. |hi$(11),|
|00000170| 68 69 25 28 31 31 29 3a | e3 20 49 3d 31 20 b8 20 |hi%(11):|. I=1 . |
|00000180| 35 3a 68 69 24 28 49 29 | 3d 22 4d 61 72 6b 20 4a |5:hi$(I)|="Mark J|
|00000190| 6f 68 6e 73 6f 6e 22 3a | 68 69 25 28 49 29 3d 33 |ohnson":|hi%(I)=3|
|000001a0| 30 30 30 30 2d 28 28 49 | 2d 31 29 2a 33 30 30 30 |0000-((I|-1)*3000|
|000001b0| 29 3a ed 20 49 0d 00 46 | 44 e3 20 49 3d 36 20 b8 |):. I..F|D. I=6 .|
|000001c0| 20 31 30 3a 68 69 24 28 | 49 29 3d 22 54 68 65 20 | 10:hi$(|I)="The |
|000001d0| 4d 69 63 72 6f 20 55 73 | 65 72 22 3a 68 69 25 28 |Micro Us|er":hi%(|
|000001e0| 49 29 3d 33 30 30 30 30 | 2d 28 28 49 2d 31 29 2a |I)=30000|-((I-1)*|
|000001f0| 33 30 30 30 29 3a ed 20 | 49 0d 00 50 0e de 20 63 |3000):. |I..P.. c|
|00000200| 79 63 6c 65 28 34 29 0d | 00 5a 10 63 79 63 6c 65 |ycle(4).|.Z.cycle|
|00000210| 28 31 29 3d 32 35 35 0d | 00 64 10 63 79 63 6c 65 |(1)=255.|.d.cycle|
|00000220| 28 32 29 3d 32 30 30 0d | 00 6e 10 63 79 63 6c 65 |(2)=200.|.n.cycle|
|00000230| 28 33 29 3d 31 32 30 0d | 00 78 0f 63 79 63 6c 65 |(3)=120.|.x.cycle|
|00000240| 28 34 29 3d 35 30 0d 00 | 82 2e de 20 73 70 72 69 |(4)=50..|... spri|
|00000250| 74 65 24 28 32 30 35 29 | 2c 73 63 72 65 65 6e 28 |te$(205)|,screen(|
|00000260| 32 30 35 29 2c 73 78 28 | 32 30 35 29 2c 73 79 28 |205),sx(|205),sy(|
|00000270| 32 30 35 29 0d 00 8c 10 | de 20 67 72 69 64 28 31 |205)....|. grid(1|
|00000280| 32 2c 38 29 0d 00 96 61 | 41 3d 8e 22 3c 42 75 72 |2,8)...a|A=."<Bur|
|00000290| 73 74 24 44 69 72 3e 2e | 44 61 74 61 2e 44 61 74 |st$Dir>.|Data.Dat|
|000002a0| 61 33 22 3a e8 20 23 41 | 2c 73 70 3a e3 20 48 3d |a3":. #A|,sp:. H=|
|000002b0| 31 20 b8 20 73 70 3a e8 | 20 23 41 2c 73 70 72 69 |1 . sp:.| #A,spri|
|000002c0| 74 65 24 28 48 29 2c 73 | 63 72 65 65 6e 28 48 29 |te$(H),s|creen(H)|
|000002d0| 2c 73 78 28 48 29 2c 73 | 79 28 48 29 3a ed 20 48 |,sx(H),s|y(H):. H|
|000002e0| 3a d9 20 23 41 0d 00 a0 | 2d de 20 63 6f 6d 70 6c |:. #A...|-. compl|
|000002f0| 65 74 65 28 37 29 3a e3 | 20 4b 3d 31 20 b8 20 37 |ete(7):.| K=1 . 7|
|00000300| 3a 63 6f 6d 70 6c 65 74 | 65 28 4b 29 3d 30 3a ed |:complet|e(K)=0:.|
|00000310| 20 4b 0d 00 aa 0f de 20 | 63 6f 64 65 20 35 30 30 | K..... |code 500|
|00000320| 30 0d 00 b4 08 f2 61 73 | 73 0d 00 be 0c f2 72 75 |0.....as|s.....ru|
|00000330| 6e 70 72 6f 67 0d 00 c8 | 0a dd 20 f2 61 73 73 0d |nprog...|.. .ass.|
|00000340| 00 d2 14 e3 20 70 61 73 | 73 3d 30 20 b8 20 32 20 |.... pas|s=0 . 2 |
|00000350| 88 20 32 0d 00 dc 0b 50 | 25 3d 63 6f 64 65 0d 00 |. 2....P|%=code..|
|00000360| e6 0d 5b 4f 50 54 20 70 | 61 73 73 0d 00 f0 0a 2e |..[OPT p|ass.....|
|00000370| 62 65 67 69 6e 0d 00 fa | 0e 53 57 49 20 32 35 36 |begin...|.SWI 256|
|00000380| 2b 32 32 0d 01 04 0e 53 | 57 49 20 32 35 36 2b 31 |+22....S|WI 256+1|
|00000390| 33 0d 01 0e 1a 53 57 49 | 20 22 4f 53 5f 52 65 6d |3....SWI| "OS_Rem|
|000003a0| 6f 76 65 43 75 72 73 6f | 72 73 22 0d 01 18 0e 41 |oveCurso|rs"....A|
|000003b0| 44 52 20 52 30 2c 76 76 | 62 0d 01 22 0e 41 44 52 |DR R0,vv|b..".ADR|
|000003c0| 20 52 31 2c 76 76 62 0d | 01 2c 1d 53 57 49 20 22 | R1,vvb.|.,.SWI "|
|000003d0| 4f 53 5f 52 65 61 64 56 | 64 75 56 61 72 69 61 62 |OS_ReadV|duVariab|
|000003e0| 6c 65 73 22 0d 01 36 0e | 4d 4f 56 20 50 43 2c 52 |les"..6.|MOV PC,R|
|000003f0| 31 34 0d 01 40 08 2e 76 | 73 6c 0d 01 4a 0e 4d 4f |14..@..v|sl..J.MO|
|00000400| 56 20 52 30 2c 23 31 39 | 0d 01 54 11 53 57 49 20 |V R0,#19|..T.SWI |
|00000410| 22 4f 53 5f 42 79 74 65 | 22 0d 01 5e 0f 41 44 52 |"OS_Byte|"..^.ADR|
|00000420| 20 52 31 32 2c 73 6f 73 | 0d 01 68 0e 4c 44 52 20 | R12,sos|..h.LDR |
|00000430| 52 31 31 2c 6e 73 0d 01 | 72 0f 4c 44 52 20 52 31 |R11,ns..|r.LDR R1|
|00000440| 30 2c 76 76 62 0d 01 7c | 07 2e 73 6c 0d 01 86 10 |0,vvb..||..sl....|
|00000450| 4c 44 52 20 52 30 2c 5b | 52 31 32 5d 0d 01 90 13 |LDR R0,[|R12]....|
|00000460| 4c 44 52 20 52 31 2c 5b | 52 31 32 2c 23 34 5d 0d |LDR R1,[|R12,#4].|
|00000470| 01 9a 13 4c 44 52 20 52 | 32 2c 5b 52 31 32 2c 23 |...LDR R|2,[R12,#|
|00000480| 38 5d 0d 01 a4 14 4c 44 | 52 20 52 33 2c 5b 52 31 |8]....LD|R R3,[R1|
|00000490| 32 2c 23 31 32 5d 0d 01 | ae 17 41 44 44 20 52 34 |2,#12]..|..ADD R4|
|000004a0| 2c 52 31 2c 52 31 2c 4c | 53 4c 20 23 32 0d 01 b8 |,R1,R1,L|SL #2...|
|000004b0| 17 41 44 44 20 52 34 2c | 52 30 2c 52 34 2c 4c 53 |.ADD R4,|R0,R4,LS|
|000004c0| 4c 20 23 36 0d 01 c2 0d | 4d 4f 56 20 52 35 2c 23 |L #6....|MOV R5,#|
|000004d0| 30 0d 01 cc 13 4c 44 52 | 20 52 36 2c 5b 52 31 30 |0....LDR| R6,[R10|
|000004e0| 2c 52 34 5d 0d 01 d6 0d | 43 4d 50 20 52 36 2c 52 |,R4]....|CMP R6,R|
|000004f0| 33 0d 01 e0 0e 42 4e 45 | 20 6e 6f 77 69 70 65 0d |3....BNE| nowipe.|
|00000500| 01 ea 14 53 54 52 42 20 | 52 35 2c 5b 52 31 30 2c |...STRB |R5,[R10,|
|00000510| 52 34 5d 0d 01 f4 0b 2e | 6e 6f 77 69 70 65 0d 01 |R4].....|nowipe..|
|00000520| fe 10 41 44 44 20 52 30 | 2c 52 30 2c 52 32 0d 02 |..ADD R0|,R0,R2..|
|00000530| 08 0f 43 4d 50 20 52 30 | 2c 23 33 32 30 0d 02 12 |..CMP R0|,#320...|
|00000540| 14 53 55 42 47 45 20 52 | 30 2c 52 30 2c 23 33 32 |.SUBGE R|0,R0,#32|
|00000550| 30 0d 02 1c 10 53 54 52 | 20 52 30 2c 5b 52 31 32 |0....STR| R0,[R12|
|00000560| 5d 0d 02 26 17 41 44 44 | 20 52 34 2c 52 31 2c 52 |]..&.ADD| R4,R1,R|
|00000570| 31 2c 4c 53 4c 20 23 32 | 0d 02 30 17 41 44 44 20 |1,LSL #2|..0.ADD |
|00000580| 52 34 2c 52 30 2c 52 34 | 2c 4c 53 4c 20 23 36 0d |R4,R0,R4|,LSL #6.|
|00000590| 02 3a 13 4c 44 52 20 52 | 36 2c 5b 52 31 30 2c 52 |.:.LDR R|6,[R10,R|
|000005a0| 34 5d 0d 02 44 0d 43 4d | 50 20 52 36 2c 23 30 0d |4]..D.CM|P R6,#0.|
|000005b0| 02 4e 0e 42 4e 45 20 6e | 6f 70 6c 6f 74 0d 02 58 |.N.BNE n|oplot..X|
|000005c0| 14 53 54 52 42 20 52 33 | 2c 5b 52 31 30 2c 52 34 |.STRB R3|,[R10,R4|
|000005d0| 5d 0d 02 62 0b 2e 6e 6f | 70 6c 6f 74 0d 02 6c 13 |]..b..no|plot..l.|
|000005e0| 41 44 44 20 52 31 32 2c | 52 31 32 2c 23 31 36 0d |ADD R12,|R12,#16.|
|000005f0| 02 76 13 53 55 42 53 20 | 52 31 31 2c 52 31 31 2c |.v.SUBS |R11,R11,|
|00000600| 23 31 0d 02 80 0a 42 47 | 54 20 73 6c 0d 02 8a 0e |#1....BG|T sl....|
|00000610| 4d 4f 56 20 50 43 2c 52 | 31 34 0d 02 94 10 2e 76 |MOV PC,R|14.....v|
|00000620| 76 62 20 44 43 44 20 31 | 34 39 0d 02 9e 0f 20 20 |vb DCD 1|49.... |
|00000630| 20 20 20 44 43 44 20 2d | 31 0d 02 a8 0f 2e 6e 73 | DCD -|1.....ns|
|00000640| 20 44 43 44 20 31 38 30 | 0d 02 b2 08 2e 73 6f 73 | DCD 180|.....sos|
|00000650| 0d 02 bc 05 5d 0d 02 c6 | 0f e3 20 54 3d 31 20 b8 |....]...|.. T=1 .|
|00000660| 20 21 6e 73 0d 02 d0 12 | 63 6f 6c 6f 75 72 3d b3 | !ns....|colour=.|
|00000670| 28 31 36 29 2d 31 0d 02 | da 13 73 63 3d 63 6f 6c |(16)-1..|..sc=col|
|00000680| 6f 75 72 20 80 20 25 31 | 31 0d 02 e4 1a 62 63 3d |our . %1|1....bc=|
|00000690| 28 63 6f 6c 6f 75 72 20 | 80 20 25 31 31 30 30 29 |(colour |. %1100)|
|000006a0| 3e 3e 32 0d 02 ee 10 21 | 50 25 3d b3 28 33 32 30 |>>2....!|P%=.(320|
|000006b0| 29 2d 31 0d 02 f8 14 21 | 28 50 25 2b 34 29 3d b3 |)-1....!|(P%+4)=.|
|000006c0| 28 32 34 36 29 2d 31 0d | 03 02 17 21 28 50 25 2b |(246)-1.|...!(P%+|
|000006d0| 38 29 3d 63 6f 6c 6f 75 | 72 20 81 32 2b 31 0d 03 |8)=colou|r .2+1..|
|000006e0| 0c 5d 21 28 50 25 2b 31 | 32 29 3d 28 28 62 63 20 |.]!(P%+1|2)=((bc |
|000006f0| 80 20 25 31 30 29 3c 3c | 36 29 20 84 20 28 62 63 |. %10)<<|6) . (bc|
|00000700| 3c 3c 35 29 20 84 20 28 | 28 62 63 20 80 20 25 31 |<<5) . (|(bc . %1|
|00000710| 30 29 3c 3c 33 29 20 84 | 20 28 28 62 63 20 80 20 |0)<<3) .| ((bc . |
|00000720| 31 29 3c 3c 33 29 20 84 | 20 28 28 62 63 20 80 20 |1)<<3) .| ((bc . |
|00000730| 31 29 3c 3c 32 29 20 84 | 20 73 63 0d 03 16 0c 50 |1)<<2) .| sc....P|
|00000740| 25 3d 50 25 2b 31 36 0d | 03 20 07 ed 20 54 0d 03 |%=P%+16.|. .. T..|
|00000750| 2a 0a ed 20 70 61 73 73 | 0d 03 34 05 e1 0d 03 3e |*.. pass|..4....>|
|00000760| 05 e0 0d 03 48 27 dd 20 | f2 74 65 78 74 28 61 24 |....H'. |.text(a$|
|00000770| 2c 79 29 3a 79 3d 28 31 | 30 32 33 2d 28 79 2a 33 |,y):y=(1|023-(y*3|
|00000780| 32 29 29 3a d6 20 76 73 | 6c 0d 03 52 1a 78 3d 31 |2)):. vs|l..R.x=1|
|00000790| 39 2e 35 2d 28 a9 28 61 | 24 29 2f 32 29 3a d6 20 |9.5-(.(a|$)/2):. |
|000007a0| 76 73 6c 0d 03 5c 10 78 | 3d 78 2a 33 32 3a d6 20 |vsl..\.x|=x*32:. |
|000007b0| 76 73 6c 0d 03 66 11 e3 | 20 4a 3d 31 20 b8 20 a9 |vsl..f..| J=1 . .|
|000007c0| 28 61 24 29 0d 03 70 09 | d6 20 76 73 6c 0d 03 7a |(a$)..p.|. vsl..z|
|000007d0| 11 61 3d 97 28 c1 61 24 | 2c 4a 2c 31 29 29 0d 03 |.a=.(.a$|,J,1))..|
|000007e0| 84 14 ff 22 53 43 48 4f | 4f 53 45 20 22 2b c3 28 |..."SCHO|OSE "+.(|
|000007f0| 61 29 0d 03 8e 0e f4 20 | 43 41 4c 4c 20 76 73 6c |a)..... |CALL vsl|
|00000800| 0d 03 98 16 f0 20 26 45 | 44 2c 28 78 2b 28 4a 2a |..... &E|D,(x+(J*|
|00000810| 33 32 29 29 2c 79 0d 03 | a2 07 ed 20 4a 0d 03 ac |32)),y..|... J...|
|00000820| 09 d6 20 76 73 6c 0d 03 | b6 05 e1 0d 03 c0 0e dd |.. vsl..|........|
|00000830| 20 f2 72 75 6e 70 72 6f | 67 0d 03 ca 0b d6 20 62 | .runpro|g..... b|
|00000840| 65 67 69 6e 0d 03 d4 0d | f2 74 65 78 74 69 6e 69 |egin....|.textini|
|00000850| 74 0d 03 de 0f 74 65 78 | 74 73 70 65 65 64 3d 33 |t....tex|tspeed=3|
|00000860| 0d 03 e8 2e f2 74 65 78 | 74 28 22 57 65 6c 63 6f |.....tex|t("Welco|
|00000870| 6d 65 20 74 6f 20 27 54 | 68 65 20 43 72 61 7a 79 |me to 'T|he Crazy|
|00000880| 20 49 6e 76 65 6e 74 6f | 72 27 22 2c 32 29 0d 03 | Invento|r'",2)..|
|00000890| f2 29 f2 74 65 78 74 28 | 22 7b 73 74 61 72 72 69 |.).text(|"{starri|
|000008a0| 6e 67 20 69 6e 20 42 75 | 72 73 74 20 50 69 70 65 |ng in Bu|rst Pipe|
|000008b0| 20 21 7d 22 2c 34 29 0d | 03 fc 2b f2 74 65 78 74 | !}",4).|..+.text|
|000008c0| 28 22 28 50 75 62 6c 69 | 63 20 44 6f 6d 61 69 6e |("(Publi|c Domain|
|000008d0| 20 76 65 72 73 69 6f 6e | 20 30 2e 30 31 29 22 2c | version| 0.01)",|
|000008e0| 38 29 0d 04 06 24 f2 74 | 65 78 74 28 22 57 72 69 |8)...$.t|ext("Wri|
|000008f0| 74 74 65 6e 20 62 79 20 | 4d 2e 4a 6f 68 6e 73 6f |tten by |M.Johnso|
|00000900| 6e 22 2c 31 36 29 0d 04 | 10 2b f2 74 65 78 74 28 |n",16)..|.+.text(|
|00000910| 22 50 72 65 73 73 20 27 | 49 27 20 66 6f 72 20 69 |"Press '|I' for i|
|00000920| 6e 73 74 72 75 63 74 69 | 6f 6e 73 2c 22 2c 32 32 |nstructi|ons,",22|
|00000930| 29 0d 04 1a 31 f2 74 65 | 78 74 28 22 27 4b 27 20 |)...1.te|xt("'K' |
|00000940| 66 6f 72 20 6b 65 79 73 | 2c 20 27 48 27 20 66 6f |for keys|, 'H' fo|
|00000950| 72 20 73 63 6f 72 65 20 | 74 61 62 6c 65 22 2c 32 |r score |table",2|
|00000960| 34 29 0d 04 24 22 f2 74 | 65 78 74 28 22 6f 72 20 |4)..$".t|ext("or |
|00000970| 27 50 27 20 74 6f 20 70 | 6c 61 79 20 2e 2e 2e 22 |'P' to p|lay ..."|
|00000980| 2c 32 36 29 0d 04 2e 0a | 2a 46 58 20 31 35 0d 04 |,26)....|*FX 15..|
|00000990| 38 0d f5 3a 41 24 3d bf | 28 30 29 0d 04 42 12 c8 |8..:A$=.|(0)..B..|
|000009a0| 8e 20 74 65 78 74 73 70 | 65 65 64 20 ca 0d 04 4c |. textsp|eed ...L|
|000009b0| 17 c9 20 31 3a f2 73 63 | 72 6f 6c 6c 74 65 78 74 |.. 1:.sc|rolltext|
|000009c0| 73 6c 6f 77 0d 04 56 19 | c9 20 32 3a f2 73 63 72 |slow..V.|. 2:.scr|
|000009d0| 6f 6c 6c 74 65 78 74 6d | 65 64 69 75 6d 0d 04 60 |olltextm|edium..`|
|000009e0| 17 c9 20 33 3a f2 73 63 | 72 6f 6c 6c 74 65 78 74 |.. 3:.sc|rolltext|
|000009f0| 66 61 73 74 0d 04 6a 05 | cb 0d 04 74 4b fd 20 41 |fast..j.|...tK. A|
|00000a00| 24 3d 22 49 22 20 84 20 | 41 24 3d 22 69 22 20 84 |$="I" . |A$="i" .|
|00000a10| 20 41 24 3d 22 6b 22 20 | 84 20 41 24 3d 22 4b 22 | A$="k" |. A$="K"|
|00000a20| 20 84 20 41 24 3d 22 48 | 22 20 84 20 41 24 3d 22 | . A$="H|" . A$="|
|00000a30| 68 22 20 84 20 41 24 3d | 22 50 22 20 84 20 41 24 |h" . A$=|"P" . A$|
|00000a40| 3d 22 70 22 0d 04 7e 17 | e7 20 41 24 3d 22 49 22 |="p"..~.|. A$="I"|
|00000a50| 20 84 20 41 24 3d 22 69 | 22 20 8c 0d 04 88 09 d6 | . A$="i|" ......|
|00000a60| 20 76 73 6c 0d 04 92 1b | f2 63 6c 65 61 72 3a f2 | vsl....|.clear:.|
|00000a70| 69 6e 73 74 72 75 63 74 | 3a f2 63 6c 65 61 72 0d |instruct|:.clear.|
|00000a80| 04 9c 05 cd 0d 04 a6 17 | e7 20 41 24 3d 22 4b 22 |........|. A$="K"|
|00000a90| 20 84 20 41 24 3d 22 6b | 22 20 8c 0d 04 b0 09 d6 | . A$="k|" ......|
|00000aa0| 20 76 73 6c 0d 04 ba 17 | f2 63 6c 65 61 72 3a f2 | vsl....|.clear:.|
|00000ab0| 6b 65 79 73 3a f2 63 6c | 65 61 72 0d 04 c4 05 cd |keys:.cl|ear.....|
|00000ac0| 0d 04 ce 17 e7 20 41 24 | 3d 22 48 22 20 84 20 41 |..... A$|="H" . A|
|00000ad0| 24 3d 22 68 22 20 8c 0d | 04 d8 09 d6 20 76 73 6c |$="h" ..|.... vsl|
|00000ae0| 0d 04 e2 19 f2 63 6c 65 | 61 72 3a f2 73 63 6f 72 |.....cle|ar:.scor|
|00000af0| 65 73 3a f2 63 6c 65 61 | 72 0d 04 ec 05 cd 0d 04 |es:.clea|r.......|
|00000b00| f6 17 e7 20 41 24 3d 22 | 50 22 20 84 20 41 24 3d |... A$="|P" . A$=|
|00000b10| 22 70 22 20 8c 0d 05 00 | 12 f2 63 6c 65 61 72 3a |"p" ....|..clear:|
|00000b20| db 3a f2 70 6c 61 79 0d | 05 0a 09 d6 20 76 73 6c |.:.play.|.... vsl|
|00000b30| 0d 05 14 05 cd 0d 05 1e | 0a e5 20 8d 64 54 43 0d |........|.. .dTC.|
|00000b40| 05 28 05 e1 0d 05 32 0c | dd 20 f2 63 6c 65 61 72 |.(....2.|. .clear|
|00000b50| 0d 05 3c 09 d6 20 76 73 | 6c 0d 05 46 0e e6 20 30 |..<.. vs|l..F.. 0|
|00000b60| 2c 30 20 c8 9c 20 30 0d | 05 50 13 e3 20 49 3d 30 |,0 .. 0.|.P.. I=0|
|00000b70| 20 b8 20 36 34 30 20 88 | 20 34 0d 05 5a 09 d6 20 | . 640 .| 4..Z.. |
|00000b80| 76 73 6c 0d 05 64 27 86 | 20 30 2c 49 2c 31 32 38 |vsl..d'.| 0,I,128|
|00000b90| 30 2c 49 3a 86 20 30 2c | 31 30 32 34 2d 49 2c 31 |0,I:. 0,|1024-I,1|
|00000ba0| 32 38 30 2c 31 30 32 34 | 2d 49 0d 05 6e 07 ed 20 |280,1024|-I..n.. |
|00000bb0| 49 0d 05 78 05 e1 0d 05 | 82 0f dd 20 f2 69 6e 73 |I..x....|... .ins|
|00000bc0| 74 72 75 63 74 0d 05 8c | 25 f2 74 65 78 74 28 22 |truct...|%.text("|
|00000bd0| 42 75 72 73 74 20 50 69 | 70 65 20 69 6e 73 74 72 |Burst Pi|pe instr|
|00000be0| 75 63 74 6f 6e 73 22 2c | 31 29 0d 05 96 33 f2 74 |uctons",|1)...3.t|
|00000bf0| 65 78 74 28 22 41 20 63 | 72 61 7a 79 20 69 6e 76 |ext("A c|razy inv|
|00000c00| 65 6e 74 6f 72 20 63 6c | 61 69 6d 65 64 20 74 68 |entor cl|aimed th|
|00000c10| 61 74 20 68 65 20 68 61 | 64 22 2c 33 29 0d 05 a0 |at he ha|d",3)...|
|00000c20| 31 f2 74 65 78 74 28 22 | 63 72 65 61 74 65 64 20 |1.text("|created |
|00000c30| 74 68 65 20 75 6c 74 69 | 6d 61 74 65 20 77 61 74 |the ulti|mate wat|
|00000c40| 65 72 20 70 69 70 65 2c | 20 61 22 2c 34 29 0d 05 |er pipe,| a",4)..|
|00000c50| aa 2c f2 74 65 78 74 28 | 22 72 65 76 6f 6c 75 74 |.,.text(|"revolut|
|00000c60| 69 6f 6e 61 72 79 20 70 | 69 70 65 20 74 68 61 74 |ionary p|ipe that|
|00000c70| 20 77 6f 75 6c 64 22 2c | 35 29 0d 05 b4 2e f2 74 | would",|5).....t|
|00000c80| 65 78 74 28 22 72 65 70 | 6c 61 63 65 20 61 6c 6c |ext("rep|lace all|
|00000c90| 20 65 78 69 73 74 69 6e | 67 20 77 61 74 65 72 20 | existin|g water |
|00000ca0| 6f 6e 65 73 22 2c 36 29 | 0d 05 be 2f f2 74 65 78 |ones",6)|.../.tex|
|00000cb0| 74 28 22 55 6e 66 6f 72 | 74 75 6e 61 74 65 6c 79 |t("Unfor|tunately|
|00000cc0| 2c 20 61 20 66 65 77 20 | 68 6f 75 72 73 20 61 66 |, a few |hours af|
|00000cd0| 74 65 72 22 2c 38 29 0d | 05 c8 2f f2 74 65 78 74 |ter",8).|../.text|
|00000ce0| 28 22 69 6e 73 74 61 6c | 6c 69 6e 67 20 74 68 65 |("instal|ling the|
|00000cf0| 73 65 20 70 69 70 65 73 | 2c 20 64 69 73 61 73 74 |se pipes|, disast|
|00000d00| 65 72 22 2c 39 29 0d 05 | d2 34 f2 74 65 78 74 28 |er",9)..|.4.text(|
|00000d10| 22 73 74 72 75 63 6b 20 | 2d 20 74 68 65 20 54 69 |"struck |- the Ti|
|00000d20| 74 61 6c 63 69 75 6d 20 | 68 79 64 72 6f 63 68 6c |talcium |hydrochl|
|00000d30| 6f 72 69 64 65 22 2c 31 | 30 29 0d 05 dc 35 f2 74 |oride",1|0)...5.t|
|00000d40| 65 78 74 28 22 73 61 6c | 74 73 20 6d 61 6b 69 6e |ext("sal|ts makin|
|00000d50| 67 20 75 70 20 74 68 65 | 20 77 61 6c 6c 73 20 6f |g up the| walls o|
|00000d60| 66 20 74 68 65 20 70 69 | 70 65 22 2c 31 31 29 0d |f the pi|pe",11).|
|00000d70| 05 e6 36 f2 74 65 78 74 | 28 22 64 69 73 69 6e 74 |..6.text|("disint|
|00000d80| 69 67 72 61 74 65 64 2c | 20 61 6e 64 20 69 74 20 |igrated,| and it |
|00000d90| 69 73 20 6e 6f 77 20 75 | 70 20 74 6f 20 79 6f 75 |is now u|p to you|
|00000da0| 22 2c 31 32 29 0d 05 f0 | 34 f2 74 65 78 74 28 22 |",12)...|4.text("|
|00000db0| 61 73 20 74 68 65 20 69 | 6e 76 65 6e 74 6f 72 20 |as the i|nventor |
|00000dc0| 74 6f 20 70 75 74 20 61 | 6c 6c 20 74 68 65 20 70 |to put a|ll the p|
|00000dd0| 69 70 65 73 22 2c 31 33 | 29 0d 05 fa 30 f2 74 65 |ipes",13|)...0.te|
|00000de0| 78 74 28 22 62 61 63 6b | 20 74 6f 20 6e 6f 72 6d |xt("back| to norm|
|00000df0| 61 6c 20 62 65 66 6f 72 | 65 20 74 68 65 20 68 6f |al befor|e the ho|
|00000e00| 75 73 65 73 22 2c 31 34 | 29 0d 06 04 26 f2 74 65 |uses",14|)...&.te|
|00000e10| 78 74 28 22 62 65 63 6f | 6d 65 20 66 6c 6f 6f 64 |xt("beco|me flood|
|00000e20| 65 64 20 2e 2e 2e 2e 2e | 2e 2e 22 2c 31 35 29 0d |ed .....|..",15).|
|00000e30| 06 0e 32 f2 74 65 78 74 | 28 22 54 68 65 20 6c 65 |..2.text|("The le|
|00000e40| 76 65 6c 73 20 63 61 6e | 20 62 65 20 63 6f 6d 70 |vels can| be comp|
|00000e50| 6c 65 74 65 64 20 69 6e | 20 61 6e 79 22 2c 31 37 |leted in| any",17|
|00000e60| 29 0d 06 18 32 f2 74 65 | 78 74 28 22 6f 72 64 65 |)...2.te|xt("orde|
|00000e70| 72 2c 20 6c 65 76 65 6c | 20 31 20 69 73 20 65 61 |r, level| 1 is ea|
|00000e80| 73 79 2c 20 37 20 69 73 | 20 68 61 72 64 2c 22 2c |sy, 7 is| hard,",|
|00000e90| 31 38 29 0d 06 22 34 f2 | 74 65 78 74 28 22 62 75 |18).."4.|text("bu|
|00000ea0| 74 20 41 4c 4c 20 74 68 | 65 20 6c 65 76 65 6c 73 |t ALL th|e levels|
|00000eb0| 20 6d 75 73 74 20 62 65 | 20 63 6f 6d 70 6c 65 74 | must be| complet|
|00000ec0| 65 64 22 2c 31 39 29 0d | 06 2c 22 f2 74 65 78 74 |ed",19).|.,".text|
|00000ed0| 28 22 74 6f 20 66 69 6e | 69 73 68 20 74 68 65 20 |("to fin|ish the |
|00000ee0| 67 61 6d 65 22 2c 32 30 | 29 0d 06 36 1b f2 74 65 |game",20|)..6..te|
|00000ef0| 78 74 28 22 47 4f 4f 44 | 20 4c 55 43 4b 20 21 22 |xt("GOOD| LUCK !"|
|00000f00| 2c 32 35 29 0d 06 40 27 | f2 74 65 78 74 28 22 50 |,25)..@'|.text("P|
|00000f10| 72 65 73 73 20 53 50 41 | 43 45 20 74 6f 20 63 6f |ress SPA|CE to co|
|00000f20| 6e 74 69 6e 75 65 22 2c | 33 30 29 0d 06 4a 14 f5 |ntinue",|30)..J..|
|00000f30| 3a d6 20 76 73 6c 3a fd | 20 a6 28 2d 39 39 29 0d |:. vsl:.| .(-99).|
|00000f40| 06 54 09 d6 20 76 73 6c | 0d 06 5e 05 e1 0d 06 68 |.T.. vsl|..^....h|
|00000f50| 0b dd 20 f2 6b 65 79 73 | 0d 06 72 1e f2 74 65 78 |.. .keys|..r..tex|
|00000f60| 74 28 22 42 75 72 73 74 | 20 50 69 70 65 20 6b 65 |t("Burst| Pipe ke|
|00000f70| 79 73 22 2c 31 29 0d 06 | 7c 21 f2 74 65 78 74 28 |ys",1)..||!.text(|
|00000f80| 22 4c 65 76 65 6c 20 73 | 65 6c 65 63 74 69 6f 6e |"Level s|election|
|00000f90| 20 3a 20 22 2c 34 29 0d | 06 86 21 f2 74 65 78 74 | : ",4).|..!.text|
|00000fa0| 28 22 5a 20 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 20 |("Z ....|....... |
|00000fb0| 4c 65 66 74 22 2c 36 29 | 0d 06 90 21 f2 74 65 78 |Left",6)|...!.tex|
|00000fc0| 74 28 22 58 20 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 20 |t("X ...|....... |
|00000fd0| 52 69 67 68 74 22 2c 38 | 29 0d 06 9a 22 f2 74 65 |Right",8|)...".te|
|00000fe0| 78 74 28 22 52 45 54 55 | 52 4e 20 2e 2e 2e 2e 2e |xt("RETU|RN .....|
|00000ff0| 2e 2e 2e 20 49 6e 22 2c | 31 30 29 0d 06 a4 1e f2 |... In",|10).....|
|00001000| 74 65 78 74 28 22 50 69 | 70 65 20 4c 61 79 69 6e |text("Pi|pe Layin|
|00001010| 67 20 3a 20 22 2c 31 34 | 29 0d 06 ae 2f f2 74 65 |g : ",14|).../.te|
|00001020| 78 74 28 22 5a 20 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |xt("Z ..|........|
|00001030| 2e 20 4d 6f 76 65 20 70 | 6f 69 6e 74 65 72 20 6c |. Move p|ointer l|
|00001040| 65 66 74 22 2c 31 36 29 | 0d 06 b8 2f f2 74 65 78 |eft",16)|.../.tex|
|00001050| 74 28 22 58 20 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 20 |t("X ...|....... |
|00001060| 4d 6f 76 65 20 70 6f 69 | 6e 74 65 72 20 72 69 67 |Move poi|nter rig|
|00001070| 68 74 22 2c 31 38 29 0d | 06 c2 2f f2 74 65 78 74 |ht",18).|../.text|
|00001080| 28 22 27 20 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |("' ....|........|
|00001090| 2e 20 4d 6f 76 65 20 70 | 6f 69 6e 74 65 72 20 75 |. Move p|ointer u|
|000010a0| 70 22 2c 32 30 29 0d 06 | cc 2f f2 74 65 78 74 28 |p",20)..|./.text(|
|000010b0| 22 2f 20 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 20 4d |"/ .....|...... M|
|000010c0| 6f 76 65 20 70 6f 69 6e | 74 65 72 20 64 6f 77 6e |ove poin|ter down|
|000010d0| 22 2c 32 32 29 0d 06 d6 | 2f f2 74 65 78 74 28 22 |",22)...|/.text("|
|000010e0| 52 45 54 55 52 4e 20 2e | 2e 2e 2e 2e 2e 20 4c 61 |RETURN .|..... La|
|000010f0| 79 20 70 69 65 63 65 20 | 6f 66 20 70 69 70 65 22 |y piece |of pipe"|
|00001100| 2c 32 34 29 0d 06 d7 2f | f2 74 65 78 74 28 22 53 |,24).../|.text("S|
|00001110| 50 41 43 45 20 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |PACE ...|........|
|00001120| 53 70 65 65 64 20 75 70 | 20 77 61 74 65 72 22 2c |Speed up| water",|
|00001130| 32 36 29 0d 06 e0 27 f2 | 74 65 78 74 28 22 50 72 |26)...'.|text("Pr|
|00001140| 65 73 73 20 53 50 41 43 | 45 20 74 6f 20 63 6f 6e |ess SPAC|E to con|
|00001150| 74 69 6e 75 65 22 2c 33 | 30 29 0d 06 ea 14 f5 3a |tinue",3|0).....:|
|00001160| d6 20 76 73 6c 3a fd 20 | a6 28 2d 39 39 29 0d 06 |. vsl:. |.(-99)..|
|00001170| f4 05 e1 0d 06 fe 0d dd | 20 f2 73 63 6f 72 65 73 |........| .scores|
|00001180| 0d 07 08 2e f2 74 65 78 | 74 28 22 54 6f 64 61 79 |.....tex|t("Today|
|00001190| 73 20 27 42 75 72 73 74 | 20 50 69 70 65 27 20 62 |s 'Burst| Pipe' b|
|000011a0| 65 73 74 20 73 63 6f 72 | 65 73 22 2c 31 29 0d 07 |est scor|es",1)..|
|000011b0| 12 0e e3 20 51 3d 31 20 | b8 20 31 30 0d 07 1c 09 |... Q=1 |. 10....|
|000011c0| d6 20 76 73 6c 0d 07 26 | 22 e7 20 51 3c 31 30 20 |. vsl..&|". Q<10 |
|000011d0| 8c 20 70 24 3d 22 30 22 | 2b c3 28 51 29 20 8b 20 |. p$="0"|+.(Q) . |
|000011e0| 70 24 3d c3 28 51 29 0d | 07 30 17 70 24 3d 70 24 |p$=.(Q).|.0.p$=p$|
|000011f0| 2b 22 20 2e 2e 2e 20 22 | 3a d6 20 76 73 6c 0d 07 |+" ... "|:. vsl..|
|00001200| 3a 2f 70 24 3d 70 24 2b | 68 69 24 28 51 29 3a 70 |:/p$=p$+|hi$(Q):p|
|00001210| 24 3d 70 24 2b c4 32 31 | 2d a9 28 68 69 24 28 51 |$=p$+.21|-.(hi$(Q|
|00001220| 29 29 2c 22 2e 22 29 3a | d6 20 76 73 6c 0d 07 44 |)),"."):|. vsl..D|
|00001230| 4d 70 24 3d 70 24 2b 22 | 20 22 3a 73 63 24 3d c3 |Mp$=p$+"| ":sc$=.|
|00001240| 28 68 69 25 28 51 29 29 | 3a e7 20 a9 28 73 63 24 |(hi%(Q))|:. .(sc$|
|00001250| 29 3c 37 20 8c 20 70 24 | 3d 70 24 2b c4 37 2d a9 |)<7 . p$|=p$+.7-.|
|00001260| 28 73 63 24 29 2c 22 30 | 22 29 2b 73 63 24 20 8b |(sc$),"0|")+sc$ .|
|00001270| 20 70 24 3d 70 24 2b 73 | 63 24 0d 07 4e 09 d6 20 | p$=p$+s|c$..N.. |
|00001280| 76 73 6c 0d 07 58 1b f2 | 74 65 78 74 28 70 24 2c |vsl..X..|text(p$,|
|00001290| 28 51 2a 32 29 2b 34 29 | 3a 70 24 3d 22 22 0d 07 |(Q*2)+4)|:p$=""..|
|000012a0| 62 07 ed 20 51 0d 07 6c | 38 f2 74 65 78 74 28 22 |b.. Q..l|8.text("|
|000012b0| 50 72 65 73 73 20 53 50 | 41 43 45 20 74 6f 20 63 |Press SP|ACE to c|
|000012c0| 6f 6e 74 69 6e 75 65 22 | 2c 33 30 29 3a f5 3a d6 |ontinue"|,30):.:.|
|000012d0| 20 76 73 6c 3a fd 20 a6 | 28 2d 39 39 29 0d 07 76 | vsl:. .|(-99)..v|
|000012e0| 05 e1 0d 07 80 10 dd 20 | f2 62 6c 61 6e 6b 63 6f |....... |.blankco|
|000012f0| 6c 73 0d 07 8a 1b e3 20 | 55 3d 31 20 b8 20 31 35 |ls..... |U=1 . 15|
|00001300| 3a fb 55 2c 30 2c 30 2c | 30 3a ed 20 55 0d 07 94 |:.U,0,0,|0:. U...|
|00001310| 05 e1 0d 07 9e 0e dd 20 | f2 63 6f 6c 73 28 6e 29 |....... |.cols(n)|
|00001320| 0d 07 a8 0e fb 31 2c 32 | 35 35 2c 30 2c 30 0d 07 |.....1,2|55,0,0..|
|00001330| b2 11 fb 32 2c 32 32 32 | 2c 31 37 34 2c 34 37 0d |...2,222|,174,47.|
|00001340| 07 bc 11 fb 33 2c 32 30 | 36 2c 32 30 36 2c 36 33 |....3,20|6,206,63|
|00001350| 0d 07 c6 10 fb 34 2c 37 | 39 2c 31 37 34 2c 37 39 |.....4,7|9,174,79|
|00001360| 0d 07 d0 10 fb 35 2c 30 | 2c 31 39 30 2c 32 35 35 |.....5,0|,190,255|
|00001370| 0d 07 da 12 fb 36 2c 32 | 35 35 2c 32 35 35 2c 32 |.....6,2|55,255,2|
|00001380| 35 35 0d 07 e4 12 fb 37 | 2c 31 39 30 2c 31 39 30 |55.....7|,190,190|
|00001390| 2c 31 39 30 0d 07 ee 12 | fb 38 2c 31 31 31 2c 31 |,190....|.8,111,1|
|000013a0| 31 31 2c 31 31 31 0d 07 | f8 0f fb 39 2c 31 34 33 |11,111..|...9,143|
|000013b0| 2c 39 35 2c 30 0d 08 02 | 11 fb 31 30 2c 31 37 34 |,95,0...|..10,174|
|000013c0| 2c 31 32 36 2c 30 0d 08 | 0c 27 e7 20 6e 3d 30 20 |,126,0..|.'. n=0 |
|000013d0| 8c 20 fb 31 31 2c 30 2c | 30 2c 32 33 38 20 8b 20 |. .11,0,|0,238 . |
|000013e0| fb 31 31 2c 30 2c 32 35 | 35 2c 31 37 30 0d 08 16 |.11,0,25|5,170...|
|000013f0| 0b e7 20 6e 3d 30 20 8c | 0d 08 20 0f fb 31 32 2c |.. n=0 .|.. ..12,|
|00001400| 30 2c 31 32 37 2c 30 0d | 08 2a 13 fb 31 33 2c 32 |0,127,0.|.*..13,2|
|00001410| 35 35 2c 32 30 36 2c 32 | 30 36 0d 08 34 13 fb 31 |55,206,2|06..4..1|
|00001420| 34 2c 32 33 38 2c 32 33 | 38 2c 31 39 30 0d 08 3e |4,238,23|8,190..>|
|00001430| 11 fb 31 35 2c 31 35 39 | 2c 30 2c 31 37 34 0d 08 |..15,159|,0,174..|
|00001440| 48 05 cd 0d 08 52 05 e1 | 0d 08 5c 0b dd 20 f2 70 |H....R..|..\.. .p|
|00001450| 6c 61 79 0d 08 66 1d e3 | 20 49 3d 31 20 b8 20 37 |lay..f..| I=1 . 7|
|00001460| 3a 63 6f 6d 70 6c 65 74 | 65 28 49 29 3d 30 3a ed |:complet|e(I)=0:.|
|00001470| 0d 08 70 0c 73 63 6f 72 | 65 25 3d 30 0d 08 7a 0e |..p.scor|e%=0..z.|
|00001480| 69 6e 63 66 72 61 6d 65 | 3d 30 0d 08 84 0c 73 63 |incframe|=0....sc|
|00001490| 72 65 65 6e 3d 31 0d 08 | 8e 1c 72 69 67 68 74 3d |reen=1..|..right=|
|000014a0| b9 3a 66 72 61 6d 65 3d | 31 3a 6d 61 6e 78 3d 31 |.:frame=|1:manx=1|
|000014b0| 32 38 0d 08 98 0a eb 20 | 31 35 3a 87 0d 08 a2 0d |28..... |15:.....|
|000014c0| 2a 53 48 41 44 4f 57 20 | 32 0d 08 ac 07 eb 20 39 |*SHADOW |2..... 9|
|000014d0| 0d 08 b6 05 87 0d 08 c0 | 08 42 25 3d 32 0d 08 ca |........|.B%=2...|
|000014e0| 0d 65 78 69 74 73 63 25 | 3d a3 0d 08 d4 0e f2 62 |.exitsc%|=......b|
|000014f0| 6c 61 6e 6b 63 6f 6c 73 | 0d 08 de 1e e6 20 30 2c |lankcols|..... 0,|
|00001500| 35 3a c8 93 20 c8 90 20 | 30 2c 31 32 38 2c 31 32 |5:.. .. |0,128,12|
|00001510| 38 30 2c 36 34 30 0d 08 | e8 09 e6 20 38 2c 30 0d |80,640..|... 8,0.|
|00001520| 08 f2 0e e3 20 49 3d 31 | 20 b8 20 73 70 0d 08 fc |.... I=1| . sp...|
|00001530| 41 e7 20 73 63 72 65 65 | 6e 28 49 29 3d 73 63 72 |A. scree|n(I)=scr|
|00001540| 65 65 6e 20 8c 20 ff 22 | 53 43 48 4f 4f 53 45 20 |een . ."|SCHOOSE |
|00001550| 22 2b 73 70 72 69 74 65 | 24 28 49 29 3a f0 20 26 |"+sprite|$(I):. &|
|00001560| 45 44 2c 73 78 28 49 29 | 2c 73 79 28 49 29 0d 09 |ED,sx(I)|,sy(I)..|
|00001570| 06 4c e7 20 73 63 72 65 | 65 6e 28 49 29 3d 73 63 |.L. scre|en(I)=sc|
|00001580| 72 65 65 6e 20 80 20 73 | 70 72 69 74 65 24 28 49 |reen . s|prite$(I|
|00001590| 29 3d 22 44 4f 4f 52 22 | 20 8c 20 64 6f 6f 72 78 |)="DOOR"| . doorx|
|000015a0| 6c 3d 73 78 28 49 29 2b | 33 32 3a 64 6f 6f 72 78 |l=sx(I)+|32:doorx|
|000015b0| 72 3d 73 78 28 49 29 2b | 36 34 0d 09 10 64 e7 20 |r=sx(I)+|64...d. |
|000015c0| 73 63 72 65 65 6e 28 49 | 29 3d 73 63 72 65 65 6e |screen(I|)=screen|
|000015d0| 20 80 20 73 70 72 69 74 | 65 24 28 49 29 3d 22 44 | . sprit|e$(I)="D|
|000015e0| 4f 4f 52 22 20 80 20 63 | 6f 6d 70 6c 65 74 65 28 |OOR" . c|omplete(|
|000015f0| 73 63 72 65 65 6e 29 3d | 31 20 8c 20 ff 22 53 43 |screen)=|1 . ."SC|
|00001600| 48 4f 4f 53 45 20 44 4f | 4f 52 32 22 3a f0 20 26 |HOOSE DO|OR2":. &|
|00001610| 45 44 2c 73 78 28 49 29 | 2c 73 79 28 49 29 0d 09 |ED,sx(I)|,sy(I)..|
|00001620| 1a 07 ed 20 49 0d 09 24 | 09 e6 20 30 2c 30 0d 09 |... I..$|.. 0,0..|
|00001630| 2e 22 ec 20 30 2c 30 3a | ec 20 31 32 38 30 2c 31 |.". 0,0:|. 1280,1|
|00001640| 30 32 34 3a 2a 53 47 45 | 54 20 73 63 72 65 65 6e |024:*SGE|T screen|
|00001650| 0d 09 38 19 42 25 3d 42 | 25 20 82 20 31 3a c8 99 |..8.B%=B|% . 1:..|
|00001660| 20 36 2c 31 31 32 2c 42 | 25 0d 09 42 13 2a 53 43 | 6,112,B|%..B.*SC|
|00001670| 48 4f 4f 53 45 20 73 63 | 72 65 65 6e 0d 09 4c 26 |HOOSE sc|reen..L&|
|00001680| e3 20 49 3d 30 20 b8 20 | 33 3a c8 99 20 36 2c 31 |. I=0 . |3:.. 6,1|
|00001690| 31 32 2c 49 3a f0 20 26 | 45 44 2c 30 2c 30 3a ed |12,I:. &|ED,0,0:.|
|000016a0| 20 49 0d 09 56 0f c8 99 | 20 36 2c 31 31 32 2c 42 | I..V...| 6,112,B|
|000016b0| 25 0d 09 60 09 e6 20 30 | 2c 37 0d 09 6a 0d f0 20 |%..`.. 0|,7..j.. |
|000016c0| 26 45 44 2c 30 2c 30 0d | 09 74 0f c8 99 20 36 2c |&ED,0,0.|.t... 6,|
|000016d0| 31 31 33 2c 42 25 0d 09 | 7e 0d f0 20 26 45 44 2c |113,B%..|~.. &ED,|
|000016e0| 30 2c 30 0d 09 88 2b ec | 20 6d 61 6e 78 2d 31 36 |0,0...+.| manx-16|
|000016f0| 2c 31 36 30 3a ec 20 6d | 61 6e 78 2b 31 33 30 2c |,160:. m|anx+130,|
|00001700| 33 30 30 3a 2a 53 47 45 | 54 20 74 65 6d 70 0d 09 |300:*SGE|T temp..|
|00001710| 92 0c 70 6c 78 3d 6d 61 | 6e 78 0d 09 9c 3f e7 20 |..plx=ma|nx...?. |
|00001720| 72 69 67 68 74 3d b9 20 | 8c 20 ff 22 53 43 48 4f |right=. |. ."SCHO|
|00001730| 4f 53 45 20 4d 52 22 2b | c3 28 66 72 61 6d 65 29 |OSE MR"+|.(frame)|
|00001740| 20 8b 20 ff 22 53 43 48 | 4f 4f 53 45 20 4d 4c 22 | . ."SCH|OOSE ML"|
|00001750| 2b c3 28 66 72 61 6d 65 | 29 0d 09 a6 09 e6 20 38 |+.(frame|)..... 8|
|00001760| 2c 37 0d 09 b0 12 f0 20 | 26 45 44 2c 6d 61 6e 78 |,7..... |&ED,manx|
|00001770| 2c 31 36 30 0d 09 ba 06 | c8 96 0d 09 c4 0c f2 63 |,160....|.......c|
|00001780| 6f 6c 73 28 30 29 0d 09 | ce 05 f5 0d 09 d8 0e 6b |ols(0)..|.......k|
|00001790| 65 79 70 72 65 73 73 3d | a3 0d 09 e2 0e e7 20 a6 |eypress=|...... .|
|000017a0| 28 2d 39 38 29 20 8c 0d | 09 ec 19 42 25 3d 42 25 |(-98) ..|...B%=B%|
|000017b0| 20 82 20 31 3a c8 99 20 | 36 2c 31 31 32 2c 42 25 | . 1:.. |6,112,B%|
|000017c0| 0d 09 f6 11 2a 53 43 48 | 4f 4f 53 45 20 54 45 4d |....*SCH|OOSE TEM|
|000017d0| 50 0d 0a 00 09 e6 20 30 | 2c 30 0d 0a 0a 15 f0 20 |P..... 0|,0..... |
|000017e0| 26 45 44 2c 6d 61 6e 78 | 2d 31 36 2c 31 36 30 0d |&ED,manx|-16,160.|
|000017f0| 0a 14 1b e7 20 6d 61 6e | 78 3e 30 20 8c 20 6d 61 |.... man|x>0 . ma|
|00001800| 6e 78 3d 6d 61 6e 78 2d | 31 32 0d 0a 1e 15 e7 20 |nx=manx-|12..... |
|00001810| 6d 61 6e 78 3c 30 20 8c | 20 6d 61 6e 78 3d 30 0d |manx<0 .| manx=0.|
|00001820| 0a 28 2b ec 20 6d 61 6e | 78 2d 31 36 2c 31 36 30 |.(+. man|x-16,160|
|00001830| 3a ec 20 6d 61 6e 78 2b | 31 33 30 2c 33 30 30 3a |:. manx+|130,300:|
|00001840| 2a 53 47 45 54 20 74 65 | 6d 70 0d 0a 32 4c 69 6e |*SGET te|mp..2Lin|
|00001850| 63 66 72 61 6d 65 3d 28 | 69 6e 63 66 72 61 6d 65 |cframe=(|incframe|
|00001860| 2b 31 29 20 83 20 33 3a | e7 20 69 6e 63 66 72 61 |+1) . 3:|. incfra|
|00001870| 6d 65 3d 30 20 8c 20 66 | 72 61 6d 65 3d 66 72 61 |me=0 . f|rame=fra|
|00001880| 6d 65 2b 31 3a e7 20 66 | 72 61 6d 65 3d 35 20 66 |me+1:. f|rame=5 f|
|00001890| 72 61 6d 65 3d 31 0d 0a | 3c 0b 72 69 67 68 74 3d |rame=1..|<.right=|
|000018a0| a3 0d 0a 46 1a ff 22 53 | 43 48 4f 4f 53 45 20 4d |...F.."S|CHOOSE M|
|000018b0| 4c 22 2b c3 28 66 72 61 | 6d 65 29 0d 0a 50 09 e6 |L"+.(fra|me)..P..|
|000018c0| 20 38 2c 37 0d 0a 5a 12 | f0 20 26 45 44 2c 6d 61 | 8,7..Z.|. &ED,ma|
|000018d0| 6e 78 2c 31 36 30 0d 0a | 64 06 c8 96 0d 0a 6e 0e |nx,160..|d.....n.|
|000018e0| 6b 65 79 70 72 65 73 73 | 3d b9 0d 0a 78 0f c8 99 |keypress|=...x...|
|000018f0| 20 36 2c 31 31 33 2c 42 | 25 0d 0a 82 05 cd 0d 0a | 6,113,B|%.......|
|00001900| 8c 1b e7 20 a6 28 2d 36 | 37 29 20 80 20 6b 65 79 |... .(-6|7) . key|
|00001910| 70 72 65 73 73 3d a3 20 | 8c 0d 0a 96 19 42 25 3d |press=. |.....B%=|
|00001920| 42 25 20 82 20 31 3a c8 | 99 20 36 2c 31 31 32 2c |B% . 1:.|. 6,112,|
|00001930| 42 25 0d 0a a0 09 e6 20 | 30 2c 30 0d 0a aa 11 2a |B%..... |0,0....*|
|00001940| 53 43 48 4f 4f 53 45 20 | 54 45 4d 50 0d 0a b4 15 |SCHOOSE |TEMP....|
|00001950| f0 20 26 45 44 2c 6d 61 | 6e 78 2d 31 36 2c 31 36 |. &ED,ma|nx-16,16|
|00001960| 30 0d 0a be 1e e7 20 6d | 61 6e 78 3c 31 31 35 30 |0..... m|anx<1150|
|00001970| 20 8c 20 6d 61 6e 78 3d | 6d 61 6e 78 2b 31 32 0d | . manx=|manx+12.|
|00001980| 0a c8 2b ec 20 6d 61 6e | 78 2d 31 36 2c 31 36 30 |..+. man|x-16,160|
|00001990| 3a ec 20 6d 61 6e 78 2b | 31 33 30 2c 33 30 30 3a |:. manx+|130,300:|
|000019a0| 2a 53 47 45 54 20 74 65 | 6d 70 0d 0a d2 4c 69 6e |*SGET te|mp...Lin|
|000019b0| 63 66 72 61 6d 65 3d 28 | 69 6e 63 66 72 61 6d 65 |cframe=(|incframe|
|000019c0| 2b 31 29 20 83 20 33 3a | e7 20 69 6e 63 66 72 61 |+1) . 3:|. incfra|
|000019d0| 6d 65 3d 30 20 8c 20 66 | 72 61 6d 65 3d 66 72 61 |me=0 . f|rame=fra|
|000019e0| 6d 65 2b 31 3a e7 20 66 | 72 61 6d 65 3d 35 20 66 |me+1:. f|rame=5 f|
|000019f0| 72 61 6d 65 3d 31 0d 0a | dc 0b 72 69 67 68 74 3d |rame=1..|..right=|
|00001a00| b9 0d 0a e6 1a ff 22 53 | 43 48 4f 4f 53 45 20 4d |......"S|CHOOSE M|
|00001a10| 52 22 2b c3 28 66 72 61 | 6d 65 29 0d 0a f0 09 e6 |R"+.(fra|me).....|
|00001a20| 20 38 2c 30 0d 0a fa 12 | f0 20 26 45 44 2c 6d 61 | 8,0....|. &ED,ma|
|00001a30| 6e 78 2c 31 36 30 0d 0b | 04 06 c8 96 0d 0b 0e 0f |nx,160..|........|
|00001a40| c8 99 20 36 2c 31 31 33 | 2c 42 25 0d 0b 18 05 cd |.. 6,113|,B%.....|
|00001a50| 0d 0b 22 18 e7 20 6d 61 | 6e 78 3c 38 20 8c 20 65 |..".. ma|nx<8 . e|
|00001a60| 78 69 74 73 63 25 3d b9 | 0d 0b 2c 1b e7 20 6d 61 |xitsc%=.|..,.. ma|
|00001a70| 6e 78 3e 31 31 34 38 20 | 8c 20 65 78 69 74 73 63 |nx>1148 |. exitsc|
|00001a80| 25 3d b9 0d 0b 36 49 e7 | 20 a6 28 2d 37 34 29 20 |%=...6I.| .(-74) |
|00001a90| 80 20 6d 61 6e 78 3e 64 | 6f 6f 72 78 6c 20 80 20 |. manx>d|oorxl . |
|00001aa0| 6d 61 6e 78 3c 64 6f 6f | 72 78 72 20 80 20 63 6f |manx<doo|rxr . co|
|00001ab0| 6d 70 6c 65 74 65 28 73 | 63 72 65 65 6e 29 3d 30 |mplete(s|creen)=0|
|00001ac0| 20 8c 20 65 78 69 74 73 | 63 25 3d b9 0d 0b 40 0d | . exits|c%=...@.|
|00001ad0| fd 20 65 78 69 74 73 63 | 25 0d 0b 4a 33 e7 20 6d |. exitsc|%..J3. m|
|00001ae0| 61 6e 78 3c 38 20 80 20 | 73 63 72 65 65 6e 3d 31 |anx<8 . |screen=1|
|00001af0| 20 8c 20 73 63 72 65 65 | 6e 3d 37 3a 6d 61 6e 78 | . scree|n=7:manx|
|00001b00| 3d 31 31 32 38 3a e5 20 | 8d 64 4a 48 0d 0b 54 34 |=1128:. |.dJH..T4|
|00001b10| e7 20 6d 61 6e 78 3e 31 | 31 34 38 20 80 20 73 63 |. manx>1|148 . sc|
|00001b20| 72 65 65 6e 3d 37 20 8c | 20 73 63 72 65 65 6e 3d |reen=7 .| screen=|
|00001b30| 31 3a 6d 61 6e 78 3d 33 | 32 3a e5 20 8d 64 4a 48 |1:manx=3|2:. .dJH|
|00001b40| 0d 0b 5e 2f e7 20 6d 61 | 6e 78 3c 38 20 8c 20 73 |..^/. ma|nx<8 . s|
|00001b50| 63 72 65 65 6e 3d 73 63 | 72 65 65 6e 2d 31 3a 6d |creen=sc|reen-1:m|
|00001b60| 61 6e 78 3d 31 31 32 38 | 3a e5 20 8d 64 4a 48 0d |anx=1128|:. .dJH.|
|00001b70| 0b 68 30 e7 20 6d 61 6e | 78 3e 31 31 34 38 20 8c |.h0. man|x>1148 .|
|00001b80| 20 73 63 72 65 65 6e 3d | 73 63 72 65 65 6e 2b 31 | screen=|screen+1|
|00001b90| 3a 6d 61 6e 78 3d 33 32 | 3a e5 20 8d 64 4a 48 0d |:manx=32|:. .dJH.|
|00001ba0| 0b 72 09 2a 46 61 64 65 | 0d 0b 7c 10 f2 62 6c 61 |.r.*Fade|..|..bla|
|00001bb0| 6e 6b 63 6f 6c 73 3a db | 0d 0b 86 09 e6 20 38 2c |nkcols:.|..... 8,|
|00001bc0| 30 0d 0b 90 0e 2a 53 43 | 48 4f 4f 53 45 20 30 0d |0....*SC|HOOSE 0.|
|00001bd0| 0b 9a 18 e3 20 49 3d 31 | 20 b8 20 31 30 3a e3 20 |.... I=1| . 10:. |
|00001be0| 4a 3d 31 20 b8 20 37 0d | 0b a4 21 67 72 69 64 28 |J=1 . 7.|..!grid(|
|00001bf0| 49 2c 4a 29 3d 30 3a f0 | 20 26 45 44 2c 49 2a 31 |I,J)=0:.| &ED,I*1|
|00001c00| 30 34 2c 4a 2a 31 30 34 | 0d 0b ae 07 ed 20 4a 0d |04,J*104|..... J.|
|00001c10| 0b b8 07 ed 20 49 0d 0b | c2 17 64 65 6c 61 79 3d |.... I..|..delay=|
|00001c20| 31 36 2d 28 73 63 72 65 | 65 6e 2a 32 29 0d 0b cc |16-(scre|en*2)...|
|00001c30| 11 6e 65 78 74 74 69 6c | 65 3d b3 28 36 29 0d 0b |.nexttil|e=.(6)..|
|00001c40| d6 0e 2a 53 43 48 4f 4f | 53 45 20 35 0d 0b e0 0f |..*SCHOO|SE 5....|
|00001c50| f0 20 26 45 44 2c 30 2c | 31 30 34 0d 0b ea 0e 2a |. &ED,0,|104....*|
|00001c60| 53 43 48 4f 4f 53 45 20 | 31 0d 0b f4 1f e3 20 49 |SCHOOSE |1..... I|
|00001c70| 3d 32 20 b8 20 37 3a f0 | 20 26 45 44 2c 30 2c 49 |=2 . 7:.| &ED,0,I|
|00001c80| 2a 31 30 34 3a ed 20 49 | 0d 0b fe 0e 2a 53 43 48 |*104:. I|....*SCH|
|00001c90| 4f 4f 53 45 20 33 0d 0c | 08 16 f0 20 26 45 44 2c |OOSE 3..|... &ED,|
|00001ca0| 31 30 34 2a 31 31 2c 31 | 30 34 2a 37 0d 0c 12 0e |104*11,1|04*7....|
|00001cb0| 2a 53 43 48 4f 4f 53 45 | 20 31 0d 0c 1c 24 e3 20 |*SCHOOSE| 1...$. |
|00001cc0| 49 3d 31 20 b8 20 36 3a | f0 20 26 45 44 2c 31 31 |I=1 . 6:|. &ED,11|
|00001cd0| 2a 31 30 34 2c 49 2a 31 | 30 34 3a ed 20 49 0d 0c |*104,I*1|04:. I..|
|00001ce0| 26 1b ff 22 53 43 48 4f | 4f 53 45 20 22 2b c3 28 |&.."SCHO|OSE "+.(|
|00001cf0| 6e 65 78 74 74 69 6c 65 | 29 0d 0c 30 13 f0 20 26 |nexttile|)..0.. &|
|00001d00| 45 44 2c 30 2c 38 2e 35 | 2a 31 30 34 0d 0c 3a 34 |ED,0,8.5|*104..:4|
|00001d10| e6 20 30 2c 38 3a c8 93 | 20 c8 90 20 30 2c 38 38 |. 0,8:..| .. 0,88|
|00001d20| 2c 31 32 38 30 2c 38 3a | c8 93 20 c8 90 20 30 2c |,1280,8:|.. .. 0,|
|00001d30| 28 31 30 34 2a 38 29 2b | 34 2c 31 32 38 30 2c 38 |(104*8)+|4,1280,8|
|00001d40| 0d 0c 44 0f fb 20 31 31 | 3a f2 73 63 6f 72 65 0d |..D.. 11|:.score.|
|00001d50| 0c 4e 0c f2 63 6f 6c 73 | 28 31 29 0d 0c 58 18 78 |.N..cols|(1)..X.x|
|00001d60| 70 6f 73 3d 31 3a 79 70 | 6f 73 3d 31 3a e6 20 30 |pos=1:yp|os=1:. 0|
|00001d70| 2c 31 31 0d 0c 62 27 e6 | 20 33 2c 31 31 3a c8 93 |,11..b'.| 3,11:..|
|00001d80| 20 78 70 6f 73 2a 31 30 | 34 2c 79 70 6f 73 2a 31 | xpos*10|4,ypos*1|
|00001d90| 30 34 2c 31 30 30 2c 31 | 30 30 0d 0c 6c 2b 66 6c |04,100,1|00..l+fl|
|00001da0| 6f 6f 7a 65 78 3d 28 31 | 31 2a 31 30 34 29 2b 35 |oozex=(1|1*104)+5|
|00001db0| 32 3a 66 6c 6f 6f 7a 65 | 79 3d 31 32 38 3a 64 65 |2:flooze|y=128:de|
|00001dc0| 61 64 25 3d a3 0d 0c 76 | 09 64 69 72 3d 31 0d 0c |ad%=...v|.dir=1..|
|00001dd0| 80 10 66 6c 6f 6f 7a 65 | 63 6f 6c 3d 31 31 0d 0c |..flooze|col=11..|
|00001de0| 8a 0f 66 6c 6f 6f 7a 65 | 69 6e 63 3d 31 0d 0c 94 |..flooze|inc=1...|
|00001df0| 09 6b 65 79 3d 30 0d 0c | 9e 0f 73 74 61 72 74 74 |.key=0..|..startt|
|00001e00| 69 6d 65 3d 91 0d 0c a8 | 0d 66 69 6e 69 73 68 25 |ime=....|.finish%|
|00001e10| 3d a3 0d 0c b2 05 f5 0d | 0c bc 27 e6 20 33 2c 31 |=.......|..'. 3,1|
|00001e20| 31 3a c8 93 20 78 70 6f | 73 2a 31 30 34 2c 79 70 |1:.. xpo|s*104,yp|
|00001e30| 6f 73 2a 31 30 34 2c 31 | 30 30 2c 31 30 30 0d 0c |os*104,1|00,100..|
|00001e40| c6 19 e7 20 91 3e 73 74 | 61 72 74 74 69 6d 65 2b |... .>st|arttime+|
|00001e50| 64 65 6c 61 79 20 8c 0d | 0c d0 23 73 63 6f 72 65 |delay ..|..#score|
|00001e60| 25 3d 73 63 6f 72 65 25 | 2b 28 32 2a 73 63 72 65 |%=score%|+(2*scre|
|00001e70| 65 6e 29 3a f2 73 63 6f | 72 65 0d 0c da 69 66 6c |en):.sco|re...ifl|
|00001e80| 6f 6f 7a 65 69 6e 63 3d | 66 6c 6f 6f 7a 65 69 6e |oozeinc=|floozein|
|00001e90| 63 2b 31 3a e7 20 66 6c | 6f 6f 7a 65 69 6e 63 3d |c+1:. fl|oozeinc=|
|00001ea0| 32 20 8c 20 66 6c 6f 6f | 7a 65 69 6e 63 3d 30 3a |2 . floo|zeinc=0:|
|00001eb0| 66 6c 6f 6f 7a 65 63 6f | 6c 3d 66 6c 6f 6f 7a 65 |floozeco|l=flooze|
|00001ec0| 63 6f 6c 2b 31 3a e7 20 | 66 6c 6f 6f 7a 65 63 6f |col+1:. |floozeco|
|00001ed0| 6c 3d 31 36 20 8c 20 66 | 6c 6f 6f 7a 65 63 6f 6c |l=16 . f|loozecol|
|00001ee0| 3d 31 32 0d 0c e4 0e f2 | 63 6f 6c 6f 75 72 63 79 |=12.....|colourcy|
|00001ef0| 63 0d 0c ee 0f 73 74 61 | 72 74 74 69 6d 65 3d 91 |c....sta|rttime=.|
|00001f00| 0d 0c f8 0c c8 8e 20 64 | 69 72 20 ca 0d 0d 02 07 |...... d|ir .....|
|00001f10| c9 20 31 0d 0d 0c 15 66 | 6c 6f 6f 7a 65 79 3d 66 |. 1....f|loozey=f|
|00001f20| 6c 6f 6f 7a 65 79 2b 34 | 0d 0d 16 11 e6 20 30 2c |loozey+4|..... 0,|
|00001f30| 66 6c 6f 6f 7a 65 63 6f | 6c 0d 0d 20 18 c8 8f 20 |floozeco|l.. ... |
|00001f40| 66 6c 6f 6f 7a 65 78 2c | 66 6c 6f 6f 7a 65 79 2c |floozex,|floozey,|
|00001f50| 36 0d 0d 2a 3e e7 20 b0 | 66 6c 6f 6f 7a 65 78 2c |6..*>. .|floozex,|
|00001f60| 66 6c 6f 6f 7a 65 79 2b | 38 29 3e 31 20 80 20 b0 |floozey+|8)>1 . .|
|00001f70| 66 6c 6f 6f 7a 65 78 2c | 66 6c 6f 6f 7a 65 79 2b |floozex,|floozey+|
|00001f80| 38 29 3c 31 30 20 8c 20 | 64 65 61 64 25 3d b9 0d |8)<10 . |dead%=..|
|00001f90| 0d 34 1d e7 20 b0 66 6c | 6f 6f 7a 65 78 2c 66 6c |.4.. .fl|oozex,fl|
|00001fa0| 6f 6f 7a 65 79 2b 38 29 | 3d 31 20 8c 0d 0d 3e 2c |oozey+8)|=1 ...>,|
|00001fb0| e7 20 b0 66 6c 6f 6f 7a | 65 78 2d 32 34 2c 66 6c |. .flooz|ex-24,fl|
|00001fc0| 6f 6f 7a 65 79 29 3d 30 | 20 8c 20 64 69 72 3d 33 |oozey)=0| . dir=3|
|00001fd0| 20 8b 20 64 69 72 3d 34 | 0d 0d 48 05 cd 0d 0d 52 | . dir=4|..H....R|
|00001fe0| 07 c9 20 32 0d 0d 5c 15 | 66 6c 6f 6f 7a 65 79 3d |.. 2..\.|floozey=|
|00001ff0| 66 6c 6f 6f 7a 65 79 2d | 34 0d 0d 66 11 e6 20 30 |floozey-|4..f.. 0|
|00002000| 2c 66 6c 6f 6f 7a 65 63 | 6f 6c 0d 0d 70 18 c8 8f |,floozec|ol..p...|
|00002010| 20 66 6c 6f 6f 7a 65 78 | 2c 66 6c 6f 6f 7a 65 79 | floozex|,floozey|
|00002020| 2c 36 0d 0d 7a 3e e7 20 | b0 66 6c 6f 6f 7a 65 78 |,6..z>. |.floozex|
|00002030| 2c 66 6c 6f 6f 7a 65 79 | 2d 38 29 3e 31 20 80 20 |,floozey|-8)>1 . |
|00002040| b0 66 6c 6f 6f 7a 65 78 | 2c 66 6c 6f 6f 7a 65 79 |.floozex|,floozey|
|00002050| 2d 38 29 3c 31 30 20 8c | 20 64 65 61 64 25 3d b9 |-8)<10 .| dead%=.|
|00002060| 0d 0d 84 1d e7 20 b0 66 | 6c 6f 6f 7a 65 78 2c 66 |..... .f|loozex,f|
|00002070| 6c 6f 6f 7a 65 79 2d 38 | 29 3d 31 20 8c 0d 0d 8e |loozey-8|)=1 ....|
|00002080| 2c e7 20 b0 66 6c 6f 6f | 7a 65 78 2d 32 34 2c 66 |,. .floo|zex-24,f|
|00002090| 6c 6f 6f 7a 65 79 29 3d | 30 20 8c 20 64 69 72 3d |loozey)=|0 . dir=|
|000020a0| 33 20 8b 20 64 69 72 3d | 34 0d 0d 98 05 cd 0d 0d |3 . dir=|4.......|
|000020b0| a2 07 c9 20 33 0d 0d ac | 15 66 6c 6f 6f 7a 65 78 |... 3...|.floozex|
|000020c0| 3d 66 6c 6f 6f 7a 65 78 | 2d 34 0d 0d b6 11 e6 20 |=floozex|-4..... |
|000020d0| 30 2c 66 6c 6f 6f 7a 65 | 63 6f 6c 0d 0d c0 18 c8 |0,flooze|col.....|
|000020e0| 8f 20 66 6c 6f 6f 7a 65 | 78 2c 66 6c 6f 6f 7a 65 |. flooze|x,flooze|
|000020f0| 79 2c 36 0d 0d ca 3e e7 | 20 b0 66 6c 6f 6f 7a 65 |y,6...>.| .flooze|
|00002100| 78 2d 38 2c 66 6c 6f 6f | 7a 65 79 29 3e 31 20 80 |x-8,floo|zey)>1 .|
|00002110| 20 b0 66 6c 6f 6f 7a 65 | 78 2d 38 2c 66 6c 6f 6f | .flooze|x-8,floo|
|00002120| 7a 65 79 29 3c 31 30 20 | 8c 20 64 65 61 64 25 3d |zey)<10 |. dead%=|
|00002130| b9 0d 0d d4 1d e7 20 b0 | 66 6c 6f 6f 7a 65 78 2d |...... .|floozex-|
|00002140| 38 2c 66 6c 6f 6f 7a 65 | 79 29 3d 31 20 8c 0d 0d |8,flooze|y)=1 ...|
|00002150| de 2c e7 20 b0 66 6c 6f | 6f 7a 65 78 2c 66 6c 6f |.,. .flo|ozex,flo|
|00002160| 6f 7a 65 79 2b 32 34 29 | 3d 30 20 8c 20 64 69 72 |ozey+24)|=0 . dir|
|00002170| 3d 31 20 8b 20 64 69 72 | 3d 32 0d 0d e8 05 cd 0d |=1 . dir|=2......|
|00002180| 0d f2 07 c9 20 34 0d 0d | fc 15 66 6c 6f 6f 7a 65 |.... 4..|..flooze|
|00002190| 78 3d 66 6c 6f 6f 7a 65 | 78 2b 34 0d 0e 06 11 e6 |x=flooze|x+4.....|
|000021a0| 20 30 2c 66 6c 6f 6f 7a | 65 63 6f 6c 0d 0e 10 18 | 0,flooz|ecol....|
|000021b0| c8 8f 20 66 6c 6f 6f 7a | 65 78 2c 66 6c 6f 6f 7a |.. flooz|ex,flooz|
|000021c0| 65 79 2c 36 0d 0e 1a 3e | e7 20 b0 66 6c 6f 6f 7a |ey,6...>|. .flooz|
|000021d0| 65 78 2b 38 2c 66 6c 6f | 6f 7a 65 79 29 3e 31 20 |ex+8,flo|ozey)>1 |
|000021e0| 80 20 b0 66 6c 6f 6f 7a | 65 78 2b 38 2c 66 6c 6f |. .flooz|ex+8,flo|
|000021f0| 6f 7a 65 79 29 3c 31 30 | 20 8c 20 64 65 61 64 25 |ozey)<10| . dead%|
|00002200| 3d b9 0d 0e 24 1d e7 20 | b0 66 6c 6f 6f 7a 65 78 |=...$.. |.floozex|
|00002210| 2b 38 2c 66 6c 6f 6f 7a | 65 79 29 3d 31 20 8c 0d |+8,flooz|ey)=1 ..|
|00002220| 0e 2e 2c e7 20 b0 66 6c | 6f 6f 7a 65 78 2c 66 6c |..,. .fl|oozex,fl|
|00002230| 6f 6f 7a 65 79 2b 32 34 | 29 3d 30 20 8c 20 64 69 |oozey+24|)=0 . di|
|00002240| 72 3d 31 20 8b 20 64 69 | 72 3d 32 0d 0e 38 05 cd |r=1 . di|r=2..8..|
|00002250| 0d 0e 42 05 cb 0d 0e 4c | 43 74 69 6c 65 78 3d 28 |..B....L|Ctilex=(|
|00002260| 66 6c 6f 6f 7a 65 78 20 | 81 20 31 30 34 29 3a 74 |floozex |. 104):t|
|00002270| 69 6c 65 79 3d 28 66 6c | 6f 6f 7a 65 79 20 81 20 |iley=(fl|oozey . |
|00002280| 31 30 34 29 3a 67 72 69 | 64 28 74 69 6c 65 78 2c |104):gri|d(tilex,|
|00002290| 74 69 6c 65 79 29 3d 31 | 0d 0e 56 05 cd 0d 0e 60 |tiley)=1|..V....`|
|000022a0| 0d e7 20 6b 65 79 3d 30 | 20 8c 0d 0e 6a 2c e7 20 |.. key=0| ...j,. |
|000022b0| a6 28 2d 39 38 29 20 80 | 20 78 70 6f 73 3e 31 20 |.(-98) .| xpos>1 |
|000022c0| 8c 20 78 70 6f 73 3d 78 | 70 6f 73 2d 31 3a 6b 65 |. xpos=x|pos-1:ke|
|000022d0| 79 3d 74 76 61 6c 0d 0e | 74 2d e7 20 a6 28 2d 36 |y=tval..|t-. .(-6|
|000022e0| 37 29 20 80 20 78 70 6f | 73 3c 31 30 20 8c 20 78 |7) . xpo|s<10 . x|
|000022f0| 70 6f 73 3d 78 70 6f 73 | 2b 31 3a 6b 65 79 3d 74 |pos=xpos|+1:key=t|
|00002300| 76 61 6c 0d 0e 7e 2d e7 | 20 a6 28 2d 31 30 35 29 |val..~-.| .(-105)|
|00002310| 20 80 20 79 70 6f 73 3e | 31 20 8c 20 79 70 6f 73 | . ypos>|1 . ypos|
|00002320| 3d 79 70 6f 73 2d 31 3a | 6b 65 79 3d 74 76 61 6c |=ypos-1:|key=tval|
|00002330| 0d 0e 88 2c e7 20 a6 28 | 2d 38 30 29 20 80 20 79 |...,. .(|-80) . y|
|00002340| 70 6f 73 3c 37 20 8c 20 | 79 70 6f 73 3d 79 70 6f |pos<7 . |ypos=ypo|
|00002350| 73 2b 31 3a 6b 65 79 3d | 74 76 61 6c 0d 0e 89 1f |s+1:key=|tval....|
|00002360| e7 20 a6 28 2d 39 39 29 | 20 8c 20 64 65 6c 61 79 |. .(-99)| . delay|
|00002370| 3d 32 3a 6b 65 79 3d 74 | 76 61 6c 0d 0e 92 22 e7 |=2:key=t|val...".|
|00002380| 20 a6 28 2d 37 34 29 20 | 80 20 67 72 69 64 28 78 | .(-74) |. grid(x|
|00002390| 70 6f 73 2c 79 70 6f 73 | 29 3d 30 20 8c 0d 0e 9c |pos,ypos|)=0 ....|
|000023a0| 39 e6 20 30 2c 30 3a ff | 22 53 43 48 4f 4f 53 45 |9. 0,0:.|"SCHOOSE|
|000023b0| 20 22 2b c3 28 6e 65 78 | 74 74 69 6c 65 29 3a f0 | "+.(nex|ttile):.|
|000023c0| 20 26 45 44 2c 78 70 6f | 73 2a 31 30 34 2c 79 70 | &ED,xpo|s*104,yp|
|000023d0| 6f 73 2a 31 30 34 0d 0e | a6 56 f5 3a 74 69 6c 65 |os*104..|.V.:tile|
|000023e0| 3d b3 28 36 29 3a fd 20 | 74 69 6c 65 3c 3e 6e 65 |=.(6):. |tile<>ne|
|000023f0| 78 74 74 69 6c 65 3a 6e | 65 78 74 74 69 6c 65 3d |xttile:n|exttile=|
|00002400| 74 69 6c 65 3a ff 22 53 | 43 48 4f 4f 53 45 20 22 |tile:."S|CHOOSE "|
|00002410| 2b c3 28 6e 65 78 74 74 | 69 6c 65 29 3a f0 20 26 |+.(nextt|ile):. &|
|00002420| 45 44 2c 30 2c 38 2e 35 | 2a 31 30 34 0d 0e b0 0c |ED,0,8.5|*104....|
|00002430| 6b 65 79 3d 74 76 61 6c | 0d 0e ba 39 73 63 6f 72 |key=tval|...9scor|
|00002440| 65 25 3d 73 63 6f 72 65 | 25 2d 28 73 63 72 65 65 |e%=score|%-(scree|
|00002450| 6e 2a 35 29 3a e7 20 73 | 63 6f 72 65 25 3c 30 20 |n*5):. s|core%<0 |
|00002460| 8c 20 73 63 6f 72 65 25 | 3d 30 3a f2 73 63 6f 72 |. score%|=0:.scor|
|00002470| 65 0d 0e c4 05 cd 0d 0e | ce 27 e6 20 33 2c 31 31 |e.......|.'. 3,11|
|00002480| 3a c8 93 20 78 70 6f 73 | 2a 31 30 34 2c 79 70 6f |:.. xpos|*104,ypo|
|00002490| 73 2a 31 30 34 2c 31 30 | 30 2c 31 30 30 0d 0e d8 |s*104,10|0,100...|
|000024a0| 05 cc 0d 0e e2 0d 6b 65 | 79 3d 6b 65 79 2d 31 0d |......ke|y=key-1.|
|000024b0| 0e ec 05 cd 0d 0e f6 06 | c8 96 0d 0f 00 2b e7 20 |........|.....+. |
|000024c0| 66 6c 6f 6f 7a 65 78 3c | 31 30 30 20 80 20 66 6c |floozex<|100 . fl|
|000024d0| 6f 6f 7a 65 79 3e 38 30 | 30 20 8c 20 66 69 6e 69 |oozey>80|0 . fini|
|000024e0| 73 68 25 3d b9 0d 0f 0a | 15 fd 20 64 65 61 64 25 |sh%=....|.. dead%|
|000024f0| 20 84 20 66 69 6e 69 73 | 68 25 0d 0f 14 15 e7 20 | . finis|h%..... |
|00002500| 64 65 61 64 25 20 8c 20 | f2 64 65 61 64 3a e1 0d |dead% . |.dead:..|
|00002510| 0f 1e 09 2a 46 61 64 65 | 0d 0f 28 21 63 6f 6d 70 |...*Fade|..(!comp|
|00002520| 6c 65 74 65 28 73 63 72 | 65 65 6e 29 3d 31 3a f2 |lete(scr|een)=1:.|
|00002530| 62 6c 61 6e 6b 63 6f 6c | 73 0d 0f 32 32 6e 6f 74 |blankcol|s..22not|
|00002540| 63 3d 30 3a e3 20 49 3d | 31 20 b8 20 37 3a e7 20 |c=0:. I=|1 . 7:. |
|00002550| 63 6f 6d 70 6c 65 74 65 | 28 49 29 3d 31 20 8c 20 |complete|(I)=1 . |
|00002560| 6e 6f 74 63 3d 6e 6f 74 | 63 2b 31 0d 0f 3c 1f ed |notc=not|c+1..<..|
|00002570| 20 49 3a e7 20 6e 6f 74 | 63 3d 37 20 8c 20 f2 63 | I:. not|c=7 . .c|
|00002580| 6f 6d 70 6c 65 74 65 64 | 3a e1 0d 0f 46 0c db 3a |ompleted|:...F..:|
|00002590| e5 20 8d 64 4a 48 0d 0f | 50 0b dd 20 f2 64 65 61 |. .dJH..|P.. .dea|
|000025a0| 64 0d 0f 5a 4f e3 20 49 | 3d 30 20 b8 20 35 31 32 |d..ZO. I|=0 . 512|
|000025b0| 20 88 20 34 3a e6 20 30 | 2c 30 3a 86 20 30 2c 49 | . 4:. 0|,0:. 0,I|
|000025c0| 2c 31 32 38 30 2c 49 3a | 86 20 30 2c 31 30 32 34 |,1280,I:|. 0,1024|
|000025d0| 2d 49 2c 31 32 38 30 2c | 31 30 32 34 2d 49 3a c8 |-I,1280,|1024-I:.|
|000025e0| 96 3a ed 20 49 3a f2 62 | 6c 61 6e 6b 63 6f 6c 73 |.:. I:.b|lankcols|
|000025f0| 0d 0f 64 0d 2a 53 48 41 | 44 4f 57 20 30 0d 0f 6e |..d.*SHA|DOW 0..n|
|00002600| 05 db 0d 0f 78 17 eb 20 | 31 33 3a 87 3a f2 61 73 |....x.. |13:.:.as|
|00002610| 73 3a d6 20 62 65 67 69 | 6e 0d 0f 82 30 f2 74 65 |s:. begi|n...0.te|
|00002620| 78 74 28 22 4f 68 20 64 | 65 61 72 20 21 20 49 74 |xt("Oh d|ear ! It|
|00002630| 20 61 70 70 65 61 72 73 | 20 74 68 61 74 20 79 6f | appears| that yo|
|00002640| 75 20 64 69 64 22 2c 34 | 29 0d 0f 8c 29 f2 74 65 |u did",4|)...).te|
|00002650| 78 74 28 22 6e 6f 74 20 | 73 75 63 63 65 65 64 20 |xt("not |succeed |
|00002660| 69 6e 20 79 6f 75 72 20 | 74 61 73 6b 20 21 22 2c |in your |task !",|
|00002670| 36 29 0d 0f 96 28 f2 74 | 65 78 74 28 22 42 65 74 |6)...(.t|ext("Bet|
|00002680| 74 65 72 20 6c 75 63 6b | 20 6e 65 78 74 20 74 69 |ter luck| next ti|
|00002690| 6d 65 20 21 21 22 2c 31 | 30 29 0d 0f a0 28 f2 74 |me !!",1|0)...(.t|
|000026a0| 65 78 74 28 22 50 72 65 | 73 73 20 53 50 41 43 45 |ext("Pre|ss SPACE|
|000026b0| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 20 22 2c 32 | to cont|inue ",2|
|000026c0| 30 29 0d 0f aa 1b f5 3a | d6 20 76 73 6c 3a fd 20 |0).....:|. vsl:. |
|000026d0| a6 28 2d 39 39 29 3a f2 | 63 6c 65 61 72 0d 0f b4 |.(-99):.|clear...|
|000026e0| 0c f2 68 69 73 63 6f 72 | 65 0d 0f be 05 e1 0d 0f |..hiscor|e.......|
|000026f0| c8 10 dd 20 f2 63 6f 6c | 6f 75 72 63 79 63 0d 0f |... .col|ourcyc..|
|00002700| d2 27 e3 20 49 3d 31 32 | 20 b8 20 31 35 3a fb 49 |.'. I=12| . 15:.I|
|00002710| 2c 30 2c 36 30 2c 63 79 | 63 6c 65 28 49 2d 31 31 |,0,60,cy|cle(I-11|
|00002720| 29 3a ed 20 49 0d 0f dc | 35 71 3d 63 79 63 6c 65 |):. I...|5q=cycle|
|00002730| 28 34 29 3a e3 20 49 3d | 33 20 b8 20 31 20 88 20 |(4):. I=|3 . 1 . |
|00002740| 2d 31 3a 63 79 63 6c 65 | 28 49 2b 31 29 3d 63 79 |-1:cycle|(I+1)=cy|
|00002750| 63 6c 65 28 49 29 3a ed | 20 49 0d 0f e6 0e 63 79 |cle(I):.| I....cy|
|00002760| 63 6c 65 28 31 29 3d 71 | 0d 0f f0 05 e1 0d 0f fa |cle(1)=q|........|
|00002770| 59 dd 20 f2 73 63 6f 72 | 65 3a 77 24 3d c3 28 73 |Y. .scor|e:w$=.(s|
|00002780| 63 6f 72 65 25 29 3a 73 | 63 24 3d c4 37 2d 28 a9 |core%):s|c$=.7-(.|
|00002790| 28 77 24 29 29 2c 22 30 | 22 29 2b 77 24 3a ef 20 |(w$)),"0|")+w$:. |
|000027a0| 33 31 2c 31 36 2c 33 3a | e3 20 52 3d 31 20 b8 20 |31,16,3:|. R=1 . |
|000027b0| 37 3a ef 20 97 28 c1 73 | 63 24 2c 52 2c 31 29 29 |7:. .(.s|c$,R,1))|
|000027c0| 3a ed 20 52 3a e1 0d 10 | 04 10 dd 20 f2 63 6f 6d |:. R:...|... .com|
|000027d0| 70 6c 65 74 65 64 0d 10 | 0e 05 db 0d 10 18 0d 2a |pleted..|.......*|
|000027e0| 53 48 41 44 4f 57 20 30 | 0d 10 22 17 eb 20 31 33 |SHADOW 0|..".. 13|
|000027f0| 3a 87 3a f2 61 73 73 3a | d6 20 62 65 67 69 6e 0d |:.:.ass:|. begin.|
|00002800| 10 2c 1a f2 74 65 78 74 | 28 22 57 65 6c 6c 20 44 |.,..text|("Well D|
|00002810| 6f 6e 65 20 21 22 2c 34 | 29 0d 10 36 2b f2 74 65 |one !",4|)..6+.te|
|00002820| 78 74 28 22 59 6f 75 20 | 73 61 76 65 64 20 61 6c |xt("You |saved al|
|00002830| 6c 20 74 68 65 20 72 6f | 6f 6d 73 20 66 72 6f 6d |l the ro|oms from|
|00002840| 22 2c 38 29 0d 10 40 2e | f2 74 65 78 74 28 22 62 |",8)..@.|.text("b|
|00002850| 65 69 6e 67 20 66 6c 6f | 6f 64 65 64 20 2d 20 59 |eing flo|oded - Y|
|00002860| 6f 75 20 64 6f 6e 27 74 | 20 68 61 76 65 22 2c 31 |ou don't| have",1|
|00002870| 30 29 0d 10 4a 2b f2 74 | 65 78 74 28 22 74 6f 20 |0)..J+.t|ext("to |
|00002880| 70 61 79 20 66 6f 72 20 | 61 6c 6c 20 74 68 65 20 |pay for |all the |
|00002890| 64 61 6d 61 67 65 20 21 | 22 2c 31 32 29 0d 10 54 |damage !|",12)..T|
|000028a0| 28 f2 74 65 78 74 28 22 | 50 72 65 73 73 20 53 50 |(.text("|Press SP|
|000028b0| 41 43 45 20 74 6f 20 63 | 6f 6e 74 69 6e 75 65 20 |ACE to c|ontinue |
|000028c0| 22 2c 32 30 29 0d 10 5e | 1b f5 3a d6 20 76 73 6c |",20)..^|..:. vsl|
|000028d0| 3a fd 20 a6 28 2d 39 39 | 29 3a f2 63 6c 65 61 72 |:. .(-99|):.clear|
|000028e0| 0d 10 68 0c f2 68 69 73 | 63 6f 72 65 0d 10 72 05 |..h..his|core..r.|
|000028f0| e1 0d 10 7c 0e dd 20 f2 | 68 69 73 63 6f 72 65 0d |...|.. .|hiscore.|
|00002900| 10 86 1c e7 20 73 63 6f | 72 65 25 3e 68 69 25 28 |.... sco|re%>hi%(|
|00002910| 31 30 29 20 8c 20 f2 6e | 61 6d 65 0d 10 90 05 e1 |10) . .n|ame.....|
|00002920| 0d 10 9a 0b dd 20 f2 6e | 61 6d 65 0d 10 a4 30 f2 |..... .n|ame...0.|
|00002930| 74 65 78 74 28 22 59 6f | 75 20 73 63 6f 72 65 64 |text("Yo|u scored|
|00002940| 20 65 6e 6f 75 67 68 20 | 70 6f 69 6e 74 73 20 74 | enough |points t|
|00002950| 6f 20 67 6f 20 6f 6e 22 | 2c 32 29 0d 10 ae 20 f2 |o go on"|,2)... .|
|00002960| 74 65 78 74 28 22 74 6f | 64 61 79 73 20 73 63 6f |text("to|days sco|
|00002970| 72 65 62 6f 61 72 64 22 | 2c 34 29 0d 10 b8 25 f2 |reboard"|,4)...%.|
|00002980| 74 65 78 74 28 22 50 6c | 65 61 73 65 20 65 6e 74 |text("Pl|ease ent|
|00002990| 65 72 20 79 6f 75 72 20 | 6e 61 6d 65 22 2c 38 29 |er your |name",8)|
|000029a0| 0d 10 c2 0a 2a 46 58 20 | 31 35 0d 10 cc 0f d6 20 |....*FX |15..... |
|000029b0| 76 73 6c 3a 6e 24 3d 22 | 22 0d 10 d6 05 f5 0d 10 |vsl:n$="|".......|
|000029c0| e0 10 d6 20 76 73 6c 3a | 41 3d a6 28 30 29 0d 10 |... vsl:|A=.(0)..|
|000029d0| ea 1f e7 20 41 3e 33 31 | 20 80 20 41 3c 31 32 37 |... A>31| . A<127|
|000029e0| 20 80 20 a9 28 6e 24 29 | 3c 32 30 20 8c 0d 10 f4 | . .(n$)|<20 ....|
|000029f0| 1a d6 20 76 73 6c 3a ff | 22 53 43 48 4f 4f 53 45 |.. vsl:.|"SCHOOSE|
|00002a00| 20 22 2b c3 28 41 29 0d | 10 fe 22 d6 20 76 73 6c | "+.(A).|..". vsl|
|00002a10| 3a f0 20 26 45 44 2c 33 | 32 30 2b 28 a9 28 6e 24 |:. &ED,3|20+(.(n$|
|00002a20| 29 2a 33 32 29 2c 32 35 | 36 0d 11 08 14 d6 20 76 |)*32),25|6..... v|
|00002a30| 73 6c 3a 6e 24 3d 6e 24 | 2b bd 28 41 29 0d 11 12 |sl:n$=n$|+.(A)...|
|00002a40| 05 cd 0d 11 1c 17 e7 20 | 41 3d 31 32 37 20 80 20 |....... |A=127 . |
|00002a50| a9 28 6e 24 29 3e 30 20 | 8c 0d 11 26 09 d6 20 76 |.(n$)>0 |...&.. v|
|00002a60| 73 6c 0d 11 30 11 ff 22 | 53 43 48 4f 4f 53 45 20 |sl..0.."|SCHOOSE |
|00002a70| 33 32 22 0d 11 3a 19 d6 | 20 76 73 6c 3a 6e 24 3d |32"..:..| vsl:n$=|
|00002a80| c0 6e 24 2c a9 28 6e 24 | 29 2d 31 29 0d 11 44 22 |.n$,.(n$|)-1)..D"|
|00002a90| d6 20 76 73 6c 3a f0 20 | 26 45 44 2c 33 32 30 2b |. vsl:. |&ED,320+|
|00002aa0| 28 a9 28 6e 24 29 2a 33 | 32 29 2c 32 35 36 0d 11 |(.(n$)*3|2),256..|
|00002ab0| 4e 05 cd 0d 11 58 0a fd | 20 41 3d 31 33 0d 11 62 |N....X..| A=13..b|
|00002ac0| 09 d6 20 76 73 6c 0d 11 | 6c 0a f2 63 6c 65 61 72 |.. vsl..|l..clear|
|00002ad0| 0d 11 76 1d 68 69 25 28 | 31 31 29 3d 73 63 6f 72 |..v.hi%(|11)=scor|
|00002ae0| 65 25 3a 68 69 24 28 31 | 31 29 3d 6e 24 0d 11 80 |e%:hi$(1|1)=n$...|
|00002af0| 13 e3 20 54 3d 31 31 20 | b8 20 32 20 88 20 2d 31 |.. T=11 |. 2 . -1|
|00002b00| 0d 11 8a 09 d6 20 76 73 | 6c 0d 11 94 17 e7 20 68 |..... vs|l..... h|
|00002b10| 69 25 28 54 29 3e 68 69 | 25 28 54 2d 31 29 20 8c |i%(T)>hi|%(T-1) .|
|00002b20| 0d 11 9e 16 c8 94 20 68 | 69 25 28 54 29 2c 68 69 |...... h|i%(T),hi|
|00002b30| 25 28 54 2d 31 29 0d 11 | a8 16 c8 94 20 68 69 24 |%(T-1)..|.... hi$|
|00002b40| 28 54 29 2c 68 69 24 28 | 54 2d 31 29 0d 11 b2 05 |(T),hi$(|T-1)....|
|00002b50| cc 0d 11 bc 07 54 3d 32 | 0d 11 c6 05 cd 0d 11 d0 |.....T=2|........|
|00002b60| 07 ed 20 54 0d 11 da 05 | e1 0d 11 e4 15 dd 20 f2 |.. T....|...... .|
|00002b70| 73 63 72 6f 6c 6c 74 65 | 78 74 66 61 73 74 0d 11 |scrollte|xtfast..|
|00002b80| ee 2f 74 65 78 74 25 3d | 74 65 78 74 25 2b 31 3a |./text%=|text%+1:|
|00002b90| e7 20 74 65 78 74 25 3d | 73 65 6e 64 25 20 8c 20 |. text%=|send% . |
|00002ba0| 74 65 78 74 25 3d 73 63 | 72 6f 6c 6c 25 0d 11 f8 |text%=sc|roll%...|
|00002bb0| 18 e7 20 a4 63 68 61 6e | 67 65 73 70 65 65 64 3d |.. .chan|gespeed=|
|00002bc0| 31 20 8c 20 e1 0d 12 02 | 19 c8 93 20 31 36 2c 30 |1 . ....|... 16,0|
|00002bd0| 2c 31 32 37 36 2c 32 38 | 20 b8 20 30 2c 30 0d 12 |,1276,28| . 0,0..|
|00002be0| 0c 19 ff 22 53 43 48 4f | 4f 53 45 20 22 2b c3 28 |..."SCHO|OSE "+.(|
|00002bf0| 3f 74 65 78 74 25 29 0d | 12 16 09 d6 20 76 73 6c |?text%).|.... vsl|
|00002c00| 0d 12 20 19 c8 93 20 31 | 36 2c 30 2c 31 32 37 36 |.. ... 1|6,0,1276|
|00002c10| 2c 32 38 20 b8 20 30 2c | 30 0d 12 2a 10 f0 20 26 |,28 . 0,|0..*.. &|
|00002c20| 45 44 2c 31 32 34 38 2c | 30 0d 12 34 09 d6 20 76 |ED,1248,|0..4.. v|
|00002c30| 73 6c 0d 12 3e 05 e1 0d | 12 48 43 dd 20 f2 73 63 |sl..>...|.HC. .sc|
|00002c40| 72 6f 6c 6c 74 65 78 74 | 6d 65 64 69 75 6d 3a 74 |rolltext|medium:t|
|00002c50| 65 78 74 25 3d 74 65 78 | 74 25 2b 31 3a e7 20 74 |ext%=tex|t%+1:. t|
|00002c60| 65 78 74 25 3d 73 65 6e | 64 25 20 8c 20 74 65 78 |ext%=sen|d% . tex|
|00002c70| 74 25 3d 73 63 72 6f 6c | 6c 25 0d 12 52 18 e7 20 |t%=scrol|l%..R.. |
|00002c80| a4 63 68 61 6e 67 65 73 | 70 65 65 64 3d 31 20 8c |.changes|peed=1 .|
|00002c90| 20 e1 0d 12 5c 94 c8 93 | 20 38 2c 30 2c 31 32 38 | ...\...| 8,0,128|
|00002ca0| 30 2c 32 38 20 b8 20 30 | 2c 30 3a ff 22 53 43 48 |0,28 . 0|,0:."SCH|
|00002cb0| 4f 4f 53 45 20 22 2b c3 | 28 3f 74 65 78 74 25 29 |OOSE "+.|(?text%)|
|00002cc0| 3a d6 20 76 73 6c 3a c8 | 93 20 38 2c 30 2c 31 32 |:. vsl:.|. 8,0,12|
|00002cd0| 38 30 2c 32 38 20 b8 20 | 30 2c 30 3a d6 20 76 73 |80,28 . |0,0:. vs|
|00002ce0| 6c 3a c8 93 20 38 2c 30 | 2c 31 32 38 30 2c 32 38 |l:.. 8,0|,1280,28|
|00002cf0| 20 b8 20 30 2c 30 3a d6 | 20 76 73 6c 3a c8 93 20 | . 0,0:.| vsl:.. |
|00002d00| 38 2c 30 2c 31 32 38 30 | 2c 32 38 20 b8 20 30 2c |8,0,1280|,28 . 0,|
|00002d10| 30 3a f0 20 26 45 44 2c | 31 32 34 38 2c 30 3a d6 |0:. &ED,|1248,0:.|
|00002d20| 20 76 73 6c 3a e1 0d 12 | 66 41 dd 20 f2 73 63 72 | vsl:...|fA. .scr|
|00002d30| 6f 6c 6c 74 65 78 74 73 | 6c 6f 77 3a 74 65 78 74 |olltexts|low:text|
|00002d40| 25 3d 74 65 78 74 25 2b | 31 3a e7 20 74 65 78 74 |%=text%+|1:. text|
|00002d50| 25 3d 73 65 6e 64 25 20 | 8c 20 74 65 78 74 25 3d |%=send% |. text%=|
|00002d60| 73 63 72 6f 6c 6c 25 0d | 12 70 18 e7 20 a4 63 68 |scroll%.|.p.. .ch|
|00002d70| 61 6e 67 65 73 70 65 65 | 64 3d 31 20 8c 20 e1 0d |angespee|d=1 . ..|
|00002d80| 12 7a 87 c8 93 20 34 2c | 30 2c 31 32 38 30 2c 32 |.z... 4,|0,1280,2|
|00002d90| 38 20 b8 20 30 2c 30 3a | ff 22 53 43 48 4f 4f 53 |8 . 0,0:|."SCHOOS|
|00002da0| 45 20 22 2b c3 28 3f 74 | 65 78 74 25 29 3a d6 20 |E "+.(?t|ext%):. |
|00002db0| 76 73 6c 3a e3 20 49 3d | 31 20 b8 20 36 3a c8 93 |vsl:. I=|1 . 6:..|
|00002dc0| 20 34 2c 30 2c 31 32 38 | 30 2c 32 38 20 b8 20 30 | 4,0,128|0,28 . 0|
|00002dd0| 2c 30 3a d6 20 76 73 6c | 3a ed 20 49 3a c8 93 20 |,0:. vsl|:. I:.. |
|00002de0| 34 2c 30 2c 31 32 38 30 | 2c 32 38 20 b8 20 30 2c |4,0,1280|,28 . 0,|
|00002df0| 30 3a f0 20 26 45 44 2c | 31 32 34 38 2c 30 3a d6 |0:. &ED,|1248,0:.|
|00002e00| 20 76 73 6c 3a e1 0d 12 | 84 2d dd 20 a4 63 68 61 | vsl:...|.-. .cha|
|00002e10| 6e 67 65 73 70 65 65 64 | 3a e7 20 3f 74 65 78 74 |ngespeed|:. ?text|
|00002e20| 25 3d 31 36 39 20 8c 20 | 74 65 78 74 73 70 65 65 |%=169 . |textspee|
|00002e30| 64 3d 31 0d 12 8e 1e e7 | 20 3f 74 65 78 74 25 3d |d=1.....| ?text%=|
|00002e40| 31 37 30 20 8c 20 74 65 | 78 74 73 70 65 65 64 3d |170 . te|xtspeed=|
|00002e50| 32 0d 12 98 1e e7 20 3f | 74 65 78 74 25 3d 31 37 |2..... ?|text%=17|
|00002e60| 31 20 8c 20 74 65 78 74 | 73 70 65 65 64 3d 33 0d |1 . text|speed=3.|
|00002e70| 12 a2 2b e7 20 3f 74 65 | 78 74 25 3e 31 36 38 20 |..+. ?te|xt%>168 |
|00002e80| 80 20 3f 74 65 78 74 25 | 3c 31 37 32 20 8c 20 65 |. ?text%|<172 . e|
|00002e90| 25 3d 31 20 8b 20 65 25 | 3d 30 0d 12 ac 07 3d 65 |%=1 . e%|=0....=e|
|00002ea0| 25 0d 12 b6 0f dd 20 f2 | 74 65 78 74 69 6e 69 74 |%..... .|textinit|
|00002eb0| 0d 12 c0 11 73 65 6e 64 | 25 3d 73 63 72 6f 6c 6c |....send|%=scroll|
|00002ec0| 25 0d 12 ca dd 41 24 3d | 22 20 20 20 20 20 20 57 |%....A$=|" W|
|00002ed0| 65 6c 63 6f 6d 65 20 74 | 6f 20 21 42 75 72 73 74 |elcome t|o !Burst|
|00002ee0| 50 69 70 65 20 2e 2e 2e | 2e 2e 2e 2e 20 57 72 69 |Pipe ...|.... Wri|
|00002ef0| 74 74 65 6e 20 62 79 22 | 2b bd 28 31 36 39 29 2b |tten by"|+.(169)+|
|00002f00| 22 20 4d 61 72 6b 20 4a | 6f 68 6e 73 6f 6e 20 22 |" Mark J|ohnson "|
|00002f10| 2b bd 28 31 37 31 29 2b | 22 6f 6e 20 4a 75 6e 65 |+.(171)+|"on June|
|00002f20| 20 31 73 74 2d 33 72 64 | 20 31 39 39 31 20 2e 2e | 1st-3rd| 1991 ..|
|00002f30| 2e 2e 2e 2e 2e 20 20 20 | 53 6f 75 6e 64 74 72 61 |..... |Soundtra|
|00002f40| 63 6b 20 50 6c 61 79 72 | 6f 75 74 69 6e 65 20 62 |ck Playr|outine b|
|00002f50| 79 20 41 4c 54 5f 4d 61 | 6e 20 61 6e 64 20 46 61 |y ALT_Ma|n and Fa|
|00002f60| 62 72 69 63 65 20 4d 65 | 72 63 69 65 72 20 2e 2e |brice Me|rcier ..|
|00002f70| 2e 2e 2e 2e 2e 20 20 20 | 20 20 20 22 3a 24 73 65 |..... | ":$se|
|00002f80| 6e 64 25 3d 41 24 3a 73 | 65 6e 64 25 3d 73 65 6e |nd%=A$:s|end%=sen|
|00002f90| 64 25 2b a9 28 41 24 29 | 3a d6 20 76 73 6c 0d 12 |d%+.(A$)|:. vsl..|
|00002fa0| d4 d4 41 24 3d 22 20 20 | 20 20 48 65 6c 6c 6f 20 |..A$=" | Hello |
|00002fb0| 74 6f 20 4d 61 74 74 20 | 48 6f 6c 74 20 61 6e 64 |to Matt |Holt and|
|00002fc0| 20 43 68 72 69 73 20 48 | 75 6e 74 65 72 2c 20 6d | Chris H|unter, m|
|00002fd0| 79 20 65 76 65 72 20 66 | 61 69 74 68 66 75 6c 20 |y ever f|aithful |
|00002fe0| 70 6c 61 79 20 74 65 73 | 74 65 72 73 20 20 20 20 |play tes|ters |
|00002ff0| 20 20 20 28 4c 65 76 65 | 6c 20 37 20 49 53 20 63 | (Leve|l 7 IS c|
|00003000| 6f 6d 70 6c 65 74 65 61 | 62 6c 65 20 21 21 21 21 |ompletea|ble !!!!|
|00003010| 20 20 2d 20 20 70 6c 61 | 79 20 74 68 65 20 67 61 | - pla|y the ga|
|00003020| 6d 65 20 61 6e 64 20 73 | 65 65 20 68 6f 77 20 68 |me and s|ee how h|
|00003030| 61 72 64 20 69 74 20 69 | 73 20 74 68 6f 75 67 68 |ard it i|s though|
|00003040| 20 21 21 21 21 29 20 20 | 20 20 20 20 20 20 20 22 | !!!!) | "|
|00003050| 3a 24 73 65 6e 64 25 3d | 41 24 3a 73 65 6e 64 25 |:$send%=|A$:send%|
|00003060| 3d 73 65 6e 64 25 2b a9 | 28 41 24 29 3a d6 20 76 |=send%+.|(A$):. v|
|00003070| 73 6c 0d 12 de ec 41 24 | 3d 22 20 20 20 20 20 20 |sl....A$|=" |
|00003080| 48 65 6c 6c 6f 27 73 20 | 61 6c 73 6f 20 67 6f 20 |Hello's |also go |
|00003090| 74 6f 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |to the f|ollowing|
|000030a0| 20 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 20 41 | .......|...... A|
|000030b0| 6e 64 72 65 77 20 57 61 | 74 73 6f 6e 2c 20 41 6e |ndrew Wa|tson, An|
|000030c0| 64 72 65 77 20 42 72 6f | 77 6e 2c 20 54 68 65 20 |drew Bro|wn, The |
|000030d0| 42 72 6f 74 68 65 72 73 | 20 69 6e 20 41 52 4d 2c |Brothers| in ARM,|
|000030e0| 20 54 68 65 20 4d 69 63 | 72 6f 20 55 73 65 72 20 | The Mic|ro User |
|000030f0| 43 72 65 77 2c 20 41 6c | 65 78 20 4b 72 75 73 6f |Crew, Al|ex Kruso|
|00003100| 77 73 6b 69 20 61 74 20 | 41 43 4d 45 20 50 44 53 |wski at |ACME PDS|
|00003110| 4c 20 61 6e 64 20 74 6f | 20 61 6e 79 6f 6e 65 20 |L and to| anyone |
|00003120| 77 68 6f 20 49 20 68 61 | 76 65 20 65 76 65 72 20 |who I ha|ve ever |
|00003130| 6b 6e 6f 77 6e 2c 20 6f | 72 20 61 72 65 20 6c 69 |known, o|r are li|
|00003140| 6b 65 6c 79 20 74 6f 20 | 6b 6e 6f 77 2c 20 48 45 |kely to |know, HE|
|00003150| 4c 4c 4f 20 21 21 21 21 | 20 20 2e 2e 2e 22 0d 12 |LLO !!!!| ..."..|
|00003160| e8 25 24 73 65 6e 64 25 | 3d 41 24 3a 73 65 6e 64 |.%$send%|=A$:send|
|00003170| 25 3d 73 65 6e 64 25 2b | a9 28 41 24 29 3a d6 20 |%=send%+|.(A$):. |
|00003180| 76 73 6c 0d 12 f2 c7 41 | 24 3d 22 2e 2e 2e 2e 2e |vsl....A|$=".....|
|00003190| 2e 2e 2e 2e 2e 2e 20 20 | 57 65 6c 6c 20 64 6f 20 |...... |Well do |
|000031a0| 79 6f 75 20 6c 69 6b 65 | 20 74 68 69 73 20 73 63 |you like| this sc|
|000031b0| 72 65 65 6e 20 3f 20 6f | 72 20 64 6f 20 79 6f 75 |reen ? o|r do you|
|000031c0| 20 6c 69 6b 65 20 72 65 | 61 64 69 6e 67 20 73 63 | like re|ading sc|
|000031d0| 72 6f 6c 6c 69 6e 67 20 | 74 65 78 74 20 6d 65 73 |rolling |text mes|
|000031e0| 73 61 67 65 73 20 3f 3f | 20 2e 2e 2e 2e 2e 2e 20 |sages ??| ...... |
|000031f0| 77 65 6c 6c 2c 20 49 66 | 20 79 6f 75 20 61 72 65 |well, If| you are|
|00003200| 20 66 65 64 20 75 70 2c | 20 70 72 65 73 73 20 27 | fed up,| press '|
|00003210| 50 27 20 74 6f 20 70 6c | 61 79 20 74 68 65 20 67 |P' to pl|ay the g|
|00003220| 61 6d 65 2c 20 20 20 22 | 3a 24 73 65 6e 64 25 3d |ame, "|:$send%=|
|00003230| 41 24 3a 73 65 6e 64 25 | 3d 73 65 6e 64 25 2b a9 |A$:send%|=send%+.|
|00003240| 28 41 24 29 3a d6 20 76 | 73 6c 0d 12 fc be 41 24 |(A$):. v|sl....A$|
|00003250| 3d 22 27 48 27 20 74 6f | 20 73 65 65 20 74 68 65 |="'H' to| see the|
|00003260| 20 68 69 67 68 20 73 63 | 6f 72 65 20 74 61 62 6c | high sc|ore tabl|
|00003270| 65 2c 20 20 20 27 4b 27 | 20 74 6f 20 76 69 65 77 |e, 'K'| to view|
|00003280| 20 74 68 65 20 6b 65 79 | 73 20 20 20 6f 72 20 20 | the key|s or |
|00003290| 27 49 27 20 66 6f 72 20 | 74 68 65 20 69 6e 73 74 |'I' for |the inst|
|000032a0| 72 75 63 74 69 6f 6e 73 | 20 2e 2e 2e 2e 2e 2e 2e |ructions| .......|
|000032b0| 2e 2e 2e 2e 20 20 20 20 | 20 20 20 20 20 20 20 20 |.... | |
|000032c0| 20 20 20 20 20 20 20 20 | 20 54 6f 64 61 79 27 73 | | Today's|
|000032d0| 20 68 69 67 68 65 73 74 | 20 73 63 6f 72 65 20 69 | highest| score i|
|000032e0| 73 20 3a 20 20 22 3a 24 | 73 65 6e 64 25 3d 41 24 |s : ":$|send%=A$|
|000032f0| 3a 73 65 6e 64 25 3d 73 | 65 6e 64 25 2b a9 28 41 |:send%=s|end%+.(A|
|00003300| 24 29 3a d6 20 76 73 6c | 0d 13 06 55 41 24 3d c3 |$):. vsl|...UA$=.|
|00003310| 28 68 69 25 28 31 29 29 | 2b 22 20 20 20 77 68 69 |(hi%(1))|+" whi|
|00003320| 63 68 20 77 61 73 20 73 | 63 6f 72 65 64 20 62 79 |ch was s|cored by|
|00003330| 20 20 20 22 2b 68 69 24 | 28 31 29 3a 24 73 65 6e | "+hi$|(1):$sen|
|00003340| 64 25 3d 41 24 3a 73 65 | 6e 64 25 3d 73 65 6e 64 |d%=A$:se|nd%=send|
|00003350| 25 2b a9 28 41 24 29 3a | d6 20 76 73 6c 0d 13 10 |%+.(A$):|. vsl...|
|00003360| e8 41 24 3d 22 20 20 20 | 20 20 20 20 20 20 20 20 |.A$=" | |
|00003370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003380| 20 20 20 20 20 20 20 20 | 20 41 64 20 3a 20 20 20 | | Ad : |
|00003390| 41 20 63 6f 75 70 6c 65 | 20 6f 66 20 66 72 69 65 |A couple| of frie|
|000033a0| 6e 64 73 2c 20 61 6e 64 | 20 49 20 68 61 76 65 20 |nds, and| I have |
|000033b0| 6a 75 73 74 20 73 65 74 | 20 75 70 20 61 20 50 75 |just set| up a Pu|
|000033c0| 62 6c 69 63 20 44 6f 6d | 61 69 6e 20 6d 61 67 61 |blic Dom|ain maga|
|000033d0| 7a 69 6e 65 20 61 6e 64 | 20 6d 6f 6e 74 68 6c 79 |zine and| monthly|
|000033e0| 20 64 69 73 63 2c 20 63 | 6f 6e 74 61 69 6e 69 6e | disc, c|ontainin|
|000033f0| 67 20 6d 61 6e 79 20 75 | 73 65 66 75 6c 20 61 70 |g many u|seful ap|
|00003400| 70 6c 69 63 61 74 69 6f | 6e 73 2c 20 6d 75 73 69 |plicatio|ns, musi|
|00003410| 78 20 28 38 20 63 68 61 | 6e 6e 65 6c 20 53 54 45 |x (8 cha|nnel STE|
|00003420| 52 45 4f 20 21 29 2c 20 | 75 74 69 6c 69 74 69 65 |REO !), |utilitie|
|00003430| 73 2c 20 64 65 6d 6f 73 | 20 65 74 63 20 2e 2e 2e |s, demos| etc ...|
|00003440| 2e 2e 2e 20 22 0d 13 1a | 25 24 73 65 6e 64 25 3d |... "...|%$send%=|
|00003450| 41 24 3a 73 65 6e 64 25 | 3d 73 65 6e 64 25 2b a9 |A$:send%|=send%+.|
|00003460| 28 41 24 29 3a d6 20 76 | 73 6c 0d 13 24 dc 41 24 |(A$):. v|sl..$.A$|
|00003470| 3d 22 20 20 22 2b bd 28 | 31 37 30 29 2b 22 49 74 |=" "+.(|170)+"It|
|00003480| 20 69 73 20 63 61 6c 6c | 65 64 20 27 53 54 41 54 | is call|ed 'STAT|
|00003490| 45 20 4f 46 20 54 48 45 | 20 41 52 43 27 20 61 6e |E OF THE| ARC' an|
|000034a0| 64 20 77 69 6c 6c 20 63 | 6f 73 74 20 a3 39 2e 30 |d will c|ost .9.0|
|000034b0| 30 20 66 6f 72 20 36 20 | 6d 6f 6e 74 68 73 20 6f |0 for 6 |months o|
|000034c0| 72 20 a3 35 2e 30 30 20 | 66 6f 72 20 33 20 6d 6f |r .5.00 |for 3 mo|
|000034d0| 6e 74 68 73 2e 20 20 20 | 20 22 2b bd 28 31 37 31 |nths. | "+.(171|
|000034e0| 29 2b 22 20 20 20 20 54 | 68 65 20 66 69 72 73 74 |)+" T|he first|
|000034f0| 20 69 73 73 75 65 20 77 | 69 6c 6c 20 62 65 20 73 | issue w|ill be s|
|00003500| 65 6e 74 20 6f 75 74 20 | 6f 6e 20 74 68 65 20 31 |ent out |on the 1|
|00003510| 53 54 20 53 45 50 54 45 | 4d 42 45 52 20 31 39 39 |ST SEPTE|MBER 199|
|00003520| 31 2c 20 22 3a 24 73 65 | 6e 64 25 3d 41 24 3a 73 |1, ":$se|nd%=A$:s|
|00003530| 65 6e 64 25 3d 73 65 6e | 64 25 2b a9 28 41 24 29 |end%=sen|d%+.(A$)|
|00003540| 3a d6 20 76 73 6c 0d 13 | 2e 62 41 24 3d 22 20 61 |:. vsl..|.bA$=" a|
|00003550| 6e 64 20 73 6f 20 61 6e | 79 20 6f 72 64 65 72 73 |nd so an|y orders|
|00003560| 20 72 65 63 69 65 76 65 | 64 20 6d 75 73 74 20 72 | recieve|d must r|
|00003570| 65 61 63 68 20 75 73 20 | 62 65 66 6f 72 65 20 74 |each us |before t|
|00003580| 68 61 74 20 64 61 74 65 | 20 74 6f 20 65 6e 73 75 |hat date| to ensu|
|00003590| 72 65 20 79 6f 75 20 67 | 65 74 20 74 68 65 20 53 |re you g|et the S|
|000035a0| 45 50 54 45 4d 42 45 22 | 0d 13 38 25 24 73 65 6e |EPTEMBE"|..8%$sen|
|000035b0| 64 25 3d 41 24 3a 73 65 | 6e 64 25 3d 73 65 6e 64 |d%=A$:se|nd%=send|
|000035c0| 25 2b a9 28 41 24 29 3a | d6 20 76 73 6c 0d 13 42 |%+.(A$):|. vsl..B|
|000035d0| 41 41 24 3d 22 52 20 69 | 73 73 75 65 20 2e 2e 2e |AA$="R i|ssue ...|
|000035e0| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 20 22 3a 24 73 65 |........|.. ":$se|
|000035f0| 6e 64 25 3d 41 24 3a 73 | 65 6e 64 25 3d 73 65 6e |nd%=A$:s|end%=sen|
|00003600| 64 25 2b a9 28 41 24 29 | 3a d6 20 76 73 6c 0d 13 |d%+.(A$)|:. vsl..|
|00003610| 4c ed 41 24 3d 22 20 49 | 66 20 79 6f 75 20 77 61 |L.A$=" I|f you wa|
|00003620| 6e 74 20 74 6f 20 74 61 | 6b 65 20 6f 75 74 20 61 |nt to ta|ke out a|
|00003630| 20 73 75 62 73 63 72 69 | 70 74 69 6f 6e 20 77 68 | subscri|ption wh|
|00003640| 69 63 68 20 73 74 61 72 | 74 73 20 6f 6e 20 61 20 |ich star|ts on a |
|00003650| 6c 61 74 65 72 20 69 73 | 73 75 65 2c 20 74 68 65 |later is|sue, the|
|00003660| 6e 20 79 6f 75 20 63 61 | 6e 20 64 6f 20 74 68 69 |n you ca|n do thi|
|00003670| 73 20 61 6c 73 6f 20 62 | 79 20 73 70 65 63 69 66 |s also b|y specif|
|00003680| 79 69 6e 67 20 74 68 65 | 20 31 73 74 20 69 73 73 |ying the| 1st iss|
|00003690| 75 65 20 77 68 65 6e 20 | 79 6f 75 20 77 61 6e 74 |ue when |you want|
|000036a0| 20 74 68 65 20 6d 61 67 | 61 7a 69 6e 65 20 64 65 | the mag|azine de|
|000036b0| 6c 69 76 65 72 65 64 20 | 20 20 28 54 68 65 20 73 |livered | (The s|
|000036c0| 6f 6f 6e 65 72 20 79 6f | 75 20 74 61 6b 65 20 6f |ooner yo|u take o|
|000036d0| 75 74 20 61 20 73 75 62 | 73 63 72 69 70 74 69 6f |ut a sub|scriptio|
|000036e0| 6e 20 74 68 65 20 66 61 | 73 74 65 72 20 79 6f 75 |n the fa|ster you|
|000036f0| 20 77 69 6c 6c 20 67 65 | 74 20 22 0d 13 56 25 24 | will ge|t "..V%$|
|00003700| 73 65 6e 64 25 3d 41 24 | 3a 73 65 6e 64 25 3d 73 |send%=A$|:send%=s|
|00003710| 65 6e 64 25 2b a9 28 41 | 24 29 3a d6 20 76 73 6c |end%+.(A|$):. vsl|
|00003720| 0d 13 60 d7 41 24 3d 22 | 79 6f 75 72 20 6d 61 67 |..`.A$="|your mag|
|00003730| 61 7a 69 6e 65 20 61 6e | 64 20 64 69 73 63 2c 20 |azine an|d disc, |
|00003740| 62 65 63 61 75 73 65 20 | 74 68 65 79 20 77 69 6c |because |they wil|
|00003750| 6c 20 62 65 20 73 65 6e | 74 20 6f 75 74 20 6f 6e |l be sen|t out on|
|00003760| 20 61 20 66 69 72 73 74 | 20 63 6f 6d 65 20 66 69 | a first| come fi|
|00003770| 72 73 74 20 73 65 72 76 | 65 64 20 62 61 73 69 73 |rst serv|ed basis|
|00003780| 2c 20 61 6e 64 20 77 65 | 20 68 61 76 65 20 61 6c |, and we| have al|
|00003790| 72 65 61 64 79 20 67 6f | 74 20 71 75 69 74 65 20 |ready go|t quite |
|000037a0| 61 20 66 65 77 20 6f 72 | 64 65 72 73 20 66 72 6f |a few or|ders fro|
|000037b0| 6d 20 61 72 6f 75 6e 64 | 20 6f 75 72 20 61 72 65 |m around| our are|
|000037c0| 61 20 21 20 29 20 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |a ! ) ..|........|
|000037d0| 2e 2e 2e 20 22 3a 24 73 | 65 6e 64 25 3d 41 24 3a |... ":$s|end%=A$:|
|000037e0| 73 65 6e 64 25 3d 73 65 | 6e 64 25 2b a9 28 41 24 |send%=se|nd%+.(A$|
|000037f0| 29 3a d6 20 76 73 6c 0d | 13 6a e6 41 24 3d bd 28 |):. vsl.|.j.A$=.(|
|00003800| 31 37 30 29 2b 22 57 65 | 20 61 6c 73 6f 20 77 61 |170)+"We| also wa|
|00003810| 6e 74 20 50 44 20 70 72 | 6f 67 72 61 6d 73 20 66 |nt PD pr|ograms f|
|00003820| 6f 72 20 69 6e 63 6c 75 | 73 69 6f 6e 20 6f 6e 20 |or inclu|sion on |
|00003830| 6f 75 72 20 6d 61 67 61 | 7a 69 6e 65 20 64 69 73 |our maga|zine dis|
|00003840| 63 2e 20 20 49 66 20 79 | 6f 75 20 68 61 76 65 20 |c. If y|ou have |
|00003850| 77 72 69 74 74 65 6e 20 | 61 6e 79 20 50 44 20 73 |written |any PD s|
|00003860| 6f 66 74 77 61 72 65 20 | 74 68 61 74 20 79 6f 75 |oftware |that you|
|00003870| 20 77 61 6e 74 20 69 6e | 63 6c 75 64 69 6e 67 20 | want in|cluding |
|00003880| 6f 6e 20 74 68 65 20 64 | 69 73 63 20 28 38 30 30 |on the d|isc (800|
|00003890| 6b 20 41 44 46 53 20 66 | 6f 72 6d 61 74 20 70 6c |k ADFS f|ormat pl|
|000038a0| 65 61 73 65 20 21 29 2c | 73 65 6e 64 20 69 74 20 |ease !),|send it |
|000038b0| 74 6f 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |to the f|ollowing|
|000038c0| 20 61 64 64 72 65 73 73 | 20 28 20 41 4c 4c 20 64 | address| ( ALL d|
|000038d0| 69 73 63 73 20 77 69 6c | 6c 20 62 65 22 0d 13 74 |iscs wil|l be"..t|
|000038e0| 4a 24 73 65 6e 64 25 3d | 41 24 3a 73 65 6e 64 25 |J$send%=|A$:send%|
|000038f0| 3d 73 65 6e 64 25 2b a9 | 28 41 24 29 3a d6 20 76 |=send%+.|(A$):. v|
|00003900| 73 6c 3a 41 24 3d 22 20 | 72 65 74 75 72 6e 65 64 |sl:A$=" |returned|
|00003910| 20 29 20 2e 2e 2e 2e 2e | 2e 20 20 20 20 20 20 22 | ) .....|. "|
|00003920| 2b bd 28 31 36 39 29 0d | 13 7e 25 24 73 65 6e 64 |+.(169).|.~%$send|
|00003930| 25 3d 41 24 3a 73 65 6e | 64 25 3d 73 65 6e 64 25 |%=A$:sen|d%=send%|
|00003940| 2b a9 28 41 24 29 3a d6 | 20 76 73 6c 0d 13 88 2b |+.(A$):.| vsl...+|
|00003950| 41 24 3d 22 53 54 41 54 | 45 20 4f 46 20 54 48 45 |A$="STAT|E OF THE|
|00003960| 20 41 52 43 20 50 44 20 | 44 49 53 43 2c 20 20 38 | ARC PD |DISC, 8|
|00003970| 20 55 50 50 45 52 22 0d | 13 92 25 24 73 65 6e 64 | UPPER".|..%$send|
|00003980| 25 3d 41 24 3a 73 65 6e | 64 25 3d 73 65 6e 64 25 |%=A$:sen|d%=send%|
|00003990| 2b a9 28 41 24 29 3a d6 | 20 76 73 6c 0d 13 9c ee |+.(A$):.| vsl....|
|000039a0| 41 24 3d 22 20 47 52 45 | 45 4e 20 57 41 59 2c 20 |A$=" GRE|EN WAY, |
|000039b0| 20 54 49 4e 47 4c 45 59 | 2c 20 20 57 41 4b 45 46 | TINGLEY|, WAKEF|
|000039c0| 49 45 4c 44 2c 20 20 57 | 46 33 20 31 54 41 20 2e |IELD, W|F3 1TA .|
|000039d0| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 20 |........|....... |
|000039e0| 54 6f 20 74 61 6b 65 20 | 6f 75 74 20 61 20 73 75 |To take |out a su|
|000039f0| 62 73 63 72 69 70 74 69 | 6f 6e 2c 20 73 65 6e 64 |bscripti|on, send|
|00003a00| 20 61 20 63 68 65 71 75 | 65 20 6d 61 64 65 20 70 | a chequ|e made p|
|00003a10| 61 79 61 62 6c 65 20 74 | 6f 20 27 4d 61 72 6b 20 |ayable t|o 'Mark |
|00003a20| 4a 6f 68 6e 73 6f 6e 27 | 20 74 6f 20 3a 20 53 54 |Johnson'| to : ST|
|00003a30| 41 54 45 20 4f 46 20 54 | 48 45 20 41 52 43 20 53 |ATE OF T|HE ARC S|
|00003a40| 55 42 53 43 52 49 50 54 | 49 4f 4e 53 2c 20 20 22 |UBSCRIPT|IONS, "|
|00003a50| 22 54 48 45 20 48 4f 4c | 54 22 22 2c 20 20 32 39 |"THE HOL|T"", 29|
|00003a60| 20 57 45 53 54 20 4c 45 | 41 20 44 52 49 56 45 2c | WEST LE|A DRIVE,|
|00003a70| 20 20 54 49 4e 47 4c 45 | 59 2c 20 20 57 41 4b 45 | TINGLE|Y, WAKE|
|00003a80| 46 49 45 4c 44 2c 20 20 | 57 22 0d 13 a6 25 24 73 |FIELD, |W"...%$s|
|00003a90| 65 6e 64 25 3d 41 24 3a | 73 65 6e 64 25 3d 73 65 |end%=A$:|send%=se|
|00003aa0| 6e 64 25 2b a9 28 41 24 | 29 3a d6 20 76 73 6c 0d |nd%+.(A$|):. vsl.|
|00003ab0| 13 b0 7a 41 24 3d 22 46 | 33 20 31 44 48 20 2e 2e |..zA$="F|3 1DH ..|
|00003ac0| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 20 22 2b bd 28 |........|... "+.(|
|00003ad0| 31 37 31 29 2b 22 20 20 | 20 20 20 20 20 20 20 20 |171)+" | |
|00003ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003af0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003b00| 20 20 20 20 20 20 22 3a | 24 73 65 6e 64 25 3d 41 | ":|$send%=A|
|00003b10| 24 3a 73 65 6e 64 25 3d | 73 65 6e 64 25 2b a9 28 |$:send%=|send%+.(|
|00003b20| 41 24 29 3a d6 20 76 73 | 6c 0d 13 ba 11 74 65 78 |A$):. vs|l....tex|
|00003b30| 74 25 3d 73 63 72 6f 6c | 6c 25 0d 13 c4 05 e1 0d |t%=scrol|l%......|
|00003b40| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+
