00000000: 01 40 22 40 0A 00 8F 2A 2A 2A 2A 2A 20 53 48 41 |.@"@...***** SHA|
00000010: 50 45 20 45 52 53 54 45 4C 4C 45 4E 20 2A 2A 2A |PE ERSTELLEN ***|
00000020: 2A 2A 00 43 40 14 00 E7 30 2C 31 3A E7 34 2C 31 |**.C@...0,1:.4,1|
00000030: 3A E7 31 2C 36 3A DE 31 2C 31 3A 42 24 B2 C7 28 |:.1,6:.1,1:B$..(|
00000040: 31 33 29 00 69 40 1E 00 E2 31 2C 31 30 2C 31 30 |13).i@...1,10,10|
00000050: 2C 31 30 2C 31 30 3A E4 41 24 2C 30 2C 30 2C 32 |,10,10:.A$,0,0,2|
00000060: 30 2C 32 30 3A 8D 32 33 30 00 77 40 28 00 F2 22 |0,20:.230.w@(.."|
00000070: 53 48 41 50 45 31 22 00 A6 40 32 00 8F 2A 2A 2A |SHAPE1"..@2..***|
00000080: 2A 2A 20 53 48 41 50 45 53 20 41 55 46 20 44 49 |** SHAPES AUF DI|
00000090: 53 4B 45 54 54 45 20 53 50 45 49 43 48 45 52 4E |SKETTE SPEICHERN|
000000A0: 20 2A 2A 2A 2A 2A 00 BD 40 3C 00 FE 0D 23 31 2C | *****..@<...#1,|
000000B0: 22 53 48 41 50 45 31 22 2C 57 3A 98 31 00 ED 40 |"SHAPE1",W:.1..@|
000000C0: 46 00 81 49 B2 31 A4 C3 28 41 24 29 3A 98 31 2C |F..I.1..(A$):.1,|
000000D0: C6 28 CA 28 41 24 2C 49 2C 31 29 29 42 24 3A 82 |.(.(A$,I,1))B$:.|
000000E0: 49 3A 98 31 2C 22 45 4E 44 45 22 42 24 00 F6 40 |I:.1,"ENDE"B$..@|
000000F0: 50 00 FE 0F 23 31 00 26 41 5A 00 8F 2A 2A 2A 2A |P...#1.&AZ..****|
00000100: 2A 20 56 41 52 49 41 42 4C 45 20 4C 4F 45 53 43 |* VARIABLE LOESC|
00000110: 48 45 4E 20 55 4E 44 20 4E 45 55 53 54 41 52 54 |HEN UND NEUSTART|
00000120: 20 2A 2A 2A 2A 2A 00 3A 41 64 00 9C 3A DE 31 2C | *****.:Ad..:.1,|
00000130: 31 3A FE 0B 32 3A 8A 31 32 30 00 6C 41 6E 00 8F |1:..2:.120.lAn..|
00000140: 2A 2A 2A 2A 2A 20 53 48 41 50 45 53 20 57 49 45 |***** SHAPES WIE|
00000150: 44 45 52 20 56 4F 4E 20 44 49 53 4B 45 54 54 45 |DER VON DISKETTE|
00000160: 20 48 4F 4C 45 4E 20 2A 2A 2A 2A 2A 00 7E 41 78 | HOLEN *****.~Ax|
00000170: 00 FE 0D 23 31 2C 22 53 48 41 50 45 31 22 00 84 |...#1,"SHAPE1"..|
00000180: 41 82 00 EB 00 8F 41 8C 00 3A 84 31 2C 42 24 00 |A.....A..:.1,B$.|
00000190: A5 41 96 00 3A 3A 8B 20 42 24 B2 22 45 4E 44 45 |.A..::. B$."ENDE|
000001A0: 22 20 A7 20 ED 00 C3 41 A0 00 3A 42 B2 C5 28 42 |" . ...A..:B..(B|
000001B0: 24 29 3A 42 24 B2 C7 28 42 29 3A 41 24 B2 41 24 |$):B$..(B):A$.A$|
000001C0: AA 42 24 00 C9 41 AA 00 EC 00 D7 41 B4 00 FE 0F |.B$..A.....A....|
000001D0: 23 31 3A 8D 32 33 30 00 F7 41 BE 00 8F 2A 2A 2A |#1:.230..A...***|
000001E0: 2A 2A 20 53 48 41 50 45 20 5A 45 49 43 48 4E 45 |** SHAPE ZEICHNE|
000001F0: 4E 20 2A 2A 2A 2A 2A 00 07 42 C8 00 E3 41 24 2C |N *****..B...A$,|
00000200: 31 30 30 2C 31 30 30 00 0D 42 D2 00 80 00 34 42 |100,100..B....4B|
00000210: DC 00 8F 2A 2A 2A 2A 2A 20 4B 4F 4E 54 52 4F 4C |...***** KONTROL|
00000220: 4C 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D 20 2A |LUNTERPROGRAMM *|
00000230: 2A 2A 2A 2A 00 60 42 E6 00 81 49 B2 31 A4 C3 28 |****.`B...I.1..(|
00000240: 41 24 29 3A 99 C6 28 CA 28 41 24 2C 49 2C 31 29 |A$):..(.(A$,I,1)|
00000250: 29 3B 3A 82 49 3A 99 3A 99 C3 28 41 24 29 3A 8E |);:.I:.:..(A$):.|
00000260: 00 00 00 |... |
.@"@...***** SHAPE ERSTELLEN *****.C@...
0,1:.4,1:.1,6:.1,1:B$.G(13).I@...1,10,10
,10,10:.A$,0,0,20,20:.230.W@(.."SHAPE1".
.@2..***** SHAPES AUF DISKETTE SPEICHERN
*****..@<...#1,"SHAPE1",W:.1..@F..I.1.C
(A$):.1,F(J(A$,I,1))B$:.I:.1,"ENDE"B$..@
P...#1.&AZ..***** VARIABLE LOESCHEN UND
NEUSTART *****.:AD..:.1,1:..2:.120.LAN..
***** SHAPES WIEDER VON DISKETTE HOLEN *
****.~AX...#1,"SHAPE1"..A.....A..:.1,B$.
.A..::. B$."ENDE" . ..CA .:B.E(B$):B$.G(
B):A$.A$.B$.IA....WA....#1:.230..A...***
** SHAPE ZEICHNEN *****..BH..A$,100,100.
.BR...4B...***** KONTROLLUNTERPROGRAMM *
****.`B...I.1.C(A$):.F(J(A$,I,1));:.I:.:
.C(A$):....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL