CIRCLE DEMO
FILE INFORMATION
FILENAME(S): CIRCLE DEMO
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-11-02 16:39:49
APPEARS ON: 2 disk(s)
FILE HASH
2e40f7b56282e2f8a85da53640aeac27207e7309a9a6080baa91af919eced5a7
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15827 SEITE C | CIRCLE DEMO | PRG | Treasure Chest - Plattfuss | 10 | 1 | DOWNLOAD FILE |
| 15827 SEITE C | CIRCLE DEMO | PRG | C64er, Treasure Chest - ralf | 10 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |..(...;*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 0B 00 3B 2A 20 |********.O...;* | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 00000050: 76 08 0C 00 3B 2A 20 47 49 47 41 2D 41 53 53 20 |v...;* GIGA-ASS | 00000060: 47 52 41 46 49 4B 2D 52 4F 55 54 49 4E 45 4E 20 |GRAFIK-ROUTINEN | 00000070: 44 45 4D 4F 20 2A 00 9D 08 0D 00 3B 2A 20 2D 2D |DEMO *.....;* --| 00000080: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000090: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 2A 00 C4 08 |----------- *...| 000000A0: 0E 00 3B 2A 20 20 20 20 20 20 20 20 20 20 20 20 |..;* | 000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000C0: 20 20 20 2A 00 EB 08 0F 00 3B 2A 20 41 43 48 54 | *.....;* ACHT| 000000D0: 55 4E 47 3A 20 56 4F 52 20 41 53 53 45 4D 42 4C |UNG: VOR ASSEMBL| 000000E0: 49 45 52 45 4E 20 20 20 20 20 2A 00 12 09 10 00 |IEREN *.....| 000000F0: 3B 2A 20 4D 55 45 53 53 45 4E 20 5A 57 45 49 20 |;* MUESSEN ZWEI | 00000100: 56 4F 52 41 55 53 53 45 54 5A 55 4E 47 45 4E 20 |VORAUSSETZUNGEN | 00000110: 20 2A 00 39 09 11 00 3B 2A 20 45 52 46 55 45 4C | *.9...;* ERFUEL| 00000120: 4C 54 20 53 45 49 4E 3A 20 20 20 20 20 20 20 20 |LT SEIN: | 00000130: 20 20 20 20 20 20 20 20 2A 00 60 09 12 00 3B 2A | *.`...;*| 00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *| 00000160: 00 87 09 13 00 3B 2A 20 31 2E 20 44 45 52 20 4F |.....;* 1. DER O| 00000170: 42 4A 45 4B 54 43 4F 44 45 20 44 45 52 20 47 52 |BJEKTCODE DER GR| 00000180: 41 46 49 4B 2D 20 2A 00 AE 09 14 00 3B 2A 20 52 |AFIK- *.....;* R| 00000190: 4F 55 54 49 4E 45 4E 20 4D 55 53 53 20 49 4E 20 |OUTINEN MUSS IN | 000001A0: 44 45 4E 20 53 50 45 49 43 48 45 52 20 2A 00 D5 |DEN SPEICHER *..| 000001B0: 09 15 00 3B 2A 20 47 45 4C 41 44 45 4E 20 57 4F |...;* GELADEN WO| 000001C0: 52 44 45 4E 20 53 45 49 4E 2E 20 20 20 20 20 20 |RDEN SEIN. | 000001D0: 20 20 20 20 2A 00 FC 09 16 00 3B 2A 20 20 20 20 | *.....;* | 000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 2A 00 23 0A 17 | *.#..| 00000200: 00 3B 2A 20 32 2E 20 44 41 53 20 4D 41 4B 52 4F |.;* 2. DAS MAKRO| 00000210: 20 4D 45 52 47 45 2D 46 49 4C 45 20 4D 55 53 53 | MERGE-FILE MUSS| 00000220: 20 20 2A 00 4A 0A 18 00 3B 2A 20 4D 49 54 20 44 | *.J...;* MIT D| 00000230: 45 4D 20 22 4D 22 20 42 45 46 45 48 4C 20 41 4E |EM "M" BEFEHL AN| 00000240: 20 44 49 45 53 45 4E 20 20 2A 00 71 0A 19 00 3B | DIESEN *.q...;| 00000250: 2A 20 51 55 45 4C 4C 54 45 58 54 20 41 4E 47 45 |* QUELLTEXT ANGE| 00000260: 48 41 45 4E 47 54 20 57 4F 52 44 45 4E 20 20 20 |HAENGT WORDEN | 00000270: 2A 00 98 0A 1A 00 3B 2A 20 53 45 49 4E 2E 20 20 |*.....;* SEIN. | 00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000290: 20 20 20 20 20 20 20 2A 00 BF 0A 1B 00 3B 2A 20 | *.....;* | 000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 | *.| 000002C0: E6 0A 1C 00 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....;***********| 000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000002E0: 2A 2A 2A 2A 2A 2A 00 F1 0A 64 00 AA 24 37 30 30 |******...d..$700| 000002F0: 30 00 FB 0A 6E 00 B7 44 45 4D 4F 00 0D 0B 78 00 |0...n..DEMO...x.| 00000300: 44 45 4D 4F 20 44 45 53 49 47 4E A0 33 00 18 0B |DEMO DESIGN.3...| 00000310: 82 00 20 43 4C 45 41 52 00 27 0B 8C 00 20 43 4F |.. CLEAR.'... CO| 00000320: 4C 4F 52 A0 24 42 46 00 40 0B 96 00 20 54 45 58 |LOR.$BF.@... TEX| 00000330: 54 A0 54 31 2C 36 2C 39 2C 31 2C 33 2C 30 2C 30 |T.T1,6,9,1,3,0,0| 00000340: 00 4C 0B A0 00 20 50 41 47 45 A0 33 00 5B 0B AA |.L... PAGE.3.[..| 00000350: 00 20 42 4F 52 44 45 52 A0 24 46 00 73 0B B4 00 |. BORDER.$F.s...| 00000360: 20 46 52 41 4D 45 A0 33 35 2C 33 35 2C 32 39 30 | FRAME.35,35,290| 00000370: 2C 39 30 00 8B 0B BE 00 20 46 52 41 4D 45 A0 34 |,90..... FRAME.4| 00000380: 30 2C 34 30 2C 32 38 35 2C 38 35 00 9B 0B C8 00 |0,40,285,85.....| 00000390: 20 46 49 4C 4C A0 33 37 2C 36 34 00 AC 0B D2 00 | FILL.37,64.....| 000003A0: 20 46 49 4C 4C A0 32 38 37 2C 36 34 00 C6 0B DC | FILL.287,64....| 000003B0: 00 20 54 45 58 54 A0 54 32 2C 31 33 2C 36 2C 30 |. TEXT.T2,13,6,0| 000003C0: 2C 31 2C 31 2C 30 00 E0 0B E6 00 20 54 45 58 54 |,1,1,0..... TEXT| 000003D0: A0 54 33 2C 31 37 2C 36 2C 30 2C 30 2C 31 2C 30 |.T3,17,6,0,0,1,0| 000003E0: 00 FA 0B F0 00 20 54 45 58 54 A0 54 34 2C 31 39 |..... TEXT.T4,19| 000003F0: 2C 37 2C 30 2C 30 2C 31 2C 30 00 09 0C FA 00 20 |,7,0,0,1,0..... | 00000400: 53 50 41 43 45 57 41 49 54 00 18 0C 04 01 20 42 |SPACEWAIT..... B| 00000410: 4F 52 44 45 52 A0 24 43 00 23 0C 0E 01 20 43 4C |ORDER.$C.#... CL| 00000420: 45 41 52 00 31 0C 18 01 20 43 4F 4C 4F 52 A0 24 |EAR.1... COLOR.$| 00000430: 43 00 41 0C 22 01 3B 20 31 2E 20 41 55 46 52 55 |C.A.".; 1. AUFRU| 00000440: 46 00 4C 0C 2C 01 20 CA 23 31 36 30 00 55 0C 36 |F.L.,. .#160.U.6| 00000450: 01 20 D2 58 43 00 5E 0C 40 01 20 CA 23 30 00 69 |. .XC.^.@. .#0.i| 00000460: 0C 4A 01 20 D2 58 43 2B 31 00 74 0C 54 01 20 CA |.J. .XC+1.t.T. .| 00000470: 23 31 30 30 00 7D 0C 5E 01 20 D2 59 43 00 88 0C |#100.}.^. .YC...| 00000480: 68 01 20 D6 53 55 42 52 00 98 0C 72 01 3B 20 32 |h. .SUBR...r.; 2| 00000490: 2E 20 41 55 46 52 55 46 00 A3 0C 7C 01 20 CA 23 |. AUFRUF...|. .#| 000004A0: 32 32 38 00 AC 0C 86 01 20 D2 59 43 00 B7 0C 90 |228..... .YC....| 000004B0: 01 20 D6 53 55 42 52 00 C7 0C 9A 01 3B 20 33 2E |. .SUBR.....; 3.| 000004C0: 20 41 55 46 52 55 46 00 D1 0C A4 01 20 CA 23 35 | AUFRUF..... .#5| 000004D0: 34 00 DA 0C AE 01 20 D2 58 43 00 E3 0C B8 01 20 |4..... .XC..... | 000004E0: CA 23 31 00 EE 0C C2 01 20 D2 58 43 2B 31 00 F8 |.#1..... .XC+1..| 000004F0: 0C CC 01 20 CA 23 31 30 00 01 0D D6 01 20 D2 59 |... .#10..... .Y| 00000500: 43 00 0C 0D E0 01 20 D6 53 55 42 52 00 19 0D EA |C..... .SUBR....| 00000510: 01 45 58 49 54 20 4F 46 46 00 22 0D F4 01 20 CA |.EXIT OFF."... .| 00000520: 23 30 00 2C 0D FE 01 20 D2 31 39 38 00 33 0D 08 |#0.,... .198.3..| 00000530: 02 20 E3 00 49 0D 12 02 54 31 20 A8 22 43 49 52 |. ..I...T1 ."CIR| 00000540: 43 4C 45 20 44 45 4D 4F 22 00 71 0D 1C 02 54 32 |CLE DEMO".q...T2| 00000550: 20 A8 22 C7 49 47 41 2D C1 53 53 20 C7 52 41 46 | .".IGA-.SS .RAF| 00000560: 49 4B 2D D2 4F 55 54 49 4E 45 4E 20 C4 45 4D 4F |IK-.OUTINEN .EMO| 00000570: 22 00 99 0D 26 02 54 33 20 A8 22 DA 55 4D 20 C1 |"...&.T3 .".UM .| 00000580: 42 42 52 55 43 48 20 3C D3 D0 C1 C3 C5 3E 20 44 |BBRUCH <.....> D| 00000590: 52 55 45 43 4B 45 4E 21 22 00 BF 0D 30 02 54 34 |RUECKEN!"...0.T4| 000005A0: 20 A8 22 CA 45 54 5A 54 20 57 45 49 54 45 52 20 | .".ETZT WEITER | 000005B0: 4D 49 54 20 3C D3 D0 C1 C3 C5 3E 2E 2E 2E 22 00 |MIT <.....>...".| 000005C0: CC 0D 3A 02 53 55 42 52 20 CA 23 32 00 D6 0D 44 |..:.SUBR .#2...D| 000005D0: 02 20 D2 52 41 44 00 F2 0D 4E 02 4C 4F 4F 50 31 |. .RAD...N.LOOP1| 000005E0: 20 43 49 52 43 4C 45 49 A0 58 43 2C 59 43 2C 52 | CIRCLEI.XC,YC,R| 000005F0: 41 44 00 FF 0D 58 02 20 45 58 49 54 4B 45 59 00 |AD...X. EXITKEY.| 00000600: 09 0E 62 02 20 C9 52 41 44 00 15 0E 6C 02 20 F6 |..b. .RAD...l. .| 00000610: 4C 4F 4F 50 31 00 1E 0E 76 02 20 CA 23 32 00 28 |LOOP1...v. .#2.(| 00000620: 0E 80 02 20 D2 52 41 44 00 45 0E 8A 02 4C 4F 4F |... .RAD.E...LOO| 00000630: 50 32 20 43 43 49 52 43 4C 45 49 A0 58 43 2C 59 |P2 CCIRCLEI.XC,Y| 00000640: 43 2C 52 41 44 00 52 0E 94 02 20 45 58 49 54 4B |C,RAD.R... EXITK| 00000650: 45 59 00 5C 0E 9E 02 20 C9 52 41 44 00 68 0E A8 |EY.\... .RAD.h..| 00000660: 02 20 F6 4C 4F 4F 50 32 00 6F 0E B2 02 20 E3 00 |. .LOOP2.o... ..| 00000670: 79 0E BC 02 58 43 20 A7 32 00 83 0E C6 02 59 43 |y...XC .2.....YC| 00000680: 20 A7 31 00 8E 0E D0 02 52 41 44 20 A7 31 00 A0 | .1.....RAD .1..| 00000690: 0E DA 02 A3 45 58 49 54 41 44 52 3D 45 58 49 54 |....EXITADR=EXIT| 000006A0: 00 AD 0E E4 02 A1 45 58 49 54 4B 45 59 00 B7 0E |......EXITKEY...| 000006B0: EE 02 20 CA 32 30 33 00 C2 0E F8 02 20 C4 23 24 |.. .203..... .#$| 000006C0: 33 43 00 CD 0E 02 03 20 F6 43 4F 4E 54 00 D4 0E |3C..... .CONT...| 000006D0: 0C 03 20 E0 00 DB 0E 16 03 20 E0 00 E9 0E 20 03 |.. ...... .... .| 000006E0: 20 D5 45 58 49 54 41 44 52 00 F2 0E 2A 03 43 4F | .EXITADR...*.CO| 000006F0: 4E 54 00 F8 0E 34 03 A2 00 00 00 |NT...4..... |
..(...;*********************************
.O...;* *.
V...;* GIGA-ASS GRAFIK-ROUTINEN DEMO *..
...;* ----------------------------- *.D.
..;* *....
.;* ACHTUNG: VOR ASSEMBLIEREN *.....
;* MUESSEN ZWEI VORAUSSETZUNGEN *.9...;
* ERFUELLT SEIN: *.`...;*
*.....;*
1. DER OBJEKTCODE DER GRAFIK- *.....;* R
OUTINEN MUSS IN DEN SPEICHER *.U...;* GE
LADEN WORDEN SEIN. *.....;*
*.#...;* 2. D
AS MAKRO MERGE-FILE MUSS *.J...;* MIT D
EM "M" BEFEHL AN DIESEN *.Q...;* QUELLT
EXT ANGEHAENGT WORDEN *.....;* SEIN.
*.....;*
*.....;***********
**********************...D..$7000...N..D
EMO...X.DEMO DESIGN 3..... CLEAR.'... CO
LOR $BF.@... TEXT T1,6,9,1,3,0,0.L. . PA
GE 3.[... BORDER $F.S... FRAME 35,35,290
,90..... FRAME 40,40,285,85...H. FILL 37
,64...R. FILL 287,64.F... TEXT T2,13,6,0
,1,1,0..... TEXT T3,17,6,0,0,1,0..... TE
XT T4,19,7,0,0,1,0..... SPACEWAIT..... B
ORDER $C.#... CLEAR.1... COLOR $C.A.".;
1. AUFRUF.L.,. J#160.U.6. RXC.^.@. J#0.I
.J. RXC+1.T.T. J#100.}.^. RYC...H. VSUBR
...R.; 2. AUFRUF...|. J#228..... RYC....
. VSUBR.G...; 3. AUFRUF.Q... J#54.Z... R
XC..... J#1...B. RXC+1...L. J#10...V. RY
C..... VSUBR.....EXIT OFF."... J#0.,...
R198.3... ..I...T1 ."CIRCLE DEMO".Q...T2
."GIGA-ASS GRAFIK-ROUTINEN DEMO"...&.T3
."ZUM ABBRUCH <SPACE> DRUECKEN!"...0.T4
."JETZT WEITER MIT <SPACE>...".L.:.SUBR
J#2.V.D. RRAD...N.LOOP1 CIRCLEI XC,YC,R
AD...X. EXITKEY...B. IRAD...L. .LOOP1...
V. J#2.(... RRAD.E...LOOP2 CCIRCLEI XC,Y
C,RAD.R... EXITKEY.\... IRAD.H... .LOOP2
.O... ..Y...XC .2...F.YC .1...P.RAD .1.
.Z..EXITADR=EXIT......EXITKEY..... J203.
B... D#$3C.M... .CONT.T... ...... .... .
UEXITADR...*.CONT...4.....
> CLICK IMAGE PREVIEW FOR FULL MODAL