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

POLYSPIRAL".LOGO

FILE INFORMATION

FILENAME(S): POLYSPIRAL".LOGO

FILE TYPE(S): PRG

FILE SIZE: 426b

FIRST SEEN: 2025-11-30 21:14:52

APPEARS ON: 1 disk(s)

FILE HASH

1fb07cbd0e28cf4cbe9d274a032ff1a8c480874d118316919386e257d6720db8

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CBM 64 LOGO POLYSPIRAL".LOGO PRG DuncanTwain 32 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 30 54 4F 20 49 4E 53  50 49 20 3A 53 49 20 3A  |.0TO INSPI :SI :|
00000010: 41 4E 0D 20 50 4F 4C 59  53 54 45 50 20 3A 53 49  |AN. POLYSTEP :SI|
00000020: 20 3A 41 4E 0D 20 49 4E  53 50 49 20 3A 53 49 20  | :AN. INSPI :SI |
00000030: 28 20 3A 41 4E 20 2B 20  31 30 20 29 0D 45 4E 44  |( :AN + 10 ).END|
00000040: 0D 0D 54 4F 20 50 4F 4C  59 20 3A 53 49 20 3A 41  |..TO POLY :SI :A|
00000050: 4E 0D 20 46 44 20 3A 53  49 20 52 54 20 3A 41 4E  |N. FD :SI RT :AN|
00000060: 0D 20 50 4F 4C 59 20 3A  53 49 20 3A 41 4E 0D 45  |. POLY :SI :AN.E|
00000070: 4E 44 0D 0D 54 4F 20 54  57 4F 50 4F 4C 59 20 3A  |ND..TO TWOPOLY :|
00000080: 53 49 31 20 3A 41 4E 31  20 3A 53 49 32 20 3A 41  |SI1 :AN1 :SI2 :A|
00000090: 4E 32 0D 20 50 4F 4C 59  53 54 45 50 20 3A 53 49  |N2. POLYSTEP :SI|
000000A0: 31 20 3A 41 4E 31 0D 20  50 4F 4C 59 53 54 45 50  |1 :AN1. POLYSTEP|
000000B0: 20 3A 53 49 32 20 3A 41  4E 32 0D 20 54 57 4F 50  | :SI2 :AN2. TWOP|
000000C0: 4F 4C 59 20 3A 53 49 31  20 3A 41 4E 31 20 3A 53  |OLY :SI1 :AN1 :S|
000000D0: 49 32 20 3A 41 4E 32 0D  45 4E 44 0D 0D 54 4F 20  |I2 :AN2.END..TO |
000000E0: 50 4F 4C 59 53 54 45 50  20 3A 53 49 20 3A 41 4E  |POLYSTEP :SI :AN|
000000F0: 0D 20 46 44 20 3A 53 49  20 52 54 20 3A 41 4E 0D  |. FD :SI RT :AN.|
00000100: 45 4E 44 0D 0D 54 4F 20  50 4F 4C 59 53 50 49 52  |END..TO POLYSPIR|
00000110: 41 4C 20 3A 53 49 20 3A  41 4E 20 3A 49 4E 43 0D  |AL :SI :AN :INC.|
00000120: 20 50 4F 4C 59 53 54 45  50 20 3A 53 49 20 3A 41  | POLYSTEP :SI :A|
00000130: 4E 0D 20 50 4F 4C 59 53  50 49 52 41 4C 20 28 20  |N. POLYSPIRAL ( |
00000140: 3A 53 49 20 2B 20 3A 49  4E 43 20 29 20 3A 41 4E  |:SI + :INC ) :AN|
00000150: 20 3A 49 4E 43 0D 45 4E  44 0D 0D 54 4F 20 50 4F  | :INC.END..TO PO|
00000160: 4C 59 53 50 49 20 3A 53  49 44 45 20 3A 41 4E 47  |LYSPI :SIDE :ANG|
00000170: 4C 45 0D 20 46 44 20 3A  53 49 44 45 20 52 54 20  |LE. FD :SIDE RT |
00000180: 3A 41 4E 47 4C 45 0D 20  50 4F 4C 59 53 50 49 20  |:ANGLE. POLYSPI |
00000190: 28 20 3A 53 49 44 45 20  2B 20 33 20 29 20 3A 41  |( :SIDE + 3 ) :A|
000001A0: 4E 47 4C 45 0D 45 4E 44  0D 0D                    |NGLE.END..      |

.0TO INSPI :SI :AN. POLYSTEP :SI :AN. IN
SPI :SI ( :AN + 10 ).END..TO POLY :SI :A
N. FD :SI RT :AN. POLY :SI :AN.END..TO T
WOPOLY :SI1 :AN1 :SI2 :AN2. POLYSTEP :SI
1 :AN1. POLYSTEP :SI2 :AN2. TWOPOLY :SI1
 :AN1 :SI2 :AN2.END..TO POLYSTEP :SI :AN
. FD :SI RT :AN.END..TO POLYSPIRAL :SI :
AN :INC. POLYSTEP :SI :AN. POLYSPIRAL ( 
:SI + :INC ) :AN :INC.END..TO POLYSPI :S
IDE :ANGLE. FD :SIDE RT :ANGLE. POLYSPI 
( :SIDE + 3 ) :ANGLE.END..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL