EXCLDEGADGET.ASM
FILE INFORMATION
FILENAME(S): EXCLDEGADGET.ASM
FILE TYPE(S): PRG
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 16:59:22
APPEARS ON: 2 disk(s)
FILE HASH
8be90840c28444d0ecb9acd4d958799f4b40b8986554dcc2c5fc6609ff6cbee3
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FCIII-SW | EXCLDEGADGET.ASM | PRG | High Voltage Complete C64 Collection | 15 | 0 | DOWNLOAD FILE |
| A | EXCLDEGADGET.ASM | PRG | marcus | 13 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 E8 03 3B 20 45 58 43 4C 55 44 45 47 |.."...; EXCLUDEG| 00000010: 41 44 A1 20 44 41 54 45 3A 20 31 30 AB 30 33 AB |AD. DATE: 10.03.| 00000020: 38 38 00 49 08 F2 03 3B AB AB AB AB AB AB AB AB |88.I...;........| 00000030: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................| 00000040: AB AB AB AB AB AB AB AB AB 00 4F 08 FC 03 3B 00 |..........O...;.| 00000050: 74 08 06 04 3B 20 54 48 45 20 46 49 4E 41 4C 20 |t...; THE FINAL | 00000060: 43 41 52 54 52 49 44 47 45 20 49 49 49 20 44 45 |CARTRIDGE III DE| 00000070: 53 4B A4 50 00 7A 08 10 04 3B 00 9C 08 1A 04 3B |SK.P.z...;.....;| 00000080: 20 20 20 20 20 52 49 53 4B 41 20 48 26 50 2C 20 | RISKA H&P, | 00000090: 4D 41 52 43 20 44 45 52 4B 53 45 4E 00 A2 08 24 |MARC DERKSEN...$| 000000A0: 04 3B 00 C4 08 2E 04 3B 20 20 20 20 20 50 20 52 |.;.....; P R| 000000B0: 20 4F 20 4A 20 45 20 43 20 54 20 20 20 44 20 45 | O J E C T D E| 000000C0: 20 4D 20 4F 00 CA 08 38 04 3B 00 F1 08 42 04 3B | M O...8.;...B.;| 000000D0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................| 000000E0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................| 000000F0: AB 00 F7 08 4C 04 3B 00 09 09 56 04 AC B2 24 30 |....L.;...V...$0| 00000100: 42 45 31 2C 24 30 38 30 31 00 16 09 60 04 42 55 |BE1,$0801...`.BU| 00000110: 46 30 B2 24 41 33 00 23 09 6A 04 42 55 46 31 B2 |F0.$A3.#.j.BUF1.| 00000120: 24 41 34 00 3E 09 74 04 8D B2 24 44 45 30 35 20 |$A4.>.t...$DE05 | 00000130: 20 3B 20 9E 54 45 4D 20 43 91 53 C0 54 53 00 48 | ; .TEM C.S.TS.H| 00000140: 09 7E 04 A0 B2 24 30 31 00 56 09 88 04 A4 42 41 |.~...$01.V....BA| 00000150: 43 4B B2 24 30 32 00 65 09 92 04 44 52 41 47 42 |CK.$02.e...DRAGB| 00000160: 52 B2 24 30 38 00 74 09 9C 04 49 4E 56 45 52 54 |R.$08.t...INVERT| 00000170: B2 24 30 31 00 83 09 A6 04 53 54 41 54 55 53 B2 |.$01.....STATUS.| 00000180: 24 30 32 00 90 09 B0 04 42 B0 44 52 B2 24 30 34 |$02.....B.DR.$04| 00000190: 00 9E 09 BA 04 A4 47 47 4C 45 B2 24 32 30 00 AE |......GGLE.$20..| 000001A0: 09 C4 04 45 58 43 4C 55 44 45 B2 24 34 30 00 B4 |...EXCLUDE.$40..| 000001B0: 09 CE 04 3B 00 D6 09 D8 04 3B AB AB AB AB AB AB |...;.....;......| 000001C0: 20 42 41 53 49 43 20 53 54 41 52 54 55 50 20 83 | BASIC STARTUP .| 000001D0: 20 2D 2D 2D 2D 2D 00 F7 09 E2 04 57 B0 20 24 30 | -----.....W. $0| 000001E0: 38 31 37 2C 31 39 38 37 20 20 3B 20 4C 49 4E 45 |817,1987 ; LINE| 000001F0: 20 4E 55 4D 42 45 52 00 13 0A EC 04 42 59 54 20 | NUMBER.....BYT | 00000200: 24 39 45 20 20 3B 20 42 41 53 49 43 20 9E AB 43 |$9E ; BASIC ..C| 00000210: 4F 44 45 00 34 0A F6 04 42 59 54 20 22 32 30 37 |ODE.4...BYT "207| 00000220: 36 20 44 45 53 4B A4 50 20 56 31 2E 30 22 2C 30 |6 DESK.P V1.0",0| 00000230: 2C 30 2C 30 00 4A 0A 00 05 42 59 54 20 31 2C 30 |,0,0.J...BYT 1,0| 00000240: 20 20 3B 20 56 45 52 53 49 91 00 66 0A 0A 05 42 | ; VERSI..f...B| 00000250: 59 54 20 32 20 20 3B 20 53 49 5A 45 20 49 4E 20 |YT 2 ; SIZE IN | 00000260: 42 4C 4F 43 4B 53 00 7F 0A 14 05 4A 4D 50 20 24 |BLOCKS.....JMP $| 00000270: 44 46 45 38 20 20 3B 20 53 54 41 52 54 55 50 00 |DFE8 ; STARTUP.| 00000280: 93 0A 1E 05 42 59 54 20 30 20 20 3B 20 55 4E 55 |....BYT 0 ; UNU| 00000290: 53 45 44 00 99 0A 28 05 3B 00 AA 0A 32 05 4D 4E |SED...(.;...2.MN| 000002A0: 33 49 54 31 B2 24 43 30 43 32 00 BB 0A 3C 05 4D |3IT1.$C0C2...<.M| 000002B0: 4E 33 49 54 32 B2 24 43 30 43 41 00 DF 0A 46 05 |N3IT2.$C0CA...F.| 000002C0: 3B AB AB AB AB AB AB 20 4D 41 49 4E 20 AB AB AB |;...... MAIN ...| 000002D0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB 00 |................| 000002E0: F5 0A 50 05 53 54 41 52 54 20 4A 53 52 20 53 55 |..P.START JSR SU| 000002F0: 52 56 49 56 45 00 13 0B 5A 05 4C 44 58 20 23 B3 |RVIVE...Z.LDX #.| 00000300: 49 54 45 4D 32 20 20 3B 20 53 45 54 20 A2 20 4D |ITEM2 ; SET . M| 00000310: 45 4E 55 00 23 0B 64 05 4C 44 59 20 23 B1 49 54 |ENU.#.d.LDY #.IT| 00000320: 45 4D 32 00 32 0B 6E 05 53 54 58 20 4D 4E 33 49 |EM2.2.n.STX MN3I| 00000330: 54 31 00 43 0B 78 05 53 54 59 20 4D 4E 33 49 54 |T1.C.x.STY MN3IT| 00000340: 31 AA 31 00 4B 0B 82 05 52 54 53 00 51 0B 8C 05 |1.1.K...RTS.Q...| 00000350: 3B 00 74 0B 96 05 3B AB AB AB AB AB AB 20 4D 45 |;.t...;...... ME| 00000360: 4E 55 49 54 45 4D 20 53 54 52 55 43 54 55 52 45 |NUITEM STRUCTURE| 00000370: 20 AB AB AB 00 90 0B A0 05 49 54 45 4D 32 20 57 | ........ITEM2 W| 00000380: B0 20 49 54 45 4D 33 20 20 3B 20 82 49 54 45 4D |. ITEM3 ; .ITEM| 00000390: 00 AB 0B AA 05 57 B0 20 49 54 32 54 58 54 20 20 |.....W. IT2TXT | 000003A0: 3B 20 49 54 45 4D 20 4E 41 4D 45 00 C3 0B B4 05 |; ITEM NAME.....| 000003B0: 57 B0 20 9F 57 44 20 20 3B 20 49 54 45 4D 20 45 |W. .WD ; ITEM E| 000003C0: 58 45 43 00 DE 0B BE 05 42 59 54 20 31 2C 30 20 |XEC.....BYT 1,0 | 000003D0: 20 3B 20 45 4E 41 42 4C 45 20 49 54 45 4D 00 F9 | ; ENABLE ITEM..| 000003E0: 0B C8 05 49 54 45 4D 33 20 57 B0 20 30 20 20 3B |...ITEM3 W. 0 ;| 000003F0: 20 4E 4F 20 82 49 54 45 4D 00 07 0C D2 05 57 B0 | NO .ITEM.....W.| 00000400: 20 49 54 33 54 58 54 00 15 0C DC 05 57 B0 20 55 | IT3TXT.....W. U| 00000410: 4E 4C 49 4E 4B 00 21 0C E6 05 42 59 54 20 31 2C |NLINK.!...BYT 1,| 00000420: 30 00 27 0C F0 05 3B 00 42 0C FA 05 49 54 32 54 |0.'...;.B...IT2T| 00000430: 58 54 20 42 59 54 20 22 C4 C5 CD CF A0 D7 C4 22 |XT BYT "......."| 00000440: 2C 30 00 5C 0C 04 06 49 54 33 54 58 54 20 42 59 |,0.\...IT3TXT BY| 00000450: 54 20 22 D5 CE CC C9 CE CB 22 2C 30 00 62 0C 0E |T "......",0.b..| 00000460: 06 3B 00 88 0C 18 06 47 47 46 4C 41 47 53 B2 49 |.;.....GGFLAGS.I| 00000470: 4E 56 45 52 54 AA 42 B0 44 52 AA A4 47 47 4C 45 |NVERT.B.DR..GGLE| 00000480: AA 45 58 43 4C 55 44 45 00 AB 0C 22 06 3B AB AB |.EXCLUDE...".;..| 00000490: AB AB AB AB 20 57 49 4E 44 4F 57 20 AB AB AB AB |.... WINDOW ....| 000004A0: AB AB AB AB AB AB AB AB AB AB AB 00 CC 0C 2C 06 |..............,.| 000004B0: 9F 57 44 20 4C 44 58 20 23 B3 57 49 4E 44 4F 57 |.WD LDX #.WINDOW| 000004C0: 20 20 3B 20 43 41 4C 4C 20 9F 57 44 00 DD 0C 36 | ; CALL .WD...6| 000004D0: 06 4C 44 59 20 23 B1 57 49 4E 44 4F 57 00 EE 0C |.LDY #.WINDOW...| 000004E0: 40 06 4C 44 41 20 23 9F 57 49 4E 44 4F 57 00 F8 |@.LDA #.WINDOW..| 000004F0: 0C 4A 06 4A 4D 50 20 8D 00 FE 0C 54 06 3B 00 20 |.J.JMP ....T.;. | 00000500: 0D 5E 06 57 49 4E 44 4F 57 20 57 B0 20 47 41 44 |.^.WINDOW W. GAD| 00000510: A1 31 20 20 3B 20 46 49 52 53 54 20 47 41 44 A1 |.1 ; FIRST GAD.| 00000520: 00 39 0D 68 06 42 59 54 20 34 30 2C 34 30 20 20 |.9.h.BYT 40,40 | 00000530: 3B 20 57 44 58 2C 57 44 59 00 58 0D 72 06 42 59 |; WDX,WDY.X.r.BY| 00000540: 54 20 31 31 30 2C 35 30 20 20 3B 20 57 49 44 54 |T 110,50 ; WIDT| 00000550: 48 2C 48 45 49 47 48 54 00 76 0D 7C 06 57 B0 20 |H,HEIGHT.v.|.W. | 00000560: 57 44 54 49 54 4C 45 20 20 3B 20 57 49 4E 44 4F |WDTITLE ; WINDO| 00000570: 57 20 4E 41 4D 45 00 98 0D 86 06 42 59 54 20 A0 |W NAME.....BYT .| 00000580: AA A4 42 41 43 4B AA 44 52 41 47 42 52 20 20 3B |..BACK.DRAGBR ;| 00000590: 20 57 44 46 4C 41 47 53 00 B3 0D 90 06 42 59 54 | WDFLAGS.....BYT| 000005A0: 20 36 36 20 20 3B 20 57 44 54 49 54 4C 45 20 53 | 66 ; WDTITLE S| 000005B0: 49 5A 45 00 BE 0D 9A 06 57 B0 20 30 2C 30 00 C4 |IZE.....W. 0,0..| 000005C0: 0D A4 06 3B 00 E1 0D AE 06 47 41 44 A1 31 20 57 |...;.....GAD.1 W| 000005D0: B0 20 47 41 44 A1 32 20 20 3B 20 82 20 47 41 44 |. GAD.2 ; . GAD| 000005E0: A1 00 FA 0D B8 06 42 59 54 20 31 38 2C 33 30 20 |......BYT 18,30 | 000005F0: 20 3B 20 47 47 58 2C 47 47 59 00 18 0E C2 06 42 | ; GGX,GGY.....B| 00000600: 59 54 20 32 32 2C 31 33 20 20 3B 20 57 49 44 54 |YT 22,13 ; WIDT| 00000610: 48 2C 48 45 49 47 48 54 00 33 0E CC 06 57 B0 20 |H,HEIGHT.3...W. | 00000620: 47 47 54 45 58 54 20 20 3B 20 47 41 44 A1 20 54 |GGTEXT ; GAD. T| 00000630: 45 58 54 00 51 0E D6 06 42 59 54 20 47 47 46 4C |EXT.Q...BYT GGFL| 00000640: 41 47 53 20 20 3B 20 47 41 44 A1 20 46 4C 41 47 |AGS ; GAD. FLAG| 00000650: 53 00 70 0E E0 06 57 B0 20 30 2C 47 47 45 58 45 |S.p...W. 0,GGEXE| 00000660: 43 2C 30 20 20 3B 20 47 41 44 A1 20 45 58 45 43 |C,0 ; GAD. EXEC| 00000670: 00 85 0E EA 06 42 59 54 20 30 20 20 3B 20 55 53 |.....BYT 0 ; US| 00000680: 45 52 20 B8 45 00 9E 0E F4 06 57 B0 20 45 58 43 |ER .E.....W. EXC| 00000690: 9B 20 20 3B 20 45 58 43 4C 55 44 45 20 9B 00 A4 |. ; EXCLUDE ...| 000006A0: 0E FE 06 3B 00 C1 0E 08 07 47 41 44 A1 32 20 57 |...;.....GAD.2 W| 000006B0: B0 20 47 41 44 A1 33 20 20 3B 20 82 20 47 41 44 |. GAD.3 ; . GAD| 000006C0: A1 00 DA 0E 12 07 42 59 54 20 34 34 2C 33 30 20 |......BYT 44,30 | 000006D0: 20 3B 20 47 47 58 2C 47 47 59 00 F8 0E 1C 07 42 | ; GGX,GGY.....B| 000006E0: 59 54 20 32 32 2C 31 33 20 20 3B 20 57 49 44 54 |YT 22,13 ; WIDT| 000006F0: 48 2C 48 45 49 47 48 54 00 0E 0F 26 07 57 B0 20 |H,HEIGHT...&.W. | 00000700: 30 20 20 3B 20 47 41 44 A1 20 54 45 58 54 00 2C |0 ; GAD. TEXT.,| 00000710: 0F 30 07 42 59 54 20 47 47 46 4C 41 47 53 20 20 |.0.BYT GGFLAGS | 00000720: 3B 20 47 41 44 A1 20 46 4C 41 47 53 00 4B 0F 3A |; GAD. FLAGS.K.:| 00000730: 07 57 B0 20 30 2C 47 47 45 58 45 43 2C 30 20 20 |.W. 0,GGEXEC,0 | 00000740: 3B 20 47 41 44 A1 20 45 58 45 43 00 60 0F 44 07 |; GAD. EXEC.`.D.| 00000750: 42 59 54 20 30 20 20 3B 20 55 53 45 52 20 B8 45 |BYT 0 ; USER .E| 00000760: 00 79 0F 4E 07 57 B0 20 45 58 43 9B 20 20 3B 20 |.y.N.W. EXC. ; | 00000770: 45 58 43 4C 55 44 45 20 9B 00 7F 0F 58 07 3B 00 |EXCLUDE ....X.;.| 00000780: 98 0F 62 07 47 41 44 A1 33 20 57 B0 20 30 20 20 |..b.GAD.3 W. 0 | 00000790: 3B 20 82 20 47 41 44 A1 00 B1 0F 6C 07 42 59 54 |; . GAD....l.BYT| 000007A0: 20 37 30 2C 33 30 20 20 3B 20 47 47 58 2C 47 47 | 70,30 ; GGX,GG| 000007B0: 59 00 CF 0F 76 07 42 59 54 20 32 32 2C 31 33 20 |Y...v.BYT 22,13 | 000007C0: 20 3B 20 57 49 44 54 48 2C 48 45 49 47 48 54 00 | ; WIDTH,HEIGHT.| 000007D0: E5 0F 80 07 57 B0 20 30 20 20 3B 20 47 41 44 A1 |....W. 0 ; GAD.| 000007E0: 20 54 45 58 54 00 0A 10 8A 07 42 59 54 20 47 47 | TEXT.....BYT GG| 000007F0: 46 4C 41 47 53 AA 53 54 41 54 55 53 20 20 3B 20 |FLAGS.STATUS ; | 00000800: 47 41 44 A1 20 46 4C 41 47 53 00 29 10 94 07 57 |GAD. FLAGS.)...W| 00000810: B0 20 30 2C 47 47 45 58 45 43 2C 30 20 20 3B 20 |. 0,GGEXEC,0 ; | 00000820: 47 41 44 A1 20 45 58 45 43 00 3E 10 9E 07 42 59 |GAD. EXEC.>...BY| 00000830: 54 20 30 20 20 3B 20 55 53 45 52 20 B8 45 00 57 |T 0 ; USER .E.W| 00000840: 10 A8 07 57 B0 20 45 58 43 9B 20 20 3B 20 45 58 |...W. EXC. ; EX| 00000850: 43 4C 55 44 45 20 9B 00 5D 10 B2 07 3B 00 7A 10 |CLUDE ..]...;.z.| 00000860: BC 07 45 58 43 9B 20 57 B0 20 47 41 44 A1 31 20 |..EXC. W. GAD.1 | 00000870: 20 3B 20 45 58 43 4C 55 44 45 00 87 10 C6 07 57 | ; EXCLUDE.....W| 00000880: B0 20 47 41 44 A1 32 00 94 10 D0 07 57 B0 20 47 |. GAD.2.....W. G| 00000890: 41 44 A1 33 00 9D 10 DA 07 57 B0 20 30 00 A3 10 |AD.3.....W. 0...| 000008A0: E4 07 3B 00 C1 10 EE 07 57 44 54 49 54 4C 45 20 |..;.....WDTITLE | 000008B0: 42 59 54 20 22 CD 59 20 D7 49 4E 44 4F 57 22 2C |BYT ".Y .INDOW",| 000008C0: 30 00 E6 10 F8 07 47 47 54 45 58 54 20 42 59 54 |0.....GGTEXT BYT| 000008D0: 20 34 2C 24 46 34 2C 31 20 20 3B 20 54 45 58 54 | 4,$F4,1 ; TEXT| 000008E0: 20 53 54 52 55 43 00 01 11 02 08 42 59 54 20 22 | STRUC.....BYT "| 000008F0: CD 55 54 55 41 4C 20 C5 58 43 4C 55 44 45 22 2C |.UTUAL .XCLUDE",| 00000900: 30 00 07 11 0C 08 3B 00 28 11 16 08 3B AB AB AB |0.....;.(...;...| 00000910: AB AB AB 20 47 41 44 A1 20 45 58 45 43 20 AB AB |... GAD. EXEC ..| 00000920: AB AB AB AB AB AB AB AB 00 4D 11 20 08 47 47 45 |.........M. .GGE| 00000930: 58 45 43 20 49 4E 43 20 24 44 30 32 30 20 20 3B |XEC INC $D020 ;| 00000940: 20 47 41 44 A1 20 43 4C 49 43 4B 45 44 00 55 11 | GAD. CLICKED.U.| 00000950: 2A 08 52 54 53 00 5B 11 34 08 3B 00 7E 11 3E 08 |*.RTS.[.4.;.~.>.| 00000960: 3B AB AB AB AB AB AB 20 55 4E 4C 49 4E 4B 20 AB |;...... UNLINK .| 00000970: AB AB AB AB AB AB AB AB AB AB AB AB AB AB 00 9E |................| 00000980: 11 48 08 55 4E 4C 49 4E 4B 20 4C 44 58 20 23 B3 |.H.UNLINK LDX #.| 00000990: 57 49 4E 44 4F 57 20 20 3B 20 A0 20 57 44 00 AF |WINDOW ; . WD..| 000009A0: 11 52 08 4C 44 59 20 23 B1 57 49 4E 44 4F 57 00 |.R.LDY #.WINDOW.| 000009B0: BB 11 5C 08 4A 53 52 20 A0 57 44 00 D9 11 66 08 |..\.JSR .WD...f.| 000009C0: 4C 44 58 20 23 B3 4D 4E 33 49 54 32 20 20 3B 20 |LDX #.MN3IT2 ; | 000009D0: 8F 4F 56 45 20 4D 45 4E 55 00 EA 11 70 08 4C 44 |.OVE MENU...p.LD| 000009E0: 59 20 23 B1 4D 4E 33 49 54 32 00 F9 11 7A 08 53 |Y #.MN3IT2...z.S| 000009F0: 54 58 20 4D 4E 33 49 54 31 00 0A 12 84 08 53 54 |TX MN3IT1.....ST| 00000A00: 59 20 4D 4E 33 49 54 31 AA 31 00 28 12 8E 08 49 |Y MN3IT1.1.(...I| 00000A10: 4E 43 20 24 38 30 30 34 20 20 3B 20 8F 4F 56 45 |NC $8004 ; .OVE| 00000A20: 20 53 55 52 56 49 56 45 00 30 12 98 08 52 54 53 | SURVIVE.0...RTS| 00000A30: 00 36 12 A2 08 3B 00 55 12 AC 08 3B AB AB AB AB |.6...;.U...;....| 00000A40: AB AB 20 A0 20 57 49 4E 44 4F 57 20 AB AB AB AB |.. . WINDOW ....| 00000A50: AB AB AB AB AB 00 66 12 B6 08 A0 57 44 20 53 54 |......f....WD ST| 00000A60: 58 20 42 55 46 30 00 73 12 C0 08 53 54 59 20 42 |X BUF0.s...STY B| 00000A70: 55 46 31 00 90 12 CA 08 4C 44 41 20 23 57 44 91 |UF1.....LDA #WD.| 00000A80: 53 43 52 45 45 4E 20 20 3B 20 8B 20 57 44 20 9F |SCREEN ; . WD .| 00000A90: 00 9A 12 D4 08 4A 53 52 20 8D 00 A2 12 DE 08 49 |.....JSR ......I| 00000AA0: 4E 59 00 AC 12 E8 08 42 45 51 20 A8 00 C2 12 F2 |NY.....BEQ .....| 00000AB0: 08 4C 44 58 20 42 55 46 30 20 20 3B 20 A7 20 A0 |.LDX BUF0 ; . .| 00000AC0: 57 44 00 CF 12 FC 08 4C 44 59 20 42 55 46 31 00 |WD.....LDY BUF1.| 00000AD0: E1 12 06 09 4C 44 41 20 23 53 45 54 43 55 52 57 |....LDA #SETCURW| 00000AE0: 44 00 EB 12 10 09 4A 53 52 20 8D 00 F8 12 1A 09 |D.....JSR ......| 00000AF0: 4C 44 41 20 23 57 44 A0 00 02 13 24 09 4A 53 52 |LDA #WD....$.JSR| 00000B00: 20 8D 00 0C 13 2E 09 A8 20 52 54 53 00 12 13 38 | ....... RTS...8| 00000B10: 09 3B 00 35 13 42 09 3B AB AB AB AB AB AB 20 52 |.;.5.B.;...... R| 00000B20: 45 53 45 54 20 53 55 52 56 49 56 45 20 AB AB AB |ESET SURVIVE ...| 00000B30: AB AB AB AB AB 00 5A 13 4C 09 53 55 52 56 49 56 |......Z.L.SURVIV| 00000B40: 45 20 4C 44 58 20 23 36 AB 31 20 20 3B 20 49 4E |E LDX #6.1 ; IN| 00000B50: 53 54 41 4C 4C 20 43 4F 44 45 00 6E 13 56 09 53 |STALL CODE.n.V.S| 00000B60: 4C 50 20 4C 44 41 20 54 41 42 45 4C 2C 58 00 7E |LP LDA TABEL,X.~| 00000B70: 13 60 09 53 54 41 20 24 38 30 30 30 2C 58 00 86 |.`.STA $8000,X..| 00000B80: 13 6A 09 44 45 58 00 92 13 74 09 42 50 4C 20 53 |.j.DEX...t.BPL S| 00000B90: 4C 50 00 9A 13 7E 09 52 54 53 00 AF 13 88 09 54 |LP...~.RTS.....T| 00000BA0: 41 42 45 4C 20 57 B0 20 53 54 41 52 54 AA 33 00 |ABEL W. START.3.| 00000BB0: BE 13 92 09 42 59 54 20 22 4D 47 38 37 22 00 C4 |....BYT "MG87"..| 00000BC0: 13 9C 09 3B 00 E7 13 A6 09 3B AB AB AB AB AB AB |...;.....;......| 00000BD0: 20 49 4E 43 4C 55 44 45 53 20 AB AB AB AB AB AB | INCLUDES ......| 00000BE0: AB AB AB AB AB AB AB 00 F6 13 B0 09 9F 57 49 4E |.............WIN| 00000BF0: 44 4F 57 B2 34 38 00 07 14 BA 09 57 44 91 53 43 |DOW.48.....WD.SC| 00000C00: 52 45 45 4E B2 37 30 00 12 14 C4 09 57 44 A0 B2 |REEN.70.....WD..| 00000C10: 36 35 00 22 14 CE 09 53 45 54 43 55 52 57 44 B2 |65."...SETCURWD.| 00000C20: 32 39 00 00 00 |29... |
.."...; EXCLUDEGAD. DATE: 10.03.88.I...; ..................................O...;. T...; THE FINAL CARTRIDGE III DESK.P.Z.. .;.....; RISKA H&P, MARC DERKSEN...$ .;.D...; P R O J E C T D E M O.J.8 .;...B.;................................ ....L.;...V...$0BE1,$0801...`.BUF0.$A3.# .J.BUF1.$A4.>.T...$DE05 ; .TEM C.S.TS.H .~. .$01.V....BACK.$02.E...DRAGBR.$08.T. ..INVERT.$01.....STATUS.$02.....B.DR.$04 ......GGLE.$20...D.EXCLUDE.$40...N.;.V.X .;...... BASIC STARTUP . -----.....W. $0 817,1987 ; LINE NUMBER.....BYT $9E ; B ASIC ..CODE.4...BYT "2076 DESK.P V1.0",0 ,0,0.J...BYT 1,0 ; VERSI..F...BYT 2 ; SIZE IN BLOCKS....JMP $DFE8 ; STARTUP. ....BYT 0 ; UNUSED...(.;...2.MN3IT1.$C0 C2...<.MN3IT2.$C0CA...F.;...... MAIN ... ..................P.START JSR SURVIVE... Z.LDX #.ITEM2 ; SET . MENU.#.D.LDY #.IT EM2.2.N.STX MN3IT1.C.X.STY MN3IT1.1.K... RTS.Q...;.T...;...... MENUITEM STRUCTURE ...... .ITEM2 W. ITEM3 ; .ITEM.....W. IT2TXT ; ITEM NAME.C...W. .WD ; ITEM E XEC.....BYT 1,0 ; ENABLE ITEM...H.ITEM3 W. 0 ; NO .ITEM...R.W. IT3TXT.....W. U NLINK.!...BYT 1,0.'...;.B...IT2TXT BYT " DEMO WD",0.\...IT3TXT BYT "UNLINK",0.B.. .;.....GGFLAGS.INVERT.B.DR..GGLE.EXCLUDE ...".;...... WINDOW ................L.,. .WD LDX #.WINDOW ; CALL .WD...6.LDY #.W INDOW...@.LDA #.WINDOW...J.JMP ....T.;. .^.WINDOW W. GAD.1 ; FIRST GAD..9.H.BYT 40,40 ; WDX,WDY.X.R.BYT 110,50 ; WIDT H,HEIGHT.V.|.W. WDTITLE ; WINDOW NAME.. ...BYT ..BACK.DRAGBR ; WDFLAGS.....BYT 66 ; WDTITLE SIZE.....W. 0,0.D...;.... .GAD.1 W. GAD.2 ; . GAD......BYT 18,30 ; GGX,GGY...B.BYT 22,13 ; WIDTH,HEIGHT .3.L.W. GGTEXT ; GAD. TEXT.Q.V.BYT GGFL AGS ; GAD. FLAGS.P...W. 0,GGEXEC,0 ; G AD. EXEC.....BYT 0 ; USER .E.....W. EXC . ; EXCLUDE ......;.A...GAD.2 W. GAD.3 ; . GAD..Z...BYT 44,30 ; GGX,GGY.....B YT 22,13 ; WIDTH,HEIGHT...&.W. 0 ; GAD . TEXT.,.0.BYT GGFLAGS ; GAD. FLAGS.K.: .W. 0,GGEXEC,0 ; GAD. EXEC.`.D.BYT 0 ; USER .E.Y.N.W. EXC. ; EXCLUDE ...X.;. ..B.GAD.3 W. 0 ; . GAD....L.BYT 70,30 ; GGX,GGY.O.V.BYT 22,13 ; WIDTH,HEIGHT. ....W. 0 ; GAD. TEXT.....BYT GGFLAGS.ST ATUS ; GAD. FLAGS.)...W. 0,GGEXEC,0 ; GAD. EXEC.>...BYT 0 ; USER .E.W...W. EX C. ; EXCLUDE ..]...;.Z...EXC. W. GAD.1 ; EXCLUDE...F.W. GAD.2...P.W. GAD.3...Z .W. 0.....;.A...WDTITLE BYT "MY WINDOW", 0.....GGTEXT BYT 4,$F4,1 ; TEXT STRUC.. ...BYT "MUTUAL EXCLUDE",0.....;.(...;... ... GAD. EXEC ...........M. .GGEXEC INC $D020 ; GAD. CLICKED.U.*.RTS.[.4.;.~.>. ;...... UNLINK ..................H.UNLIN K LDX #.WINDOW ; WD...R.LDY #.WINDOW. ..\.JSR WD.Y.F.LDX #.MN3IT2 ; .OVE MEN U...P.LDY #.MN3IT2...Z.STX MN3IT1.....ST Y MN3IT1.1.(...INC $8004 ; .OVE SURVIVE .0...RTS.6...;.U...;...... WINDOW .... ......F... WD STX BUF0.S...STY BUF1...J. LDA #WD.SCREEN ; . WD ....T.JSR ......I NY.....BEQ ..B...LDX BUF0 ; . WD.O...L DY BUF1.....LDA #SETCURWD.....JSR ...... LDA #WD ...$.JSR ....... RTS...8.;.5.B.; ...... RESET SURVIVE .........Z.L.SURVIV E LDX #6.1 ; INSTALL CODE.N.V.SLP LDA T ABEL,X.~.`.STA $8000,X...J.DEX...T.BPL S LP...~.RTS.....TABEL W. START.3.....BYT "MG87".D...;.....;...... INCLUDES ...... .............WINDOW.48.....WD.SCREEN.70. ..D.WD .65.".N.SETCURWD.29...
> CLICK IMAGE PREVIEW FOR FULL MODAL