00000000: 01 08 25 08 E8 03 8F 20 2A 2A 20 54 48 49 53 20 |..%.... ** THIS |
00000010: 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 43 52 45 |PROGRAM WILL CRE|
00000020: 41 54 45 20 41 00 47 08 F2 03 8F 20 2A 2A 20 4D |ATE A.G.... ** M|
00000030: 41 43 48 49 4E 45 20 4C 41 4E 47 55 41 47 45 20 |ACHINE LANGUAGE |
00000040: 50 52 4F 47 52 41 4D 00 67 08 FC 03 8F 20 2A 2A |PROGRAM.g.... **|
00000050: 20 57 48 49 43 48 20 4D 4F 44 49 46 49 45 53 20 | WHICH MODIFIES |
00000060: 54 48 45 20 49 52 51 00 8E 08 06 04 8F 20 2A 2A |THE IRQ...... **|
00000070: 20 52 4F 55 54 49 4E 45 20 54 4F 20 53 45 54 20 | ROUTINE TO SET |
00000080: 20 54 49 24 3D 54 4F 44 20 43 49 41 23 31 00 94 | TI$=TOD CIA#1..|
00000090: 08 10 04 3A 00 BB 08 1A 04 9F 31 35 2C 38 2C 31 |...:......15,8,1|
000000A0: 35 3A 20 9F 38 2C 38 2C 31 2C 22 30 3A 4E 45 57 |5: .8,8,1,"0:NEW|
000000B0: 2D 49 52 51 22 3A 20 43 4B B2 30 00 E5 08 24 04 |-IRQ": CK.0...$.|
000000C0: 84 31 35 2C 45 2C 45 24 2C 42 2C 43 3A 20 8B 20 |.15,E,E$,B,C: . |
000000D0: 45 20 A7 20 A0 31 35 3A 20 99 20 45 3B 45 24 3B |E . .15: . E;E$;|
000000E0: 42 3B 43 3A 90 00 03 09 2E 04 85 20 22 53 54 41 |B;C:....... "STA|
000000F0: 52 54 49 4E 47 20 41 44 44 52 45 53 53 3A 20 22 |RTING ADDRESS: "|
00000100: 3B 53 24 00 1C 09 38 04 53 B2 C5 28 53 24 29 3A |;S$...8.S..(S$):|
00000110: 20 8B 20 53 B3 31 20 89 31 30 39 30 00 49 09 42 | . S.1 .1090.I.B|
00000120: 04 96 20 A5 48 28 58 29 B2 B5 28 58 AD 32 35 36 |.. .H(X)..(X.256|
00000130: 29 3A 20 96 20 A5 4C 28 58 29 B2 58 AB 32 35 36 |): . .L(X).X.256|
00000140: AC B5 28 58 AD 32 35 36 29 00 67 09 4C 04 98 38 |..(X.256).g.L..8|
00000150: 2C C7 28 A5 4C 28 53 29 29 3B 3A 98 38 2C C7 28 |,.(.L(S));:.8,.(|
00000160: A5 48 28 53 29 29 3B 00 8D 09 56 04 8B 20 A5 4C |.H(S));...V.. .L|
00000170: 28 53 AA 32 35 29 B2 32 35 35 20 A7 20 98 38 2C |(S.25).255 . .8,|
00000180: C7 28 32 33 34 29 3B 3A 53 B2 53 AA 31 00 B6 09 |.(234);:S.S.1...|
00000190: 60 04 81 20 58 B2 31 20 A4 20 35 3A 20 87 20 41 |`.. X.1 . 5: . A|
000001A0: 3A 20 43 4B B2 43 4B AA 41 3A 20 98 38 2C C7 28 |: CK.CK.A: .8,.(|
000001B0: 41 29 3B 3A 20 82 00 DA 09 6A 04 98 38 2C C7 28 |A);: ....j..8,.(|
000001C0: A5 4C 28 53 AA 32 35 29 29 3B 3A 98 38 2C C7 28 |.L(S.25));:.8,.(|
000001D0: A5 48 28 53 AA 32 35 29 29 3B 00 03 0A 74 04 81 |.H(S.25));...t..|
000001E0: 20 58 B2 31 20 A4 20 34 3A 20 87 20 41 3A 20 43 | X.1 . 4: . A: C|
000001F0: 4B B2 43 4B AA 41 3A 20 98 38 2C C7 28 41 29 3B |K.CK.A: .8,.(A);|
00000200: 3A 20 82 00 27 0A 7E 04 98 38 2C C7 28 A5 4C 28 |: ..'.~..8,.(.L(|
00000210: 53 AA 32 36 29 29 3B 3A 98 38 2C C7 28 A5 48 28 |S.26));:.8,.(.H(|
00000220: 53 AA 32 36 29 29 3B 00 54 0A 88 04 98 38 2C C7 |S.26));.T....8,.|
00000230: 28 31 36 39 29 3B C7 28 A5 4C 28 53 AA 32 37 29 |(169);.(.L(S.27)|
00000240: 29 3B C7 28 31 34 31 29 3B C7 28 32 30 29 3B C7 |);.(141);.(20);.|
00000250: 28 33 29 3B 00 6F 0A 92 04 98 38 2C C7 28 31 36 |(3);.o....8,.(16|
00000260: 39 29 3B C7 28 A5 48 28 53 AA 32 37 29 29 3B 00 |9);.(.H(S.27));.|
00000270: 97 0A 9C 04 81 20 58 B2 31 20 A4 20 36 36 3A 87 |..... X.1 . 66:.|
00000280: 20 41 3A 20 43 4B B2 43 4B AA 41 3A 20 98 38 2C | A: CK.CK.A: .8,|
00000290: C7 28 41 29 3B 3A 82 00 BD 0A A6 04 98 38 2C C7 |.(A);:.......8,.|
000002A0: 28 A5 4C 28 53 AA 31 31 32 29 29 3B 3A 98 38 2C |(.L(S.112));:.8,|
000002B0: C7 28 A5 48 28 53 AA 31 31 32 29 29 3B 00 E5 0A |.(.H(S.112));...|
000002C0: B0 04 81 20 58 B2 31 20 A4 20 33 3A 20 87 20 41 |... X.1 . 3: . A|
000002D0: 3A 20 43 4B B2 43 4B AA 41 3A 20 98 38 2C C7 28 |: CK.CK.A: .8,.(|
000002E0: 41 29 3B 3A 82 00 0B 0B BA 04 98 38 2C C7 28 A5 |A);:.......8,.(.|
000002F0: 4C 28 53 AA 31 33 37 29 29 3B 3A 98 38 2C C7 28 |L(S.137));:.8,.(|
00000300: A5 48 28 53 AA 31 33 37 29 29 3B 00 33 0B C4 04 |.H(S.137));.3...|
00000310: 81 20 58 B2 31 20 A4 20 33 3A 20 87 20 41 3A 20 |. X.1 . 3: . A: |
00000320: 43 4B B2 43 4B AA 41 3A 20 98 38 2C C7 28 41 29 |CK.CK.A: .8,.(A)|
00000330: 3B 3A 82 00 59 0B CE 04 98 38 2C C7 28 A5 4C 28 |;:..Y....8,.(.L(|
00000340: 53 AA 31 36 32 29 29 3B 3A 98 38 2C C7 28 A5 48 |S.162));:.8,.(.H|
00000350: 28 53 AA 31 36 32 29 29 3B 00 82 0B D8 04 81 20 |(S.162));...... |
00000360: 58 B2 31 20 A4 20 31 32 3A 20 87 20 41 3A 20 43 |X.1 . 12: . A: C|
00000370: 4B B2 43 4B AA 41 3A 20 98 38 2C C7 28 41 29 3B |K.CK.A: .8,.(A);|
00000380: 3A 82 00 A6 0B E2 04 98 38 2C C7 28 A5 4C 28 53 |:.......8,.(.L(S|
00000390: AA 32 35 29 29 3B 3A 98 38 2C C7 28 A5 48 28 53 |.25));:.8,.(.H(S|
000003A0: AA 32 35 29 29 3B 00 CF 0B EC 04 81 20 58 B2 31 |.25));...... X.1|
000003B0: 20 A4 20 37 35 3A 20 87 20 41 3A 20 43 4B B2 43 | . 75: . A: CK.C|
000003C0: 4B AA 41 3A 20 98 38 2C C7 28 41 29 3B 3A 82 00 |K.A: .8,.(A);:..|
000003D0: DA 0B F6 04 A0 38 3A A0 31 35 00 13 0C 00 05 8B |.....8:.15......|
000003E0: 20 43 4B B3 B1 31 38 33 31 34 20 A7 20 99 20 22 | CK..18314 . . "|
000003F0: 2D 2D 2D 45 52 52 4F 52 20 49 4E 20 44 41 54 41 |---ERROR IN DATA|
00000400: 20 53 54 41 54 45 4D 45 4E 54 53 21 2D 2D 2D 22 | STATEMENTS!---"|
00000410: 3A 20 80 00 37 0C 0A 05 99 20 22 2A 2A 2A 49 52 |: ..7.... "***IR|
00000420: 51 20 4D 4F 44 55 4C 45 20 43 52 45 41 54 45 44 |Q MODULE CREATED|
00000430: 2A 2A 2A 22 3A 20 80 00 3D 0C 14 05 3A 00 58 0C |***": ..=...:.X.|
00000440: 1E 05 83 20 31 32 30 2C 31 37 33 2C 32 30 2C 33 |... 120,173,20,3|
00000450: 2C 31 34 31 2C 31 37 33 00 73 0C 28 05 83 20 32 |,141,173.s.(.. 2|
00000460: 31 2C 33 2C 31 34 31 2C 31 34 31 2C 32 31 2C 33 |1,3,141,141,21,3|
00000470: 2C 38 38 00 93 0C 32 05 83 20 39 36 2C 30 2C 30 |,88...2.. 96,0,0|
00000480: 2C 31 36 35 2C 32 35 31 2C 37 32 2C 31 36 35 2C |,165,251,72,165,|
00000490: 32 35 32 00 AF 0C 3C 05 83 20 37 32 2C 31 37 33 |252...<.. 72,173|
000004A0: 2C 31 31 2C 32 32 30 2C 31 33 33 2C 32 35 31 00 |,11,220,133,251.|
000004B0: C7 0C 46 05 83 20 31 37 33 2C 31 30 2C 32 32 30 |..F.. 173,10,220|
000004C0: 2C 32 30 38 2C 35 37 00 DE 0C 50 05 83 20 31 37 |,208,57...P.. 17|
000004D0: 33 2C 39 2C 32 32 30 2C 32 30 38 2C 35 32 00 00 |3,9,220,208,52..|
000004E0: 0D 5A 05 83 20 31 37 33 2C 38 2C 32 32 30 2C 32 |.Z.. 173,8,220,2|
000004F0: 30 38 2C 34 37 2C 31 36 35 2C 32 35 31 2C 34 31 |08,47,165,251,41|
00000500: 00 23 0D 64 05 83 20 31 35 2C 31 33 33 2C 32 35 |.#.d.. 15,133,25|
00000510: 32 2C 31 36 35 2C 32 35 31 2C 34 31 2C 31 36 2C |2,165,251,41,16,|
00000520: 32 34 30 00 45 0D 6E 05 83 20 37 2C 32 34 2C 31 |240.E.n.. 7,24,1|
00000530: 36 39 2C 31 30 2C 31 30 31 2C 32 35 32 2C 31 33 |69,10,101,252,13|
00000540: 33 2C 32 35 32 00 66 0D 78 05 83 20 31 36 35 2C |3,252.f.x.. 165,|
00000550: 32 35 31 2C 31 36 2C 37 2C 32 34 2C 31 36 39 2C |251,16,7,24,169,|
00000560: 31 32 2C 31 30 31 00 84 0D 82 05 83 20 32 35 32 |12,101...... 252|
00000570: 2C 31 33 33 2C 32 35 32 2C 31 36 34 2C 32 35 32 |,133,252,164,252|
00000580: 2C 31 38 35 00 A2 0D 8C 05 83 20 31 33 33 2C 31 |,185...... 133,1|
00000590: 36 30 2C 31 38 35 2C 31 33 33 2C 31 36 31 2C 31 |60,185,133,161,1|
000005A0: 38 35 00 BE 0D 96 05 83 20 31 33 33 2C 31 36 32 |85...... 133,162|
000005B0: 2C 31 37 33 2C 38 2C 32 32 30 2C 31 30 34 00 DC |,173,8,220,104..|
000005C0: 0D A0 05 83 20 31 33 33 2C 32 35 32 2C 31 30 34 |.... 133,252,104|
000005D0: 2C 31 33 33 2C 32 35 31 2C 31 30 38 00 F6 0D AA |,133,251,108....|
000005E0: 05 83 20 30 2C 33 2C 36 2C 39 2C 31 33 2C 31 36 |.. 0,3,6,9,13,16|
000005F0: 2C 31 39 2C 32 33 00 13 0E B4 05 83 20 32 36 2C |,19,23...... 26,|
00000600: 32 39 2C 33 32 2C 33 36 2C 30 2C 34 32 2C 34 36 |29,32,36,0,42,46|
00000610: 2C 34 39 00 31 0E BE 05 83 20 35 32 2C 35 36 2C |,49.1.... 52,56,|
00000620: 35 39 2C 36 32 2C 36 35 2C 36 39 2C 37 32 2C 37 |59,62,65,69,72,7|
00000630: 35 00 52 0E C8 05 83 20 33 39 2C 30 2C 37 35 2C |5.R.... 39,0,75,|
00000640: 31 35 31 2C 32 32 37 2C 34 37 2C 31 32 32 2C 31 |151,227,47,122,1|
00000650: 39 38 00 72 0E D2 05 83 20 31 38 2C 39 34 2C 31 |98.r.... 18,94,1|
00000660: 36 39 2C 32 34 35 2C 36 35 2C 30 2C 32 31 36 2C |69,245,65,0,216,|
00000670: 33 36 00 94 0E DC 05 83 20 31 31 32 2C 31 38 38 |36...... 112,188|
00000680: 2C 37 2C 38 33 2C 31 35 39 2C 32 33 35 2C 35 34 |,7,83,159,235,54|
00000690: 2C 31 33 30 00 B5 0E E6 05 83 20 32 30 36 2C 31 |,130...... 206,1|
000006A0: 34 31 2C 30 2C 31 39 32 2C 31 32 38 2C 36 34 2C |41,0,192,128,64,|
000006B0: 30 2C 31 39 32 00 D5 0E F0 05 83 20 31 32 38 2C |0,192...... 128,|
000006C0: 36 34 2C 30 2C 31 39 32 2C 31 32 38 2C 36 34 2C |64,0,192,128,64,|
000006D0: 30 2C 31 39 32 00 F5 0E FA 05 83 20 31 32 38 2C |0,192...... 128,|
000006E0: 36 34 2C 30 2C 31 39 32 2C 31 32 38 2C 36 34 2C |64,0,192,128,64,|
000006F0: 30 2C 31 39 32 00 04 0F 04 06 83 20 31 32 38 2C |0,192...... 128,|
00000700: 36 34 2C 30 00 00 00 |64,0... |
..%.... ** THIS PROGRAM WILL CREATE A.G.
... ** MACHINE LANGUAGE PROGRAM.G.... **
WHICH MODIFIES THE IRQ...... ** ROUTINE
TO SET TI$=TOD CIA#1.....:......15,8,1
5: .8,8,1,"0:NEW-IRQ": CK.0...$..15,E,E$
,B,C: . E . 15: . E;E$;B;C:....... "STA
RTING ADDRESS: ";S$...8.S.E(S$): . S.1 .
1090.I.B.. .H(X)..(X.256): . .L(X).X.256
..(X.256).G.L..8,G(.L(S));:.8,G(.H(S));.
..V.. .L(S.25).255 . .8,G(234);:S.S.1...
`.. X.1 . 5: . A: CK.CK.A: .8,G(A);: ..Z
.J..8,G(.L(S.25));:.8,G(.H(S.25));...T..
X.1 . 4: . A: CK.CK.A: .8,G(A);: ..'.~.
.8,G(.L(S.26));:.8,G(.H(S.26));.T....8,G
(169);G(.L(S.27));G(141);G(20);G(3);.O..
..8,G(169);G(.H(S.27));...... X.1 . 66:.
A: CK.CK.A: .8,G(A);:.......8,G(.L(S.11
2));:.8,G(.H(S.112));...... X.1 . 3: . A
: CK.CK.A: .8,G(A);:.......8,G(.L(S.137)
);:.8,G(.H(S.137));.3.D.. X.1 . 3: . A:
CK.CK.A: .8,G(A);:..Y.N..8,G(.L(S.162));
:.8,G(.H(S.162));...X.. X.1 . 12: . A: C
K.CK.A: .8,G(A);:.......8,G(.L(S.25));:.
8,G(.H(S.25));.O.... X.1 . 75: . A: CK.C
K.A: .8,G(A);:..Z... 8: 15...... CK..183
14 . . "---ERROR IN DATA STATEMENTS!---"
: ..7.... "***IRQ MODULE CREATED***": ..
=...:.X.... 120,173,20,3,141,173.S.(.. 2
1,3,141,141,21,3,88...2.. 96,0,0,165,251
,72,165,252...<.. 72,173,11,220,133,251.
G.F.. 173,10,220,208,57...P.. 173,9,220,
208,52...Z.. 173,8,220,208,47,165,251,41
.#.D.. 15,133,252,165,251,41,16,240.E.N.
. 7,24,169,10,101,252,133,252.F.X.. 165,
251,16,7,24,169,12,101...... 252,133,252
,164,252,185...... 133,160,185,133,161,1
85...... 133,162,173,8,220,104... .. 133
,252,104,133,251,108...... 0,3,6,9,13,16
,19,23...... 26,29,32,36,0,42,46,49.1...
. 52,56,59,62,65,69,72,75.R.H.. 39,0,75,
151,227,47,122,198.R.R.. 18,94,169,245,6
5,0,216,36...... 112,188,7,83,159,235,54
,130...... 206,141,0,192,128,64,0,192.U.
... 128,64,0,192,128,64,0,192...... 128,
64,0,192,128,64,0,192...... 128,64,0...