SHAPES
FILE INFORMATION
FILENAME(S): SHAPES
FILE TYPE(S): PRG
FILE SIZE: 1.3K
FIRST SEEN: 2025-11-02 16:39:35
APPEARS ON: 2 disk(s)
FILE HASH
8e9dc96a8b2245ba0f99d1a7dc4408f8b24834c84063f6ad302f1864acf34f7c
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SUPERGRAPHIKBUCH | SHAPES | PRG | swasti, dinkel, Treasure Chest - Plattfuss | 13 | 1 | DOWNLOAD FILE |
| SUPERGRAPHIKBUCH | SHAPES | PRG | DuncanTwain | 13 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 00 2B 08 6E 00 8F 20 2A 2A 20 |******.+.n.. ** |
00000020: 20 20 20 20 20 20 20 20 20 2A 2A 00 40 08 78 00 | **.@.x.|
00000030: 8F 20 2A 2A 20 20 53 48 41 50 45 53 20 20 2A 2A |. ** SHAPES **|
00000040: 00 55 08 82 00 8F 20 2A 2A 20 20 20 20 20 20 20 |.U.... ** |
00000050: 20 20 20 2A 2A 00 6A 08 8C 00 8F 20 2A 2A 2A 2A | **.j.... ****|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 70 08 96 00 8F |**********.p....|
00000070: 00 86 08 A0 00 E9 20 30 2C 31 20 3A 20 EA 20 3A |...... 0,1 : . :|
00000080: 20 F6 20 30 2C 30 00 AF 08 AA 00 58 B2 31 36 30 | . 0,0.....X.160|
00000090: 20 3A 20 59 B2 31 30 30 20 20 20 20 20 20 20 3A | : Y.100 :|
000000A0: 8F 20 53 48 41 50 45 50 4F 53 49 54 49 4F 4E 00 |. SHAPEPOSITION.|
000000B0: E0 08 B4 00 53 B2 20 31 30 20 3A 20 52 B2 20 20 |....S. 10 : R. |
000000C0: 30 20 20 20 20 20 20 20 3A 8F 20 47 52 4F 45 53 |0 :. GROES|
000000D0: 53 45 2B 52 4F 54 41 54 49 4F 4E 20 49 4E 49 54 |SE+ROTATION INIT|
000000E0: 00 EC 08 BE 00 86 20 53 24 28 39 29 00 FB 08 C8 |...... S$(9)....|
000000F0: 00 4E B2 30 20 3A 20 46 4C B2 30 00 01 09 D2 00 |.N.0 : FL.0.....|
00000100: 8F 00 16 09 DC 00 8F 20 48 41 55 50 54 53 43 48 |....... HAUPTSCH|
00000110: 4C 45 49 46 45 3A 00 1C 09 E6 00 8F 00 4A 09 F0 |LEIFE:.......J..|
00000120: 00 F4 20 52 2C 53 20 20 20 20 20 20 20 20 20 20 |.. R,S |
00000130: 3A 8F 20 47 52 4F 45 53 53 45 2F 52 4F 54 41 49 |:. GROESSE/ROTAI|
00000140: 54 4F 4E 20 53 45 54 5A 45 4E 00 70 09 FA 00 8D |TON SETZEN.p....|
00000150: 20 36 31 30 20 20 20 20 20 20 20 20 20 20 20 3A | 610 :|
00000160: 8F 20 53 48 41 50 45 20 5A 45 49 43 48 4E 45 4E |. SHAPE ZEICHNEN|
00000170: 00 89 09 04 01 A1 20 41 24 20 3A 20 8B 20 41 24 |...... A$ : . A$|
00000180: B2 22 22 20 A7 20 32 36 30 00 95 09 0E 01 41 B2 |."" . 260.....A.|
00000190: C6 28 41 24 29 00 BB 09 18 01 8D 20 36 31 30 20 |.(A$)...... 610 |
000001A0: 20 20 20 20 20 20 20 20 20 20 3A 8F 20 53 48 41 | :. SHA|
000001B0: 50 45 20 4C 4F 45 53 43 48 45 4E 00 C1 09 22 01 |PE LOESCHEN...".|
000001C0: 8F 00 DB 09 2C 01 8F 20 54 41 53 54 41 54 55 52 |....,.. TASTATUR|
000001D0: 41 55 53 57 45 52 54 55 4E 47 3A 00 E1 09 36 01 |AUSWERTUNG:...6.|
000001E0: 8F 00 F2 09 40 01 8B 20 41 24 B2 22 51 22 20 A7 |....@.. A$."Q" .|
000001F0: 20 80 00 1D 0A 4A 01 8B 20 41 24 B2 22 57 22 20 | ....J.. A$."W" |
00000200: A7 20 46 4C B2 B6 28 46 4C AB 31 29 20 3A 8F 20 |. FL..(FL.1) :. |
00000210: 46 4C 41 47 20 57 45 43 48 53 45 4C 4E 00 2E 0A |FLAG WECHSELN...|
00000220: 54 01 8B 20 46 4C B2 30 20 A7 20 35 30 30 00 34 |T.. FL.0 . 500.4|
00000230: 0A 5E 01 8F 00 46 0A 68 01 8F 20 42 45 49 20 46 |.^...F.h.. BEI F|
00000240: 4C 41 47 3D 31 3A 00 4C 0A 72 01 8F 00 6B 0A 7C |LAG=1:.L.r...k.||
00000250: 01 8B 20 41 B2 20 32 39 20 A7 20 53 B2 53 AA 31 |.. A. 29 . S.S.1|
00000260: 20 3A 8F 20 47 52 4F 45 53 53 45 00 7F 0A 86 01 | :. GROESSE.....|
00000270: 8B 20 41 B2 31 35 37 20 A7 20 53 B2 53 AB 31 00 |. A.157 . S.S.1.|
00000280: 9F 0A 90 01 8B 20 41 B2 20 31 37 20 A7 20 52 B2 |..... A. 17 . R.|
00000290: 52 AA 31 20 3A 8F 20 52 4F 54 41 54 49 4F 4E 00 |R.1 :. ROTATION.|
000002A0: B3 0A 9A 01 8B 20 41 B2 31 34 35 20 A7 20 52 B2 |..... A.145 . R.|
000002B0: 52 AB 31 00 DD 0A A4 01 8B 20 53 B1 32 35 35 20 |R.1...... S.255 |
000002C0: A7 20 53 B2 30 20 20 20 3A 8F 20 57 45 52 54 45 |. S.0 :. WERTE|
000002D0: 20 55 45 42 45 52 50 52 55 45 46 45 4E 00 F1 0A | UEBERPRUEFEN...|
000002E0: AE 01 8B 20 53 B3 20 20 30 20 A7 20 53 B2 32 35 |... S. 0 . S.25|
000002F0: 35 00 03 0B B8 01 8B 20 52 B1 32 35 35 20 A7 20 |5...... R.255 . |
00000300: 52 B2 30 00 17 0B C2 01 8B 20 52 B3 20 20 30 20 |R.0...... R. 0 |
00000310: A7 20 52 B2 32 35 35 00 21 0B CC 01 89 20 32 34 |. R.255.!.... 24|
00000320: 30 00 27 0B D6 01 8F 00 39 0B E0 01 8F 20 42 45 |0.'.....9.... BE|
00000330: 49 20 46 4C 41 47 3D 30 3A 00 3F 0B EA 01 8F 00 |I FLAG=0:.?.....|
00000340: 68 0B F4 01 8B 20 41 20 B2 20 32 39 20 A7 20 53 |h.... A . 29 . S|
00000350: 24 28 4E 29 B2 53 24 28 4E 29 AA 22 31 22 20 3A |$(N).S$(N)."1" :|
00000360: 8F 20 52 45 43 48 54 53 00 90 0B FE 01 8B 20 41 |. RECHTS...... A|
00000370: 20 B2 31 35 37 20 A7 20 53 24 28 4E 29 B2 53 24 | .157 . S$(N).S$|
00000380: 28 4E 29 AA 22 33 22 20 3A 8F 20 4C 49 4E 4B 53 |(N)."3" :. LINKS|
00000390: 00 B9 0B 08 02 8B 20 41 20 B2 20 31 37 20 A7 20 |...... A . 17 . |
000003A0: 53 24 28 4E 29 B2 53 24 28 4E 29 AA 22 32 22 20 |S$(N).S$(N)."2" |
000003B0: 3A 8F 20 52 55 4E 54 45 52 00 E0 0B 12 02 8B 20 |:. RUNTER...... |
000003C0: 41 20 B2 31 34 35 20 A7 20 53 24 28 4E 29 B2 53 |A .145 . S$(N).S|
000003D0: 24 28 4E 29 AA 22 30 22 20 3A 8F 20 48 4F 43 48 |$(N)."0" :. HOCH|
000003E0: 00 04 0C 1C 02 8B 20 41 24 B2 22 20 22 20 A7 20 |...... A$." " . |
000003F0: 53 24 28 4E 29 B2 53 24 28 4E 29 AA 22 2E 22 20 |S$(N).S$(N)."." |
00000400: 3A 8F 20 EC 00 40 0C 26 02 8B 20 C3 28 53 24 28 |:. ..@.&.. .(S$(|
00000410: 4E 29 29 B2 32 35 35 20 A7 20 4E B2 4E AA 31 20 |N)).255 . N.N.1 |
00000420: 20 20 3A 8F 20 4E 41 45 43 48 53 54 45 4E 20 44 | :. NAECHSTEN D|
00000430: 45 46 49 4E 49 54 49 4F 4E 53 53 54 52 49 4E 47 |EFINITIONSSTRING|
00000440: 00 4A 0C 30 02 89 20 32 34 30 00 50 0C 3A 02 8F |.J.0.. 240.P.:..|
00000450: 00 56 0C 44 02 8F 00 75 0C 4E 02 8F 20 53 48 41 |.V.D...u.N.. SHA|
00000460: 50 45 20 5A 45 49 43 48 4E 45 4E 2F 4C 4F 45 53 |PE ZEICHNEN/LOES|
00000470: 43 48 45 4E 3A 00 7B 0C 58 02 8F 00 AA 0C 62 02 |CHEN:.{.X.....b.|
00000480: ED 20 32 2C 53 24 28 30 29 20 91 20 58 2C 59 20 |. 2,S$(0) . X,Y |
00000490: 20 3A 8F 20 45 52 53 54 45 4E 20 53 54 52 49 4E | :. ERSTEN STRIN|
000004A0: 47 20 5A 45 49 43 48 4E 45 4E 00 B8 0C 6C 02 81 |G ZEICHNEN...l..|
000004B0: 20 54 B2 31 20 A4 20 39 00 F6 0C 76 02 ED 20 32 | T.1 . 9...v.. 2|
000004C0: 2C 53 24 28 54 29 20 20 20 20 20 20 20 20 20 3A |,S$(T) :|
000004D0: 8F 20 45 56 45 4E 54 55 45 4C 4C 20 46 4F 4C 47 |. EVENTUELL FOLG|
000004E0: 45 4E 44 45 20 53 54 52 49 4E 47 53 20 41 4E 48 |ENDE STRINGS ANH|
000004F0: 41 45 4E 47 45 4E 00 FE 0C 80 02 82 20 54 00 04 |AENGEN...... T..|
00000500: 0D 8A 02 8E 00 00 00 49 |.......I |
....D.. **************.+.N.. **
**.@.X.. ** SHAPES **.U.... **
**.J.... **************.P....... .. 0
,1 : . : . 0,0.....X.160 : Y.100 :
. SHAPEPOSITION.....S. 10 : R. 0
:. GROESSE+ROTATION INIT...... S$(9)...H
.N.0 : FL.0...R........ HAUPTSCHLEIFE:..
.....J.... R,S :. GROESSE/ROTAI
TON SETZEN.P.... 610 :. SHAPE
ZEICHNEN...... A$ : . A$."" . 260.....A.
F(A$)...... 610 :. SHAPE LOESC
HEN.A.".....,.. TASTATURAUSWERTUNG:...6.
....@.. A$."Q" . ....J.. A$."W" . FL..(F
L.1) :. FLAG WECHSELN...T.. FL.0 . 500.4
.^...F.H.. BEI FLAG=1:.L.R...K.|.. A. 29
. S.S.1 :. GROESSE..... A.157 . S.S.1.
..... A. 17 . R.R.1 :. ROTATION...... A.
145 . R.R.1...... S.255 . S.0 :. WERTE
UEBERPRUEFEN...... S. 0 . S.255......
R.255 . R.0...B.. R. 0 . R.255.!.L.. 24
0.'.V...9.... BEI FLAG=0:.?.....H.... A
. 29 . S$(N).S$(N)."1" :. RECHTS...... A
.157 . S$(N).S$(N)."3" :. LINKS...... A
. 17 . S$(N).S$(N)."2" :. RUNTER......
A .145 . S$(N).S$(N)."0" :. HOCH...... A
$." " . S$(N).S$(N)."." :. ..@.&.. C(S$(
N)).255 . N.N.1 :. NAECHSTEN DEFINITIO
NSSTRING.J.0.. 240.P.:...V.D...U.N.. SHA
PE ZEICHNEN/LOESCHEN:.{.X.....B.. 2,S$(0
) . X,Y :. ERSTEN STRING ZEICHNEN...L..
T.1 . 9...V.. 2,S$(T) :. EVENTU
ELL FOLGENDE STRINGS ANHAENGEN...... T..
.......I
> CLICK IMAGE PREVIEW FOR FULL MODAL