INTRO7@
FILE INFORMATION
FILENAME(S): INTRO7@
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-12-02 00:16:25
APPEARS ON: 1 disk(s)
FILE HASH
32da7e7a97d065818d85100411c848ab77c08c32fb63471d3f95b8de13de6fe0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CDU DEMO | INTRO7@ | PRG | Maestro | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 0D 40 E8 03 53 50 45 45 44 B2 33 00 26 40 |.@.@..SPEED.3.&@|
00000010: F2 03 4C 49 4E 45 B2 31 30 32 34 AA 34 30 AA 28 |..LINE.1024.40.(|
00000020: 31 36 AC 34 30 29 00 3B 40 FC 03 43 4C 49 4E 45 |16.40).;@..CLINE|
00000030: B2 4C 49 4E 45 AA 35 34 32 37 32 00 48 40 06 04 |.LINE.54272.H@..|
00000040: 4D 45 53 53 B2 24 41 41 00 5A 40 10 04 4D 45 53 |MESS.$AA.Z@..MES|
00000050: 53 41 47 45 B2 24 30 41 30 30 00 60 40 1A 04 21 |SAGE.$0A00.`@..!|
00000060: 00 6C 40 24 04 AC B2 24 33 30 30 30 00 72 40 2E |.l@$...$3000.r@.|
00000070: 04 21 00 7D 40 38 04 4C 44 41 20 23 30 00 8B 40 |.!.}@8.LDA #0..@|
00000080: 42 04 53 54 41 20 24 44 30 32 30 00 99 40 4C 04 |B.STA $D020..@L.|
00000090: 53 54 41 20 24 44 30 32 31 00 A5 40 56 04 53 54 |STA $D021..@V.ST|
000000A0: 41 20 36 34 36 00 AD 40 57 04 54 41 58 00 BB 40 |A 646..@W.TAX..@|
000000B0: 58 04 4A 53 52 20 24 31 35 37 42 00 C9 40 60 04 |X.JSR $157B..@`.|
000000C0: 4A 53 52 20 24 45 35 34 34 00 CF 40 6A 04 21 00 |JSR $E544..@j.!.|
000000D0: DD 40 74 04 4C 44 41 20 24 44 30 31 31 00 E8 40 |.@t.LDA $D011..@|
000000E0: 7E 04 AF 20 23 32 33 39 00 F6 40 88 04 53 54 41 |~.. #239..@..STA|
000000F0: 20 24 44 30 31 31 00 01 41 92 04 4C 44 58 20 23 | $D011..A..LDX #|
00000100: 30 00 10 41 9C 04 4C 44 41 20 23 B3 54 45 58 54 |0..A..LDA #.TEXT|
00000110: 00 1F 41 A6 04 4C 44 59 20 23 B1 54 45 58 54 00 |..A..LDY #.TEXT.|
00000120: 2D 41 B0 04 4A 53 52 20 24 41 42 31 45 00 3D 41 |-A..JSR $AB1E.=A|
00000130: BA 04 4C 44 41 20 23 B3 54 45 58 54 31 00 4D 41 |..LDA #.TEXT1.MA|
00000140: C4 04 4C 44 59 20 23 B1 54 45 58 54 31 00 5B 41 |..LDY #.TEXT1.[A|
00000150: CE 04 4A 53 52 20 24 41 42 31 45 00 6B 41 D8 04 |..JSR $AB1E.kA..|
00000160: 4C 44 41 20 23 B3 54 45 58 54 32 00 7B 41 E2 04 |LDA #.TEXT2.{A..|
00000170: 4C 44 59 20 23 B1 54 45 58 54 32 00 89 41 EC 04 |LDY #.TEXT2..A..|
00000180: 4A 53 52 20 24 41 42 31 45 00 9A 41 F6 04 4A 53 |JSR $AB1E..A..JS|
00000190: 52 20 49 4E 49 54 4D 45 53 53 00 A5 41 00 05 4C |R INITMESS..A..L|
000001A0: 44 41 20 23 30 00 B3 41 0A 05 53 54 41 20 24 32 |DA #0..A..STA $2|
000001B0: 30 30 31 00 BE 41 0B 05 4C 44 41 20 23 31 00 CC |001..A..LDA #1..|
000001C0: 41 0C 05 53 54 41 20 24 44 30 31 34 00 D2 41 32 |A..STA $D014..A2|
000001D0: 05 21 00 DF 41 3C 05 53 45 54 49 52 51 20 21 00 |.!..A<.SETIRQ !.|
000001E0: E7 41 46 05 53 45 49 00 F4 41 50 05 4C 44 41 20 |.AF.SEI..AP.LDA |
000001F0: 23 24 37 46 00 02 42 5A 05 53 54 41 20 24 44 43 |#$7F..BZ.STA $DC|
00000200: 30 44 00 10 42 64 05 4C 44 41 20 24 44 43 30 44 |0D..Bd.LDA $DC0D|
00000210: 00 1D 42 6E 05 4C 44 41 20 23 24 31 42 00 2B 42 |..Bn.LDA #$1B.+B|
00000220: 78 05 53 54 41 20 24 44 30 31 31 00 3F 42 82 05 |x.STA $D011.?B..|
00000230: 4C 44 41 20 23 24 33 38 AA 28 31 36 AC 38 29 00 |LDA #$38.(16.8).|
00000240: 4D 42 8C 05 53 54 41 20 24 44 30 31 32 00 5B 42 |MB..STA $D012.[B|
00000250: 96 05 4C 44 41 20 23 B3 49 52 51 00 68 42 A0 05 |..LDA #.IRQ.hB..|
00000260: 53 54 41 20 24 33 31 34 00 76 42 AA 05 4C 44 41 |STA $314.vB..LDA|
00000270: 20 23 B1 49 52 51 00 83 42 B4 05 53 54 41 20 24 | #.IRQ..B..STA $|
00000280: 33 31 35 00 8E 42 BE 05 4C 44 41 20 23 31 00 9C |315..B..LDA #1..|
00000290: 42 C8 05 53 54 41 20 24 44 30 31 39 00 AA 42 D2 |B..STA $D019..B.|
000002A0: 05 53 54 41 20 24 44 30 31 41 00 B2 42 DC 05 43 |.STA $D01A..B..C|
000002B0: 4C 49 00 C1 42 E6 05 AF 59 20 4C 44 41 20 31 39 |LI..B...Y LDA 19|
000002C0: 37 00 CD 42 E7 05 43 4D 50 20 23 36 30 00 D8 42 |7..B..CMP #60..B|
000002D0: E8 05 42 4E 45 20 AF 59 00 E9 42 F0 05 4A 4D 50 |..BNE .Y..B..JMP|
000002E0: 20 52 45 4C 4F 43 41 54 45 00 EF 42 FA 05 21 00 | RELOCATE..B..!.|
000002F0: F9 42 04 06 49 52 51 20 21 00 06 43 0E 06 4C 44 |.B..IRQ !..C..LD|
00000300: 41 20 23 24 35 42 00 14 43 18 06 53 54 41 20 24 |A #$5B..C..STA $|
00000310: 44 30 31 31 00 22 43 22 06 4C 44 41 20 24 44 30 |D011."C".LDA $D0|
00000320: 31 36 00 2D 43 2C 06 AF 20 23 24 46 30 00 37 43 |16.-C,.. #$F0.7C|
00000330: 36 06 B0 41 20 58 B9 00 45 43 40 06 53 54 41 20 |6..A X..EC@.STA |
00000340: 24 44 30 31 36 00 51 43 4A 06 4C 44 41 20 23 32 |$D016.QCJ.LDA #2|
00000350: 35 00 5F 43 54 06 53 54 41 20 35 33 32 37 32 00 |5._CT.STA 53272.|
00000360: 65 43 5E 06 21 00 71 43 68 06 4C 44 58 20 23 24 |eC^.!.qCh.LDX #$|
00000370: 34 00 7C 43 72 06 49 31 20 44 45 58 00 87 43 7C |4.|Cr.I1 DEX..C||
00000380: 06 42 4E 45 20 49 31 00 9B 43 86 06 49 32 20 4C |.BNE I1..C..I2 L|
00000390: 44 59 20 44 45 4C 54 41 42 2C 58 00 AC 43 90 06 |DY DELTAB,X..C..|
000003A0: 4C 44 41 20 43 4F 4C 54 41 42 2C 58 00 B7 43 9A |LDA COLTAB,X..C.|
000003B0: 06 49 33 20 44 45 59 00 C2 43 A4 06 42 4E 45 20 |.I3 DEY..C..BNE |
000003C0: 49 33 00 D0 43 AE 06 53 54 41 20 24 44 30 32 31 |I3..C..STA $D021|
000003D0: 00 DE 43 B8 06 53 54 41 20 24 44 30 32 31 00 E6 |..C..STA $D021..|
000003E0: 43 C2 06 49 4E 58 00 F2 43 CC 06 43 50 58 20 23 |C..INX..C..CPX #|
000003F0: 31 30 00 FD 43 D6 06 42 4E 45 20 49 32 00 08 44 |10..C..BNE I2..D|
00000400: E0 06 4C 44 58 20 23 38 00 13 44 EA 06 49 34 20 |..LDX #8..D..I4 |
00000410: 44 45 58 00 1E 44 F4 06 42 4E 45 20 49 34 00 24 |DEX..D..BNE I4.$|
00000420: 44 FE 06 21 00 2F 44 08 07 4C 44 41 20 23 31 00 |D..!./D..LDA #1.|
00000430: 3D 44 12 07 53 54 41 20 24 44 30 31 39 00 4A 44 |=D..STA $D019.JD|
00000440: 1C 07 4C 44 41 20 23 24 31 42 00 59 44 26 07 21 |..LDA #$1B.YD&.!|
00000450: 53 54 41 20 24 44 30 31 31 00 66 44 30 07 4C 44 |STA $D011.fD0.LD|
00000460: 41 20 23 32 30 30 00 74 44 3A 07 53 54 41 20 24 |A #200.tD:.STA $|
00000470: 44 30 31 36 00 80 44 44 07 4C 44 41 20 23 31 32 |D016..DD.LDA #12|
00000480: 00 8E 44 4E 07 53 54 41 20 24 44 30 32 31 00 9B |..DN.STA $D021..|
00000490: 44 58 07 4A 53 52 20 52 4F 4C 4C 00 AA 44 62 07 |DX.JSR ROLL..Db.|
000004A0: 4A 53 52 20 53 43 52 4F 4C 4C 00 B8 44 63 07 4A |JSR SCROLL..Dc.J|
000004B0: 53 52 20 24 31 30 37 45 00 C6 44 6C 07 4A 4D 50 |SR $107E..Dl.JMP|
000004C0: 20 24 45 41 33 31 00 CC 44 76 07 21 00 F3 44 80 | $EA31..Dv.!..D.|
000004D0: 07 44 45 4C 54 41 42 20 42 59 54 20 38 2C 38 2C |.DELTAB BYT 8,8,|
000004E0: 31 2C 38 2C 38 2C 38 2C 38 2C 38 2C 38 2C 38 2C |1,8,8,8,8,8,8,8,|
000004F0: 31 2C 38 00 1A 45 8A 07 43 4F 4C 54 41 42 20 42 |1,8..E..COLTAB B|
00000500: 59 54 20 30 2C 36 2C 32 2C 34 2C 24 41 2C 24 46 |YT 0,6,2,4,$A,$F|
00000510: 2C 37 2C 31 2C 30 2C 30 2C 30 00 20 45 94 07 21 |,7,1,0,0,0. E..!|
00000520: 00 4E 45 9E 07 54 32 33 20 42 59 54 20 36 2C 32 |.NE..T23 BYT 6,2|
00000530: 2C 34 2C 24 41 2C 24 46 2C 37 2C 31 2C 37 2C 24 |,4,$A,$F,7,1,7,$|
00000540: 46 2C 24 41 2C 34 2C 32 2C 36 2C 24 46 46 00 76 |F,$A,4,2,6,$FF.v|
00000550: 45 A8 07 54 32 34 20 42 59 54 20 24 42 2C 24 43 |E..T24 BYT $B,$C|
00000560: 2C 24 46 2C 37 2C 31 2C 37 2C 24 46 2C 24 43 2C |,$F,7,1,7,$F,$C,|
00000570: 24 42 2C 24 46 46 00 9E 45 B2 07 54 32 32 20 42 |$B,$FF..E..T22 B|
00000580: 59 54 20 36 2C 31 34 2C 31 34 2C 33 2C 31 2C 31 |YT 6,14,14,3,1,1|
00000590: 2C 33 2C 31 34 2C 31 34 2C 36 2C 24 46 46 00 AA |,3,14,14,6,$FF..|
000005A0: 45 BC 07 43 32 33 20 42 52 4B 00 B6 45 C6 07 43 |E..C23 BRK..E..C|
000005B0: 32 34 20 42 52 4B 00 C6 45 D0 07 43 4F 55 4E 54 |24 BRK..E..COUNT|
000005C0: 20 42 59 54 20 33 00 CC 45 DA 07 21 00 D7 45 E4 | BYT 3..E..!..E.|
000005D0: 07 52 4F 4C 4C 20 21 00 E5 45 EE 07 44 45 43 20 |.ROLL !..E..DEC |
000005E0: 43 4F 55 4E 54 00 F3 45 F8 07 4C 44 41 20 43 4F |COUNT..E..LDA CO|
000005F0: 55 4E 54 00 FF 45 02 08 42 45 51 20 AC AA 33 00 |UNT..E..BEQ ..3.|
00000600: 07 46 0C 08 52 54 53 00 12 46 16 08 4C 44 41 20 |.F..RTS..F..LDA |
00000610: 23 33 00 20 46 20 08 53 54 41 20 43 4F 55 4E 54 |#3. F .STA COUNT|
00000620: 00 26 46 2A 08 21 00 32 46 34 08 49 4E 43 20 43 |.&F*.!.2F4.INC C|
00000630: 32 33 00 3E 46 3E 08 49 4E 43 20 43 32 34 00 44 |23.>F>.INC C24.D|
00000640: 46 48 08 21 00 50 46 52 08 4C 44 58 20 43 32 33 |FH.!.PFR.LDX C23|
00000650: 00 5E 46 5C 08 4C 44 41 20 54 32 33 2C 58 00 6B |.^F\.LDA T23,X.k|
00000660: 46 66 08 43 4D 50 20 23 24 46 46 00 78 46 70 08 |Ff.CMP #$FF.xFp.|
00000670: 42 4E 45 20 4E 4F 32 33 00 83 46 7A 08 4C 44 41 |BNE NO23..Fz.LDA|
00000680: 20 23 30 00 8F 46 84 08 53 54 41 20 43 32 33 00 | #0..F..STA C23.|
00000690: A2 46 8E 08 4E 4F 32 33 20 53 54 41 20 24 44 30 |.F..NO23 STA $D0|
000006A0: 32 34 00 A8 46 98 08 21 00 B4 46 A2 08 4C 44 58 |24..F..!..F..LDX|
000006B0: 20 43 32 34 00 C2 46 AC 08 4C 44 41 20 54 32 34 | C24..F..LDA T24|
000006C0: 2C 58 00 CF 46 B6 08 43 4D 50 20 23 24 46 46 00 |,X..F..CMP #$FF.|
000006D0: DC 46 C0 08 42 4E 45 20 4E 4F 32 34 00 E7 46 CA |.F..BNE NO24..F.|
000006E0: 08 4C 44 41 20 23 30 00 F3 46 D4 08 53 54 41 20 |.LDA #0..F..STA |
000006F0: 43 32 34 00 06 47 DE 08 4E 4F 32 34 20 53 54 41 |C24..G..NO24 STA|
00000700: 20 24 44 30 32 32 00 12 47 E8 08 4C 44 41 20 23 | $D022..G..LDA #|
00000710: 31 32 00 20 47 F2 08 53 54 41 20 24 44 30 32 33 |12. G..STA $D023|
00000720: 00 28 47 FC 08 52 54 53 00 2E 47 06 09 21 00 3B |.(G..RTS..G..!.;|
00000730: 47 10 09 53 43 52 4F 4C 4C 20 21 00 46 47 1A 09 |G..SCROLL !.FG..|
00000740: 4C 44 41 20 58 B9 00 4E 47 24 09 53 45 43 00 5D |LDA X..NG$.SEC.]|
00000750: 47 2E 09 53 42 43 20 23 53 50 45 45 44 00 66 47 |G..SBC #SPEED.fG|
00000760: 38 09 AF 20 23 37 00 71 47 42 09 53 54 41 20 58 |8.. #7.qGB.STA X|
00000770: B9 00 7D 47 4C 09 42 43 43 20 53 43 31 00 85 47 |..}GL.BCC SC1..G|
00000780: 56 09 52 54 53 00 8B 47 60 09 21 00 96 47 6A 09 |V.RTS..G`.!..Gj.|
00000790: 58 B9 20 42 52 4B 00 9C 47 74 09 21 00 AB 47 7E |X. BRK..Gt.!..G~|
000007A0: 09 53 43 31 20 4C 44 59 20 23 30 00 C0 47 88 09 |.SC1 LDY #0..G..|
000007B0: 53 43 32 20 4C 44 41 20 4C 49 4E 45 AA 31 2C 59 |SC2 LDA LINE.1,Y|
000007C0: 00 CF 47 92 09 53 54 41 20 4C 49 4E 45 2C 59 00 |..G..STA LINE,Y.|
000007D0: D7 47 9C 09 49 4E 59 00 E3 47 A6 09 43 50 59 20 |.G..INY..G..CPY |
000007E0: 23 34 30 00 EF 47 B0 09 42 4E 45 20 53 43 32 00 |#40..G..BNE SC2.|
000007F0: FD 47 BA 09 4A 53 52 20 A1 43 48 41 52 00 0D 48 |.G..JSR .CHAR..H|
00000800: C4 09 53 54 41 20 4C 49 4E 45 AA 33 39 00 15 48 |..STA LINE.39..H|
00000810: CE 09 52 54 53 00 1B 48 D8 09 21 00 2A 48 E2 09 |..RTS..H..!.*H..|
00000820: 49 4E 49 54 4D 45 53 53 20 21 00 3C 48 EC 09 4C |INITMESS !.<H..L|
00000830: 44 41 20 23 B3 4D 45 53 53 41 47 45 00 49 48 F6 |DA #.MESSAGE.IH.|
00000840: 09 53 54 41 20 4D 45 53 53 00 5B 48 00 0A 4C 44 |.STA MESS.[H..LD|
00000850: 41 20 23 B1 4D 45 53 53 41 47 45 00 6A 48 0A 0A |A #.MESSAGE.jH..|
00000860: 53 54 41 20 4D 45 53 53 AA 31 00 72 48 14 0A 52 |STA MESS.1.rH..R|
00000870: 54 53 00 78 48 1E 0A 21 00 84 48 28 0A A1 43 48 |TS.xH..!..H(..CH|
00000880: 41 52 20 21 00 8F 48 32 0A 4C 44 59 20 23 30 00 |AR !..H2.LDY #0.|
00000890: A0 48 3C 0A 4C 44 41 20 28 4D 45 53 53 29 2C 59 |.H<.LDA (MESS),Y|
000008A0: 00 AC 48 46 0A 42 4E 45 20 47 43 31 00 BD 48 50 |..HF.BNE GC1..HP|
000008B0: 0A 4A 53 52 20 49 4E 49 54 4D 45 53 53 00 CB 48 |.JSR INITMESS..H|
000008C0: 5A 0A 4A 4D 50 20 A1 43 48 41 52 00 DC 48 64 0A |Z.JMP .CHAR..Hd.|
000008D0: 47 43 31 20 49 4E 43 20 4D 45 53 53 00 E8 48 6E |GC1 INC MESS..Hn|
000008E0: 0A 42 4E 45 20 AC AA 34 00 F7 48 78 0A 49 4E 43 |.BNE ..4..Hx.INC|
000008F0: 20 4D 45 53 53 AA 31 00 FF 48 82 0A 52 54 53 00 | MESS.1..H..RTS.|
00000900: 05 49 8C 0A 21 00 10 49 96 0A 54 45 58 54 20 21 |.I..!..I..TEXT !|
00000910: 00 45 49 A0 0A 42 59 54 20 22 13 90 20 20 20 20 |.EI..BYT ".. |
00000920: 20 20 20 20 49 54 53 20 54 48 45 20 43 52 45 44 | ITS THE CRED|
00000930: 49 54 53 20 50 41 47 45 2E 2E 2E 20 20 20 20 20 |ITS PAGE... |
00000940: 20 20 20 20 22 00 78 49 AA 0A 42 59 54 20 22 20 | ".xI..BYT " |
00000950: 20 20 20 20 20 20 20 40 40 40 40 40 40 40 40 40 | @@@@@@@@@|
00000960: 40 40 40 40 40 40 40 40 40 40 40 40 40 40 20 20 |@@@@@@@@@@@@@@ |
00000970: 20 20 20 20 20 20 20 22 00 AC 49 B4 0A 42 59 54 | "..I..BYT|
00000980: 20 22 11 43 4F 44 49 4E 47 3A 20 C1 CE C4 D9 20 | ".CODING: .... |
00000990: 20 20 20 20 20 20 54 45 4C 3A 30 36 38 34 2D 32 | TEL:0684-2|
000009A0: 39 38 37 37 38 20 20 20 20 20 20 22 00 DF 49 B5 |98778 "..I.|
000009B0: 0A 42 59 54 20 22 31 37 2C 57 45 4C 4C 20 43 4C |.BYT "17,WELL CL|
000009C0: 4F 53 45 3A 54 45 57 4B 45 53 42 55 52 59 3A 47 |OSE:TEWKESBURY:G|
000009D0: 4C 4F 53 2E 3A 47 4C 32 30 20 38 52 53 20 22 00 |LOS.:GL20 8RS ".|
000009E0: 12 4A BE 0A 42 59 54 20 22 4E 4F 20 43 4F 4D 50 |.J..BYT "NO COMP|
000009F0: 55 54 45 52 20 47 41 4D 45 20 53 57 41 50 50 49 |UTER GAME SWAPPI|
00000A00: 4E 47 21 21 20 28 C4 C5 CD CF D3 20 4F 4E 4C 59 |NG!! (..... ONLY|
00000A10: 29 22 00 45 4A C8 0A 42 59 54 20 22 47 52 41 46 |)".EJ..BYT "GRAF|
00000A20: 49 58 3A 20 C2 C9 DA DA CD CF 20 20 20 20 20 54 |IX: ...... T|
00000A30: 45 4C 3A 30 33 34 2D 32 38 34 2D 33 33 35 33 20 |EL:034-284-3353 |
00000A40: 20 20 20 20 22 00 4F 4A D2 0A 42 59 54 20 30 00 | ".OJ..BYT 0.|
00000A50: 5B 4A DC 0A 54 45 58 54 31 20 21 00 90 4A E6 0A |[J..TEXT1 !..J..|
00000A60: 42 59 54 20 22 11 11 20 57 41 52 4E 49 4E 47 2E |BYT ".. WARNING.|
00000A70: 2E 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000A90: 00 C3 4A F0 0A 42 59 54 20 22 20 4E 4F 20 53 54 |..J..BYT " NO ST|
00000AA0: 45 41 4C 49 4E 47 2C 48 41 43 4B 49 4E 47 2C 43 |EALING,HACKING,C|
00000AB0: 48 41 4E 47 49 4E 47 2C 52 49 50 50 49 4E 47 2C |HANGING,RIPPING,|
00000AC0: 20 20 22 00 F6 4A FA 0A 42 59 54 20 22 20 45 41 | "..J..BYT " EA|
00000AD0: 54 49 4E 47 2C 48 41 56 49 4E 47 20 53 45 58 20 |TING,HAVING SEX |
00000AE0: 57 49 54 48 2C 44 52 49 4E 4B 49 4E 47 20 57 49 |WITH,DRINKING WI|
00000AF0: 54 48 2C 20 20 22 00 29 4B 04 0B 42 59 54 20 22 |TH, ".)K..BYT "|
00000B00: 20 4F 52 20 42 45 48 41 56 49 4E 47 20 55 4E 2D | OR BEHAVING UN-|
00000B10: 53 4F 43 49 41 4C 41 42 4C 59 20 49 4E 20 46 52 |SOCIALABLY IN FR|
00000B20: 4F 4E 54 20 4F 46 20 20 22 00 5C 4B 0E 0B 42 59 |ONT OF ".\K..BY|
00000B30: 54 20 22 20 54 48 49 53 20 50 52 4F 47 52 41 4D |T " THIS PROGRAM|
00000B40: 20 49 53 20 41 4C 4C 4F 57 45 44 2E 20 20 20 20 | IS ALLOWED. |
00000B50: 20 20 20 20 20 20 20 20 20 20 20 22 00 91 4B 18 | "..K.|
00000B60: 0B 42 59 54 20 22 20 20 20 20 20 20 20 20 20 20 |.BYT " |
00000B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 2E 2E 2E | ...|
00000B80: 4F 52 20 45 4C 53 45 21 20 20 20 20 20 20 22 2C |OR ELSE! ",|
00000B90: 30 00 97 4B 22 0B 21 00 A3 4B 2C 0B 54 45 58 54 |0..K".!..K,.TEXT|
00000BA0: 32 20 21 00 DB 4B 36 0B 42 59 54 20 22 11 11 11 |2 !..K6.BYT "...|
00000BB0: 11 11 20 20 20 20 20 20 20 2D 20 2D 2D 20 54 48 |.. - -- TH|
00000BC0: 4F 53 45 20 57 48 4F 20 57 41 54 43 48 21 20 2D |OSE WHO WATCH! -|
00000BD0: 2D 20 2D 20 20 20 20 20 20 20 22 00 0F 4C 40 0B |- - "..L@.|
00000BE0: 42 59 54 20 22 11 20 44 52 45 41 4D 53 20 42 45 |BYT ". DREAMS BE|
00000BF0: 59 4F 4E 44 20 54 48 45 20 59 4F 55 4E 47 20 55 |YOND THE YOUNG U|
00000C00: 4E 44 45 52 53 54 41 4E 44 49 4E 47 21 20 22 00 |NDERSTANDING! ".|
00000C10: 42 4C 4A 0B 42 59 54 20 22 20 20 28 43 29 20 41 |BLJ.BYT " (C) A|
00000C20: 4E 44 59 20 50 41 52 54 52 49 44 47 45 20 41 4E |NDY PARTRIDGE AN|
00000C30: 44 20 43 44 55 20 31 39 38 39 2D 31 39 39 30 20 |D CDU 1989-1990 |
00000C40: 20 22 00 4C 4C 54 0B 42 59 54 20 30 00 52 4C 5E | ".LLT.BYT 0.RL^|
00000C50: 0B 21 00 61 4C 68 0B 52 45 4C 4F 43 41 54 45 20 |.!.aLh.RELOCATE |
00000C60: 21 00 69 4C 72 0B 53 45 49 00 74 4C 7C 0B 4C 44 |!.iLr.SEI.tL|.LD|
00000C70: 41 20 23 31 00 82 4C 86 0B 53 54 41 20 24 44 30 |A #1..L..STA $D0|
00000C80: 32 31 00 8E 4C 90 0B 53 54 41 20 36 34 36 00 9C |21..L..STA 646..|
00000C90: 4C 9A 0B 4A 53 52 20 24 45 35 34 34 00 AA 4C A4 |L..JSR $E544..L.|
00000CA0: 0B 4A 53 52 20 24 46 44 41 33 00 B8 4C AE 0B 4A |.JSR $FDA3..L..J|
00000CB0: 53 52 20 24 45 35 41 30 00 C3 4C B8 0B 4C 44 41 |SR $E5A0..L..LDA|
00000CC0: 20 23 30 00 D1 4C C2 0B 53 54 41 20 24 44 30 32 | #0..L..STA $D02|
00000CD0: 30 00 DF 4C CC 0B 53 54 41 20 24 44 30 32 31 00 |0..L..STA $D021.|
00000CE0: EC 4C D6 0B 4C 44 41 20 23 24 33 31 00 F9 4C E0 |.L..LDA #$31..L.|
00000CF0: 0B 53 54 41 20 24 33 31 34 00 06 4D EA 0B 4C 44 |.STA $314..M..LD|
00000D00: 41 20 23 24 45 41 00 13 4D F4 0B 53 54 41 20 24 |A #$EA..M..STA $|
00000D10: 33 31 35 00 1F 4D FE 0B 4C 44 41 20 23 32 37 00 |315..M..LDA #27.|
00000D20: 2D 4D 08 0C 53 54 41 20 24 44 30 31 31 00 39 4D |-M..STA $D011.9M|
00000D30: 12 0C 4C 44 41 20 23 32 33 00 47 4D 1C 0C 53 54 |..LDA #23.GM..ST|
00000D40: 41 20 24 44 30 31 38 00 54 4D 26 0C 4C 44 41 20 |A $D018.TM&.LDA |
00000D50: 23 32 34 30 00 62 4D 30 0C 53 54 41 20 24 44 30 |#240.bM0.STA $D0|
00000D60: 31 41 00 6F 4D 3A 0C 4C 44 41 20 23 24 33 34 00 |1A.oM:.LDA #$34.|
00000D70: 7B 4D 44 0C 53 54 41 20 24 30 31 00 86 4D 4E 0C |{MD.STA $01..MN.|
00000D80: 4C 44 58 20 23 30 00 9B 4D 58 0C 50 4F 50 20 4C |LDX #0..MX.POP L|
00000D90: 44 41 20 53 43 52 45 45 4E 2C 58 00 AA 4D 62 0C |DA SCREEN,X..Mb.|
00000DA0: 53 54 41 20 31 30 32 34 2C 58 00 B2 4D 6C 0C 49 |STA 1024,X..Ml.I|
00000DB0: 4E 58 00 BF 4D 76 0C 43 50 58 20 23 31 32 30 00 |NX..Mv.CPX #120.|
00000DC0: CB 4D 80 0C 42 4E 45 20 50 4F 50 00 D3 4D 8A 0C |.M..BNE POP..M..|
00000DD0: 52 54 53 00 E3 4D 94 0C 4A 4D 50 20 31 30 32 34 |RTS..M..JMP 1024|
00000DE0: AA 34 30 00 E9 4D 9E 0C 21 00 F6 4D A8 0C 53 43 |.40..M..!..M..SC|
00000DF0: 52 45 45 4E 20 21 00 29 4E B2 0C 42 59 54 20 22 |REEN !.)N..BYT "|
00000E00: 52 45 41 44 20 41 4C 4C 20 54 48 45 20 54 45 58 |READ ALL THE TEX|
00000E10: 54 53 3A 54 48 45 59 20 53 48 4F 55 4C 44 20 42 |TS:THEY SHOULD B|
00000E20: 45 20 46 55 4E 4E 59 21 22 00 39 4E BC 0C 4C 44 |E FUNNY!".9N..LD|
00000E30: 41 20 23 B3 24 34 30 30 30 00 45 4E C6 0C 53 54 |A #.$4000.EN..ST|
00000E40: 41 20 24 30 32 00 55 4E D0 0C 4C 44 41 20 23 B1 |A $02.UN..LDA #.|
00000E50: 24 34 30 30 30 00 61 4E DA 0C 53 54 41 20 24 30 |$4000.aN..STA $0|
00000E60: 33 00 71 4E E4 0C 4C 44 41 20 23 B3 24 30 38 30 |3.qN..LDA #.$080|
00000E70: 31 00 7D 4E EE 0C 53 54 41 20 24 30 34 00 8D 4E |1.}N..STA $04..N|
00000E80: F8 0C 4C 44 41 20 23 B1 24 30 38 30 31 00 99 4E |..LDA #.$0801..N|
00000E90: 02 0D 53 54 41 20 24 30 35 00 9F 4E 0C 0D 21 00 |..STA $05..N..!.|
00000EA0: AB 4E 16 0D 4C 4F 4F 50 59 20 21 00 B9 4E 20 0D |.N..LOOPY !..N .|
00000EB0: 52 31 20 4C 44 59 20 23 30 00 CC 4E 2A 0D 52 32 |R1 LDY #0..N*.R2|
00000EC0: 20 4C 44 41 20 28 24 30 32 29 2C 59 00 DC 4E 34 | LDA ($02),Y..N4|
00000ED0: 0D 53 54 41 20 28 24 30 34 29 2C 59 00 EA 4E 3E |.STA ($04),Y..N>|
00000EE0: 0D 49 4E 43 20 24 30 34 30 30 00 F2 4E 48 0D 49 |.INC $0400..NH.I|
00000EF0: 4E 59 00 FD 4E 52 0D 42 4E 45 20 52 32 00 09 4F |NY..NR.BNE R2..O|
00000F00: 5C 0D 49 4E 43 20 24 30 33 00 15 4F 66 0D 49 4E |\.INC $03..Of.IN|
00000F10: 43 20 24 30 35 00 21 4F 70 0D 4C 44 41 20 24 30 |C $05.!Op.LDA $0|
00000F20: 33 00 2E 4F 7A 0D 43 4D 50 20 23 24 46 46 00 39 |3..Oz.CMP #$FF.9|
00000F30: 4F 84 0D 42 4E 45 20 52 31 00 3F 4F 8E 0D 21 00 |O..BNE R1.?O..!.|
00000F40: 4C 4F 98 0D 4C 44 41 20 23 24 33 37 00 58 4F A2 |LO..LDA #$37.XO.|
00000F50: 0D 53 54 41 20 24 30 31 00 60 4F AC 0D 43 4C 49 |.STA $01.`O..CLI|
00000F60: 00 66 4F B6 0D 21 00 74 4F C0 0D 4A 53 52 20 24 |.fO..!.tO..JSR $|
00000F70: 41 36 35 45 00 82 4F CA 0D 4A 53 52 20 24 41 36 |A65E..O..JSR $A6|
00000F80: 38 45 00 90 4F D4 0D 4A 4D 50 20 24 41 37 41 45 |8E..O..JMP $A7AE|
00000F90: 00 B6 4F DE 0D 42 59 54 20 22 2D 20 52 45 4C 4F |..O..BYT "- RELO|
00000FA0: 43 41 54 4F 2D 4D 41 54 49 43 21 20 28 41 4E 44 |CATO-MATIC! (AND|
00000FB0: 59 27 38 39 29 22 00 00 00 |Y'89)"... |
.@.@..SPEED.3.&@..LINE.1024.40.(16.40).;
@..CLINE.LINE.54272.H@..MESS.$AA.Z@..MES
SAGE.$0A00.`@..!.L@$...$3000.R@..!.}@8.L
DA #0..@B.STA $D020..@L.STA $D021..@V.ST
A 646..@W.TAX..@X.JSR $157B.I@`.JSR $E54
4.O@J.!..@T.LDA $D011..@~.. #239..@..STA
$D011..A..LDX #0..A..LDA #.TEXT..A..LDY
#.TEXT.-A..JSR $AB1E.=A..LDA #.TEXT1.MA
D.LDY #.TEXT1.[AN.JSR $AB1E.KAX.LDA #.TE
XT2.{A..LDY #.TEXT2..A..JSR $AB1E..A..JS
R INITMESS..A..LDA #0..A..STA $2001..A..
LDA #1.LA..STA $D014.RA2.!..A<.SETIRQ !.
.AF.SEI..AP.LDA #$7F..BZ.STA $DC0D..BD.L
DA $DC0D..BN.LDA #$1B.+BX.STA $D011.?B..
LDA #$38.(16.8).MB..STA $D012.[B..LDA #.
IRQ.HB .STA $314.VB..LDA #.IRQ..B..STA $
315..B..LDA #1..BH.STA $D019..BR.STA $D0
1A..B..CLI.AB...Y LDA 197.MB..CMP #60.XB
..BNE .Y..B..JMP RELOCATE..B..!..B..IRQ
!..C..LDA #$5B..C..STA $D011."C".LDA $D0
16.-C,.. #$F0.7C6..A X..EC@.STA $D016.QC
J.LDA #25._CT.STA 53272.EC^.!.QCH.LDX #$
4.|CR.I1 DEX..C|.BNE I1..C..I2 LDY DELTA
B,X..C..LDA COLTAB,X..C..I3 DEY.BC..BNE
I3.PC..STA $D021..C..STA $D021..CB.INX..
CL.CPX #10..CV.BNE I2..D..LDX #8..D..I4
DEX..D..BNE I4.$D..!./D..LDA #1.=D..STA
$D019.JD..LDA #$1B.YD&.!STA $D011.FD0.LD
A #200.TD:.STA $D016..DD.LDA #12..DN.STA
$D021..DX.JSR ROLL..DB.JSR SCROLL..DC.J
SR $107E.FDL.JMP $EA31.LDV.!..D..DELTAB
BYT 8,8,1,8,8,8,8,8,8,8,1,8..E..COLTAB B
YT 0,6,2,4,$A,$F,7,1,0,0,0. E..!.NE..T23
BYT 6,2,4,$A,$F,7,1,7,$F,$A,4,2,6,$FF.V
E..T24 BYT $B,$C,$F,7,1,7,$F,$C,$B,$FF..
E..T22 BYT 6,14,14,3,1,1,3,14,14,6,$FF..
E..C23 BRK..EF.C24 BRK.FEP.COUNT BYT 3.L
EZ.!.WE..ROLL !..E..DEC COUNT..E..LDA CO
UNT..E..BEQ ..3..F..RTS..F..LDA #3. F .S
TA COUNT.&F*.!.2F4.INC C23.>F>.INC C24.D
FH.!.PFR.LDX C23.^F\.LDA T23,X.KFF.CMP #
$FF.XFP.BNE NO23..FZ.LDA #0..F..STA C23.
.F..NO23 STA $D024..F..!..F..LDX C24.BF.
.LDA T24,X.OF..CMP #$FF..F..BNE NO24..FJ
.LDA #0..FT.STA C24..G..NO24 STA $D022..
G..LDA #12. G..STA $D023.(G..RTS..G..!.;
G..SCROLL !.FG..LDA X..NG$.SEC.]G..SBC #
SPEED.FG8.. #7.QGB.STA X..}GL.BCC SC1..G
V.RTS..G`.!..GJ.X. BRK..GT.!..G~.SC1 LDY
#0..G..SC2 LDA LINE.1,Y.OG..STA LINE,Y.
WG..INY..G..CPY #40..G..BNE SC2..G..JSR
.CHAR..HD.STA LINE.39..HN.RTS..HX.!.*H..
INITMESS !.<H..LDA #.MESSAGE.IH..STA MES
S.[H..LDA #.MESSAGE.JH..STA MESS.1.RH..R
TS.XH..!..H(..CHAR !..H2.LDY #0. H<.LDA
(MESS),Y..HF.BNE GC1..HP.JSR INITMESS.KH
Z.JMP .CHAR..HD.GC1 INC MESS..HN.BNE ..4
..HX.INC MESS.1..H..RTS..I..!..I..TEXT !
.EI .BYT ".. ITS THE CREDITS PAGE
... ".XI..BYT " @@@@@@@@@
@@@@@@@@@@@@@@ "..I..BYT ".CODIN
G: ANDY TEL:0684-298778 "..I.
.BYT "17,WELL CLOSE:TEWKESBURY:GLOS.:GL2
0 8RS "..J..BYT "NO COMPUTER GAME SWAPPI
NG!! (DEMOS ONLY)".EJH.BYT "GRAFIX: BIZZ
MO TEL:034-284-3353 ".OJR.BYT 0.
[J..TEXT1 !..J..BYT ".. WARNING...
".CJ..BYT " NO ST
EALING,HACKING,CHANGING,RIPPING, "..J..
BYT " EATING,HAVING SEX WITH,DRINKING WI
TH, ".)K..BYT " OR BEHAVING UN-SOCIALAB
LY IN FRONT OF ".\K..BYT " THIS PROGRAM
IS ALLOWED. "..K..BYT "
...OR ELSE! ",
0..K".!..K,.TEXT2 !..K6.BYT ".....
- -- THOSE WHO WATCH! -- - "..L@.
BYT ". DREAMS BEYOND THE YOUNG UNDERSTAN
DING! ".BLJ.BYT " (C) ANDY PARTRIDGE AN
D CDU 1989-1990 ".LLT.BYT 0.RL^.!.ALH.R
ELOCATE !.ILR.SEI.TL|.LDA #1..L..STA $D0
21..L..STA 646..L..JSR $E544..L..JSR $FD
A3..L..JSR $E5A0.CL..LDA #0.QLB.STA $D02
0..LL.STA $D021..LV.LDA #$31..L..STA $31
4..M..LDA #$EA..M..STA $315..M..LDA #27.
-M..STA $D011.9M..LDA #23.GM..STA $D018.
TM&.LDA #240.BM0.STA $D01A.OM:.LDA #$34.
{MD.STA $01..MN.LDX #0..MX.POP LDA SCREE
N,X..MB.STA 1024,X..ML.INX..MV.CPX #120.
KM..BNE POP.SM..RTS..M..JMP 1024.40..M..
!..M..SCREEN !.)N..BYT "READ ALL THE TEX
TS:THEY SHOULD BE FUNNY!".9N..LDA #.$400
0.ENF.STA $02.UNP.LDA #.$4000.ANZ.STA $0
3.QN..LDA #.$0801.}N..STA $04..N..LDA #.
$0801..N..STA $05..N..!..N..LOOPY !..N .
R1 LDY #0.LN*.R2 LDA ($02),Y..N4.STA ($0
4),Y..N>.INC $0400..NH.INY..NR.BNE R2..O
\.INC $03..OF.INC $05.!OP.LDA $03..OZ.CM
P #$FF.9O..BNE R1.?O..!.LO..LDA #$37.XO.
.STA $01.`O..CLI.FO..!.TO..JSR $A65E..OJ
.JSR $A68E..OT.JMP $A7AE..O..BYT "- RELO
CATO-MATIC! (ANDY'89)"...
> CLICK IMAGE PREVIEW FOR FULL MODAL