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

LISTING NR. 36

FILE INFORMATION

FILENAME(S): LISTING NR. 36

FILE TYPE(S): PRG

FILE SIZE: 759b

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

APPEARS ON: 1 disk(s)

FILE HASH

52f75bd252070692d389301dba36f1e310dc3664599491c3ff1034d1b7b50f2b

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 HULP 1 1 LISTING NR. 36 PRG DuncanTwain 22 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 27 08 64 00 8F 3D  3D 3D 3D 31 35 32 30 20  |..'.d..====1520 |
00000010: 53 45 54 5A 45 4E 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |SETZEN==========|
00000020: 3D 3D 3D 3D 3D 3D 3D 00  32 08 6E 00 9F 31 2C 36  |=======.2.n..1,6|
00000030: 2C 31 00 3D 08 78 00 9F  35 2C 36 2C 35 00 4E 08  |,1.=.x..5,6,5.N.|
00000040: 82 00 98 31 2C 22 4D 22  3B 32 34 30 3B 30 00 59  |...1,"M";240;0.Y|
00000050: 08 8C 00 98 31 2C 22 49  22 00 7F 08 96 00 8F 3D  |....1,"I"......=|
00000060: 3D 3D 3D 45 49 4E 47 41  42 45 3D 3D 3D 3D 3D 3D  |===EINGABE======|
00000070: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 00  |===============.|
00000080: 99 08 A0 00 99 22 93 52  41 44 49 55 53 20 4D 41  |.....".RADIUS MA|
00000090: 58 20 34 20 43 4D 20 5F  22 00 B3 08 AA 00 99 22  |X 4 CM _"......"|
000000A0: 11 52 41 44 49 55 53 20  4D 41 58 20 38 20 43 4D  |.RADIUS MAX 8 CM|
000000B0: 20 5E 22 00 CF 08 B4 00  99 22 11 41 55 46 4C 4F  | ^"......".AUFLO|
000000C0: 45 53 55 4E 47 20 2E 30  31 20 2D 20 2E 31 22 00  |ESUNG .01 - .1".|
000000D0: E3 08 BE 00 85 22 11 52  41 44 49 55 53 20 5F 22  |.....".RADIUS _"|
000000E0: 3B 41 24 00 F8 08 C8 00  85 22 11 52 41 44 49 55  |;A$......".RADIU|
000000F0: 53 20 5E 22 3B 41 31 24  00 0E 09 D2 00 85 22 11  |S ^";A1$......".|
00000100: 41 55 46 4C 4F 45 53 55  4E 47 22 3B 42 24 00 21  |AUFLOESUNG";B$.!|
00000110: 09 DC 00 41 B2 C5 28 41  24 29 3A 41 B2 B6 28 41  |...A..(A$):A..(A|
00000120: 29 00 47 09 E6 00 8F 3D  3D 3D 3D 54 45 53 54 20  |).G....====TEST |
00000130: 41 55 46 20 45 49 4E 47  41 42 45 46 45 48 4C 45  |AUF EINGABEFEHLE|
00000140: 52 3D 3D 3D 3D 3D 3D 00  5E 09 F0 00 41 31 B2 C5  |R======.^...A1..|
00000150: 28 41 31 24 29 3A 41 31  B2 B6 28 41 31 29 00 71  |(A1$):A1..(A1).q|
00000160: 09 FA 00 42 B2 C5 28 42  24 29 3A 42 B2 B6 28 42  |...B..(B$):B..(B|
00000170: 29 00 7E 09 04 01 8B 41  B1 34 A7 31 36 30 00 8C  |).~....A.4.160..|
00000180: 09 0E 01 8B 41 31 B1 38  A7 31 36 30 00 A0 09 18  |....A1.8.160....|
00000190: 01 8B 42 B1 2E 31 B0 42  B3 2E 30 31 A7 31 36 30  |..B..1.B..01.160|
000001A0: 00 AB 09 22 01 41 B2 41  AC 35 30 00 B8 09 2C 01  |...".A.A.50...,.|
000001B0: 41 31 B2 41 31 AC 35 30  00 DE 09 36 01 8F 3D 3D  |A1.A1.50...6..==|
000001C0: 3D 3D 45 4C 4C 49 50 53  45 20 5A 45 49 43 48 4E  |==ELLIPSE ZEICHN|
000001D0: 45 4E 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 00 F0  |EN============..|
000001E0: 09 40 01 81 58 B2 AB 31  2E 36 A4 34 2E 38 A9 42  |.@..X..1.6.4.8.B|
000001F0: 00 FD 09 4A 01 59 B2 41  AC BE 28 58 29 00 0B 0A  |...J.Y.A..(X)...|
00000200: 54 01 5A B2 41 31 AC BF  28 58 29 00 22 0A 5E 01  |T.Z.A1..(X).".^.|
00000210: 8B 58 B2 AB 31 2E 36 A7  98 31 2C 22 52 22 3B 59  |.X..1.6..1,"R";Y|
00000220: 3B 5A 00 31 0A 68 01 98  31 2C 22 4A 22 3B 59 3B  |;Z.1.h..1,"J";Y;|
00000230: 5A 00 37 0A 72 01 82 00  5D 0A 7C 01 8F 3D 3D 3D  |Z.7.r...].|..===|
00000240: 3D 52 41 44 49 45 4E 3D  3D 3D 3D 3D 3D 3D 3D 3D  |=RADIEN=========|
00000250: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 00 66 0A  |=============.f.|
00000260: 86 01 98 35 2C 35 00 75  0A 90 01 98 31 2C 22 52  |...5,5.u....1,"R|
00000270: 22 3B 30 3B 30 00 84 0A  9A 01 98 31 2C 22 4A 22  |";0;0......1,"J"|
00000280: 3B 41 3B 30 00 93 0A A4  01 98 31 2C 22 52 22 3B  |;A;0......1,"R";|
00000290: 30 3B 30 00 A3 0A AE 01  98 31 2C 22 4A 22 3B 30  |0;0......1,"J";0|
000002A0: 3B 41 31 00 C9 0A B8 01  8F 3D 3D 3D 3D 45 4E 44  |;A1......====END|
000002B0: 45 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |E===============|
000002C0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 00 D2 0A C2 01 98 35  |=========......5|
000002D0: 2C 30 00 E4 0A CC 01 98  31 2C 22 4D 22 3B 30 3B  |,0......1,"M";0;|
000002E0: AB 32 30 30 00 EB 0A D6  01 A0 31 00 F2 0A E0 01  |.200......1.....|
000002F0: A0 35 00 00 00 00 00                              |.5.....         |
..'.D..====1520 SETZEN=================.
2.N..1,6,1.=.X..5,6,5.N....1,"M";240;0.Y
....1,"I".....====EINGABE==============
=======... ..".RADIUS MAX 4 CM _"......"
.RADIUS MAX 8 CM ^".O....".AUFLOESUNG .0
1 - .1"......".RADIUS _";A$...H..".RADIU
S ^";A1$...R..".AUFLOESUNG";B$.!...A.E(A
$):A..(A).G....====TEST AUF EINGABEFEHLE
R======.^...A1.E(A1$):A1..(A1).Q...B.E(B
$):B..(B).~....A.4.160......A1.8.160. ..
..B..1.B..01.160...".A.A.50...,.A1.A1.50
...6..====ELLIPSE ZEICHNEN============..
.@..X..1.6.4.8.B...J.Y.A..(X)...T.Z.A1..
(X).".^..X..1.6..1,"R";Y;Z.1.H..1,"J";Y;
Z.7.R...].|..====RADIEN=================
=====.F....5,5.U....1,"R";0;0......1,"J"
;A;0......1,"R";0;0......1,"J";0;A1.I...
.====ENDE========================.R.B..5
,0...L..1,"M";0;.200...V. 1..... 5.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL