SPG/DEMO CHAR-ED
FILE INFORMATION
FILENAME(S): SPG/DEMO CHAR-ED
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-11-30 01:13:09
APPEARS ON: 1 disk(s)
FILE HASH
f9ee40f3c6b7de2f92cf3b58218c07e1b79b5a436e1cddeea18d6c9c010ee515
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15834 SEITE B | SPG/DEMO CHAR-ED | PRG | C64er | 28 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 0A 00 8B C2 28 34 39 32 33 34 29 B3 |..&.....(49234).|
00000010: B1 C6 28 22 53 22 29 A7 93 22 53 50 47 2E 4F 42 |..("S").."SPG.OB|
00000020: 4A 22 2C 38 2C 31 00 31 08 14 00 9E 34 39 31 35 |J",8,1.1....4915|
00000030: 32 00 3A 08 64 00 4D 4D B2 30 00 66 08 69 00 21 |2.:.d.MM.0.f.i.!|
00000040: 46 44 20 30 2C 31 32 36 2C 32 35 34 2C 31 33 30 |FD 0,126,254,130|
00000050: 2C 31 33 30 2C 31 33 30 2C 31 33 30 2C 31 33 30 |,130,130,130,130|
00000060: 2C 32 35 34 2C 30 00 92 08 6E 00 21 46 44 20 30 |,254,0...n.!FD 0|
00000070: 2C 31 32 37 2C 32 35 34 2C 32 35 34 2C 32 35 34 |,127,254,254,254|
00000080: 2C 32 35 34 2C 32 35 34 2C 32 35 34 2C 32 35 34 |,254,254,254,254|
00000090: 2C 30 00 A2 08 78 00 21 42 43 20 31 39 30 2C 31 |,0...x.!BC 190,1|
000000A0: 39 31 00 C9 08 7D 00 54 25 28 30 29 B2 31 32 38 |91...}.T%(0).128|
000000B0: 3A 81 49 B2 31 A4 37 3A 54 25 28 49 29 B2 54 25 |:.I.1.7:T%(I).T%|
000000C0: 28 49 AB 31 29 AD 32 3A 82 00 E8 08 82 00 99 22 |(I.1).2:......."|
000000D0: 93 8E 08 9A 22 3B 3A 97 35 33 32 38 30 2C 36 3A |....";:.53280,6:|
000000E0: 97 35 33 32 38 31 2C 36 00 F8 08 8C 00 21 47 52 |.53281,6.....!GR|
000000F0: 30 3B 47 4E 30 3B 47 45 00 12 09 96 00 81 49 B2 |0;GN0;GE......I.|
00000100: 30 A4 32 34 3A 87 4A 3A 21 4D 42 30 2C 49 2C 4A |0.24:.J:!MB0,I,J|
00000110: 3A 82 00 5D 09 A0 00 83 20 31 32 37 2C 30 2C 30 |:..].... 127,0,0|
00000120: 2C 31 32 36 2C 30 2C 30 2C 31 32 34 2C 30 2C 30 |,126,0,0,124,0,0|
00000130: 2C 31 32 36 2C 30 2C 30 2C 31 32 37 2C 30 2C 30 |,126,0,0,127,0,0|
00000140: 2C 31 31 31 2C 31 32 38 2C 30 2C 37 31 2C 31 39 |,111,128,0,71,19|
00000150: 32 2C 30 2C 33 2C 31 32 38 2C 30 2C 31 00 77 09 |2,0,3,128,0,1.w.|
00000160: AA 00 81 49 B2 30 A4 32 34 3A 87 4A 3A 21 4D 42 |...I.0.24:.J:!MB|
00000170: 31 2C 49 2C 4A 3A 82 00 BD 09 AF 00 83 20 31 32 |1,I,J:....... 12|
00000180: 37 2C 30 2C 30 2C 36 36 2C 30 2C 30 2C 36 38 2C |7,0,0,66,0,0,68,|
00000190: 30 2C 30 2C 36 36 2C 30 2C 30 2C 38 31 2C 30 2C |0,0,66,0,0,81,0,|
000001A0: 30 2C 31 30 34 2C 31 32 38 2C 30 2C 36 38 2C 36 |0,104,128,0,68,6|
000001B0: 34 2C 30 2C 32 2C 31 32 38 2C 30 2C 31 00 D7 09 |4,0,2,128,0,1...|
000001C0: B4 00 81 49 B2 30 A4 32 33 3A 87 4A 3A 21 4D 42 |...I.0.23:.J:!MB|
000001D0: 32 2C 49 2C 4A 3A 82 00 25 0A B9 00 83 20 32 35 |2,I,J:..%.... 25|
000001E0: 35 2C 30 2C 30 2C 32 35 35 2C 30 2C 30 2C 32 35 |5,0,0,255,0,0,25|
000001F0: 35 2C 30 2C 30 2C 32 35 35 2C 30 2C 30 2C 32 35 |5,0,0,255,0,0,25|
00000200: 35 2C 30 2C 30 2C 32 35 35 2C 30 2C 30 2C 32 35 |5,0,0,255,0,0,25|
00000210: 35 2C 30 2C 30 2C 32 35 35 2C 30 2C 30 2C 32 35 |5,0,0,255,0,0,25|
00000220: 35 2C 30 2C 30 00 2B 0A BE 00 3A 00 5C 0A C8 00 |5,0,0.+...:.\...|
00000230: 99 22 93 9B 20 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |.".. ...........|
00000240: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00000250: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 00 8E 0A D2 |..........."....|
00000260: 00 99 22 20 12 20 20 2A 2A 2A 20 A0 43 36 34 20 |.." . *** .C64 |
00000270: 43 48 41 52 41 43 54 45 52 2D 53 45 54 20 45 44 |CHARACTER-SET ED|
00000280: 49 54 4F 52 20 A0 2A 2A 2A 20 A0 11 9A 22 00 AE |ITOR .*** ..."..|
00000290: 0A DC 00 21 54 46 34 2C 33 2C 38 2C 38 2C 31 32 |...!TF4,3,8,8,12|
000002A0: 36 3B 54 43 34 2C 33 2C 38 2C 38 2C 31 34 00 D2 |6;TC4,3,8,8,14..|
000002B0: 0A E1 00 21 4D 4C 31 2C 32 3B 4D 43 31 2C 31 31 |...!ML1,2;MC1,11|
000002C0: 3B 4D 50 31 2C 31 2C 30 2C 30 2C 30 3B 4D 4F 31 |;MP1,1,0,0,0;MO1|
000002D0: 2C 31 00 D8 0A E4 00 99 00 ED 0A E6 00 99 2C 2C |,1............,,|
000002E0: 22 45 44 49 54 22 2C 22 4C 4F 41 44 22 00 03 0B |"EDIT","LOAD"...|
000002F0: E8 00 99 2C 2C 22 43 4C 45 41 52 22 2C 22 53 41 |...,,"CLEAR","SA|
00000300: 56 45 22 00 1C 0B EA 00 99 2C 2C 22 4D 49 52 52 |VE"......,,"MIRR|
00000310: 4F 52 22 2C 22 52 45 42 4F 4F 54 22 00 33 0B EC |OR","REBOOT".3..|
00000320: 00 99 2C 2C 22 54 55 52 4E 22 2C 22 52 45 56 45 |..,,"TURN","REVE|
00000330: 52 53 22 00 4A 0B EE 00 99 2C 2C 22 52 4F 54 41 |RS".J....,,"ROTA|
00000340: 54 45 22 2C 22 43 4F 50 59 22 00 62 0B F0 00 99 |TE","COPY".b....|
00000350: 2C 2C 22 41 55 54 4F 52 45 56 22 2C 22 45 58 49 |,,"AUTOREV","EXI|
00000360: 54 22 00 A1 0B FA 00 81 49 B2 30 A4 37 3A 81 4A |T"......I.0.7:.J|
00000370: B2 30 A4 33 31 3A 21 54 46 34 AA 4A 2C 31 33 AA |.0.31:!TF4.J,13.|
00000380: 49 2C 31 2C 31 2C 33 32 AC 49 AA 4A 3A 82 4A 2C |I,1,1,32.I.J:.J,|
00000390: 49 3A 21 54 43 34 2C 31 33 2C 33 32 2C 38 2C 31 |I:!TC4,13,32,8,1|
000003A0: 34 00 BC 0B 04 01 4D 31 B2 30 3A 4D 32 B2 30 3A |4.....M1.0:M2.0:|
000003B0: 43 48 B2 30 3A 86 20 43 43 28 37 29 00 C2 0B 0E |CH.0:. CC(7)....|
000003C0: 01 3A 00 03 0C 2C 01 42 41 B2 31 33 AC 34 30 39 |.:...,.BA.13.409|
000003D0: 36 AA 38 AC 43 48 3A 21 54 43 34 2C 31 33 2C 33 |6.8.CH:!TC4,13,3|
000003E0: 32 2C 38 2C 31 34 3A 21 54 43 34 AA 28 43 48 AF |2,8,14:!TC4.(CH.|
000003F0: 33 31 29 2C 31 33 AA 43 48 AD 33 32 2C 31 2C 31 |31),13.CH.32,1,1|
00000400: 2C 31 35 00 29 0C 2D 01 21 4D 58 31 2C 38 AC 28 |,15.).-.!MX1,8.(|
00000410: 37 AA 28 43 48 AF 33 31 29 29 2C 31 35 34 AA 38 |7.(CH.31)),154.8|
00000420: AC B5 28 43 48 AD 33 32 29 00 58 0C 36 01 99 22 |..(CH.32).X.6.."|
00000430: 9A 22 3B 3A 81 4A B2 30 A4 37 3A 21 42 50 34 2C |.";:.J.0.7:!BP4,|
00000440: 33 AA 4A 2C 42 41 AA 4A 3A 43 43 28 4A 29 B2 C2 |3.J,BA.J:CC(J)..|
00000450: 28 31 30 32 34 29 3A 82 00 84 0C 40 01 21 54 43 |(1024):....@.!TC|
00000460: 32 30 2C 34 2C 32 30 2C 37 2C 31 34 3B 54 43 32 |20,4,20,7,14;TC2|
00000470: 30 AA 31 30 AC 4D 32 2C 34 AA 4D 31 2C 31 30 2C |0.10.M2,4.M1,10,|
00000480: 31 2C 31 35 00 8F 0C 45 01 8D 35 30 30 30 30 00 |1,15...E..50000.|
00000490: 9E 0C 4A 01 8B 50 59 B1 31 32 A7 35 30 30 00 C6 |..J..PY.12.500..|
000004A0: 0C 54 01 8B 28 50 58 B1 33 29 AF 28 50 58 B3 31 |.T..(PX.3).(PX.1|
000004B0: 32 29 AF 28 50 59 B1 32 29 AF 28 50 59 B3 31 31 |2).(PY.2).(PY.11|
000004C0: 29 A7 31 30 30 30 00 E6 0C 5E 01 8B 28 50 58 B1 |).1000...^..(PX.|
000004D0: 31 39 29 AF 28 50 59 B1 33 29 AF 28 50 59 B3 31 |19).(PY.3).(PY.1|
000004E0: 30 29 A7 34 30 30 00 EF 0C 68 01 89 33 32 35 00 |0).400...h..325.|
000004F0: 07 0D 90 01 4D 32 B2 AB 28 50 58 B1 32 39 29 3A |....M2..(PX.29):|
00000500: 4D 31 B2 50 59 AB 34 00 15 0D 95 01 8B 4D 32 B2 |M1.PY.4......M2.|
00000510: 30 A7 33 32 30 00 37 0D 9A 01 91 4D 31 AA 31 89 |0.320.7....M1.1.|
00000520: 39 30 30 2C 38 30 30 2C 34 36 30 2C 33 32 30 2C |900,800,460,320,|
00000530: 33 32 30 2C 34 32 30 00 4C 0D A4 01 21 50 54 34 |320,420.L...!PT4|
00000540: 30 39 36 30 3A 20 8F 20 45 58 49 54 00 71 0D AE |0960: . EXIT.q..|
00000550: 01 21 54 50 31 30 2C 38 2C 22 12 9F B8 B8 B8 B8 |.!TP10,8,"......|
00000560: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00000570: 22 00 95 0D B0 01 21 54 50 31 30 2C 39 2C 22 12 |".....!TP10,9,".|
00000580: 20 44 4F 20 59 4F 55 20 52 45 41 4C 4C 59 20 57 | DO YOU REALLY W|
00000590: 41 4E 54 20 22 00 BA 0D B2 01 21 54 50 31 30 2C |ANT ".....!TP10,|
000005A0: 31 30 2C 22 12 20 20 20 20 20 54 4F 20 45 58 49 |10,". TO EXI|
000005B0: 54 20 20 3F A0 20 20 20 20 22 00 D0 0D B8 01 8D |T ?. "......|
000005C0: 35 30 33 30 30 3A 8B 59 4E A7 3A 21 46 4F 3A 80 |50300:.YN.:!FO:.|
000005D0: 00 EC 0D C2 01 21 52 54 34 30 39 36 30 3A 4D 31 |.....!RT40960:M1|
000005E0: B2 30 3A 4D 32 B2 30 3A 89 33 32 30 00 03 0E CC |.0:M2.0:.320....|
000005F0: 01 21 50 54 34 30 39 36 30 3A 20 8F 20 52 45 42 |.!PT40960: . REB|
00000600: 4F 4F 54 00 28 0E D6 01 21 54 50 31 30 2C 38 2C |OOT.(...!TP10,8,|
00000610: 22 12 9F B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |"...............|
00000620: B8 B8 B8 B8 B8 B8 B8 22 00 4C 0E D8 01 21 54 50 |.......".L...!TP|
00000630: 31 30 2C 39 2C 22 12 20 44 4F 20 59 4F 55 20 52 |10,9,". DO YOU R|
00000640: 45 41 4C 4C 59 20 57 41 4E 54 20 22 00 71 0E DA |EALLY WANT ".q..|
00000650: 01 21 54 50 31 30 2C 31 30 2C 22 12 20 20 20 20 |.!TP10,10,". |
00000660: 54 4F 20 52 45 42 4F 4F 54 20 20 3F 20 20 20 20 |TO REBOOT ? |
00000670: 22 00 82 0E E0 01 8D 35 30 33 30 30 3A 8B 59 4E |"......50300:.YN|
00000680: A7 8A 00 9E 0E EA 01 21 52 54 34 30 39 36 30 3A |.......!RT40960:|
00000690: 4D 31 B2 30 3A 4D 32 B2 30 3A 89 33 32 30 00 B6 |M1.0:M2.0:.320..|
000006A0: 0E F4 01 8F 20 53 45 4C 45 43 54 20 43 48 41 52 |.... SELECT CHAR|
000006B0: 41 43 54 45 52 53 00 D6 0E FE 01 8B 28 50 58 B3 |ACTERS......(PX.|
000006C0: 34 29 B0 28 50 58 B1 33 35 29 B0 28 50 59 B1 32 |4).(PX.35).(PY.2|
000006D0: 30 29 A7 33 32 35 00 F2 0E 08 02 43 48 B2 33 32 |0).325.....CH.32|
000006E0: AC 28 50 59 AB 31 33 29 AA 50 58 AB 34 3A 89 33 |.(PY.13).PX.4:.3|
000006F0: 30 30 00 07 0F 20 03 21 50 54 34 30 39 36 30 3A |00... .!PT40960:|
00000700: 20 8F 20 53 41 56 45 00 2C 0F 2A 03 21 54 50 31 | . SAVE.,.*.!TP1|
00000710: 30 2C 38 2C 22 12 9F B8 B8 B8 B8 B8 B8 B8 B8 B8 |0,8,"...........|
00000720: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 22 00 50 0F 34 |...........".P.4|
00000730: 03 21 54 50 31 30 2C 39 2C 22 12 20 53 41 56 45 |.!TP10,9,". SAVE|
00000740: 20 43 48 41 52 41 43 54 45 52 2D 53 45 54 20 22 | CHARACTER-SET "|
00000750: 00 75 0F 3E 03 21 54 50 31 30 2C 31 30 2C 22 12 |.u.>.!TP10,10,".|
00000760: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000770: C0 C0 C0 C0 22 00 8C 0F 48 03 8D 35 30 34 30 30 |...."...H..50400|
00000780: 3A 8B 43 4E 24 B2 22 22 A7 34 39 30 00 AE 0F 52 |:.CN$."".490...R|
00000790: 03 21 46 53 30 2C 43 4E 24 2C 38 3A 8D 35 30 36 |.!FS0,CN$,8:.506|
000007A0: 30 30 3A 21 4D 4F 31 2C 31 3A 89 34 39 30 00 C3 |00:!MO1,1:.490..|
000007B0: 0F 84 03 21 50 54 34 30 39 36 30 3A 20 8F 20 4C |...!PT40960: . L|
000007C0: 4F 41 44 00 E8 0F 8E 03 21 54 50 31 30 2C 38 2C |OAD.....!TP10,8,|
000007D0: 22 12 9F B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |"...............|
000007E0: B8 B8 B8 B8 B8 B8 B8 22 00 0C 10 98 03 21 54 50 |.......".....!TP|
000007F0: 31 30 2C 39 2C 22 12 20 4C 4F 41 44 20 43 48 41 |10,9,". LOAD CHA|
00000800: 52 41 43 54 45 52 2D 53 45 54 20 22 00 31 10 A2 |RACTER-SET ".1..|
00000810: 03 21 54 50 31 30 2C 31 30 2C 22 12 C0 C0 C0 C0 |.!TP10,10,".....|
00000820: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000830: 22 00 48 10 AC 03 8D 35 30 34 30 30 3A 8B 43 4E |".H....50400:.CN|
00000840: 24 B2 22 22 A7 34 39 30 00 6A 10 B6 03 21 46 4C |$."".490.j...!FL|
00000850: 30 2C 43 4E 24 2C 38 3A 8D 35 30 36 30 30 3A 21 |0,CN$,8:.50600:!|
00000860: 4D 4F 31 2C 31 3A 89 34 39 30 00 97 10 E8 03 53 |MO1,1:.490.....S|
00000870: 58 B2 50 58 AB 34 3A 53 59 B2 50 59 AB 33 3A 4B |X.PX.4:SY.PY.3:K|
00000880: B2 43 43 28 53 59 29 3A 91 4D 32 AA 31 89 31 30 |.CC(SY):.M2.1.10|
00000890: 31 30 2C 31 30 32 30 00 BF 10 F2 03 91 4D 31 AA |10,1020......M1.|
000008A0: 31 89 31 31 30 30 2C 31 32 30 30 2C 31 34 30 30 |1.1100,1200,1400|
000008B0: 2C 31 33 30 30 2C 31 35 30 30 2C 31 36 30 30 00 |,1300,1500,1600.|
000008C0: E1 10 FC 03 91 4D 31 AA 31 89 31 37 30 30 2C 31 |.....M1.1.1700,1|
000008D0: 38 30 30 2C 31 30 30 2C 31 39 30 30 2C 32 30 30 |800,100,1900,200|
000008E0: 30 00 EC 10 4C 04 8F 20 45 44 49 54 00 FF 10 56 |0...L.. EDIT...V|
000008F0: 04 8B 4B AF 54 25 28 53 58 29 A7 31 31 33 30 00 |..K.T%(SX).1130.|
00000900: 20 11 60 04 43 43 28 53 59 29 B2 4B B0 54 25 28 | .`.CC(SY).K.T%(|
00000910: 53 58 29 3A 8D 35 30 31 30 30 3A 89 31 31 34 30 |SX):.50100:.1140|
00000920: 00 41 11 6A 04 43 43 28 53 59 29 B2 4B AF 28 32 |.A.j.CC(SY).K.(2|
00000930: 35 35 AB 54 25 28 53 58 29 29 3A 8D 35 30 31 30 |55.T%(SX)):.5010|
00000940: 30 00 5F 11 74 04 99 22 9A 22 3B 3A 21 42 42 34 |0._.t..".";:!BB4|
00000950: 2C 50 59 2C 43 43 28 53 59 29 3A 89 33 32 35 00 |,PY,CC(SY):.325.|
00000960: 6B 11 B0 04 8F 20 43 4C 45 41 52 00 8C 11 BA 04 |k.... CLEAR.....|
00000970: 81 49 B2 30 A4 37 3A 43 43 28 49 29 B2 30 3A 82 |.I.0.7:CC(I).0:.|
00000980: 3A 8D 35 30 31 30 30 3A 89 33 30 30 00 97 11 14 |:.50100:.300....|
00000990: 05 8F 20 54 55 52 4E 00 A2 11 1E 05 8D 35 30 32 |.. TURN......502|
000009A0: 30 30 00 C1 11 28 05 91 49 89 31 33 35 30 2C 31 |00...(..I.1350,1|
000009B0: 33 33 30 2C 31 33 31 30 2C 31 33 31 30 2C 33 30 |330,1310,1310,30|
000009C0: 30 00 CC 11 32 05 21 4D 43 30 2C 30 00 0B 12 34 |0...2.!MC0,0...4|
000009D0: 05 81 49 B2 30 A4 37 3A 43 44 28 37 AB 49 29 B2 |..I.0.7:CD(7.I).|
000009E0: 30 3A 81 4A B2 30 A4 37 3A 8B 43 43 28 4A 29 AF |0:.J.0.7:.CC(J).|
000009F0: 54 25 28 49 29 A7 43 44 28 37 AB 49 29 B2 43 44 |T%(I).CD(7.I).CD|
00000A00: 28 37 AB 49 29 B0 54 25 28 4A 29 00 19 12 3C 05 |(7.I).T%(J)...<.|
00000A10: 82 3A 82 3A 89 31 33 37 30 00 24 12 46 05 21 4D |.:.:.1370.$.F.!M|
00000A20: 43 30 2C 30 00 5F 12 48 05 81 49 B2 30 A4 37 3A |C0,0._.H..I.0.7:|
00000A30: 43 44 28 49 29 B2 30 3A 81 4A B2 30 A4 37 3A 8B |CD(I).0:.J.0.7:.|
00000A40: 43 43 28 4A 29 AF 54 25 28 49 29 A7 43 44 28 49 |CC(J).T%(I).CD(I|
00000A50: 29 B2 43 44 28 49 29 B0 54 25 28 37 AB 4A 29 00 |).CD(I).T%(7.J).|
00000A60: 67 12 50 05 82 3A 82 00 87 12 5A 05 81 49 B2 30 |g.P..:....Z..I.0|
00000A70: A4 37 3A 43 43 28 49 29 B2 43 44 28 49 29 3A 82 |.7:CC(I).CD(I):.|
00000A80: 3A 8D 35 30 31 30 30 00 B0 12 64 05 81 4A B2 30 |:.50100...d..J.0|
00000A90: A4 37 3A 21 42 50 34 2C 33 AA 4A 2C 42 41 AA 4A |.7:!BP4,3.J,BA.J|
00000AA0: 3A 82 3A 21 4D 43 30 2C 31 35 3A 89 31 33 31 30 |:.:!MC0,15:.1310|
00000AB0: 00 BD 12 78 05 8F 20 4D 49 52 52 4F 52 00 C8 12 |...x.. MIRROR...|
00000AC0: 82 05 8D 35 30 32 30 30 00 E7 12 8C 05 91 49 89 |...50200......I.|
00000AD0: 31 34 33 30 2C 31 34 33 30 2C 31 34 35 30 2C 31 |1430,1430,1450,1|
00000AE0: 34 35 30 2C 33 30 30 00 F2 12 96 05 21 4D 43 30 |450,300.....!MC0|
00000AF0: 2C 30 00 24 13 98 05 81 49 B2 30 A4 37 3A 43 44 |,0.$....I.0.7:CD|
00000B00: B2 30 3A 81 4A B2 30 A4 37 3A 8B 43 43 28 49 29 |.0:.J.0.7:.CC(I)|
00000B10: AF 54 25 28 4A 29 A7 43 44 B2 43 44 B0 54 25 28 |.T%(J).CD.CD.T%(|
00000B20: 37 AB 4A 29 00 3B 13 A0 05 82 3A 43 43 28 49 29 |7.J).;....:CC(I)|
00000B30: B2 43 44 3A 82 3A 89 31 34 38 30 00 46 13 AA 05 |.CD:.:.1480.F...|
00000B40: 21 4D 43 30 2C 30 00 61 13 AC 05 81 49 B2 30 A4 |!MC0,0.a....I.0.|
00000B50: 37 3A 43 44 28 49 29 B2 43 43 28 37 AB 49 29 3A |7:CD(I).CC(7.I):|
00000B60: 82 00 7A 13 BE 05 81 49 B2 30 A4 37 3A 43 43 28 |..z....I.0.7:CC(|
00000B70: 49 29 B2 43 44 28 49 29 3A 82 00 AA 13 C8 05 8D |I).CD(I):.......|
00000B80: 35 30 31 30 30 3A 81 4A B2 30 A4 37 3A 21 42 50 |50100:.J.0.7:!BP|
00000B90: 34 2C 33 AA 4A 2C 42 41 AA 4A 3A 82 3A 21 4D 43 |4,3.J,BA.J:.:!MC|
00000BA0: 30 2C 31 35 3A 89 31 34 31 30 00 B7 13 DC 05 8F |0,15:.1410......|
00000BB0: 20 52 4F 54 41 54 45 00 CB 13 E6 05 8D 35 30 32 | ROTATE......502|
00000BC0: 30 30 3A 8B 49 B2 35 A7 33 30 30 00 ED 13 F0 05 |00:.I.5.300.....|
00000BD0: 21 4D 43 30 2C 30 3A 91 49 89 31 35 33 30 2C 31 |!MC0,0:.I.1530,1|
00000BE0: 35 34 30 2C 31 35 35 30 2C 31 35 36 30 00 14 14 |540,1550,1560...|
00000BF0: FA 05 81 49 B2 30 A4 37 3A 43 43 28 49 29 B2 32 |...I.0.7:CC(I).2|
00000C00: 35 35 AF 28 43 43 28 49 29 AD 32 29 3A 82 3A 89 |55.(CC(I).2):.:.|
00000C10: 31 35 37 30 00 3B 14 04 06 81 49 B2 30 A4 37 3A |1570.;....I.0.7:|
00000C20: 43 43 28 49 29 B2 32 35 35 AF 28 43 43 28 49 29 |CC(I).255.(CC(I)|
00000C30: AC 32 29 3A 82 3A 89 31 35 37 30 00 66 14 0E 06 |.2):.:.1570.f...|
00000C40: 81 49 B2 30 A4 36 3A 43 43 28 37 AB 49 29 B2 43 |.I.0.6:CC(7.I).C|
00000C50: 43 28 36 AB 49 29 3A 82 3A 43 43 28 30 29 B2 30 |C(6.I):.:CC(0).0|
00000C60: 3A 89 31 35 37 30 00 89 14 18 06 81 49 B2 30 A4 |:.1570......I.0.|
00000C70: 36 3A 43 43 28 49 29 B2 43 43 28 49 AA 31 29 3A |6:CC(I).CC(I.1):|
00000C80: 82 3A 43 43 28 37 29 B2 30 00 94 14 22 06 8D 35 |.:CC(7).0..."..5|
00000C90: 30 31 30 30 00 BD 14 2C 06 81 4A B2 30 A4 37 3A |0100...,..J.0.7:|
00000CA0: 21 42 50 34 2C 33 AA 4A 2C 42 41 AA 4A 3A 82 3A |!BP4,3.J,BA.J:.:|
00000CB0: 21 4D 43 30 2C 31 35 3A 89 31 35 31 30 00 CB 14 |!MC0,15:.1510...|
00000CC0: 40 06 8F 20 41 55 54 4F 52 45 56 00 02 15 4A 06 |@.. AUTOREV...J.|
00000CD0: 21 52 47 31 2C 35 33 32 34 38 3B 47 4B 31 2C 32 |!RG1,53248;GK1,2|
00000CE0: 2C 33 3B 47 4E 32 3B 47 49 3B 50 47 32 2C 36 30 |,3;GN2;GI;PG2,60|
00000CF0: 34 31 36 3B 50 47 31 2C 35 33 32 34 38 3A 89 33 |416;PG1,53248:.3|
00000D00: 30 30 00 0F 15 6C 07 8F 20 52 45 56 45 52 53 00 |00...l.. REVERS.|
00000D10: 38 15 76 07 81 49 B2 30 A4 37 3A 43 43 28 49 29 |8.v..I.0.7:CC(I)|
00000D20: B2 32 35 35 AB 43 43 28 49 29 3A 82 3A 8D 35 30 |.255.CC(I):.:.50|
00000D30: 31 30 30 3A 89 33 30 30 00 43 15 D0 07 8F 20 43 |100:.300.C.... C|
00000D40: 4F 50 59 00 7F 15 DA 07 21 4D 43 30 2C 37 3A 4D |OPY.....!MC0,7:M|
00000D50: 4D B2 31 3A 8D 35 30 30 30 30 3A 8B 28 50 58 B3 |M.1:.50000:.(PX.|
00000D60: 34 29 B0 28 50 58 B1 33 35 29 B0 28 50 59 B1 32 |4).(PX.35).(PY.2|
00000D70: 30 29 B0 28 50 59 B3 31 33 29 A7 32 30 31 30 00 |0).(PY.13).2010.|
00000D80: A3 15 E4 07 21 4D 43 30 2C 31 35 3A 4D 4D B2 30 |....!MC0,15:MM.0|
00000D90: 3A 43 48 B2 33 32 AC 28 50 59 AB 31 33 29 AA 50 |:CH.32.(PY.13).P|
00000DA0: 58 AB 34 00 B3 15 EE 07 8D 35 30 31 30 30 3A 89 |X.4......50100:.|
00000DB0: 33 30 30 00 CD 15 50 C3 8F 20 4D 41 55 53 2D 53 |300...P.. MAUS-S|
00000DC0: 45 4C 45 43 54 2D 52 4F 55 54 49 4E 45 00 F5 15 |ELECT-ROUTINE...|
00000DD0: 5A C3 21 4D 4F 30 2C 31 3B 4D 4C 30 2C 30 AA 4D |Z.!MO0,1;ML0,0.M|
00000DE0: 4D 3B 4D 58 30 2C 32 37 AA 38 AC 50 58 2C 35 33 |M;MX0,27.8.PX,53|
00000DF0: AA 38 AC 50 59 00 0F 16 64 C3 8B C2 28 31 39 38 |.8.PY...d...(198|
00000E00: 29 B2 30 A7 3A 21 4A 53 3A 89 35 30 30 32 30 00 |).0.:!JS:.50020.|
00000E10: 2B 16 6E C3 A1 49 24 3A 8B 49 24 B2 C7 28 31 33 |+.n..I$:.I$..(13|
00000E20: 29 A7 3A 21 4D 4C 30 2C 31 3A 8E 00 45 16 78 C3 |).:!ML0,1:..E.x.|
00000E30: 8B 49 24 B2 22 91 22 A7 8B 50 59 B1 30 A7 50 59 |.I$."."..PY.0.PY|
00000E40: B2 50 59 AB 31 00 60 16 82 C3 8B 49 24 B2 22 1D |.PY.1.`....I$.".|
00000E50: 22 A7 8B 50 58 B3 33 39 A7 50 58 B2 50 58 AA 31 |"..PX.39.PX.PX.1|
00000E60: 00 7B 16 8C C3 8B 49 24 B2 22 11 22 A7 8B 50 59 |.{....I$."."..PY|
00000E70: B3 32 34 A7 50 59 B2 50 59 AA 31 00 95 16 96 C3 |.24.PY.PY.1.....|
00000E80: 8B 49 24 B2 22 9D 22 A7 8B 50 58 B1 30 A7 50 58 |.I$."."..PX.0.PX|
00000E90: B2 50 58 AB 31 00 A0 16 A0 C3 89 35 30 30 31 30 |.PX.1......50010|
00000EA0: 00 B8 16 B4 C3 8F 20 53 54 4F 52 41 47 45 2D 43 |...... STORAGE-C|
00000EB0: 48 41 52 41 43 54 45 52 00 D7 16 BE C3 81 4A B2 |HARACTER......J.|
00000EC0: 30 A4 37 3A 21 46 42 30 2C 43 48 2C 4A 2C 43 43 |0.7:!FB0,CH,J,CC|
00000ED0: 28 4A 29 3A 82 3A 8E 00 F5 16 18 C4 8F 20 57 41 |(J):.:....... WA|
00000EE0: 52 54 45 4E 20 41 55 46 20 43 55 52 53 4F 52 2D |RTEN AUF CURSOR-|
00000EF0: 54 41 53 54 45 00 0F 17 22 C4 8B C2 28 31 39 38 |TASTE..."...(198|
00000F00: 29 B2 30 A7 3A 21 4A 53 3A 89 35 30 32 31 30 00 |).0.:!JS:.50210.|
00000F10: 1B 17 2C C4 A1 49 24 3A 49 B2 31 00 49 17 36 C4 |..,..I$:I.1.I.6.|
00000F20: 8B 49 24 B3 B1 CA 28 22 1D 9D 11 91 22 AA C7 28 |.I$...("...."..(|
00000F30: 31 33 29 2C 49 2C 31 29 A7 49 B2 49 AA 31 3A 8B |13),I,1).I.I.1:.|
00000F40: 49 B3 36 A7 35 30 32 33 30 00 58 17 40 C4 8B 49 |I.6.50230.X.@..I|
00000F50: B2 36 A7 35 30 32 31 30 00 5E 17 4A C4 8E 00 74 |.6.50210.^.J...t|
00000F60: 17 7C C4 8F 20 4E 55 52 20 59 45 53 20 4F 44 45 |.|.. NUR YES ODE|
00000F70: 52 20 4E 4F 00 99 17 86 C4 21 54 50 31 30 2C 31 |R NO.....!TP10,1|
00000F80: 31 2C 22 12 20 20 20 B9 B9 B9 B9 B9 20 20 20 20 |1,". ..... |
00000F90: 20 B9 B9 B9 B9 20 20 20 22 00 C2 17 90 C4 21 54 | .... ".....!T|
00000FA0: 50 31 30 2C 31 32 2C 22 12 20 20 20 92 20 59 45 |P10,12,". . YE|
00000FB0: 53 20 12 20 20 20 20 20 92 20 4E 4F 20 12 20 20 |S . . NO . |
00000FC0: 20 22 00 E7 17 9A C4 21 54 50 31 30 2C 31 33 2C | ".....!TP10,13,|
00000FD0: 22 12 20 20 20 B8 B8 B8 B8 B8 20 20 20 20 20 B8 |". ..... .|
00000FE0: B8 B8 B8 20 20 20 22 00 00 18 A4 C4 8D 35 30 30 |... "......500|
00000FF0: 30 30 3A 8B 50 59 B3 B1 31 32 A7 35 30 33 34 30 |00:.PY..12.50340|
00001000: 00 1B 18 AE C4 8B 28 50 58 B3 31 33 29 B0 28 50 |......(PX.13).(P|
00001010: 58 B1 31 37 29 A7 35 30 33 37 30 00 26 18 B8 C4 |X.17).50370.&...|
00001020: 59 4E B2 31 3A 8E 00 41 18 C2 C4 8B 28 50 58 B3 |YN.1:..A....(PX.|
00001030: 32 33 29 B0 28 50 58 B1 32 36 29 A7 35 30 33 34 |23).(PX.26).5034|
00001040: 30 00 4C 18 CC C4 59 4E B2 30 3A 8E 00 60 18 E0 |0.L...YN.0:..`..|
00001050: C4 8F 20 4E 41 4D 45 4E 53 45 49 4E 47 41 42 45 |.. NAMENSEINGABE|
00001060: 00 85 18 E5 C4 21 54 50 31 30 2C 31 31 2C 22 12 |.....!TP10,11,".|
00001070: 20 47 49 56 45 20 4E 41 4D 45 20 46 4F 52 20 53 | GIVE NAME FOR S|
00001080: 45 54 3A 20 22 00 AA 18 EA C4 21 54 50 31 30 2C |ET: ".....!TP10,|
00001090: 31 32 2C 22 12 20 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |12,". ..........|
000010A0: B9 B9 B9 B9 B9 B9 B9 B9 20 22 00 D1 18 F4 C4 21 |........ ".....!|
000010B0: 54 50 31 30 2C 31 33 2C 22 12 20 92 3E 20 20 20 |TP10,13,". .> |
000010C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 12 20 | . |
000010D0: 22 00 F6 18 FE C4 21 54 50 31 30 2C 31 34 2C 22 |".....!TP10,14,"|
000010E0: 12 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |. ..............|
000010F0: B8 B8 B8 B8 20 22 00 01 19 08 C5 43 4E 24 B2 22 |.... ".....CN$."|
00001100: 22 00 27 19 12 C5 21 54 46 31 32 2C 31 33 2C 31 |".'...!TF12,13,1|
00001110: 37 2C 31 2C 33 32 3B 54 50 31 32 2C 31 33 2C 43 |7,1,32;TP12,13,C|
00001120: 4E 24 AA 22 A4 22 3B 00 4B 19 1C C5 92 31 39 38 |N$.".";.K....198|
00001130: 2C 36 33 3A A1 49 24 3A 49 B2 C6 28 49 24 29 3A |,63:.I$:I..(I$):|
00001140: 8B 49 B2 31 33 A7 35 30 35 32 30 00 6D 19 21 C5 |.I.13.50520.m.!.|
00001150: 49 41 B2 49 AF 39 36 3A 8B 28 49 41 B2 30 29 AF |IA.I.96:.(IA.0).|
00001160: 28 49 B3 B1 32 30 29 A7 35 30 34 36 30 00 7B 19 |(I..20).50460.{.|
00001170: 26 C5 8B 49 41 A7 35 30 35 30 30 00 8D 19 30 C5 |&..IA.50500...0.|
00001180: 8B 43 4E 24 B2 22 22 A7 35 30 34 36 30 00 AC 19 |.CN$."".50460...|
00001190: 3A C5 43 4E 24 B2 C8 28 43 4E 24 2C C3 28 43 4E |:.CN$..(CN$,.(CN|
000011A0: 24 29 AB 31 29 3A 89 35 30 34 35 30 00 C1 19 44 |$).1):.50450...D|
000011B0: C5 8B C3 28 43 4E 24 29 B2 31 36 A7 35 30 34 35 |...(CN$).16.5045|
000011C0: 30 00 D7 19 4E C5 43 4E 24 B2 43 4E 24 AA 49 24 |0...N.CN$.CN$.I$|
000011D0: 3A 89 35 30 34 35 30 00 E7 19 58 C5 8B 43 4E 24 |:.50450...X..CN$|
000011E0: B3 B1 22 24 22 A7 8E 00 FB 19 62 C5 21 50 54 34 |.."$".....b.!PT4|
000011F0: 33 30 30 38 3A 99 22 93 9B 22 3B 00 28 1A 6C C5 |3008:."..";.(.l.|
00001200: 21 4D 4F 30 2C 30 3B 4D 4F 31 2C 30 3A 9F 31 2C |!MO0,0;MO1,0:.1,|
00001210: 38 2C 30 2C 22 24 22 3A A1 23 31 2C 49 24 2C 49 |8,0,"$":.#1,I$,I|
00001220: 24 3A 89 35 30 35 35 30 00 56 1A 71 C5 21 4A 53 |$:.50550.V.q.!JS|
00001230: 3A 8B C2 28 31 39 38 29 B1 30 A7 A1 49 24 3A 99 |:..(198).0..I$:.|
00001240: A3 33 35 29 22 12 20 57 20 22 3B 3A 8D 35 30 38 |.35)". W ";:.508|
00001250: 30 30 3A A1 49 24 00 68 1A 73 C5 8B 49 24 B2 22 |00:.I$.h.s..I$."|
00001260: 58 22 A7 35 30 35 38 30 00 6E 1A 74 C5 99 00 8F |X".50580.n.t....|
00001270: 1A 76 C5 A1 23 31 2C 49 24 2C 49 24 2C 49 24 2C |.v..#1,I$,I$,I$,|
00001280: 4A 24 3A 8B 53 54 B1 36 33 A7 35 30 35 38 30 00 |J$:.ST.63.50580.|
00001290: AF 1A 7B C5 99 C6 28 49 24 AA C7 28 30 29 29 AA |..{...(I$..(0)).|
000012A0: 32 35 36 AC C6 28 4A 24 AA C7 28 30 29 29 3B 00 |256..(J$..(0));.|
000012B0: CD 1A 80 C5 A1 23 31 2C 49 24 3A 99 49 24 3B 3A |.....#1,I$:.I$;:|
000012C0: 8B 49 24 B3 B1 22 22 A7 35 30 35 36 30 00 D8 1A |.I$.."".50560...|
000012D0: 8A C5 89 35 30 35 34 35 00 EF 1A 94 C5 99 22 A4 |...50545......".|
000012E0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 22 00 |..............".|
000012F0: 07 1B 9E C5 99 22 12 20 50 52 45 53 53 20 41 4E |.....". PRESS AN|
00001300: 59 20 4B 45 59 A0 22 00 36 1B A3 C5 8D 35 30 38 |Y KEY.".6....508|
00001310: 30 30 3A A1 49 24 3A 21 52 54 34 33 30 30 38 3A |00:.I$:!RT43008:|
00001320: A0 31 3A 21 4D 4F 30 2C 31 3B 4D 4F 31 2C 31 3A |.1:!MO0,1;MO1,1:|
00001330: 89 35 30 34 34 30 00 54 1B A8 C5 8F 20 44 49 53 |.50440.T.... DIS|
00001340: 4B 45 54 54 45 4E 4B 41 4E 41 4C 20 41 42 46 52 |KETTENKANAL ABFR|
00001350: 41 47 45 4E 00 79 1B B2 C5 9F 31 35 2C 38 2C 31 |AGEN.y....15,8,1|
00001360: 35 3A 84 31 35 2C 49 31 24 2C 49 32 24 2C 49 33 |5:.15,I1$,I2$,I3|
00001370: 24 2C 49 34 24 3A A0 31 35 00 AA 1B BC C5 21 54 |$,I4$:.15.....!T|
00001380: 50 34 2C 31 36 2C 22 12 99 B8 B8 B8 B8 B8 B8 B8 |P4,16,".........|
00001390: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000013A0: B8 B8 B8 B8 B8 B8 B8 B8 B8 22 00 DA 1B C1 C5 21 |.........".....!|
000013B0: 54 50 34 2C 31 37 2C 22 12 20 A0 44 49 53 4B 20 |TP4,17,". .DISK |
000013C0: 4D 45 53 53 41 47 45 20 3A 20 20 20 20 20 20 20 |MESSAGE : |
000013D0: 20 20 20 20 20 20 20 20 20 22 00 0A 1C C6 C5 21 | ".....!|
000013E0: 54 50 34 2C 31 38 2C 22 12 20 B9 B9 B9 B9 B9 B9 |TP4,18,". ......|
000013F0: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001400: B9 B9 B9 B9 B9 B9 B9 B9 20 22 00 3C 1C D0 C5 21 |........ ".<...!|
00001410: 54 50 34 2C 31 39 2C 22 12 20 92 20 20 20 20 20 |TP4,19,". . |
00001420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001430: 20 20 20 20 20 20 20 20 20 12 20 22 00 6D 1C DA | . ".m..|
00001440: C5 21 54 50 34 2C 32 30 2C 22 12 20 B8 B8 B8 B8 |.!TP4,20,". ....|
00001450: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001460: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 20 9B 22 00 92 1C |.......... ."...|
00001470: E4 C5 21 54 50 36 2C 31 39 2C 49 31 24 22 2C 22 |..!TP6,19,I1$","|
00001480: 49 32 24 22 2C 22 49 33 24 22 2C 22 49 34 24 22 |I2$","I3$","I4$"|
00001490: 2C 22 00 A3 1C EE C5 8D 35 30 38 30 30 3A A1 49 |,"......50800:.I|
000014A0: 24 3A 8E 00 C3 1C 70 C6 8F 20 57 41 52 54 45 4E |$:....p.. WARTEN|
000014B0: 20 41 55 46 20 54 41 53 54 41 54 55 52 50 55 46 | AUF TASTATURPUF|
000014C0: 46 45 52 00 DD 1C 7A C6 8B C2 28 31 39 38 29 B2 |FER...z...(198).|
000014D0: 30 A7 3A 21 4A 53 3A 89 35 30 38 31 30 00 E3 1C |0.:!JS:.50810...|
000014E0: 84 C6 8E 00 00 00 |...... |
..&....B(49234)..F("S").."SPG.OBJ",8,1.1
....49152.:.D.MM.0.F.I.!FD 0,126,254,130
,130,130,130,130,254,0...N.!FD 0,127,254
,254,254,254,254,254,254,0...X.!BC 190,1
91.I.}.T%(0).128:.I.1.7:T%(I).T%(I.1).2:
......."....";:.53280,6:.53281,6.....!GR
0;GN0;GE......I.0.24:.J:!MB0,I,J:..]. ..
127,0,0,126,0,0,124,0,0,126,0,0,127,0,0
,111,128,0,71,192,0,3,128,0,1.W....I.0.2
4:.J:!MB1,I,J:....... 127,0,0,66,0,0,68,
0,0,66,0,0,81,0,0,104,128,0,68,64,0,2,12
8,0,1.W....I.0.23:.J:!MB2,I,J:..%.... 25
5,0,0,255,0,0,255,0,0,255,0,0,255,0,0,25
5,0,0,255,0,0,255,0,0,255,0,0.+...:.\.H.
.".. ...................................
..."...R.." . *** C64 CHARACTER-SET ED
ITOR *** ..".....!TF4,3,8,8,126;TC4,3,
8,8,14.R...!ML1,2;MC1,11;MP1,1,0,0,0;MO1
,1.X..........,,"EDIT","LOAD"......,,"CL
EAR","SAVE"......,,"MIRROR","REBOOT".3..
..,,"TURN","REVERS".J....,,"ROTATE","COP
Y".B....,,"AUTOREV","EXIT"......I.0.7:.J
.0.31:!TF4.J,13.I,1,1,32.I.J:.J,I:!TC4,1
3,32,8,14.....M1.0:M2.0:CH.0:. CC(7).B..
.:...,.BA.13.4096.8.CH:!TC4,13,32,8,14:!
TC4.(CH.31),13.CH.32,1,1,15.).-.!MX1,8.(
7.(CH.31)),154.8..(CH.32).X.6..".";:.J.0
.7:!BP4,3.J,BA.J:CC(J).B(1024):....@.!TC
20,4,20,7,14;TC20.10.M2,4.M1,10,1,15...E
..50000...J..PY.12.500.F.T..(PX.3).(PX.1
2).(PY.2).(PY.11).1000...^..(PX.19).(PY.
3).(PY.10).400...H..325.....M2..(PX.29):
M1.PY.4......M2.0.320.7....M1.1.900,800,
460,320,320,420.L...!PT40960: . EXIT.Q..
.!TP10,8,"......................".....!T
P10,9,". DO YOU REALLY WANT ".....!TP10,
10,". TO EXIT ? ".P....50300:.Y
N.:!FO:....B.!RT40960:M1.0:M2.0:.320...L
.!PT40960: . REBOOT.(.V.!TP10,8,".......
...............".L.X.!TP10,9,". DO YOU R
EALLY WANT ".Q.Z.!TP10,10,". TO REBOO
T ? "......50300:.YN.......!RT40960:
M1.0:M2.0:.320...... SELECT CHARACTERS.V
....(PX.4).(PX.35).(PY.20).325.....CH.32
.(PY.13).PX.4:.300... .!PT40960: . SAVE.
,.*.!TP10,8,"......................".P.4
.!TP10,9,". SAVE CHARACTER-SET ".U.>.!TP
10,10,"....................."...H..50400
:.CN$."".490...R.!FS0,CN$,8:.50600:!MO1,
1:.490.C...!PT40960: . LOAD.....!TP10,8,
"......................".....!TP10,9,".
LOAD CHARACTER-SET ".1...!TP10,10,".....
................".H....50400:.CN$."".490
.J...!FL0,CN$,8:.50600:!MO1,1:.490.....S
X.PX.4:SY.PY.3:K.CC(SY):.M2.1.1010,1020.
.....M1.1.1100,1200,1400,1300,1500,1600.
.....M1.1.1700,1800,100,1900,2000...L..
EDIT...V..K.T%(SX).1130. .`.CC(SY).K.T%(
SX):.50100:.1140.A.J.CC(SY).K.(255.T%(SX
)):.50100._.T..".";:!BB4,PY,CC(SY):.325.
K.... CLEAR......I.0.7:CC(I).0:.:.50100:
.300...... TURN......50200.A.(..I.1350,1
330,1310,1310,300.L.2.!MC0,0...4..I.0.7:
CD(7.I).0:.J.0.7:.CC(J).T%(I).CD(7.I).CD
(7.I).T%(J)...<..:.:.1370.$.F.!MC0,0._.H
..I.0.7:CD(I).0:.J.0.7:.CC(J).T%(I).CD(I
).CD(I).T%(7.J).G.P..:....Z..I.0.7:CC(I)
.CD(I):.:.50100...D..J.0.7:!BP4,3.J,BA.J
:.:!MC0,15:.1310...X.. MIRROR.H....50200
......I.1430,1430,1450,1450,300.....!MC0
,0.$....I.0.7:CD.0:.J.0.7:.CC(I).T%(J).C
D.CD.T%(7.J).;. ..:CC(I).CD:.:.1480.F...
!MC0,0.A....I.0.7:CD(I).CC(7.I):..Z....I
.0.7:CC(I).CD(I):....H..50100:.J.0.7:!BP
4,3.J,BA.J:.:!MC0,15:.1410...... ROTATE.
K....50200:.I.5.300.....!MC0,0:.I.1530,1
540,1550,1560......I.0.7:CC(I).255.(CC(I
).2):.:.1570.;....I.0.7:CC(I).255.(CC(I)
.2):.:.1570.F....I.0.6:CC(7.I).CC(6.I):.
:CC(0).0:.1570......I.0.6:CC(I).CC(I.1):
.:CC(7).0..."..50100...,..J.0.7:!BP4,3.J
,BA.J:.:!MC0,15:.1510.K.@.. AUTOREV...J.
!RG1,53248;GK1,2,3;GN2;GI;PG2,60416;PG1,
53248:.300...L.. REVERS.8.V..I.0.7:CC(I)
.255.CC(I):.:.50100:.300.C.P.. COPY..Z.
!MC0,7:MM.1:.50000:.(PX.4).(PX.35).(PY.2
0).(PY.13).2010.....!MC0,15:MM.0:CH.32.(
PY.13).PX.4......50100:.300.M.PC. MAUS-S
ELECT-ROUTINE...ZC!MO0,1;ML0,0.MM;MX0,27
.8.PX,53.8.PY...DC.B(198).0.:!JS:.50020.
+.NC.I$:.I$.G(13).:!ML0,1:..E.XC.I$.".".
.PY.0.PY.PY.1.`..C.I$."."..PX.39.PX.PX.1
.{..C.I$."."..PY.24.PY.PY.1....C.I$.".".
.PX.0.PX.PX.1. . C.50010....C. STORAGE-C
HARACTER.W..C.J.0.7:!FB0,CH,J,CC(J):.:..
...D. WARTEN AUF CURSOR-TASTE..."D.B(198
).0.:!JS:.50210...,D.I$:I.1.I.6D.I$..J("
....".G(13),I,1).I.I.1:.I.6.50230.X.@D.I
.6.50210.^.JD..T.|D. NUR YES ODER NO....
D!TP10,11,". ..... .... ".B..D!T
P10,12,". . YES . . NO . "....D!
TP10,13,". ..... .... "....D.500
00:.PY..12.50340....D.(PX.13).(PX.17).50
370.&..DYN.1:..A.BD.(PX.23).(PX.26).5034
0.L.LDYN.0:..`..D. NAMENSEINGABE....D!TP
10,11,". GIVE NAME FOR SET: "....D!TP10,
12,". .................. ".Q..D!TP10,13,
". .> . "....D!TP10,14,"
. .................. "....ECN$."".'..E!T
F12,13,17,1,32;TP12,13,CN$.".";.K..E.198
,63:.I$:I.F(I$):.I.13.50520.M.!EIA.I.96:
.(IA.0).(I..20).50460.{.&E.IA.50500...0E
.CN$."".50460...:ECN$.H(CN$,C(CN$).1):.5
0450.A.DE.C(CN$).16.50450.W.NECN$.CN$.I$
:.50450...XE.CN$.."$".....BE!PT43008:.".
.";.(.LE!MO0,0;MO1,0:.1,8,0,"$":.#1,I$,I
$:.50550.V.QE!JS:.B(198).0..I$:..35)". W
";:.50800:.I$.H.SE.I$."X".50580.N.TE...
.VE.#1,I$,I$,I$,J$:.ST.63.50580...{E.F(I
$.G(0)).256.F(J$.G(0));.M..E.#1,I$:.I$;:
.I$.."".50560.X..E.50545....E.".........
......"....E.". PRESS ANY KEY ".6..E.508
00:.I$:!RT43008: 1:!MO0,1;MO1,1:.50440.T
..E. DISKETTENKANAL ABFRAGEN.Y..E.15,8,1
5:.15,I1$,I2$,I3$,I4$: 15....E!TP4,16,".
.................................".Z.AE!
TP4,17,". DISK MESSAGE :
"...FE!TP4,18,". ......................
........ ".<.PE!TP4,19,". .
. ".M.ZE!TP4,20,". ....
.......................... ."....E!TP6,1
9,I1$","I2$","I3$","I4$","....E.50800:.I
$:..C.PF. WARTEN AUF TASTATURPUFFER...ZF
.B(198).0.:!JS:.50810....F....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL