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

ERW.LOGO

FILE INFORMATION

FILENAME(S): ERW.LOGO

FILE TYPE(S): PRG

FILE SIZE: 293b

FIRST SEEN: 2025-12-02 23:22:49

APPEARS ON: 1 disk(s)

FILE HASH

389c6d9f51627125b99835ceb25dd225d1c8238a2dd0730e13aa7d3999b1db98

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
NIKI 11 ERW.LOGO PRG swasti, dinkel 10 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 20 54 4F 20 52 45 43  20 3A 4C 41 45 4E 47 45  |. TO REC :LAENGE|
00000010: 20 3A 42 52 45 49 54 45  0D 20 53 45 54 48 20 39  | :BREITE. SETH 9|
00000020: 30 20 52 45 50 45 41 54  20 32 20 5B 46 44 20 3A  |0 REPEAT 2 [FD :|
00000030: 4C 41 45 4E 47 45 20 52  54 20 39 30 20 46 44 20  |LAENGE RT 90 FD |
00000040: 3A 42 52 45 49 54 45 20  52 54 20 39 30 5D 20 53  |:BREITE RT 90] S|
00000050: 45 54 48 20 30 0D 45 4E  44 0D 0D 54 4F 20 55 4E  |ETH 0.END..TO UN|
00000060: 54 45 52 50 52 47 31 20  3A 53 43 48 52 49 54 54  |TERPRG1 :SCHRITT|
00000070: 0D 20 52 45 50 45 41 54  20 33 36 30 20 2F 20 3A  |. REPEAT 360 / :|
00000080: 53 43 48 52 49 54 54 20  5B 46 44 20 31 20 52 54  |SCHRITT [FD 1 RT|
00000090: 20 3A 53 43 48 52 49 54  54 5D 0D 45 4E 44 0D 0D  | :SCHRITT].END..|
000000A0: 54 4F 20 43 49 52 43 4C  45 20 3A 52 41 44 49 55  |TO CIRCLE :RADIU|
000000B0: 53 0D 20 53 45 54 48 20  2D 20 39 30 20 50 55 20  |S. SETH - 90 PU |
000000C0: 46 44 20 3A 52 41 44 49  55 53 20 50 44 20 53 45  |FD :RADIUS PD SE|
000000D0: 54 48 20 30 0D 20 55 4E  54 45 52 50 52 47 31 20  |TH 0. UNTERPRG1 |
000000E0: 33 36 30 20 2F 20 28 20  3A 52 41 44 49 55 53 20  |360 / ( :RADIUS |
000000F0: 2A 20 32 20 2A 20 33 2E  31 34 31 35 39 20 29 20  |* 2 * 3.14159 ) |
00000100: 53 45 54 48 20 39 30 20  50 55 20 46 44 20 3A 52  |SETH 90 PU FD :R|
00000110: 41 44 49 55 53 20 50 44  20 53 45 54 48 20 30 0D  |ADIUS PD SETH 0.|
00000120: 45 4E 44 0D 0D                                    |END..           |

. TO REC :LAENGE :BREITE. SETH 90 REPEAT
 2 [FD :LAENGE RT 90 FD :BREITE RT 90] S
ETH 0.END..TO UNTERPRG1 :SCHRITT. REPEAT
 360 / :SCHRITT [FD 1 RT :SCHRITT].END..
TO CIRCLE :RADIUS. SETH - 90 PU FD :RADI
US PD SETH 0. UNTERPRG1 360 / ( :RADIUS 
* 2 * 3.14159 ) SETH 90 PU FD :RADIUS PD
 SETH 0.END..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL