/ A.N.A.L.O.G. Magazine 1987 June / 87_jun.atr / bootcmp2.m65

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| fe fe 81 03 64 00 23 58 | 3b 53 55 42 53 2e 4c 49 |....d.#X|;SUBS.LI|
|00000010| 42 20 66 69 6c 65 20 74 | 6f 20 67 6f 20 77 69 74 |B file t|o go wit|
|00000020| 68 20 6d 61 63 72 6f 6e | 00 23 58 3b 6c 69 62 72 |h macron|.#X;libr|
|00000030| 61 72 79 20 66 69 6c 65 | 3b 20 72 65 71 75 69 72 |ary file|; requir|
|00000040| 65 64 20 65 71 75 61 74 | 65 73 78 00 1a 58 3b 61 |ed equat|esx..X;a|
|00000050| 72 65 20 69 6e 20 4d 41 | 43 52 4f 2e 4c 49 42 20 |re in MA|CRO.LIB |
|00000060| 66 69 6c 65 82 00 05 58 | 3b 8c 00 24 58 3b 2a 2a |file...X|;..$X;**|
|00000070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000080| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 96 00 05 |********|*****...|
|00000090| 58 3b a0 00 19 58 3b 73 | 75 62 72 6f 75 74 69 6e |X;...X;s|ubroutin|
|000000a0| 65 20 50 52 49 4e 54 4c | 49 4e 45 aa 00 1a 58 3b |e PRINTL|INE...X;|
|000000b0| 63 61 6c 6c 65 64 20 62 | 79 20 50 52 49 4e 54 20 |called b|y PRINT |
|000000c0| 6d 61 63 72 6f b4 00 05 | 58 3b be 00 23 58 3b 70 |macro...|X;..#X;p|
|000000d0| 72 69 6e 74 73 20 75 70 | 20 74 6f 20 31 36 30 20 |rints up| to 160 |
|000000e0| 63 68 61 72 61 63 74 65 | 72 73 20 6f 6e c8 00 20 |characte|rs on.. |
|000000f0| 58 3b 49 4f 43 42 20 6e | 75 6d 62 65 72 20 74 68 |X;IOCB n|umber th|
|00000100| 61 74 20 69 73 20 61 6c | 72 65 61 64 79 d2 00 16 |at is al|ready...|
|00000110| 58 3b 69 6e 20 74 68 65 | 20 58 2d 72 65 67 69 73 |X;in the| X-regis|
|00000120| 74 65 72 dc 00 05 58 3b | e6 00 0d 89 50 52 49 4e |ter...X;|....PRIN|
|00000130| 54 4c 49 4e 45 f0 00 07 | 51 3e 08 a0 fa 00 0b 50 |TLINE...|Q>.....P|
|00000140| 85 49 43 42 4c 4c 39 04 | 01 07 51 3e 08 00 0e 01 |.ICBLL9.|..Q>....|
|00000150| 0b 50 85 49 43 42 4c 48 | 39 18 01 0c 51 3e 86 50 |.P.ICBLH|9...Q>.P|
|00000160| 55 54 52 45 43 22 01 0b | 50 85 49 43 43 4f 4d 39 |UTREC"..|P.ICCOM9|
|00000170| 2c 01 09 20 84 43 49 4f | 56 36 01 04 3a 40 01 05 |,.. .CIO|V6..:@..|
|00000180| 58 3b 4a 01 23 58 3b 2a | 2a 2a 2a 2a 2a 2a 2a 2a |X;J.#X;*|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 2a 2a 2a 2a 54 01 05 | 58 3b 5e 01 18 58 3b 73 |*****T..|X;^..X;s|
|000001b0| 75 62 72 6f 75 74 69 6e | 65 20 4f 50 45 4e 49 4f |ubroutin|e OPENIO|
|000001c0| 43 42 68 01 05 58 3b 72 | 01 19 58 3b 63 61 6c 6c |CBh..X;r|..X;call|
|000001d0| 65 64 20 62 79 20 4f 50 | 45 4e 20 6d 61 63 72 6f |ed by OP|EN macro|
|000001e0| 7c 01 05 58 3b 86 01 0c | 88 4f 50 45 4e 49 4f 43 ||..X;...|.OPENIOC|
|000001f0| 42 90 01 0a 51 3e 84 4f | 50 45 4e 9a 01 0b 50 85 |B...Q>.O|PEN...P.|
|00000200| 49 43 43 4f 4d 39 a4 01 | 09 20 84 43 49 4f 56 ae |ICCOM9..|. .CIOV.|
|00000210| 01 04 3a b8 01 05 58 3b | c2 01 23 58 3b 2d 2d 2d |..:...X;|..#X;---|
|00000220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d cc 01 05 58 3b |--------|---...X;|
|00000240| d6 01 15 58 3b 69 66 20 | 79 6f 75 20 75 73 65 20 |...X;if |you use |
|00000250| 41 4d 41 43 3a e0 01 05 | 58 3b ea 01 20 58 3b 73 |AMAC:...|X;.. X;s|
|00000260| 6f 6d 65 20 64 65 76 69 | 63 65 73 20 79 6f 75 20 |ome devi|ces you |
|00000270| 6d 69 67 68 74 20 77 61 | 6e 74 f4 01 22 58 3b 74 |might wa|nt.."X;t|
|00000280| 6f 20 6f 70 65 6e 20 2d | 20 61 64 64 20 79 6f 75 |o open -| add you|
|00000290| 72 20 6f 77 6e 20 69 66 | 20 79 6f 75 fe 01 1f 58 |r own if| you...X|
|000002a0| 3b 75 73 65 20 6f 74 68 | 65 72 20 63 75 73 74 6f |;use oth|er custo|
|000002b0| 6d 20 68 61 6e 64 6c 65 | 72 73 3b 08 02 21 58 3b |m handle|rs;..!X;|
|000002c0| 79 6f 75 27 6c 6c 20 6e | 65 65 64 20 74 6f 20 64 |you'll n|eed to d|
|000002d0| 65 66 69 6e 65 20 61 20 | 64 69 73 6b 12 02 22 58 |efine a |disk.."X|
|000002e0| 3b 66 69 6c 65 6e 61 6d | 65 20 69 6e 20 66 75 6c |;filenam|e in ful|
|000002f0| 6c 20 65 6c 73 65 77 68 | 65 72 65 20 69 6e 1c 02 |l elsewh|ere in..|
|00000300| 1b 58 3b 79 6f 75 72 20 | 70 72 6f 67 72 61 6d 2c |.X;your |program,|
|00000310| 20 73 75 63 68 20 61 73 | 3a 26 02 05 58 3b 30 02 | such as|:&..X;0.|
|00000320| 20 58 3b 46 49 4c 45 31 | 20 2e 42 59 54 45 20 22 | X;FILE1| .BYTE "|
|00000330| 44 31 3a 53 43 4f 52 45 | 53 2e 44 41 54 22 3a 02 |D1:SCORE|S.DAT":.|
|00000340| 05 58 3b 44 02 0b 81 53 | 0b 41 82 53 3a 41 4e 02 |.X;D...S|.A.S:AN.|
|00000350| 0b 81 45 0b 41 82 45 3a | 41 58 02 0b 81 43 0b 41 |..E.A.E:|AX...C.A|
|00000360| 82 43 3a 41 62 02 0b 81 | 50 0b 41 82 50 3a 41 6c |.C:Ab...|P.A.P:Al|
|00000370| 02 0b 81 4b 0b 41 82 4b | 3a 41 76 02 0b 81 52 0b |...K.A.K|:Av...R.|
|00000380| 41 82 52 3a 41          |                         |A.R:A   |        |
+--------+-------------------------+-------------------------+--------+--------+