3C
FILE INFORMATION
FILENAME(S): 3C
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-12-01 13:49:28
APPEARS ON: 1 disk(s)
FILE HASH
50b1c377ab53268245dcc31ed1cc049e0592077fae4320ebd5c67bc3a268d29e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MATS | 3C | PRG | hedning, Helsinborg | 30 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 06 00 99 22 93 98 22 00 1F 08 0A 00 |......."..".....| 00000010: 9F 39 2C 30 2C 30 3A 9F 31 35 2C 38 2C 31 35 00 |.9,0,0:.15,8,15.| 00000020: 39 08 14 00 50 4B B2 C2 28 35 33 32 37 32 29 3A |9...PK..(53272):| 00000030: 97 35 33 32 37 32 2C 32 31 00 5B 08 1E 00 4D 44 |.53272,21.[...MD| 00000040: 24 B2 22 13 22 3A 81 49 B2 31 A4 32 30 3A 4D 44 |$.".":.I.1.20:MD| 00000050: 24 B2 4D 44 24 AA 22 11 22 3A 82 00 75 08 28 00 |$.MD$.".":..u.(.| 00000060: 81 49 B2 31 A4 33 39 3A 42 4C 24 B2 42 4C 24 AA |.I.1.39:BL$.BL$.| 00000070: 22 20 22 3A 82 00 AC 08 32 00 50 30 24 B2 22 93 |" ":....2.P0$.".| 00000080: 12 9E 20 20 20 20 20 20 20 4D 4F 44 49 46 49 43 |.. MODIFIC| 00000090: 41 20 20 20 20 20 4E 4F 4D 45 20 20 20 20 20 44 |A NOME D| 000000A0: 49 53 43 4F 20 20 20 20 20 20 98 22 00 D5 08 3C |ISCO ."...<| 000000B0: 00 52 45 24 B2 22 05 50 52 45 4D 49 20 12 52 45 |.RE$.".PREMI .RE| 000000C0: 54 55 52 4E 92 20 50 45 52 20 43 4F 4E 54 49 4E |TURN. PER CONTIN| 000000D0: 55 41 52 45 22 00 F7 08 46 00 83 32 2C 4E 4F 4E |UARE"...F..2,NON| 000000E0: 20 50 4F 53 53 49 42 49 4C 45 2C 54 52 4F 50 50 | POSSIBILE,TROPP| 000000F0: 4F 20 4C 55 4E 47 4F 00 17 09 50 00 87 41 3A 86 |O LUNGO...P..A:.| 00000100: 45 4D 24 28 41 29 3A 81 49 B2 31 A4 41 3A 87 45 |EM$(A):.I.1.A:.E| 00000110: 4D 24 28 49 29 3A 82 00 21 09 63 00 89 31 30 30 |M$(I):..!.c..100| 00000120: 30 00 34 09 64 00 84 31 35 2C 45 52 3A 8B 45 52 |0.4.d..15,ER:.ER| 00000130: B2 30 A7 8E 00 4B 09 6E 00 84 31 35 2C 45 52 2C |.0...K.n..15,ER,| 00000140: 45 4D 24 2C 45 54 24 2C 45 53 24 00 7D 09 78 00 |EM$,ET$,ES$.}.x.| 00000150: 99 4D 44 24 22 12 20 45 52 52 4F 52 45 20 44 49 |.MD$". ERRORE DI| 00000160: 53 43 4F 20 92 20 23 22 45 52 22 20 22 45 4D 24 |SCO . #"ER" "EM$| 00000170: 22 20 22 45 54 24 22 2C 20 22 45 53 24 00 83 09 |" "ET$", "ES$...| 00000180: 82 00 80 00 AC 09 C8 00 84 39 2C 51 24 3A 99 3A |.........9,Q$:.:| 00000190: 8B 51 24 B2 22 22 A7 51 24 B2 22 20 20 20 54 43 |.Q$."".Q$." TC| 000001A0: 53 20 20 20 20 27 38 35 20 22 3A 8E 00 BE 09 C9 |S '85 ":.....| 000001B0: 00 51 31 24 B2 C8 28 51 24 2C 31 29 3A 8E 00 FF |.Q1$..(Q$,1):...| 000001C0: 09 2C 01 A0 32 3A A0 31 35 3A 97 35 39 34 36 38 |.,..2:.15:.59468| 000001D0: 2C 50 4B 3A 99 22 93 11 11 20 20 20 49 4E 53 45 |,PK:."... INSE| 000001E0: 52 49 53 43 49 20 54 43 53 20 44 49 53 4B 22 3A |RISCI TCS DISK":| 000001F0: 92 31 39 38 2C 31 3A 41 24 B2 22 D4 C4 CD 22 00 |.198,1:A$."...".| 00000200: 3D 0A 2D 01 99 22 11 11 90 4E 45 57 22 3A 99 22 |=.-.."...NEW":."| 00000210: 11 11 4C 4F 41 44 22 C7 28 33 34 29 41 24 C7 28 |..LOAD".(34)A$.(| 00000220: 33 34 29 22 2C 38 22 3A 99 22 11 11 11 11 52 55 |34)",8":."....RU| 00000230: 4E 91 91 91 91 91 91 91 91 91 91 91 22 00 6A 0A |N...........".j.| 00000240: 2E 01 97 31 39 38 2C 34 3A 97 36 33 30 2C 31 33 |...198,4:.630,13| 00000250: 3A 97 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 |:.631,13:.632,13| 00000260: 3A 97 36 33 33 2C 31 33 3A 80 00 81 0A 90 01 99 |:.633,13:.......| 00000270: C8 28 4D 44 24 2C 4D 44 29 42 4C 24 3A 99 42 4C |.(MD$,MD)BL$:.BL| 00000280: 24 00 93 0A 9A 01 99 C8 28 4D 44 24 2C 4D 44 29 |$.......(MD$,MD)| 00000290: 3B 3A 8E 00 A2 0A F4 01 4D 44 B2 32 31 3A 8D 34 |;:......MD.21:.4| 000002A0: 30 30 00 C7 0A FE 01 99 22 12 20 49 4E 50 55 54 |00......". INPUT| 000002B0: 20 4E 4F 4E 20 56 41 4C 49 44 4F 20 2D 2D 20 22 | NON VALIDO -- "| 000002C0: 45 4D 24 28 45 4D 29 00 DA 0A 08 02 99 52 45 24 |EM$(EM)......RE$| 000002D0: 3A 8D 32 30 30 3A 8D 34 30 30 00 E0 0A 12 02 8E |:.200:.400......| 000002E0: 00 ED 0A E8 03 46 B2 30 3A 99 50 30 24 00 18 0B |.....F.0:.P0$...| 000002F0: ED 03 99 22 05 11 53 55 20 51 55 41 4C 45 20 44 |..."..SU QUALE D| 00000300: 52 49 56 45 20 3F 20 28 30 2F 31 29 20 20 30 9D |RIVE ? (0/1) 0.| 00000310: 12 22 3B 3A 8D 32 30 30 00 40 0B FC 03 44 56 B2 |.";:.200.@...DV.| 00000320: C5 28 51 24 29 3A 8B 44 56 B3 30 B0 44 56 B1 31 |.(Q$):.DV.0.DV.1| 00000330: A7 45 4D B2 31 3A 8D 35 30 30 3A 89 31 30 30 30 |.EM.1:.500:.1000| 00000340: 00 63 0B 06 04 8B 44 56 B2 30 AF 51 31 24 B3 B1 |.c....DV.0.Q1$..| 00000350: 22 30 22 A7 45 4D B2 31 3A 8D 35 30 30 3A 89 31 |"0".EM.1:.500:.1| 00000360: 30 30 30 00 8E 0B 10 04 99 50 30 24 3A 99 22 11 |000......P0$:.".| 00000370: 4D 45 54 54 49 20 49 4C 20 44 49 53 43 4F 20 4E |METTI IL DISCO N| 00000380: 45 4C 20 44 52 49 56 45 22 44 56 22 11 22 00 97 |EL DRIVE"DV"."..| 00000390: 0B 1A 04 99 52 45 24 00 AB 0B 1F 04 A1 51 24 3A |....RE$......Q$:| 000003A0: 8B 51 24 B2 22 22 A7 31 30 35 35 00 C2 0B 24 04 |.Q$."".1055...$.| 000003B0: 98 31 35 2C 22 49 22 AA C4 28 44 56 29 3A 8D 31 |.15,"I"..(DV):.1| 000003C0: 30 30 00 EC 0B 2E 04 9F 32 2C 38 2C 32 2C 22 23 |00......2,8,2,"#| 000003D0: 22 3A 98 31 35 2C 22 55 31 3A 32 22 3B 44 56 3B |":.15,"U1:2";DV;| 000003E0: 22 2C 31 38 2C 30 22 3A 8D 31 30 30 00 0C 0C 38 |",18,0":.100...8| 000003F0: 04 98 31 35 2C 22 42 2D 50 3A 32 2C 31 34 34 22 |..15,"B-P:2,144"| 00000400: 3A 8D 31 30 30 3A 44 4E 24 B2 22 22 00 2C 0C 42 |:.100:DN$."".,.B| 00000410: 04 81 49 B2 31 A4 31 36 3A A1 23 32 2C 41 24 3A |..I.1.16:.#2,A$:| 00000420: 44 4E 24 B2 44 4E 24 AA 41 24 3A 82 00 43 0C 4C |DN$.DN$.A$:..C.L| 00000430: 04 4D 44 B2 31 30 3A 8D 34 30 30 3A 8B 20 46 20 |.MD.10:.400:. F | 00000440: A7 20 8E 00 62 0C 56 04 99 22 4E 4F 4D 45 20 41 |. ..b.V.."NOME A| 00000450: 54 54 55 41 4C 45 20 44 45 4C 20 44 49 53 43 4F |TTUALE DEL DISCO| 00000460: 20 3A 00 78 0C 60 04 99 A3 35 29 C7 28 33 34 29 | :.x.`...5).(34)| 00000470: 44 4E 24 C7 28 33 34 29 00 87 0C 6A 04 4D 44 B2 |DN$.(34)...j.MD.| 00000480: 31 33 3A 8D 34 30 30 00 AC 0C 74 04 99 22 44 45 |13:.400...t.."DE| 00000490: 56 49 20 43 41 4D 42 49 41 52 4C 4F 20 28 59 2F |VI CAMBIARLO (Y/| 000004A0: 4E 29 20 59 9D 22 3B 3A 8D 32 30 30 00 BE 0C 7E |N) Y.";:.200...~| 000004B0: 04 8B 51 31 24 B2 22 4E 22 A7 31 33 35 30 00 D1 |..Q1$."N".1350..| 000004C0: 0C 88 04 8B 51 31 24 B3 B1 22 59 22 A7 31 31 33 |....Q1$.."Y".113| 000004D0: 30 00 E0 0C 92 04 4D 44 B2 31 36 3A 8D 34 30 30 |0.....MD.16:.400| 000004E0: 00 F4 0C 9C 04 99 22 4E 55 4F 56 4F 20 4E 4F 4D |......"NUOVO NOM| 000004F0: 45 20 3A 22 00 22 0D A6 04 8D 32 30 30 3A 8B C3 |E :"."....200:..| 00000500: 28 51 24 29 B1 31 36 A7 45 4D B2 32 3A 8D 35 30 |(Q$).16.EM.2:.50| 00000510: 30 3A 4D 44 B2 31 38 3A 8D 34 30 30 3A 89 31 31 |0:MD.18:.400:.11| 00000520: 39 30 00 38 0D B0 04 4E 44 4E 24 B2 C8 28 51 24 |90.8...NDN$..(Q$| 00000530: AA 42 4C 24 2C 31 36 29 00 47 0D BA 04 4D 44 B2 |.BL$,16).G...MD.| 00000540: 32 31 3A 8D 34 30 30 00 61 0D C4 04 99 22 44 45 |21:.400.a...."DE| 00000550: 56 4F 20 53 43 52 49 56 45 52 45 20 22 4E 44 4E |VO SCRIVERE "NDN| 00000560: 24 00 90 0D CE 04 99 22 53 55 4C 20 44 49 53 43 |$......"SUL DISC| 00000570: 4F 20 4E 45 4C 20 44 52 49 56 45 22 44 56 22 3F |O NEL DRIVE"DV"?| 00000580: 20 28 59 2F 4E 29 20 59 9D 22 3B 3A 8D 32 30 30 | (Y/N) Y.";:.200| 00000590: 00 A2 0D D8 04 8B 51 31 24 B2 22 59 22 A7 31 32 |......Q1$."Y".12| 000005A0: 37 30 00 B1 0D E2 04 8B 51 31 24 B2 22 4E 22 A7 |70......Q1$."N".| 000005B0: 8A 00 BB 0D EC 04 89 31 32 31 30 00 DA 0D F6 04 |.......1210.....| 000005C0: 4D 44 B2 32 31 3A 8D 34 30 30 3A 99 22 41 54 54 |MD.21:.400:."ATT| 000005D0: 45 4E 44 45 52 45 20 2E 2E 2E 00 F3 0D 00 05 98 |ENDERE .........| 000005E0: 31 35 2C 22 42 2D 50 3A 32 2C 31 34 34 22 3A 8D |15,"B-P:2,144":.| 000005F0: 31 30 30 00 05 0E 0A 05 98 32 2C 4E 44 4E 24 3B |100......2,NDN$;| 00000600: 3A 8D 31 30 30 00 24 0E 14 05 98 31 35 2C 22 55 |:.100.$....15,"U| 00000610: 32 3A 32 22 3B 44 56 3B 22 2C 31 38 2C 30 22 3A |2:2";DV;",18,0":| 00000620: 8D 31 30 30 00 3E 0E 1E 05 98 31 35 2C 22 49 22 |.100.>....15,"I"| 00000630: AA C4 28 44 56 29 3A 8D 31 30 30 3A A0 32 00 55 |..(DV):.100:.2.U| 00000640: 0E 28 05 46 B2 31 3A 99 50 30 24 3A 8D 31 30 36 |.(.F.1:.P0$:.106| 00000650: 30 3A 46 B2 30 00 73 0E 32 05 99 22 4E 55 4F 56 |0:F.0.s.2.."NUOV| 00000660: 4F 20 4E 4F 4D 45 20 44 45 4C 20 44 49 53 43 4F |O NOME DEL DISCO| 00000670: 20 3A 22 00 86 0E 3C 05 99 C7 28 33 34 29 44 4E | :"...<...(34)DN| 00000680: 24 C7 28 33 34 29 00 9A 0E 46 05 A0 32 3A 4D 44 |$.(34)...F..2:MD| 00000690: B2 32 31 3A 8D 34 30 30 3A 99 00 BE 0E 50 05 99 |.21:.400:....P..| 000006A0: 22 41 4C 54 52 4F 20 44 49 53 43 4F 20 3F 20 28 |"ALTRO DISCO ? (| 000006B0: 59 2F 4E 29 20 59 9D 22 3B 3A 8D 32 30 30 00 D0 |Y/N) Y.";:.200..| 000006C0: 0E 5A 05 8B 51 31 24 B2 22 59 22 A7 31 30 34 30 |.Z..Q1$."Y".1040| 000006D0: 00 E1 0E 64 05 8B 51 31 24 B2 22 4E 22 A7 33 30 |...d..Q1$."N".30| 000006E0: 30 00 EB 0E 6E 05 89 31 33 35 30 00 F1 0E D1 07 |0...n..1350.....| 000006F0: 8E 00 00 00 35 43 |....5C |
.......".."......9,0,0:.15,8,15.9...PK.B (53272):.53272,21.[...MD$.".":.I.1.20:MD $.MD$.".":..U.(..I.1.39:BL$.BL$." ":.... 2.P0$."... MODIFICA NOME D ISCO .".U.<.RE$.".PREMI .RETURN. PE R CONTINUARE"...F..2,NON POSSIBILE,TROPP O LUNGO...P..A:.EM$(A):.I.1.A:.EM$(I):.. !.C..1000.4.D..15,ER:.ER.0...K.N..15,ER, EM$,ET$,ES$.}.X..MD$". ERRORE DISCO . #" ER" "EM$" "ET$", "ES$.........H..9,Q$:.: .Q$."".Q$." TCS '85 ":....I.Q1$.H(Q $,1):....,. 2: 15:.59468,PK:."... INSE RISCI TCS DISK":.198,1:A$."TDM".=.-..".. .NEW":."..LOAD"G(34)A$G(34)",8":."....RU N...........".J....198,4:.630,13:.631,13 :.632,13:.633,13:.......H(MD$,MD)BL$:.BL $......H(MD$,MD);:......MD.21:.400.G.... ". INPUT NON VALIDO -- "EM$(EM).Z....RE$ :.200:.400...........F.0:.P0$......"..SU QUALE DRIVE ? (0/1) 0..";:.200.@...DV. E(Q$):.DV.0.DV.1.EM.1:.500:.1000.C....DV .0.Q1$.."0".EM.1:.500:.1000......P0$:.". METTI IL DISCO NEL DRIVE"DV"."......RE$. .....Q$:.Q$."".1055.B.$..15,"I".D(DV):.1 00......2,8,2,"#":.15,"U1:2";DV;",18,0": .100...8..15,"B-P:2,144":.100:DN$."".,.B ..I.1.16:.#2,A$:DN$.DN$.A$:..C.L.MD.10:. 400:. F . ..B.V.."NOME ATTUALE DEL DISCO :.X.`...5)G(34)DN$G(34)...J.MD.13:.400. ..T.."DEVI CAMBIARLO (Y/N) Y.";:.200...~ ..Q1$."N".1350.Q....Q1$.."Y".1130.....MD .16:.400......"NUOVO NOME :"."....200:.C (Q$).16.EM.2:.500:MD.18:.400:.1190.8...N DN$.H(Q$.BL$,16).G...MD.21:.400.A.D.."DE VO SCRIVERE "NDN$...N.."SUL DISCO NEL DR IVE"DV"? (Y/N) Y.";:.200...X..Q1$."Y".12 70......Q1$."N"........1210.Z...MD.21:.4 00:."ATTENDERE .........15,"B-P:2,144":. 100......2,NDN$;:.100.$....15,"U2:2";DV; ",18,0":.100.>....15,"I".D(DV):.100: 2.U .(.F.1:.P0$:.1060:F.0.S.2.."NUOVO NOME D EL DISCO :"...<..G(34)DN$G(34)...F. 2:MD .21:.400:....P.."ALTRO DISCO ? (Y/N) Y." ;:.200.P.Z..Q1$."Y".1040...D..Q1$."N".30 0...N..1350...Q.....5C
> CLICK IMAGE PREVIEW FOR FULL MODAL