INTRO6@
FILE INFORMATION
FILENAME(S): INTRO6@
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-12-02 00:16:25
APPEARS ON: 1 disk(s)
FILE HASH
986fa21428f40c1bb17675deed78ec9b0409a82f1e0162da671f1cb67c225b1f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CDU DEMO | INTRO6@ | PRG | Maestro | 20 | 3 | 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 34 39 31 35 32 00 72 40 2E |.l@$...49152.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: 38 30 31 00 BE 41 0B 05 4C 44 41 20 23 31 00 CC |801..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 C0 42 E6 05 AF 59 20 4A 4D 50 20 AF 59 |LI..B...Y JMP .Y|
000002C0: 00 C8 42 F0 05 52 54 53 00 CE 42 FA 05 21 00 D8 |..B..RTS..B..!..|
000002D0: 42 04 06 49 52 51 20 21 00 E5 42 0E 06 4C 44 41 |B..IRQ !..B..LDA|
000002E0: 20 23 24 35 42 00 F3 42 18 06 53 54 41 20 24 44 | #$5B..B..STA $D|
000002F0: 30 31 31 00 01 43 22 06 4C 44 41 20 24 44 30 31 |011..C".LDA $D01|
00000300: 36 00 0C 43 2C 06 AF 20 23 24 46 30 00 16 43 36 |6..C,.. #$F0..C6|
00000310: 06 B0 41 20 58 B9 00 24 43 40 06 53 54 41 20 24 |..A X..$C@.STA $|
00000320: 44 30 31 36 00 30 43 4A 06 4C 44 41 20 23 32 35 |D016.0CJ.LDA #25|
00000330: 00 3E 43 54 06 53 54 41 20 35 33 32 37 32 00 44 |.>CT.STA 53272.D|
00000340: 43 5E 06 21 00 50 43 68 06 4C 44 58 20 23 24 34 |C^.!.PCh.LDX #$4|
00000350: 00 5B 43 72 06 49 31 20 44 45 58 00 66 43 7C 06 |.[Cr.I1 DEX.fC|.|
00000360: 42 4E 45 20 49 31 00 7A 43 86 06 49 32 20 4C 44 |BNE I1.zC..I2 LD|
00000370: 59 20 44 45 4C 54 41 42 2C 58 00 8B 43 90 06 4C |Y DELTAB,X..C..L|
00000380: 44 41 20 43 4F 4C 54 41 42 2C 58 00 96 43 9A 06 |DA COLTAB,X..C..|
00000390: 49 33 20 44 45 59 00 A1 43 A4 06 42 4E 45 20 49 |I3 DEY..C..BNE I|
000003A0: 33 00 AF 43 AE 06 53 54 41 20 24 44 30 32 31 00 |3..C..STA $D021.|
000003B0: BD 43 B8 06 53 54 41 20 24 44 30 32 31 00 C5 43 |.C..STA $D021..C|
000003C0: C2 06 49 4E 58 00 D1 43 CC 06 43 50 58 20 23 31 |..INX..C..CPX #1|
000003D0: 30 00 DC 43 D6 06 42 4E 45 20 49 32 00 E7 43 E0 |0..C..BNE I2..C.|
000003E0: 06 4C 44 58 20 23 38 00 F2 43 EA 06 49 34 20 44 |.LDX #8..C..I4 D|
000003F0: 45 58 00 FD 43 F4 06 42 4E 45 20 49 34 00 03 44 |EX..C..BNE I4..D|
00000400: FE 06 21 00 0E 44 08 07 4C 44 41 20 23 31 00 1C |..!..D..LDA #1..|
00000410: 44 12 07 53 54 41 20 24 44 30 31 39 00 29 44 1C |D..STA $D019.)D.|
00000420: 07 4C 44 41 20 23 24 31 42 00 38 44 26 07 21 53 |.LDA #$1B.8D&.!S|
00000430: 54 41 20 24 44 30 31 31 00 45 44 30 07 4C 44 41 |TA $D011.ED0.LDA|
00000440: 20 23 32 30 30 00 53 44 3A 07 53 54 41 20 24 44 | #200.SD:.STA $D|
00000450: 30 31 36 00 5F 44 44 07 4C 44 41 20 23 31 32 00 |016._DD.LDA #12.|
00000460: 6D 44 4E 07 53 54 41 20 24 44 30 32 31 00 7A 44 |mDN.STA $D021.zD|
00000470: 58 07 4A 53 52 20 52 4F 4C 4C 00 89 44 62 07 4A |X.JSR ROLL..Db.J|
00000480: 53 52 20 53 43 52 4F 4C 4C 00 97 44 63 07 4A 53 |SR SCROLL..Dc.JS|
00000490: 52 20 24 31 30 37 45 00 A5 44 6C 07 4A 4D 50 20 |R $107E..Dl.JMP |
000004A0: 24 45 41 33 31 00 AB 44 76 07 21 00 D2 44 80 07 |$EA31..Dv.!..D..|
000004B0: 44 45 4C 54 41 42 20 42 59 54 20 38 2C 38 2C 31 |DELTAB BYT 8,8,1|
000004C0: 2C 38 2C 38 2C 38 2C 38 2C 38 2C 38 2C 38 2C 31 |,8,8,8,8,8,8,8,1|
000004D0: 2C 38 00 F9 44 8A 07 43 4F 4C 54 41 42 20 42 59 |,8..D..COLTAB BY|
000004E0: 54 20 30 2C 36 2C 32 2C 34 2C 24 41 2C 24 46 2C |T 0,6,2,4,$A,$F,|
000004F0: 37 2C 31 2C 30 2C 30 2C 30 00 FF 44 94 07 21 00 |7,1,0,0,0..D..!.|
00000500: 2D 45 9E 07 54 32 33 20 42 59 54 20 36 2C 32 2C |-E..T23 BYT 6,2,|
00000510: 34 2C 24 41 2C 24 46 2C 37 2C 31 2C 37 2C 24 46 |4,$A,$F,7,1,7,$F|
00000520: 2C 24 41 2C 34 2C 32 2C 36 2C 24 46 46 00 55 45 |,$A,4,2,6,$FF.UE|
00000530: A8 07 54 32 34 20 42 59 54 20 24 42 2C 24 43 2C |..T24 BYT $B,$C,|
00000540: 24 46 2C 37 2C 31 2C 37 2C 24 46 2C 24 43 2C 24 |$F,7,1,7,$F,$C,$|
00000550: 42 2C 24 46 46 00 7D 45 B2 07 54 32 32 20 42 59 |B,$FF.}E..T22 BY|
00000560: 54 20 36 2C 31 34 2C 31 34 2C 33 2C 31 2C 31 2C |T 6,14,14,3,1,1,|
00000570: 33 2C 31 34 2C 31 34 2C 36 2C 24 46 46 00 89 45 |3,14,14,6,$FF..E|
00000580: BC 07 43 32 33 20 42 52 4B 00 95 45 C6 07 43 32 |..C23 BRK..E..C2|
00000590: 34 20 42 52 4B 00 A5 45 D0 07 43 4F 55 4E 54 20 |4 BRK..E..COUNT |
000005A0: 42 59 54 20 33 00 AB 45 DA 07 21 00 B6 45 E4 07 |BYT 3..E..!..E..|
000005B0: 52 4F 4C 4C 20 21 00 C4 45 EE 07 44 45 43 20 43 |ROLL !..E..DEC C|
000005C0: 4F 55 4E 54 00 D2 45 F8 07 4C 44 41 20 43 4F 55 |OUNT..E..LDA COU|
000005D0: 4E 54 00 DE 45 02 08 42 45 51 20 AC AA 33 00 E6 |NT..E..BEQ ..3..|
000005E0: 45 0C 08 52 54 53 00 F1 45 16 08 4C 44 41 20 23 |E..RTS..E..LDA #|
000005F0: 33 00 FF 45 20 08 53 54 41 20 43 4F 55 4E 54 00 |3..E .STA COUNT.|
00000600: 05 46 2A 08 21 00 11 46 34 08 49 4E 43 20 43 32 |.F*.!..F4.INC C2|
00000610: 33 00 1D 46 3E 08 49 4E 43 20 43 32 34 00 23 46 |3..F>.INC C24.#F|
00000620: 48 08 21 00 2F 46 52 08 4C 44 58 20 43 32 33 00 |H.!./FR.LDX C23.|
00000630: 3D 46 5C 08 4C 44 41 20 54 32 33 2C 58 00 4A 46 |=F\.LDA T23,X.JF|
00000640: 66 08 43 4D 50 20 23 24 46 46 00 57 46 70 08 42 |f.CMP #$FF.WFp.B|
00000650: 4E 45 20 4E 4F 32 33 00 62 46 7A 08 4C 44 41 20 |NE NO23.bFz.LDA |
00000660: 23 30 00 6E 46 84 08 53 54 41 20 43 32 33 00 81 |#0.nF..STA C23..|
00000670: 46 8E 08 4E 4F 32 33 20 53 54 41 20 24 44 30 32 |F..NO23 STA $D02|
00000680: 34 00 87 46 98 08 21 00 93 46 A2 08 4C 44 58 20 |4..F..!..F..LDX |
00000690: 43 32 34 00 A1 46 AC 08 4C 44 41 20 54 32 34 2C |C24..F..LDA T24,|
000006A0: 58 00 AE 46 B6 08 43 4D 50 20 23 24 46 46 00 BB |X..F..CMP #$FF..|
000006B0: 46 C0 08 42 4E 45 20 4E 4F 32 34 00 C6 46 CA 08 |F..BNE NO24..F..|
000006C0: 4C 44 41 20 23 30 00 D2 46 D4 08 53 54 41 20 43 |LDA #0..F..STA C|
000006D0: 32 34 00 E5 46 DE 08 4E 4F 32 34 20 53 54 41 20 |24..F..NO24 STA |
000006E0: 24 44 30 32 32 00 F1 46 E8 08 4C 44 41 20 23 31 |$D022..F..LDA #1|
000006F0: 32 00 FF 46 F2 08 53 54 41 20 24 44 30 32 33 00 |2..F..STA $D023.|
00000700: 07 47 FC 08 52 54 53 00 0D 47 06 09 21 00 1A 47 |.G..RTS..G..!..G|
00000710: 10 09 53 43 52 4F 4C 4C 20 21 00 25 47 1A 09 4C |..SCROLL !.%G..L|
00000720: 44 41 20 58 B9 00 2D 47 24 09 53 45 43 00 3C 47 |DA X..-G$.SEC.<G|
00000730: 2E 09 53 42 43 20 23 53 50 45 45 44 00 45 47 38 |..SBC #SPEED.EG8|
00000740: 09 AF 20 23 37 00 50 47 42 09 53 54 41 20 58 B9 |.. #7.PGB.STA X.|
00000750: 00 5C 47 4C 09 42 43 43 20 53 43 31 00 64 47 56 |.\GL.BCC SC1.dGV|
00000760: 09 52 54 53 00 6A 47 60 09 21 00 75 47 6A 09 58 |.RTS.jG`.!.uGj.X|
00000770: B9 20 42 52 4B 00 7B 47 74 09 21 00 8A 47 7E 09 |. BRK.{Gt.!..G~.|
00000780: 53 43 31 20 4C 44 59 20 23 30 00 9F 47 88 09 53 |SC1 LDY #0..G..S|
00000790: 43 32 20 4C 44 41 20 4C 49 4E 45 AA 31 2C 59 00 |C2 LDA LINE.1,Y.|
000007A0: AE 47 92 09 53 54 41 20 4C 49 4E 45 2C 59 00 B6 |.G..STA LINE,Y..|
000007B0: 47 9C 09 49 4E 59 00 C2 47 A6 09 43 50 59 20 23 |G..INY..G..CPY #|
000007C0: 34 30 00 CE 47 B0 09 42 4E 45 20 53 43 32 00 DC |40..G..BNE SC2..|
000007D0: 47 BA 09 4A 53 52 20 A1 43 48 41 52 00 EC 47 C4 |G..JSR .CHAR..G.|
000007E0: 09 53 54 41 20 4C 49 4E 45 AA 33 39 00 F4 47 CE |.STA LINE.39..G.|
000007F0: 09 52 54 53 00 FA 47 D8 09 21 00 09 48 E2 09 49 |.RTS..G..!..H..I|
00000800: 4E 49 54 4D 45 53 53 20 21 00 1B 48 EC 09 4C 44 |NITMESS !..H..LD|
00000810: 41 20 23 B3 4D 45 53 53 41 47 45 00 28 48 F6 09 |A #.MESSAGE.(H..|
00000820: 53 54 41 20 4D 45 53 53 00 3A 48 00 0A 4C 44 41 |STA MESS.:H..LDA|
00000830: 20 23 B1 4D 45 53 53 41 47 45 00 49 48 0A 0A 53 | #.MESSAGE.IH..S|
00000840: 54 41 20 4D 45 53 53 AA 31 00 51 48 14 0A 52 54 |TA MESS.1.QH..RT|
00000850: 53 00 57 48 1E 0A 21 00 63 48 28 0A A1 43 48 41 |S.WH..!.cH(..CHA|
00000860: 52 20 21 00 6E 48 32 0A 4C 44 59 20 23 30 00 7F |R !.nH2.LDY #0..|
00000870: 48 3C 0A 4C 44 41 20 28 4D 45 53 53 29 2C 59 00 |H<.LDA (MESS),Y.|
00000880: 8B 48 46 0A 42 4E 45 20 47 43 31 00 9C 48 50 0A |.HF.BNE GC1..HP.|
00000890: 4A 53 52 20 49 4E 49 54 4D 45 53 53 00 AA 48 5A |JSR INITMESS..HZ|
000008A0: 0A 4A 4D 50 20 A1 43 48 41 52 00 BB 48 64 0A 47 |.JMP .CHAR..Hd.G|
000008B0: 43 31 20 49 4E 43 20 4D 45 53 53 00 C7 48 6E 0A |C1 INC MESS..Hn.|
000008C0: 42 4E 45 20 AC AA 34 00 D6 48 78 0A 49 4E 43 20 |BNE ..4..Hx.INC |
000008D0: 4D 45 53 53 AA 31 00 DE 48 82 0A 52 54 53 00 E4 |MESS.1..H..RTS..|
000008E0: 48 8C 0A 21 00 EF 48 96 0A 54 45 58 54 20 21 00 |H..!..H..TEXT !.|
000008F0: 24 49 A0 0A 42 59 54 20 22 13 90 20 20 20 20 20 |$I..BYT ".. |
00000900: 20 20 20 49 54 53 20 54 48 45 20 43 52 45 44 49 | ITS THE CREDI|
00000910: 54 53 20 50 41 47 45 2E 2E 2E 20 20 20 20 20 20 |TS PAGE... |
00000920: 20 20 20 22 00 57 49 AA 0A 42 59 54 20 22 20 20 | ".WI..BYT " |
00000930: 20 20 20 20 20 20 40 40 40 40 40 40 40 40 40 40 | @@@@@@@@@@|
00000940: 40 40 40 40 40 40 40 40 40 40 40 40 40 20 20 20 |@@@@@@@@@@@@@ |
00000950: 20 20 20 20 20 20 22 00 8B 49 B4 0A 42 59 54 20 | "..I..BYT |
00000960: 22 11 43 4F 44 49 4E 47 3A 20 C1 CE C4 D9 20 20 |".CODING: .... |
00000970: 20 20 20 20 20 54 45 4C 3A 30 36 38 34 2D 32 39 | TEL:0684-29|
00000980: 38 37 37 38 20 20 20 20 20 20 22 00 BE 49 B5 0A |8778 "..I..|
00000990: 42 59 54 20 22 20 31 37 2C 57 45 4C 4C 20 43 4C |BYT " 17,WELL CL|
000009A0: 4F 53 45 3A 54 45 57 4B 45 53 42 55 52 59 3A 47 |OSE:TEWKESBURY:G|
000009B0: 4C 4F 53 3A 47 4C 32 30 20 38 52 53 20 22 00 F1 |LOS:GL20 8RS "..|
000009C0: 49 BE 0A 42 59 54 20 22 47 52 41 46 49 58 3A 20 |I..BYT "GRAFIX: |
000009D0: C2 C9 DA DA CD CF 20 20 20 20 20 54 45 4C 3A 30 |...... TEL:0|
000009E0: 33 33 2D 20 20 20 20 20 20 20 20 20 20 20 20 20 |33- |
000009F0: 22 00 24 4A C8 0A 42 59 54 20 22 4E 4F 20 43 4F |".$J..BYT "NO CO|
00000A00: 4D 50 55 54 45 52 20 47 41 4D 45 20 53 57 41 50 |MPUTER GAME SWAP|
00000A10: 50 49 4E 47 21 21 20 28 C4 C5 CD CF D3 20 4F 4E |PING!! (..... ON|
00000A20: 4C 59 29 22 00 2E 4A D2 0A 42 59 54 20 30 00 3A |LY)"..J..BYT 0.:|
00000A30: 4A DC 0A 54 45 58 54 31 20 21 00 6F 4A E6 0A 42 |J..TEXT1 !.oJ..B|
00000A40: 59 54 20 22 11 11 20 57 41 52 4E 49 4E 47 2E 2E |YT ".. WARNING..|
00000A50: 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00000A70: A2 4A F0 0A 42 59 54 20 22 20 4E 4F 20 53 54 45 |.J..BYT " NO STE|
00000A80: 41 4C 49 4E 47 2C 48 41 43 4B 49 4E 47 2C 43 48 |ALING,HACKING,CH|
00000A90: 41 4E 47 49 4E 47 2C 52 49 50 50 49 4E 47 2C 20 |ANGING,RIPPING, |
00000AA0: 20 22 00 D5 4A FA 0A 42 59 54 20 22 20 45 41 54 | "..J..BYT " EAT|
00000AB0: 49 4E 47 2C 48 41 56 49 4E 47 20 53 45 58 20 57 |ING,HAVING SEX W|
00000AC0: 49 54 48 2C 44 52 49 4E 4B 49 4E 47 20 57 49 54 |ITH,DRINKING WIT|
00000AD0: 48 2C 20 20 22 00 08 4B 04 0B 42 59 54 20 22 20 |H, "..K..BYT " |
00000AE0: 4F 52 20 42 45 48 41 56 49 4E 47 20 55 4E 2D 53 |OR BEHAVING UN-S|
00000AF0: 4F 43 49 41 4C 41 42 4C 59 20 49 4E 20 46 52 4F |OCIALABLY IN FRO|
00000B00: 4E 54 20 4F 46 20 20 22 00 3B 4B 0E 0B 42 59 54 |NT OF ".;K..BYT|
00000B10: 20 22 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 | " THIS PROGRAM |
00000B20: 49 53 20 41 4C 4C 4F 57 45 44 2E 20 20 20 20 20 |IS ALLOWED. |
00000B30: 20 20 20 20 20 20 20 20 20 20 22 00 70 4B 18 0B | ".pK..|
00000B40: 42 59 54 20 22 20 20 20 20 20 20 20 20 20 20 20 |BYT " |
00000B50: 20 20 20 20 20 20 20 20 20 20 20 20 2E 2E 2E 4F | ...O|
00000B60: 52 20 45 4C 53 45 21 20 20 20 20 20 20 22 2C 30 |R ELSE! ",0|
00000B70: 00 76 4B 22 0B 21 00 82 4B 2C 0B 54 45 58 54 32 |.vK".!..K,.TEXT2|
00000B80: 20 21 00 B9 4B 36 0B 42 59 54 20 22 11 11 11 11 | !..K6.BYT "....|
00000B90: 20 20 20 20 20 20 20 2D 20 2D 2D 20 54 48 4F 53 | - -- THOS|
00000BA0: 45 20 57 48 4F 20 57 41 54 43 48 21 20 2D 2D 20 |E WHO WATCH! -- |
00000BB0: 2D 20 20 20 20 20 20 20 22 00 ED 4B 40 0B 42 59 |- "..K@.BY|
00000BC0: 54 20 22 11 20 44 52 45 41 4D 53 20 42 45 59 4F |T ". DREAMS BEYO|
00000BD0: 4E 44 20 54 48 45 20 59 4F 55 4E 47 20 55 4E 44 |ND THE YOUNG UND|
00000BE0: 45 52 53 54 41 4E 44 49 4E 47 21 20 22 00 20 4C |ERSTANDING! ". L|
00000BF0: 4A 0B 42 59 54 20 22 20 20 28 43 29 20 41 4E 44 |J.BYT " (C) AND|
00000C00: 59 20 50 41 52 54 52 49 44 47 45 20 41 4E 44 20 |Y PARTRIDGE AND |
00000C10: 43 44 55 20 31 39 38 39 2D 31 39 39 30 20 20 22 |CDU 1989-1990 "|
00000C20: 00 2A 4C 54 0B 42 59 54 20 30 00 30 4C 5E 0B 21 |.*LT.BYT 0.0L^.!|
00000C30: 00 3F 4C 68 0B 52 45 4C 4F 43 41 54 45 20 21 00 |.?Lh.RELOCATE !.|
00000C40: 47 4C 72 0B 53 45 49 00 52 4C 7C 0B 4C 44 41 20 |GLr.SEI.RL|.LDA |
00000C50: 23 31 00 60 4C 86 0B 53 54 41 20 24 44 30 32 31 |#1.`L..STA $D021|
00000C60: 00 6C 4C 90 0B 53 54 41 20 36 34 36 00 7A 4C 9A |.lL..STA 646.zL.|
00000C70: 0B 4A 53 52 20 24 45 35 34 34 00 88 4C A4 0B 4A |.JSR $E544..L..J|
00000C80: 53 52 20 24 46 44 41 33 00 96 4C AE 0B 4A 53 52 |SR $FDA3..L..JSR|
00000C90: 20 24 45 35 41 30 00 A1 4C B8 0B 4C 44 41 20 23 | $E5A0..L..LDA #|
00000CA0: 30 00 AF 4C C2 0B 53 54 41 20 24 44 30 32 30 00 |0..L..STA $D020.|
00000CB0: BD 4C CC 0B 53 54 41 20 24 44 30 32 31 00 CA 4C |.L..STA $D021..L|
00000CC0: D6 0B 4C 44 41 20 23 24 33 31 00 D7 4C E0 0B 53 |..LDA #$31..L..S|
00000CD0: 54 41 20 24 33 31 34 00 E4 4C EA 0B 4C 44 41 20 |TA $314..L..LDA |
00000CE0: 23 24 45 41 00 F1 4C F4 0B 53 54 41 20 24 33 31 |#$EA..L..STA $31|
00000CF0: 35 00 FD 4C FE 0B 4C 44 41 20 23 32 37 00 0B 4D |5..L..LDA #27..M|
00000D00: 08 0C 53 54 41 20 24 44 30 31 31 00 17 4D 12 0C |..STA $D011..M..|
00000D10: 4C 44 41 20 23 32 33 00 25 4D 1C 0C 53 54 41 20 |LDA #23.%M..STA |
00000D20: 24 44 30 31 38 00 32 4D 26 0C 4C 44 41 20 23 32 |$D018.2M&.LDA #2|
00000D30: 34 30 00 40 4D 30 0C 53 54 41 20 24 44 30 31 41 |40.@M0.STA $D01A|
00000D40: 00 4D 4D 3A 0C 4C 44 41 20 23 24 33 34 00 59 4D |.MM:.LDA #$34.YM|
00000D50: 44 0C 53 54 41 20 24 30 31 00 64 4D 4E 0C 4C 44 |D.STA $01.dMN.LD|
00000D60: 58 20 23 30 00 79 4D 58 0C 50 4F 50 20 4C 44 41 |X #0.yMX.POP LDA|
00000D70: 20 53 43 52 45 45 4E 2C 58 00 88 4D 62 0C 53 54 | SCREEN,X..Mb.ST|
00000D80: 41 20 31 30 32 34 2C 58 00 90 4D 6C 0C 49 4E 58 |A 1024,X..Ml.INX|
00000D90: 00 9D 4D 76 0C 43 50 58 20 23 31 32 30 00 A9 4D |..Mv.CPX #120..M|
00000DA0: 80 0C 42 4E 45 20 50 4F 50 00 B1 4D 8A 0C 52 54 |..BNE POP..M..RT|
00000DB0: 53 00 C1 4D 94 0C 4A 4D 50 20 31 30 32 34 AA 34 |S..M..JMP 1024.4|
00000DC0: 30 00 C7 4D 9E 0C 21 00 D4 4D A8 0C 53 43 52 45 |0..M..!..M..SCRE|
00000DD0: 45 4E 20 21 00 07 4E B2 0C 42 59 54 20 22 20 28 |EN !..N..BYT " (|
00000DE0: 43 29 20 54 48 45 20 45 58 43 45 53 53 20 44 45 |C) THE EXCESS DE|
00000DF0: 53 49 47 4E 20 47 52 4F 55 50 20 31 39 38 39 20 |SIGN GROUP 1989 |
00000E00: 20 20 20 20 20 20 22 00 17 4E BC 0C 4C 44 41 20 | "..N..LDA |
00000E10: 23 B3 24 34 30 30 30 00 23 4E C6 0C 53 54 41 20 |#.$4000.#N..STA |
00000E20: 24 30 32 00 33 4E D0 0C 4C 44 41 20 23 B1 24 34 |$02.3N..LDA #.$4|
00000E30: 30 30 30 00 3F 4E DA 0C 53 54 41 20 24 30 33 00 |000.?N..STA $03.|
00000E40: 4F 4E E4 0C 4C 44 41 20 23 B3 24 30 38 30 31 00 |ON..LDA #.$0801.|
00000E50: 5B 4E EE 0C 53 54 41 20 24 30 34 00 6B 4E F8 0C |[N..STA $04.kN..|
00000E60: 4C 44 41 20 23 B1 24 30 38 30 31 00 77 4E 02 0D |LDA #.$0801.wN..|
00000E70: 53 54 41 20 24 30 35 00 7D 4E 0C 0D 21 00 89 4E |STA $05.}N..!..N|
00000E80: 16 0D 4C 4F 4F 50 59 20 21 00 97 4E 20 0D 52 31 |..LOOPY !..N .R1|
00000E90: 20 4C 44 59 20 23 30 00 AA 4E 2A 0D 52 32 20 4C | LDY #0..N*.R2 L|
00000EA0: 44 41 20 28 24 30 32 29 2C 59 00 BA 4E 34 0D 53 |DA ($02),Y..N4.S|
00000EB0: 54 41 20 28 24 30 34 29 2C 59 00 C8 4E 3E 0D 49 |TA ($04),Y..N>.I|
00000EC0: 4E 43 20 24 30 34 30 30 00 D0 4E 48 0D 49 4E 59 |NC $0400..NH.INY|
00000ED0: 00 DB 4E 52 0D 42 4E 45 20 52 32 00 E7 4E 5C 0D |..NR.BNE R2..N\.|
00000EE0: 49 4E 43 20 24 30 33 00 F3 4E 66 0D 49 4E 43 20 |INC $03..Nf.INC |
00000EF0: 24 30 35 00 FF 4E 70 0D 4C 44 41 20 24 30 33 00 |$05..Np.LDA $03.|
00000F00: 0C 4F 7A 0D 43 4D 50 20 23 24 46 46 00 17 4F 84 |.Oz.CMP #$FF..O.|
00000F10: 0D 42 4E 45 20 52 31 00 1D 4F 8E 0D 21 00 2A 4F |.BNE R1..O..!.*O|
00000F20: 98 0D 4C 44 41 20 23 24 33 37 00 36 4F A2 0D 53 |..LDA #$37.6O..S|
00000F30: 54 41 20 24 30 31 00 3E 4F AC 0D 43 4C 49 00 44 |TA $01.>O..CLI.D|
00000F40: 4F B6 0D 21 00 52 4F C0 0D 4A 53 52 20 24 41 36 |O..!.RO..JSR $A6|
00000F50: 35 45 00 60 4F CA 0D 4A 53 52 20 24 41 36 38 45 |5E.`O..JSR $A68E|
00000F60: 00 6E 4F D4 0D 4A 4D 50 20 24 41 37 41 45 00 94 |.nO..JMP $A7AE..|
00000F70: 4F DE 0D 42 59 54 20 22 2D 20 52 45 4C 4F 43 41 |O..BYT "- RELOCA|
00000F80: 54 4F 2D 4D 41 54 49 43 21 20 28 41 4E 44 59 27 |TO-MATIC! (ANDY'|
00000F90: 38 39 29 22 00 00 00 |89)"... |
.@.@..SPEED.3.&@..LINE.1024.40.(16.40).;
@..CLINE.LINE.54272.H@..MESS.$AA.Z@..MES
SAGE.$0A00.`@..!.L@$...49152.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 $2801..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..B...Y JMP .Y.HB..RTS.NB..!.X
B..IRQ !..B..LDA #$5B..B..STA $D011..C".
LDA $D016..C,.. #$F0..C6..A X..$C@.STA $
D016.0CJ.LDA #25.>CT.STA 53272.DC^.!.PCH
.LDX #$4.[CR.I1 DEX.FC|.BNE I1.ZC..I2 LD
Y DELTAB,X..C..LDA COLTAB,X..C..I3 DEY..
C..BNE I3..C..STA $D021..C..STA $D021.EC
B.INX.QCL.CPX #10..CV.BNE I2..C..LDX #8.
.C..I4 DEX..C..BNE I4..D..!..D..LDA #1..
D..STA $D019.)D..LDA #$1B.8D&.!STA $D011
.ED0.LDA #200.SD:.STA $D016._DD.LDA #12.
MDN.STA $D021.ZDX.JSR ROLL..DB.JSR SCROL
L..DC.JSR $107E..DL.JMP $EA31..DV.!.RD..
DELTAB BYT 8,8,1,8,8,8,8,8,8,8,1,8..D..C
OLTAB BYT 0,6,2,4,$A,$F,7,1,0,0,0..D..!.
-E..T23 BYT 6,2,4,$A,$F,7,1,7,$F,$A,4,2,
6,$FF.UE..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..EP.COUNT
BYT 3..EZ.!..E..ROLL !.DE..DEC COUNT.RE.
.LDA COUNT..E..BEQ ..3..E..RTS..E..LDA #
3..E .STA COUNT..F*.!..F4.INC C23..F>.IN
C C24.#FH.!./FR.LDX C23.=F\.LDA T23,X.JF
F.CMP #$FF.WFP.BNE NO23.BFZ.LDA #0.NF..S
TA C23..F..NO23 STA $D024..F..!..F..LDX
C24..F..LDA T24,X..F..CMP #$FF..F..BNE N
O24.FFJ.LDA #0.RFT.STA C24..F..NO24 STA
$D022..F..LDA #12..F..STA $D023..G..RTS.
.G..!..G..SCROLL !.%G..LDA X..-G$.SEC.<G
..SBC #SPEED.EG8.. #7.PGB.STA X..\GL.BCC
SC1.DGV.RTS.JG`.!.UGJ.X. BRK.{GT.!..G~.
SC1 LDY #0..G..SC2 LDA LINE.1,Y..G..STA
LINE,Y..G..INY.BG..CPY #40.NG..BNE SC2..
G..JSR .CHAR..GD.STA LINE.39..GN.RTS..GX
.!..H..INITMESS !..H..LDA #.MESSAGE.(H..
STA MESS.:H..LDA #.MESSAGE.IH..STA MESS.
1.QH..RTS.WH..!.CH(..CHAR !.NH2.LDY #0.
H<.LDA (MESS),Y..HF.BNE GC1..HP.JSR INIT
MESS..HZ.JMP .CHAR..HD.GC1 INC MESS.GHN.
BNE ..4.VHX.INC MESS.1..H..RTS..H..!..H.
.TEXT !.$I .BYT ".. ITS THE CREDI
TS PAGE... ".WI..BYT " @@
@@@@@@@@@@@@@@@@@@@@@ "..I..BYT
".CODING: ANDY TEL:0684-298778
"..I..BYT " 17,WELL CLOSE:TEWKESBURY:G
LOS:GL20 8RS "..I..BYT "GRAFIX: BIZZMO
TEL:033- ".$JH.BYT "NO CO
MPUTER GAME SWAPPING!! (DEMOS ONLY)"..JR
.BYT 0.:J..TEXT1 !.OJ..BYT ".. WARNING..
. "..J..BYT
" NO STEALING,HACKING,CHANGING,RIPPING,
".UJ..BYT " EATING,HAVING SEX WITH,DRIN
KING WITH, "..K..BYT " OR BEHAVING UN-S
OCIALABLY IN FRONT OF ".;K..BYT " THIS
PROGRAM IS ALLOWED. ".PK..
BYT " ...OR ELSE!
",0.VK".!..K,.TEXT2 !..K6.BYT "....
- -- THOSE WHO WATCH! -- -
"..K@.BYT ". DREAMS BEYOND THE YOUNG UND
ERSTANDING! ". LJ.BYT " (C) ANDY PARTRI
DGE AND CDU 1989-1990 ".*LT.BYT 0.0L^.!
.?LH.RELOCATE !.GLR.SEI.RL|.LDA #1.`L..S
TA $D021.LL..STA 646.ZL..JSR $E544..L..J
SR $FDA3..L..JSR $E5A0..L..LDA #0..LB.ST
A $D020..LL.STA $D021.JLV.LDA #$31.WL..S
TA $314..L..LDA #$EA..L..STA $315..L..LD
A #27..M..STA $D011..M..LDA #23.%M..STA
$D018.2M&.LDA #240.@M0.STA $D01A.MM:.LDA
#$34.YMD.STA $01.DMN.LDX #0.YMX.POP LDA
SCREEN,X..MB.STA 1024,X..ML.INX..MV.CPX
#120..M..BNE POP..M..RTS.AM..JMP 1024.4
0.GM..!.TM..SCREEN !..N..BYT " (C) THE E
XCESS DESIGN GROUP 1989 "..N..LDA
#.$4000.#NF.STA $02.3NP.LDA #.$4000.?NZ.
STA $03.ON..LDA #.$0801.[N..STA $04.KN..
LDA #.$0801.WN..STA $05.}N..!..N..LOOPY
!..N .R1 LDY #0..N*.R2 LDA ($02),Y..N4.S
TA ($04),Y.HN>.INC $0400.PNH.INY..NR.BNE
R2..N\.INC $03..NF.INC $05..NP.LDA $03.
.OZ.CMP #$FF..O..BNE R1..O..!.*O..LDA #$
37.6O..STA $01.>O..CLI.DO..!.RO..JSR $A6
5E.`OJ.JSR $A68E.NOT.JMP $A7AE..O..BYT "
- RELOCATO-MATIC! (ANDY'89)"...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL