_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

MAKE SHAPE4

FILE INFORMATION

FILENAME(S): MAKE SHAPE4

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-11-30 21:23:59

APPEARS ON: 1 disk(s)

FILE HASH

27dca7465b0288d1224a57289c6563ab1ce6d1d07968880a37813a9156d07312

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 SPEL 44 1 MAKE SHAPE4 PRG DuncanTwain 19 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1B 08 64 00 8F 20  2A 2A 2A 20 4D 41 4B 45  |....d.. *** MAKE|
00000010: 20 53 48 41 50 45 34 20  2A 2A 2A 00 23 08 8C 00  | SHAPE4 ***.#...|
00000020: 87 20 4E 00 2C 08 96 00  87 20 41 50 00 44 08 AA  |. N.,.... AP.D..|
00000030: 00 86 20 48 50 28 4E 2C  33 29 2C 50 4E 28 41 50  |.. HP(N,3),PN(AP|
00000040: 2C 31 35 29 00 52 08 BE  00 81 20 49 B2 31 20 A4  |,15).R.... I.1 .|
00000050: 20 4E 00 70 08 C8 00 87  20 48 50 28 49 2C 31 29  | N.p.... HP(I,1)|
00000060: 2C 48 50 28 49 2C 32 29  2C 48 50 28 49 2C 33 29  |,HP(I,2),HP(I,3)|
00000070: 00 77 08 D2 00 82 49 00  9B 08 E6 00 87 20 53 24  |.w....I...... S$|
00000080: 3A 8B 53 24 B3 B1 22 53  43 48 45 49 44 45 52 22  |:.S$.."SCHEIDER"|
00000090: 20 A7 20 99 C5 28 53 24  29 3A 90 00 AA 08 FA 00  | . ..(S$):......|
000000A0: 81 20 52 B2 31 20 A4 20  41 50 00 B8 08 04 01 87  |. R.1 . AP......|
000000B0: 20 50 4E 28 52 2C 30 29  00 CC 08 0E 01 81 20 4A  | PN(R,0)...... J|
000000C0: B2 31 20 A4 20 50 4E 28  52 2C 30 29 00 DA 08 18  |.1 . PN(R,0)....|
000000D0: 01 87 20 50 4E 28 52 2C  4A 29 00 E4 08 22 01 82  |.. PN(R,J)..."..|
000000E0: 20 4A 2C 52 00 05 09 36  01 85 22 93 CF 50 53 4C  | J,R...6.."..PSL|
000000F0: 41 41 4E 20 49 4E 20 57  45 4C 4B 45 20 46 49 4C  |AAN IN WELKE FIL|
00000100: 45 22 3B 46 24 00 2D 09  40 01 8B 20 C9 28 46 24  |E";F$.-.@.. .(F$|
00000110: 2C 34 29 B2 22 2E 53 48  50 22 20 A7 20 46 24 B2  |,4).".SHP" . F$.|
00000120: C8 28 46 24 2C C3 28 46  24 29 AB 34 29 00 3B 09  |.(F$,.(F$).4).;.|
00000130: 4A 01 43 52 24 B2 C7 28  31 33 29 00 51 09 54 01  |J.CR$..(13).Q.T.|
00000140: 85 22 D7 45 4C 4B 45 20  44 52 49 56 45 22 3B 44  |.".ELKE DRIVE";D|
00000150: 24 00 77 09 5E 01 9F 20  31 2C 38 2C 31 30 2C 22  |$.w.^.. 1,8,10,"|
00000160: 40 22 AA 44 24 AA 22 3A  22 AA 46 24 AA 22 2E 53  |@".D$.":".F$.".S|
00000170: 48 50 2C 53 2C 57 22 00  8C 09 68 01 98 31 2C 4E  |HP,S,W"...h..1,N|
00000180: 3B 43 52 24 3B 41 50 3B  43 52 24 3B 00 9A 09 72  |;CR$;AP;CR$;...r|
00000190: 01 81 20 49 B2 31 20 A4  20 4E 00 A8 09 7C 01 81  |.. I.1 . N...|..|
000001A0: 20 58 B2 31 20 A4 20 33  00 BC 09 86 01 98 31 2C  | X.1 . 3......1,|
000001B0: 48 50 28 49 2C 58 29 3B  43 52 24 3B 00 C6 09 90  |HP(I,X);CR$;....|
000001C0: 01 82 20 58 2C 49 00 D5  09 AE 01 81 20 49 B2 31  |.. X,I...... I.1|
000001D0: 20 A4 20 41 50 00 E9 09  B8 01 98 31 2C 50 4E 28  | . AP......1,PN(|
000001E0: 49 2C 30 29 3B 43 52 24  3B 00 FD 09 C2 01 81 20  |I,0);CR$;...... |
000001F0: 58 B2 31 20 A4 20 50 4E  28 49 2C 30 29 00 11 0A  |X.1 . PN(I,0)...|
00000200: CC 01 98 31 2C 50 4E 28  49 2C 58 29 3B 43 52 24  |...1,PN(I,X);CR$|
00000210: 3B 00 1B 0A D6 01 82 20  58 2C 49 00 23 0A EA 01  |;...... X,I.#...|
00000220: A0 20 31 00 29 0A F4 01  80 00 49 0A 12 02 83 20  |. 1.).....I.... |
00000230: 33 36 2C 31 34 3A 20 8F  20 23 50 55 4E 54 45 4E  |36,14: . #PUNTEN|
00000240: 2C 20 23 50 4F 4C 59 27  53 00 5A 0A 26 02 8F 20  |, #POLY'S.Z.&.. |
00000250: 48 45 54 20 53 4B 45 4C  45 54 00 92 0A 30 02 83  |HET SKELET...0..|
00000260: 20 36 2C 2D 33 2C 2D 34  2C 36 2C 33 2C 2D 34 2C  | 6,-3,-4,6,3,-4,|
00000270: 2D 36 2C 33 2C 2D 34 2C  2D 36 2C 2E 35 2C 2D 34  |-6,3,-4,-6,.5,-4|
00000280: 2C 2D 32 2C 2E 35 2C 2D  34 2C 2D 32 2C 2D 33 2C  |,-2,.5,-4,-2,-3,|
00000290: 2D 34 00 CB 0A 3A 02 83  20 36 2C 2D 33 2C 2D 2E  |-4...:.. 6,-3,-.|
000002A0: 35 2C 36 2C 33 2C 2D 2E  35 2C 2D 32 2C 33 2C 2D  |5,6,3,-.5,-2,3,-|
000002B0: 2E 35 2C 36 2C 32 2C 31  2E 35 2C 2D 32 2C 32 2C  |.5,6,2,1.5,-2,2,|
000002C0: 31 2E 35 2C 36 2C 30 2C  33 2E 35 00 F8 0A 44 02  |1.5,6,0,3.5...D.|
000002D0: 83 20 2D 32 2C 30 2C 33  2E 35 2C 36 2C 2D 32 2C  |. -2,0,3.5,6,-2,|
000002E0: 31 2E 35 2C 2D 32 2C 2D  32 2C 31 2E 35 2C 2D 32  |1.5,-2,-2,1.5,-2|
000002F0: 2C 2D 33 2C 2D 30 2E 35  00 20 0B 4E 02 83 20 2D  |,-3,-0.5. .N.. -|
00000300: 32 2C 33 2C 2D 31 2C 2D  36 2C 33 2C 2D 31 2C 2D  |2,3,-1,-6,3,-1,-|
00000310: 36 2C 2E 35 2C 2D 31 2C  2D 32 2C 2E 35 2C 2D 31  |6,.5,-1,-2,.5,-1|
00000320: 00 64 0B 58 02 83 36 2C  31 2E 32 2C 2D 34 2C 20  |.d.X..6,1.2,-4, |
00000330: 36 2C 31 2E 32 2C 2D 32  2C 20 36 2C 32 2E 37 2C  |6,1.2,-2, 6,2.7,|
00000340: 2D 32 2C 20 36 2C 32 2E  37 2C 2D 34 2C 20 34 2E  |-2, 6,2.7,-4, 4.|
00000350: 35 2C 32 2E 37 2C 2D 32  2C 20 34 2E 35 2C 31 2E  |5,2.7,-2, 4.5,1.|
00000360: 32 2C 2D 32 00 A4 0B 62  02 83 20 34 2E 35 2C 31  |2,-2...b.. 4.5,1|
00000370: 2E 32 2C 2D 34 2C 20 34  2E 35 2C 32 2E 37 2C 2D  |.2,-4, 4.5,2.7,-|
00000380: 34 2C 20 2D 34 2E 39 2C  2E 35 2C 2D 34 2C 20 2D  |4, -4.9,.5,-4, -|
00000390: 34 2E 39 2C 2E 35 2C 2D  32 2C 2D 35 2E 39 2C 2E  |4.9,.5,-2,-5.9,.|
000003A0: 35 2C 2D 32 00 DE 0B 6C  02 83 2D 35 2E 39 2C 2E  |5,-2...l..-5.9,.|
000003B0: 35 2C 2D 34 2C 20 2D 32  2C 30 2E 36 2C 2D 31 2C  |5,-4, -2,0.6,-1,|
000003C0: 20 2D 32 2C 30 2E 36 2C  31 2C 20 2D 32 2C 31 2E  | -2,0.6,1, -2,1.|
000003D0: 36 2C 31 2C 20 2D 32 2C  31 2E 36 2C 2D 31 00 E4  |6,1, -2,1.6,-1..|
000003E0: 0B 76 02 3A 00 F5 0B 80  02 83 20 22 53 43 48 45  |.v.:...... "SCHE|
000003F0: 49 44 45 52 22 00 FB 0B  8A 02 3A 00 1E 0C 94 02  |IDER".....:.....|
00000400: 8F 20 50 4F 4C 59 27 53  3A 52 45 4D 20 41 41 4E  |. POLY'S:REM AAN|
00000410: 54 41 4C 2C 48 4F 45 4B  50 55 4E 54 45 4E 00 3A  |TAL,HOEKPUNTEN.:|
00000420: 0C 9E 02 83 20 38 2C 20  31 2C 32 2C 38 2C 31 30  |.... 8, 1,2,8,10|
00000430: 2C 31 32 2C 31 34 2C 37  2C 31 00 53 0C A8 02 83  |,12,14,7,1.S....|
00000440: 20 37 2C 20 32 2C 33 2C  31 38 2C 31 37 2C 39 2C  | 7, 2,3,18,17,9,|
00000450: 38 2C 32 00 67 0C B2 02  83 20 35 2C 20 31 2C 37  |8,2.g.... 5, 1,7|
00000460: 2C 31 36 2C 36 2C 31 00  7D 0C BC 02 83 20 35 2C  |,16,6,1.}.... 5,|
00000470: 20 37 2C 31 34 2C 31 35  2C 31 36 2C 37 00 95 0C  | 7,14,15,16,7...|
00000480: C6 02 83 20 35 2C 20 31  34 2C 31 32 2C 31 33 2C  |... 5, 14,12,13,|
00000490: 31 35 2C 31 34 00 AA 0C  D0 02 83 20 35 2C 20 38  |15,14...... 5, 8|
000004A0: 2C 39 2C 31 31 2C 31 30  2C 38 00 C2 0C DA 02 83  |,9,11,10,8......|
000004B0: 20 35 2C 20 31 30 2C 31  31 2C 31 33 2C 31 32 2C  | 5, 10,11,13,12,|
000004C0: 31 30 00 E6 0C E4 02 83  20 31 30 2C 20 36 2C 31  |10...... 10, 6,1|
000004D0: 36 2C 31 35 2C 31 33 2C  31 31 2C 39 2C 31 37 2C  |6,15,13,11,9,17,|
000004E0: 32 30 2C 35 2C 36 00 FC  0C EE 02 83 20 35 2C 20  |20,5,6...... 5, |
000004F0: 31 39 2C 31 38 2C 33 2C  34 2C 31 39 00 14 0D F8  |19,18,3,4,19....|
00000500: 02 83 20 35 2C 20 31 37  2C 31 38 2C 31 39 2C 32  |.. 5, 17,18,19,2|
00000510: 30 2C 31 37 00 2C 0D 02  03 83 20 35 2C 20 32 39  |0,17.,.... 5, 29|
00000520: 2C 33 30 2C 33 31 2C 33  32 2C 32 39 00 44 0D 0C  |,30,31,32,29.D..|
00000530: 03 83 20 35 2C 20 33 33  2C 33 34 2C 33 35 2C 33  |.. 5, 33,34,35,3|
00000540: 36 2C 33 33 00 5C 0D 16  03 83 20 35 2C 20 32 31  |6,33.\.... 5, 21|
00000550: 2C 32 34 2C 32 33 2C 32  32 2C 32 31 00 71 0D 20  |,24,23,22,21.q. |
00000560: 03 83 20 35 2C 20 35 2C  32 30 2C 31 39 2C 34 2C  |.. 5, 5,20,19,4,|
00000570: 35 00 00 00                                       |5...            |
....D.. *** MAKE SHAPE4 ***.#.... N.,...
. AP.D.... HP(N,3),PN(AP,15).R.... I.1 .
 N.P.H.. HP(I,1),HP(I,2),HP(I,3).W.R..I.
..... S$:.S$.."SCHEIDER" . .E(S$):......
. R.1 . AP...... PN(R,0).L.... J.1 . PN(
R,0).Z.... PN(R,J)...".. J,R...6..".OPSL
AAN IN WELKE FILE";F$.-.@.. I(F$,4).".SH
P" . F$.H(F$,C(F$).4).;.J.CR$.G(13).Q.T.
."WELKE DRIVE";D$.W.^.. 1,8,10,"@".D$.":
".F$.".SHP,S,W"...H..1,N;CR$;AP;CR$;...R
.. I.1 . N...|.. X.1 . 3......1,HP(I,X);
CR$;.F.... X,I.U.... I.1 . AP......1,PN(
I,0);CR$;...B.. X.1 . PN(I,0)...L..1,PN(
I,X);CR$;...V.. X,I.#...  1.).....I.... 
36,14: . #PUNTEN, #POLY'S.Z.&.. HET SKEL
ET...0.. 6,-3,-4,6,3,-4,-6,3,-4,-6,.5,-4
,-2,.5,-4,-2,-3,-4.K.:.. 6,-3,-.5,6,3,-.
5,-2,3,-.5,6,2,1.5,-2,2,1.5,6,0,3.5...D.
. -2,0,3.5,6,-2,1.5,-2,-2,1.5,-2,-3,-0.5
. .N.. -2,3,-1,-6,3,-1,-6,.5,-1,-2,.5,-1
.D.X..6,1.2,-4, 6,1.2,-2, 6,2.7,-2, 6,2.
7,-4, 4.5,2.7,-2, 4.5,1.2,-2...B.. 4.5,1
.2,-4, 4.5,2.7,-4, -4.9,.5,-4, -4.9,.5,-
2,-5.9,.5,-2...L..-5.9,.5,-4, -2,0.6,-1,
 -2,0.6,1, -2,1.6,1, -2,1.6,-1...V.:....
.. "SCHEIDER".....:...... POLY'S:REM AAN
TAL,HOEKPUNTEN.:.... 8, 1,2,8,10,12,14,7
,1.S.... 7, 2,3,18,17,9,8,2.G.... 5, 1,7
,16,6,1.}.... 5, 7,14,15,16,7...F.. 5, 1
4,12,13,15,14...P.. 5, 8,9,11,10,8.B.Z..
 5, 10,11,13,12,10...... 10, 6,16,15,13,
11,9,17,20,5,6...... 5, 19,18,3,4,19....
.. 5, 17,18,19,20,17.,.... 5, 29,30,31,3
2,29.D.... 5, 33,34,35,36,33.\.... 5, 21
,24,23,22,21.Q. .. 5, 5,20,19,4,5...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL