00000000: 39 30 30 30 20 2F 2F 20 50 41 53 53 20 22 53 30 |9000 // PASS "S0|
00000010: 3A 4D 43 4C 4F 41 44 45 52 2E 50 22 0D 39 30 30 |:MCLOADER.P".900|
00000020: 32 20 2F 2F 20 4C 49 53 54 20 22 30 3A 4D 43 4A |2 // LIST "0:MCJ|
00000030: D0 FF FF FF FF FF EF FF FB FF FF FF FF FF FF FF |................|
00000040: FB FF C0 C0 4A 80 06 06 88 99 FF 9D EC 9E 88 D8 |....J...........|
00000050: E8 AF AC 9D 9B BB FF FF 23 6B 2B 73 FF 23 71 2B |........#k+s.#q+|
00000060: FF FF 21 61 77 FF 58 4F 49 FF F8 F8 FF FF 09 09 |..!aw.XOI.......|
00000070: FF 97 FF FF FF 87 FF FF FF FF FF 97 07 FF 77 78 |..............wx|
00000080: FF FF FF FF 54 E2 E0 D3 96 FF FF FF FF FF FF FF |....T...........|
00000090: FF 2D FF FF ED FF FF FF FF FF FF FF FF FF AD 2E |.-..............|
000000A0: FF FF FF ED FF FF FF FF FF FF 2D D1 65 FF 0C 44 |..........-.e..D|
000000B0: 08 00 60 68 8B FF FF 89 E8 89 DB FF D9 DB 99 DB |..`h............|
000000C0: A8 8D 8E 8A FA DE 89 CB FB FB FF 33 B6 17 FF A7 |...........3....|
000000D0: FF 9F 8F 97 FF 80 90 F4 B9 30 31 36 20 50 52 4F |.........016 PRO|
000000E0: 43 20 4F 42 4A 45 43 54 4C 4F 41 44 28 4E 41 4D |C OBJECTLOAD(NAM|
000000F0: 45 24 2B FF FF FF D0 FF FF FF FB FF FF FF 31 38 |E$+...........18|
00000100: 20 50 4F 4B 45 20 38 35 38 2C 31 36 39 0D 39 30 | POKE 858,169.90|
00000110: 32 30 20 50 4F 4B 45 20 38 35 39 2C 30 0D 39 30 |20 POKE 859,0.90|
00000120: 32 32 20 50 4F 4B 45 20 38 36 30 2C 37 36 0D 39 |22 POKE 860,76.9|
00000130: 30 32 34 20 50 4F 4B 45 20 38 36 31 2C 32 31 33 |024 POKE 861,213|
00000140: 0D 39 30 32 36 20 50 4F 4B 45 20 38 36 32 2C 32 |.9026 POKE 862,2|
00000150: 35 35 0D 39 30 32 38 20 4F 50 45 4E 20 46 49 4C |55.9028 OPEN FIL|
00000160: 45 20 37 31 2C 4E 41 4D 45 24 2B 22 2C 50 22 2C |E 71,NAME$+",P",|
00000170: 52 45 41 44 0D 39 30 33 30 20 53 59 53 20 38 35 |READ.9030 SYS 85|
00000180: 38 0D 39 30 33 32 20 43 4C 4F 53 45 20 46 49 4C |8.9032 CLOSE FIL|
00000190: 45 20 37 31 0D 39 30 33 34 20 45 4E 44 50 52 4F |E 71.9034 ENDPRO|
000001A0: 43 20 4F 42 4A 45 43 54 4C 4F 41 44 0D 39 30 33 |C OBJECTLOAD.903|
000001B0: 36 20 2F 2F 0D 39 30 33 38 20 2F 2F 20 57 45 4E |6 //.9038 // WEN|
000001C0: 4E 20 53 49 45 20 44 41 53 20 27 2C 50 27 20 44 |N SIE DAS ',P' D|
000001D0: 55 52 43 48 20 45 49 4E 0D 39 30 34 30 20 2F 2F |URCH EIN.9040 //|
000001E0: 20 27 2C 55 27 20 45 52 53 45 54 5A 45 4E 2C 20 | ',U' ERSETZEN, |
000001F0: 4B 4F 45 4E 4E 45 4E 20 53 49 45 20 41 55 43 48 |KOENNEN SIE AUCH|
00000200: 0D 39 30 34 32 20 2F 2F 20 27 55 53 52 27 2D 44 |.9042 // 'USR'-D|
00000210: 41 54 45 49 45 4E 20 41 42 53 4F 4C 55 54 20 4C |ATEIEN ABSOLUT L|
00000220: 41 44 45 4E 21 0D 39 30 34 34 20 2F 2F 0D |ADEN!.9044 //. |
9000 // PASS "S0:MCLOADER.P".9002 // LIS
T "0:MCJP...................J..........X
........#K+S.#Q+..!AW.XOI...............
......WX....T..S.........-..............
..........-QE..D..`H........Y..........K
...3.............016 PROC OBJECTLOAD(NAM
E$+...P.......18 POKE 858,169.9020 POKE
859,0.9022 POKE 860,76.9024 POKE 861,213
.9026 POKE 862,255.9028 OPEN FILE 71,NAM
E$+",P",READ.9030 SYS 858.9032 CLOSE FIL
E 71.9034 ENDPROC OBJECTLOAD.9036 //.903
8 // WENN SIE DAS ',P' DURCH EIN.9040 //
',U' ERSETZEN, KOENNEN SIE AUCH.9042 //
'USR'-DATEIEN ABSOLUT LADEN!.9044 //.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL