T.CIRCLE
FILE INFORMATION
FILENAME(S): T.CIRCLE
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-10-20 14:29:49
APPEARS ON: 1 disk(s)
FILE HASH
0df5d3f96951d27ae669af649f940b70dba4213da9fa3c9ab46765d6e5adf230
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UH SYSTEM DISK | T.CIRCLE | PRG | Treasure Chest - Klaus Der Suhler | 16 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 40 1C 40 0A 00 FE 25 3A 20 8F 20 45 4E 41 42 |.@.@...%: . ENAB| 00000010: 4C 45 20 32 20 4D 48 20 4D 4F 44 45 00 4F 40 14 |LE 2 MH MODE.O@.| 00000020: 00 97 34 37 2C 30 3A 97 34 38 2C 36 38 3A 9C 3A |..47,0:.48,68:.:| 00000030: 20 8F 20 53 45 54 20 55 50 20 31 36 4B 20 42 55 | . SET UP 16K BU| 00000040: 46 46 45 52 20 46 4F 52 20 40 53 54 41 53 48 00 |FFER FOR @STASH.| 00000050: 90 40 1E 00 40 DE 2C 36 2C 30 3A 40 9C 2C 30 3A |.@..@.,6,0:@.,0:| 00000060: 20 8F 20 45 4E 41 42 4C 45 20 55 4C 54 52 41 20 | . ENABLE ULTRA | 00000070: 48 49 52 45 53 20 36 34 30 20 58 20 32 30 30 20 |HIRES 640 X 200 | 00000080: 41 4E 44 20 43 4C 45 41 52 20 53 43 52 45 45 4E |AND CLEAR SCREEN| 00000090: 00 DC 40 28 00 D7 20 34 34 30 3A 20 8F 20 53 45 |..@(.. 440: . SE| 000000A0: 54 20 55 50 20 53 59 4E 54 41 58 20 45 52 52 4F |T UP SYNTAX ERRO| 000000B0: 52 20 54 52 41 50 20 54 4F 20 52 45 54 55 52 4E |R TRAP TO RETURN| 000000C0: 20 54 4F 20 54 45 58 54 20 4D 4F 44 45 20 41 4E | TO TEXT MODE AN| 000000D0: 44 20 4C 49 53 54 20 45 52 52 4F 52 00 E5 40 32 |D LIST ERROR..@2| 000000E0: 00 40 9C 2C 30 00 05 41 3C 00 40 E0 2C 35 35 32 |.@.,0..A<.@.,552| 000000F0: 39 36 2C 36 34 2C 30 2C 39 2C 39 2C 22 C3 C9 D2 |96,64,0,9,9,"...| 00000100: C3 CC C5 D3 22 00 19 41 46 00 81 20 52 44 B2 39 |...."..AF.. RD.9| 00000110: 20 A4 20 39 39 20 A9 31 30 00 3F 41 50 00 40 E2 | . 99 .10.?AP.@.| 00000120: 2C 31 2C 33 32 30 2C 31 30 30 2C 32 2E 35 AC 52 |,1,320,100,2.5.R| 00000130: 44 2C 52 44 2C 30 2C 33 36 30 2C 30 2C 31 30 00 |D,RD,0,360,0,10.| 00000140: 45 41 5A 00 82 00 4D 41 64 00 FE 0B 35 00 5D 41 |EAZ...MAd...5.]A| 00000150: 6E 00 40 9C 2C 30 3A 40 DE 2C 36 2C 38 00 75 41 |n.@.,0:@.,6,8.uA| 00000160: 78 00 81 20 54 48 20 B2 20 31 20 A4 20 31 38 30 |x.. TH . 1 . 180| 00000170: 20 A9 20 31 30 00 98 41 82 00 40 E2 2C 31 2C 33 | . 10..A..@.,1,3| 00000180: 32 30 2C 31 30 30 2C 33 30 2C 39 39 2C 30 2C 33 |20,100,30,99,0,3| 00000190: 36 30 2C 54 48 2C 31 32 00 9E 41 8C 00 82 00 A6 |60,TH,12..A.....| 000001A0: 41 96 00 FE 0B 35 00 AF 41 A0 00 40 9C 2C 30 00 |A....5..A..@.,0.| 000001B0: CE 41 AA 00 40 E0 2C 35 35 32 39 36 2C 36 34 2C |.A..@.,55296,64,| 000001C0: 30 2C 31 36 2C 31 36 2C 22 C3 CF D0 D9 22 00 D6 |0,16,16,"...."..| 000001D0: 41 B4 00 FE 0B 33 00 E6 41 BE 00 40 9C 2C 30 3A |A....3..A..@.,0:| 000001E0: 40 DE 2C 36 2C 32 00 06 42 C8 00 43 58 B2 32 34 |@.,6,2..B..CX.24| 000001F0: 3A 43 59 B2 38 3A 53 43 B2 32 2E 35 3A 46 4C B2 |:CY.8:SC.2.5:FL.| 00000200: 30 3A 52 B2 31 30 00 4A 42 D2 00 8F 20 44 52 41 |0:R.10.JB... DRA| 00000210: 57 20 43 49 52 43 4C 45 20 43 45 4E 54 45 52 20 |W CIRCLE CENTER | 00000220: 58 3D 43 58 2C 20 43 45 4E 54 45 52 20 59 3D 43 |X=CX, CENTER Y=C| 00000230: 59 2C 20 58 20 52 41 44 49 55 53 3D 58 52 20 59 |Y, X RADIUS=XR Y| 00000240: 20 52 41 44 49 55 53 3D 59 52 00 92 42 DC 00 8F | RADIUS=YR..B...| 00000250: 20 53 41 3D 30 20 45 41 3D 33 36 30 20 54 48 3D | SA=0 EA=360 TH=| 00000260: 30 20 49 4E 43 3D 38 20 28 41 4C 4C 20 44 45 46 |0 INC=8 (ALL DEF| 00000270: 41 55 4C 54 53 20 41 4E 44 20 4E 4F 54 20 52 45 |AULTS AND NOT RE| 00000280: 51 55 49 52 45 44 20 50 41 52 41 4D 45 54 45 52 |QUIRED PARAMETER| 00000290: 53 29 00 AF 42 E6 00 81 20 59 52 B2 31 20 A4 20 |S)..B... YR.1 . | 000002A0: 38 20 A9 20 32 3A 58 52 B2 59 52 AC 32 2E 35 00 |8 . 2:XR.YR.2.5.| 000002B0: C4 42 F0 00 40 E2 2C 31 2C 43 58 2C 43 59 2C 58 |.B..@.,1,CX,CY,X| 000002C0: 52 2C 59 52 00 CD 42 FA 00 82 20 59 52 00 D5 42 |R,YR..B... YR..B| 000002D0: 04 01 FE 0B 35 00 FF 42 0E 01 8F 20 44 55 50 4C |....5..B... DUPL| 000002E0: 49 43 41 54 45 20 43 49 52 43 4C 45 20 57 49 54 |ICATE CIRCLE WIT| 000002F0: 48 20 40 43 4F 50 59 20 43 4F 4D 4D 41 4E 44 00 |H @COPY COMMAND.| 00000300: 15 43 18 01 81 20 59 43 B2 30 20 A4 20 31 38 33 |.C... YC.0 . 183| 00000310: 20 A9 20 32 30 00 32 43 22 01 20 20 20 20 20 20 | . 20.2C". | 00000320: 20 81 20 58 43 B2 30 20 A4 20 35 39 30 20 A9 20 | . XC.0 . 590 . | 00000330: 35 30 00 57 43 2C 01 20 20 20 20 20 20 20 20 20 |50.WC,. | 00000340: 20 20 20 20 20 40 F4 2C 30 2C 30 2C 34 38 2C 32 | @.,0,0,48,2| 00000350: 30 2C 58 43 2C 59 43 00 64 43 36 01 20 20 20 20 |0,XC,YC.dC6. | 00000360: 20 20 20 82 00 6A 43 40 01 82 00 72 43 4A 01 FE | ..jC@...rCJ..| 00000370: 0B 35 00 86 43 54 01 40 FE 1F 2C 30 2C 30 2C 30 |.5..CT.@..,0,0,0| 00000380: 2C 34 38 2C 31 36 00 9F 43 5E 01 8F 20 41 4E 49 |,48,16..C^.. ANI| 00000390: 4D 41 54 45 20 57 49 54 48 20 46 45 54 43 48 00 |MATE WITH FETCH.| 000003A0: CD 43 68 01 54 59 B2 31 3A 54 58 B2 38 3A 58 B2 |.Ch.TY.1:TX.8:X.| 000003B0: B5 28 BB 28 31 29 AC 35 38 33 29 AA 37 3A 59 B2 |.(.(1).583).7:Y.| 000003C0: B5 28 BB 28 31 29 AC 31 30 29 AA 32 30 00 DE 43 |.(.(1).10).20..C| 000003D0: 72 01 81 20 49 B2 31 20 A4 20 31 30 38 34 00 F2 |r.. I.1 . 1084..| 000003E0: 43 7C 01 20 20 20 20 20 20 40 FE 21 2C 30 2C 58 |C|. @.!,0,X| 000003F0: 2C 59 00 16 44 86 01 20 20 20 20 20 20 58 B2 58 |,Y..D.. X.X| 00000400: AA 54 58 3A 8B 20 58 B1 35 39 30 20 A7 20 54 58 |.TX:. X.590 . TX| 00000410: B2 54 58 AC AB 31 00 31 44 90 01 20 20 20 20 20 |.TX..1.1D.. | 00000420: 20 8B 20 58 B3 38 20 A7 20 54 58 B2 54 58 AC AB | . X.8 . TX.TX..| 00000430: 31 00 55 44 9A 01 20 20 20 20 20 20 59 B2 59 AA |1.UD.. Y.Y.| 00000440: 54 59 3A 8B 20 59 B1 31 38 34 20 A7 20 54 59 B2 |TY:. Y.184 . TY.| 00000450: 54 59 AC AB 31 00 70 44 A4 01 20 20 20 20 20 20 |TY..1.pD.. | 00000460: 8B 20 59 B3 31 20 A7 20 54 59 B2 54 59 AC AB 31 |. Y.1 . TY.TY..1| 00000470: 00 76 44 AE 01 82 00 7E 44 B8 01 FE 0B 35 00 8D |.vD....~D....5..| 00000480: 44 CC 01 8A 22 54 2E 47 52 41 50 48 53 00 00 00 |D..."T.GRAPHS...|
.@.@...%: . ENABLE 2 MH MODE.O@...47,0:.
48,68:.: . SET UP 16K BUFFER FOR @STASH.
.@..@.,6,0:@.,0: . ENABLE ULTRA HIRES 64
0 X 200 AND CLEAR SCREEN..@(.W 440: . SE
T UP SYNTAX ERROR TRAP TO RETURN TO TEXT
MODE AND LIST ERROR..@2.@.,0..A<.@.,552
96,64,0,9,9,"CIRCLES"..AF.. RD.9 . 99 .1
0.?AP.@.,1,320,100,2.5.RD,RD,0,360,0,10.
EAZ...MAD...5.]AN.@.,0:@.,6,8.UAX.. TH .
1 . 180 . 10..A..@.,1,320,100,30,99,0,3
60,TH,12..A.....A....5..A .@.,0.NA..@.,5
5296,64,0,16,16,"COPY".VA....3..A..@.,0:
@.,6,2..BH.CX.24:CY.8:SC.2.5:FL.0:R.10.J
BR.. DRAW CIRCLE CENTER X=CX, CENTER Y=C
Y, X RADIUS=XR Y RADIUS=YR..B... SA=0 EA
=360 TH=0 INC=8 (ALL DEFAULTS AND NOT RE
QUIRED PARAMETERS)..B... YR.1 . 8 . 2:XR
.YR.2.5.DB..@.,1,CX,CY,XR,YR.MB... YR.UB
....5..B... DUPLICATE CIRCLE WITH @COPY
COMMAND..C... YC.0 . 183 . 20.2C".
. XC.0 . 590 . 50.WC,. @.,
0,0,48,20,XC,YC.DC6. ..JC@...RCJ..
.5..CT.@..,0,0,0,48,16..C^.. ANIMATE WIT
H FETCH.MCH.TY.1:TX.8:X..(.(1).583).7:Y.
.(.(1).10).20..CR.. I.1 . 1084..C|.
@.!,0,X,Y..D.. X.X.TX:. X.590 . TX
.TX..1.1D.. . X.8 . TX.TX..1.UD..
Y.Y.TY:. Y.184 . TY.TY..1.PD..
. Y.1 . TY.TY..1.VD....~D....5..DL.."T.G
RAPHS...
> CLICK IMAGE PREVIEW FOR FULL MODAL