/ Ahoy 1987 May / Ahoy_Magazine_87-05_1987_Double_L_Side_B.d64 / basic2comal-p2

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 29 08 ab 08 62 09 00 0a | 1e 00 20 44 45 4c 45 54 |)...b...|.. DELET|
|00000010| 45 20 22 30 3a 42 41 53 | 49 43 32 43 4f 4d 41 4c |E "0:BAS|IC2COMAL|
|00000020| 2d 50 32 22 00 14 11 00 | 20 20 42 59 20 53 4f 4c |-P2"....|  BY SOL|
|00000030| 20 4b 41 54 5a 00 1e 1e | 00 20 53 41 56 45 20 20 | KATZ...|. SAVE  |
|00000040| 20 22 30 3a 42 41 53 49 | 43 32 43 4f 4d 41 4c 2d | "0:BASI|C2COMAL-|
|00000050| 50 32 22 00 28 04 00 00 | 32 1b 00 42 41 53 49 43 |P2".(...|2..BASIC|
|00000060| 20 54 4f 20 43 4f 4d 41 | 4c 20 20 20 50 41 52 54 | TO COMA|L   PART|
|00000070| 20 32 00 3c 1e 00 20 54 | 4f 20 42 45 20 43 48 41 | 2.<.. T|O BE CHA|
|00000080| 49 4e 45 44 20 46 52 4f | 4d 20 50 41 52 54 20 31 |INED FRO|M PART 1|
|00000090| 00 46 24 00 20 42 59 20 | 53 4f 4c 20 4b 41 54 5a |.F$. BY |SOL KATZ|
|000000a0| 2c 20 43 4f 4c 4f 52 41 | 44 4f 20 43 4f 4d 4d 4f |, COLORA|DO COMMO|
|000000b0| 44 4f 52 45 00 50 21 00 | 20 20 20 20 20 20 43 4f |DORE.P!.|      CO|
|000000c0| 4d 50 55 54 45 52 20 43 | 4c 55 42 2c 20 44 45 43 |MPUTER C|LUB, DEC|
|000000d0| 20 31 39 38 35 00 5a 04 | 00 00 64 10 07 01 02 00 | 1985.Z.|..d.....|
|000000e0| c8 3a 07 02 02 00 01 3a | 42 00 6e 13 8c 8d 03 01 |.:.....:|B.n.....|
|000000f0| 04 01 92 8f 04 00 02 00 | 0f 93 94 c5 00 78 13 8c |........|.....x..|
|00000100| 8f 05 00 02 00 50 93 8d | 06 01 04 01 92 94 c5 00 |.....P..|........|
|00000110| 82 0c 8c 8f 07 00 02 00 | 01 93 c5 00 8c 15 09 04 |........|........|
|00000120| 03 0d 47 4f 54 4f 27 41 | 4e 44 27 50 52 4f 43 3c |..GOTO'A|ND'PROC<|
|00000130| 00 96 04 00 00 a0 06 7f | 08 81 00 aa 0d 68 04 09 |........|.....h..|
|00000140| 02 00 01 30 69 00 00 00 | b4 16 7f 0a 02 00 01 0d |...0i...|........|
|00000150| 07 09 10 02 00 01 0d 07 | 09 10 07 03 16 00 be 06 |........|........|
|00000160| 5f 60 61 00 c8 1b 5f 03 | 12 53 4f 52 54 45 44 20 |_`a..._.|.SORTED |
|00000170| 47 4f 54 4f 20 4c 41 42 | 45 4c 53 65 60 61 00 d2 |GOTO LAB|ELSe`a..|
|00000180| 06 5f 60 61 00 dc 0b 7f | 0b 07 09 10 07 03 16 00 |._`a....|........|
|00000190| e6 04 6f 00 f0 06 5f 60 | 61 00 fa 0d 68 04 0c 02 |..o..._`|a...h...|
|000001a0| 00 01 30 69 00 00 01 04 | 16 7f 0a 02 00 01 0d 07 |..0i....|........|
|000001b0| 0c 10 02 00 01 0d 07 0c | 10 07 06 16 01 0e 1b 5f |........|......._|
|000001c0| 03 12 53 4f 52 54 45 44 | 20 50 52 4f 43 20 4e 41 |..SORTED| PROC NA|
|000001d0| 4d 45 53 20 65 60 61 01 | 18 06 5f 60 61 01 22 0b |MES e`a.|.._`a.".|
|000001e0| 7f 0b 07 0c 10 07 06 16 | 01 2c 04 6f 01 36 06 7f |........|.,.o.6..|
|000001f0| 0d 81 01 40 04 00 01 4a | 0b 5f 02 00 93 4b 65 60 |...@...J|._...Ke`|
|00000200| 61 01 54 27 5f 03 1e d4 | 48 45 20 46 49 4c 45 20 |a.T'_...|HE FILE |
|00000210| c1 cc cd cf d3 d4 20 c3 | cf cd c1 cc 20 57 49 4c |...... .|.... WIL|
|00000220| 4c 20 4e 4f 57 65 60 61 | 01 5e 2c 5f 03 23 42 45 |L NOWe`a|.^,_.#BE|
|00000230| 20 45 4e 54 45 52 45 44 | 2e 20 c9 46 20 54 48 45 | ENTERED|. .F THE|
|00000240| 52 45 20 41 52 45 20 41 | 4e 59 20 53 59 4e 54 41 |RE ARE A|NY SYNTA|
|00000250| 58 65 60 61 01 68 2b 5f | 03 22 45 52 52 4f 52 53 |Xe`a.h+_|."ERRORS|
|00000260| 20 59 4f 55 20 4d 55 53 | 54 20 43 4f 52 52 45 43 | YOU MUS|T CORREC|
|00000270| 54 20 54 48 45 4d 20 41 | 53 20 49 46 65 60 61 01 |T THEM A|S IFe`a.|
|00000280| 72 2c 5f 03 23 59 4f 55 | 20 48 41 44 20 4a 55 53 |r,_.#YOU| HAD JUS|
|00000290| 54 20 54 59 50 45 44 20 | 54 48 45 4d 20 49 4e 20 |T TYPED |THEM IN |
|000002a0| 41 4e 44 20 54 48 45 4e | 65 60 61 01 7c 29 5f 03 |AND THEN|e`a.|)_.|
|000002b0| 20 48 49 54 20 54 48 45 | 20 52 45 54 55 52 4e 20 | HIT THE| RETURN |
|000002c0| 4b 45 59 2e 20 c9 46 20 | 59 4f 55 20 43 41 4e 27 |KEY. .F |YOU CAN'|
|000002d0| 54 65 60 61 01 86 29 5f | 03 20 46 49 58 20 54 48 |Te`a..)_|. FIX TH|
|000002e0| 45 20 50 52 4f 42 4c 45 | 4d 2c 20 4d 41 4b 45 20 |E PROBLE|M, MAKE |
|000002f0| 54 48 45 20 4c 49 4e 45 | 20 41 65 60 61 01 90 2a |THE LINE| Ae`a..*|
|00000300| 5f 03 21 43 4f 4d 4d 45 | 4e 54 20 42 59 20 50 55 |_.!COMME|NT BY PU|
|00000310| 54 54 49 4e 47 20 41 20 | 2f 2f 20 41 46 54 45 52 |TTING A |// AFTER|
|00000320| 20 54 48 45 65 60 61 01 | 9a 28 5f 03 1f 4c 49 4e | THEe`a.|.(_..LIN|
|00000330| 45 20 4e 55 4d 42 45 52 | 2e 20 d4 48 45 4e 20 46 |E NUMBER|. .HEN F|
|00000340| 49 58 20 49 54 20 4c 41 | 54 45 52 2e 65 60 61 01 |IX IT LA|TER.e`a.|
|00000350| a4 2e 5f 03 25 d5 53 49 | 4e 47 20 54 48 45 20 d5 |.._.%.SI|NG THE .|
|00000360| d0 20 4f 52 20 c4 cf d7 | ce 20 43 55 52 53 4f 52 |. OR ...|. CURSOR|
|00000370| 20 4b 45 59 53 20 57 49 | 4c 4c 65 60 61 01 ae 1c | KEYS WI|LLe`a...|
|00000380| 5f 03 13 53 54 4f 50 20 | 54 48 45 20 50 52 4f 47 |_..STOP |THE PROG|
|00000390| 52 41 4d 21 21 21 65 60 | 61 01 b8 06 5f 60 61 01 |RAM!!!e`|a..._`a.|
|000003a0| c2 2f 5f 03 26 c8 49 54 | 20 41 4e 59 20 4b 45 59 |./_.&.IT| ANY KEY|
|000003b0| 20 54 4f 20 53 54 41 52 | 54 20 c5 ce d4 c5 d2 49 | TO STAR|T .....I|
|000003c0| 4e 47 20 50 52 4f 47 52 | 41 4d 2e 65 60 61 01 cc |NG PROGR|AM.e`a..|
|000003d0| 0d 97 f9 02 00 00 4b 33 | 99 f4 9a 01 d6 0d 97 f9 |......K3|........|
|000003e0| 02 00 00 4b 2d 99 f4 9a | 01 e0 17 5f 02 00 93 4b |...K-...|..._...K|
|000003f0| 65 66 02 00 11 4b 65 66 | 02 00 11 4b 65 66 61 01 |ef...Kef|...Kefa.|
|00000400| ea 18 5f 02 00 11 4b 65 | 66 02 00 11 4b 65 66 03 |.._...Ke|f...Kef.|
|00000410| 03 4e 45 57 65 60 61 01 | f4 20 5f 02 00 11 4b 65 |.NEWe`a.|. _...Ke|
|00000420| 66 02 00 11 4b 65 66 03 | 05 45 4e 54 45 52 65 67 |f...Kef.|.ENTEReg|
|00000430| 02 00 22 4b 65 66 61 01 | fe 21 5f 03 0c 41 4c 4d |.."Kefa.|.!_..ALM|
|00000440| 4f 53 54 20 43 4f 4d 41 | 4c 65 66 02 00 22 4b 65 |OST COMA|Lef.."Ke|
|00000450| 66 02 00 13 4b 65 66 61 | 02 08 0c e4 02 02 77 e5 |f...Kefa|......w.|
|00000460| 02 00 0d e6 02 12 0c e4 | 02 02 78 e5 02 00 0d e6 |........|..x.....|
|00000470| 02 1c 0c e4 02 02 79 e5 | 02 00 0d e6 02 26 0c e4 |......y.|.....&..|
|00000480| 02 02 7a e5 02 00 0d e6 | 02 30 0c e4 02 02 7b e5 |..z.....|.0....{.|
|00000490| 02 00 0d e6 02 3a 0c e4 | 02 00 c6 e5 02 00 05 e6 |.....:..|........|
|000004a0| 02 44 04 9f 02 4e 04 00 | 02 58 10 70 0e 00 00 03 |.D...N..|.X.p....|
|000004b0| 72 0f 72 10 78 11 01 7b | 02 62 0b 07 12 0a 11 07 |r.r.x..{|.b......|
|000004c0| 0f 16 3a 02 6c 0e 0a 11 | 07 0f 1c 0a 11 07 10 16 |..:.l...|........|
|000004d0| 3a 02 76 0b 0a 11 07 10 | 1c 04 12 3a 02 80 05 7d |:.v.....|...:...}|
|000004e0| 0e 02 8a 04 00 02 94 14 | 70 0a 00 00 05 72 02 72 |........|p....r.r|
|000004f0| 01 72 0f 72 10 78 11 01 | 7b 02 9e 13 07 13 0a 11 |.r.r.x..|{.......|
|00000500| 04 02 04 01 27 47 02 00 | 02 25 13 3a 02 a8 04 95 |....'G..|.%.:....|
|00000510| 02 b2 14 97 0a 11 07 0f | 16 04 13 2a 99 07 0f 02 |........|...*....|
|00000520| 00 01 3d 9a 02 bc 14 97 | 0a 11 07 10 16 04 13 30 |..=.....|.......0|
|00000530| 99 07 10 02 00 01 40 9a | 02 c6 0c 68 04 0f 04 10 |......@.|...h....|
|00000540| 2e 69 00 00 02 d0 0e 7f | 0e 07 0f 10 07 10 10 07 |.i......|........|
|00000550| 11 16 02 da 09 07 0f 02 | 00 01 3d 02 e4 09 07 10 |........|..=.....|
|00000560| 02 00 01 40 02 ee 04 6f | 02 f8 0c da 04 0f 04 10 |...@...o|........|
|00000570| 30 96 00 00 03 02 1b 68 | 04 02 04 10 2a 6a 7f 0a |0......h|....*j..|
|00000580| 07 02 10 07 10 10 07 02 | 10 07 10 10 07 11 16 03 |........|........|
|00000590| 0c 1b 68 04 0f 04 01 2a | 6a 7f 0a 07 0f 10 07 01 |..h....*|j.......|
|000005a0| 10 07 0f 10 07 01 10 07 | 11 16 03 16 05 7d 0a 03 |........|.....}..|
|000005b0| 20 04 00 03 2a 0e 70 0b | 00 00 02 72 14 78 11 01 | ...*.p.|...r.x..|
|000005c0| 7b 03 34 0f 82 0f 00 00 | 02 00 01 84 04 14 85 87 |{.4.....|........|
|000005d0| 03 3e 0c 5f 0a 11 07 0f | 16 64 60 61 03 48 07 8a |.>._....|.d`a.H..|
|000005e0| 0f 00 00 03 52 05 7d 0b | 03 5c 04 00 03 66 09 70 |....R.}.|.\...f.p|
|000005f0| 08 00 00 00 7b 03 70 19 | db 02 00 05 dc 03 0d 47 |....{.p.|.......G|
|00000600| 4f 54 4f 27 41 4e 44 27 | 50 52 4f 43 dd de 03 7a |OTO'AND'|PROC...z|
|00000610| 08 5f 80 65 60 61 03 84 | 10 07 09 02 00 00 3a 07 |._.e`a..|......:.|
|00000620| 0c 02 00 00 3a 42 03 8e | 0c 97 02 00 05 5d 37 98 |....:B..|.....]7.|
|00000630| 00 00 03 98 0d af 02 00 | 05 c8 cb 07 15 b0 b3 03 |........|........|
|00000640| a2 0d 68 04 15 02 00 00 | 30 69 00 00 03 ac 09 07 |..h.....|0i......|
|00000650| 09 02 00 01 3d 03 b6 0b | 0a 03 07 09 1c 04 15 3a |....=...|.......:|
|00000660| 03 c0 12 5f 04 09 64 67 | 03 01 20 65 66 04 15 64 |..._..dg|.. ef..d|
|00000670| 60 61 03 ca 06 6e 00 00 | 03 d4 09 07 0c 02 00 01 |`a...n..|........|
|00000680| 3d 03 de 11 0a 06 07 0c | 1c 04 15 02 00 01 21 47 |=.......|......!G|
|00000690| 24 3a 03 e8 1f 5f 03 09 | 20 20 20 20 20 20 20 20 |$:..._..|        |
|000006a0| 20 65 67 04 0c 64 67 03 | 01 20 65 66 04 15 64 60 | eg..dg.|. ef..d`|
|000006b0| 61 03 f2 04 6f 03 fc 06 | 9b 00 00 04 06 09 cf 02 |a...o...|........|
|000006c0| 00 05 47 d0 04 10 05 7d | 08 04 1a 04 00 04 24 09 |..G....}|......$.|
|000006d0| 70 0d 00 00 00 7b 04 2e | 1c db 02 00 04 dc 03 10 |p....{..|........|
|000006e0| 53 54 52 55 43 54 55 52 | 45 44 20 42 41 53 49 43 |STRUCTUR|ED BASIC|
|000006f0| dd de 04 38 14 03 0e 30 | 3a 41 4c 4d 4f 53 54 20 |...8...0|:ALMOST |
|00000700| 43 4f 4d 41 4c 9e 04 42 | 18 db 02 00 05 dc 03 0c |COMAL..B|........|
|00000710| 41 4c 4d 4f 53 54 20 43 | 4f 4d 41 4c dd df 04 4c |ALMOST C|OMAL...L|
|00000720| 17 07 16 02 00 0a 3a 07 | 17 02 00 01 3a 42 07 18 |......:.|....:B..|
|00000730| 02 00 01 3a 42 04 56 0c | 97 02 00 04 5d 37 98 00 |...:B.V.|....]7..|
|00000740| 00 04 60 10 af 02 00 04 | c8 cb 07 19 b0 09 05 b2 |..`.....|........|
|00000750| b3 04 6a 13 5f 04 19 64 | 67 03 02 20 20 65 67 06 |..j._..d|g..  eg.|
|00000760| 05 65 60 61 04 74 0f 68 | 0a 03 07 17 16 04 19 2c |.e`a.t.h|.......,|
|00000770| 69 00 00 04 7e 20 5f 02 | 00 05 c8 cb 04 16 64 67 |i...~ _.|......dg|
|00000780| 03 02 47 54 65 66 0a 03 | 07 17 16 64 66 03 01 3a |..GTef..|...df..:|
|00000790| 65 60 61 04 88 09 07 16 | 02 00 0a 3d 04 92 14 97 |e`a.....|...=....|
|000007a0| 0a 03 07 17 16 04 19 2c | 99 07 17 02 00 01 3d 9a |.......,|......=.|
|000007b0| 04 9c 04 6f 04 a6 0f 68 | 0a 06 07 18 16 04 19 2c |...o...h|.......,|
|000007c0| 69 00 00 04 b0 20 5f 02 | 00 05 c8 cb 04 16 64 67 |i.... _.|......dg|
|000007d0| 03 07 50 52 4f 43 20 45 | 58 65 66 0a 06 07 18 16 |..PROC E|Xef.....|
|000007e0| 64 60 61 04 ba 14 97 0a | 06 07 18 16 04 19 2c 99 |d`a.....|......,.|
|000007f0| 07 18 02 00 01 3d 9a 04 | c4 09 07 16 02 00 0a 3d |.....=..|.......=|
|00000800| 04 ce 04 6f 04 d8 12 5f | 02 00 05 c8 cb 04 16 64 |...o..._|.......d|
|00000810| 67 06 05 65 60 61 04 e2 | 09 07 16 02 00 0a 3d 04 |g..e`a..|......=.|
|00000820| ec 06 9b 00 00 04 f6 05 | cf d1 05 00 05 7d 0d 00 |........|.....}..|
|00000830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000840| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008b0| 00 04 4c 41 53 54 05 46 | 49 52 53 54 05 47 4f 54 |..LAST.F|IRST.GOT|
|000008c0| 4f 27 09 46 49 4c 45 27 | 4e 41 4d 45 03 4f 55 54 |O'.FILE'|NAME.OUT|
|000008d0| 05 50 52 4f 43 27 03 41 | 4e 53 09 47 45 54 27 41 |.PROC'.A|NS.GET'A|
|000008e0| 52 52 41 59 05 47 27 49 | 4e 43 0a 51 55 49 43 4b |RRAY.G'I|NC.QUICK|
|000008f0| 27 53 4f 52 54 07 50 52 | 49 4e 54 49 54 05 50 27 |'SORT.PR|INTIT.P'|
|00000900| 49 4e 43 14 47 45 54 27 | 53 54 52 55 43 54 55 52 |INC.GET'|STRUCTUR|
|00000910| 45 44 27 42 41 53 49 43 | 04 53 57 41 50 01 49 01 |ED'BASIC|.SWAP.I.|
|00000920| 4a 04 4e 55 4d 53 04 54 | 45 4d 50 0d 44 49 56 49 |J.NUMS.T|EMP.DIVI|
|00000930| 44 49 4e 47 27 4c 49 4e | 45 06 4e 55 4d 42 45 52 |DING'LIN|E.NUMBER|
|00000940| 0a 42 41 53 49 43 27 4c | 49 4e 45 04 4c 49 4e 45 |.BASIC'L|INE.LINE|
|00000950| 06 47 54 27 49 4e 43 06 | 50 52 27 49 4e 43 03 4e |.GT'INC.|PR'INC.N|
|00000960| 55 4d 04 45 4e 44 49 00 | 00                      |UM.ENDI.|.       |
+--------+-------------------------+-------------------------+--------+--------+