00000000: 3B 20 4C 4F 41 44 20 52 4F 55 54 49 4E 45 00 4C |; LOAD ROUTINE.L|
00000010: 4F 41 44 00 20 4A 53 52 20 24 43 31 42 44 20 3B |OAD. JSR $C1BD ;|
00000020: 20 47 4F 54 4F 20 46 49 52 53 54 20 4D 45 4E 55 | GOTO FIRST MENU|
00000030: 00 4C 4F 41 44 32 00 4C 4F 41 44 33 00 20 6C 6F |.LOAD2.LOAD3. lo|
00000040: 61 64 77 20 52 30 3A 56 4E 44 42 31 31 00 20 4A |adw R0:VNDB11. J|
00000050: 53 52 20 24 43 32 35 36 00 20 52 54 53 00 3B 2D |SR $C256. RTS.;-|
00000060: 2D 2D 00 3B 2D 20 20 44 49 41 4C 4F 47 20 42 4F |--.;- DIALOG BO|
00000070: 58 20 46 4F 52 20 50 52 4F 4D 50 54 00 56 4E 44 |X FOR PROMPT.VND|
00000080: 42 31 31 00 2E 42 59 54 45 20 31 32 38 2B 32 00 |B11..BYTE 128+2.|
00000090: 2E 42 79 74 65 20 32 2C 31 37 2C 37 37 2D 38 00 |.Byte 2,17,77-8.|
000000A0: 2E 42 59 54 45 20 31 31 2C 38 2C 32 34 00 2E 57 |.BYTE 11,8,24..W|
000000B0: 4F 52 44 20 58 6A 31 00 2E 42 59 54 45 20 31 31 |ORD Xj1..BYTE 11|
000000C0: 2C 38 2C 33 36 00 2E 57 4F 52 44 20 58 6A 32 00 |,8,36..WORD Xj2.|
000000D0: 2E 42 59 54 45 20 31 31 2C 38 2C 34 38 00 2E 57 |.BYTE 11,8,48..W|
000000E0: 4F 52 44 20 58 6A 33 00 3B 00 2E 42 79 74 65 20 |ORD Xj3.;..Byte |
000000F0: 31 34 00 2E 42 79 74 65 20 30 00 58 6A 31 20 2E |14..Byte 0.Xj1 .|
00000100: 42 59 54 45 20 27 59 6F 75 20 68 61 76 65 20 73 |BYTE 'You have s|
00000110: 65 6C 65 63 74 65 64 20 61 20 72 65 73 69 64 65 |elected a reside|
00000120: 6E 74 27 2C 30 00 58 6A 32 20 2E 42 59 54 45 20 |nt',0.Xj2 .BYTE |
00000130: 27 72 6F 75 74 69 6E 65 2E 20 20 4E 6F 20 64 69 |'routine. No di|
00000140: 73 6B 20 61 63 63 65 73 73 27 2C 30 00 58 6A 33 |sk access',0.Xj3|
00000150: 20 2E 42 59 54 45 20 27 69 73 20 6E 65 63 65 73 | .BYTE 'is neces|
00000160: 73 61 72 79 20 74 6F 20 72 75 6E 2E 27 2C 30 00 |sary to run.',0.|
00000170: 3B 3D 3D 3D 3D 3D 3D 3D 00 3B 2D 2D 2D 2D 2D 00 |;=======.;-----.|
00000180: 00 |. |
; LOAD ROUTINE.LOAD. JSR $C1BD ; GOTO FI
RST MENU.LOAD2.LOAD3. LOADW R0:VNDB11. J
SR $C256. RTS.;---.;- DIALOG BOX FOR PR
OMPT.VNDB11..BYTE 128+2..BYTE 2,17,77-8.
.BYTE 11,8,24..WORD XJ1..BYTE 11,8,36..W
ORD XJ2..BYTE 11,8,48..WORD XJ3.;..BYTE
14..BYTE 0.XJ1 .BYTE 'YOU HAVE SELECTED
A RESIDENT',0.XJ2 .BYTE 'ROUTINE. NO DI
SK ACCESS',0.XJ3 .BYTE 'IS NECESSARY TO
RUN.',0.;=======.;-----..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL