TITEL
FILE INFORMATION
FILENAME(S): TITEL
FILE TYPE(S): PRG
FILE SIZE: 1.4K
FIRST SEEN: 2025-12-02 02:15:03
APPEARS ON: 1 disk(s)
FILE HASH
536bd22fbef9bbf1cef412844e8af3a808d51a3b9bc21eb78c4203bd863273cb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PANS TOOLS 08 | TITEL | PRG | The BAM Archive | 12 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |..$....53280,0:.| 00000010: 35 33 32 38 31 2C 30 3A 99 22 93 99 22 C7 28 31 |53281,0:."..".(1| 00000020: 34 29 3A 9C 00 4B 08 14 00 99 22 93 C9 4E 50 55 |4):..K...."..NPU| 00000030: 54 20 44 49 53 4B 20 41 4E 44 20 50 52 45 53 53 |T DISK AND PRESS| 00000040: 20 52 45 54 55 52 4E 2E 2E 2E 22 00 5D 08 1E 00 | RETURN...".]...| 00000050: A1 41 24 3A 8B 41 24 B2 22 22 A7 33 30 00 86 08 |.A$:.A$."".30...| 00000060: 28 00 99 22 11 11 11 11 11 11 11 11 11 11 11 1D |(.."............| 00000070: 1D 1D D3 4F 46 54 57 41 52 45 20 42 59 20 CA 4F |...OFTWARE BY .O| 00000080: 43 4C 4F 4E 41 22 00 99 08 2D 00 86 46 24 28 35 |CLONA"...-..F$(5| 00000090: 30 2C 33 29 3A 43 54 B2 30 00 A5 08 32 00 9F 32 |0,3):CT.0...2..2| 000000A0: 2C 38 2C 31 35 00 B5 08 3C 00 9F 31 2C 38 2C 30 |,8,15...<..1,8,0| 000000B0: 2C 22 24 30 22 00 C3 08 46 00 A1 23 31 2C 41 24 |,"$0"...F..#1,A$| 000000C0: 2C 42 24 00 D1 08 50 00 A1 23 31 2C 41 24 2C 42 |,B$...P..#1,A$,B| 000000D0: 24 00 DF 08 5A 00 A1 23 31 2C 41 24 2C 42 24 00 |$...Z..#1,A$,B$.| 000000E0: E7 08 64 00 43 B2 30 00 FB 08 6E 00 8B 41 24 B3 |..d.C.0...n..A$.| 000000F0: B1 22 22 A7 43 B2 C6 28 41 24 29 00 15 09 78 00 |."".C..(A$)...x.| 00000100: 8B 42 24 B3 B1 22 22 A7 43 B2 43 AA C6 28 42 24 |.B$.."".C.C..(B$| 00000110: 29 AC 32 35 36 00 2C 09 82 00 46 24 28 43 54 2C |).256.,...F$(CT,| 00000120: 31 29 B2 CA 28 C4 28 43 29 2C 32 29 00 46 09 8C |1)..(.(C),2).F..| 00000130: 00 A1 23 31 2C 42 24 3A 8B 53 54 B3 B1 30 A7 A0 |..#1,B$:.ST..0..| 00000140: 31 3A 89 32 32 35 00 59 09 96 00 8B 42 24 B3 B1 |1:.225.Y....B$..| 00000150: C7 28 33 34 29 A7 31 34 30 00 89 09 A0 00 A1 23 |.(34).140......#| 00000160: 31 2C 42 24 3A 8B 42 24 B3 B1 C7 28 33 34 29 A7 |1,B$:.B$...(34).| 00000170: 46 24 28 43 54 2C 32 29 B2 46 24 28 43 54 2C 32 |F$(CT,2).F$(CT,2| 00000180: 29 AA 42 24 3A 89 31 36 30 00 A2 09 AA 00 A1 23 |).B$:.160......#| 00000190: 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 32 29 A7 31 |1,B$:.B$..(32).1| 000001A0: 37 30 00 AC 09 B4 00 43 24 B2 22 22 00 CC 09 BE |70.....C$.""....| 000001B0: 00 43 24 B2 43 24 AA 42 24 3A A1 23 31 2C 42 24 |.C$.C$.B$:.#1,B$| 000001C0: 3A 8B 42 24 B3 B1 22 22 A7 31 39 30 00 E1 09 C8 |:.B$.."".190....| 000001D0: 00 46 24 28 43 54 2C 33 29 B2 C8 28 43 24 2C 33 |.F$(CT,3)..(C$,3| 000001E0: 29 00 ED 09 D2 00 43 54 B2 43 54 AA 31 00 FB 09 |).....CT.CT.1...| 000001F0: DC 00 8B 20 53 54 B2 30 A7 38 30 00 17 0A E1 00 |... ST.0.80.....| 00000200: 46 24 28 43 54 2C 32 29 B2 22 42 4C 4F 43 4B 27 |F$(CT,2)."BLOCK'| 00000210: 53 20 46 52 45 45 22 00 33 0A E6 00 99 22 93 11 |S FREE".3...."..| 00000220: 1D 1D 1D 1D 1D 2D 2D 2D CD C5 CE D5 2D 2D 2D 11 |.....---....---.| 00000230: 11 11 22 00 4C 0A F0 00 99 22 20 20 28 31 29 20 |..".L...." (1) | 00000240: 20 20 C4 49 52 45 43 54 4F 52 59 22 00 67 0A FA | .IRECTORY".g..| 00000250: 00 99 22 20 20 28 32 29 20 20 20 CE 55 4D 42 45 |.." (2) .UMBE| 00000260: 52 45 44 20 44 49 52 00 7E 0A 04 01 99 22 20 20 |RED DIR.~...." | 00000270: 28 33 29 20 20 20 C5 58 45 43 55 54 45 22 00 99 |(3) .XECUTE"..| 00000280: 0A 0E 01 99 22 20 20 28 34 29 20 20 20 C4 49 53 |...." (4) .IS| 00000290: 4B 20 4F 50 45 52 41 4E 44 00 B1 0A 18 01 99 22 |K OPERAND......"| 000002A0: 20 20 28 35 29 20 20 20 CE 45 57 20 44 49 53 4B | (5) .EW DISK| 000002B0: 22 00 C5 0A 1D 01 99 22 20 20 28 36 29 20 20 20 |"......" (6) | 000002C0: C5 58 49 54 22 00 E3 0A 22 01 99 22 11 11 11 11 |.XIT"...".."....| 000002D0: C5 4E 54 45 52 20 59 4F 55 52 20 43 48 4F 49 53 |.NTER YOUR CHOIS| 000002E0: 45 2E 22 00 F6 0A 2C 01 A1 41 24 3A 8B 41 24 B2 |E."...,..A$:.A$.| 000002F0: 22 22 A7 33 30 30 00 0F 0B 36 01 41 B2 C5 28 41 |"".300...6.A..(A| 00000300: 24 29 3A 8B 41 B3 31 B0 41 B1 36 A7 33 30 30 00 |$):.A.1.A.6.300.| 00000310: 31 0B 40 01 91 41 89 31 30 30 30 2C 32 30 30 30 |1.@..A.1000,2000| 00000320: 2C 33 30 30 30 2C 34 30 30 30 2C 31 30 2C 33 33 |,3000,4000,10,33| 00000330: 30 00 56 0B 4A 01 99 22 93 C7 52 45 45 54 49 4E |0.V.J.."..REETIN| 00000340: 47 53 20 54 4F 20 C9 C8 C1 CD 20 36 34 11 11 11 |GS TO .... 64...| 00000350: 11 11 11 11 11 22 00 5C 0B 54 01 80 00 65 0B E8 |.....".\.T...e..| 00000360: 03 99 22 93 22 00 6D 0B F2 03 41 B2 30 00 89 0B |..".".m...A.0...| 00000370: FC 03 41 B2 41 AA 31 3A 8B 46 24 28 41 2C 31 29 |..A.A.1:.F$(A,1)| 00000380: B3 B1 22 22 A7 31 30 32 30 00 AF 0B 06 04 99 46 |.."".1020......F| 00000390: 24 28 30 2C 31 29 3B A3 35 29 3B 46 24 28 30 2C |$(0,1);.5);F$(0,| 000003A0: 32 29 3B A3 32 35 29 3B 46 24 28 30 2C 33 29 00 |2);.25);F$(0,3).| 000003B0: B5 0B 0B 04 99 00 C0 0B 10 04 81 54 B2 31 A4 41 |...........T.1.A| 000003C0: 00 E6 0B 1A 04 99 46 24 28 54 2C 31 29 3B A3 35 |......F$(T,1);.5| 000003D0: 29 3B 46 24 28 54 2C 32 29 3B A3 32 35 29 3B 46 |);F$(T,2);.25);F| 000003E0: 24 28 54 2C 33 29 00 02 0C 24 04 A1 41 24 3A 8B |$(T,3)...$..A$:.| 000003F0: 41 24 B3 B1 22 22 A7 81 5A B2 30 A4 31 30 30 30 |A$..""..Z.0.1000| 00000400: 3A 82 00 0F 0C 29 04 8B 41 AB 32 B2 54 A7 99 00 |:....)..A.2.T...| 00000410: 15 0C 2E 04 82 00 29 0C 38 04 A1 41 24 3A 8B 41 |......).8..A$:.A| 00000420: 24 B2 22 22 A7 31 30 38 30 00 32 0C 42 04 89 32 |$."".1080.2.B..2| 00000430: 33 30 00 3B 0C D0 07 99 22 93 22 00 43 0C DA 07 |30.;....".".C...| 00000440: 41 B2 30 00 5F 0C E4 07 41 B2 41 AA 31 3A 8B 46 |A.0._...A.A.1:.F| 00000450: 24 28 41 2C 31 29 B3 B1 22 22 A7 32 30 32 30 00 |$(A,1).."".2020.| 00000460: 69 0C EE 07 41 B2 41 AB 31 00 77 0C F8 07 81 58 |i...A.A.1.w....X| 00000470: 31 B2 31 A4 41 AB 31 00 8C 0C 02 08 99 58 31 3B |1.1.A.1......X1;| 00000480: A3 35 29 3B 46 24 28 58 31 2C 32 29 00 92 0C 0C |.5);F$(X1,2)....| 00000490: 08 82 00 9C 0C 16 08 89 31 30 38 30 00 B9 0C B8 |........1080....| 000004A0: 0B 85 22 93 CE 55 4D 42 45 52 20 4F 46 20 50 52 |.."..UMBER OF PR| 000004B0: 4F 47 52 41 4D 20 22 3B 41 00 DD 0C C2 0B 99 22 |OGRAM ";A......"| 000004C0: 11 11 4C 4F 41 44 22 C7 28 33 34 29 3B 46 24 28 |..LOAD".(34);F$(| 000004D0: 41 2C 32 29 3B C7 28 33 34 29 22 2C 38 00 EC 0C |A,2);.(34)",8...| 000004E0: CC 0B 99 22 11 11 11 11 52 55 4E 22 00 F7 0C E0 |..."....RUN"....| 000004F0: 0B 99 22 13 22 3A 80 00 02 0D A0 0F 99 22 93 3E |..".":.......".>| 00000500: 22 3B 00 0C 0D A5 0F 42 24 B2 22 22 00 20 0D AA |";.....B$."". ..| 00000510: 0F A1 41 24 3A 8B 41 24 B2 22 22 A7 34 30 31 30 |..A$:.A$."".4010| 00000520: 00 33 0D B4 0F 8B 41 24 B2 C7 28 31 33 29 A7 34 |.3....A$..(13).4| 00000530: 30 34 30 00 4B 0D BE 0F 42 24 B2 42 24 AA 41 24 |040.K...B$.B$.A$| 00000540: 3A 99 41 24 3B 3A 89 34 30 31 30 00 5D 0D C8 0F |:.A$;:.4010.]...| 00000550: 9F 31 2C 38 2C 31 35 2C 42 24 3A A0 31 00 66 0D |.1,8,15,B$:.1.f.| 00000560: D2 0F 89 32 33 30 00 00 00 |...230... |
..$....53280,0:.53281,0:.".."G(14):..K.. ..".INPUT DISK AND PRESS RETURN...".]... .A$:.A$."".30...(.."..............SOFTWA RE BY JOCLONA"...-..F$(50,3):CT.0...2..2 ,8,15...<..1,8,0,"$0".C.F..#1,A$,B$.Q.P. .#1,A$,B$...Z..#1,A$,B$...D.C.0...N..A$. ."".C.F(A$)...X..B$.."".C.C.F(B$).256.,. ..F$(CT,1).J(D(C),2).F....#1,B$:.ST..0. 1:.225.Y....B$..G(34).140... ..#1,B$:.B$ ..G(34).F$(CT,2).F$(CT,2).B$:.160......# 1,B$:.B$.G(32).170.....C$."".L...C$.C$.B $:.#1,B$:.B$.."".190...H.F$(CT,3).H(C$,3 )...R.CT.CT.1...... ST.0.80.....F$(CT,2) ."BLOCK'S FREE".3....".......---MENU---. ..".L...." (1) DIRECTORY".G...." (2) NUMBERED DIR.~...." (3) EXECUTE".. ...." (4) DISK OPERAND......" (5) NEW DISK".E...." (6) EXIT"..."..".... ENTER YOUR CHOISE."...,..A$:.A$."".300.. .6.A.E(A$):.A.1.A.6.300.1.@..A.1000,2000 ,3000,4000,10,330.V.J..".GREETINGS TO IH AM 64........".\.T...E....".".M...A.0... ..A.A.1:.F$(A,1).."".1020......F$(0,1);. 5);F$(0,2);.25);F$(0,3)............T.1.A ......F$(T,1);.5);F$(T,2);.25);F$(T,3).. .$..A$:.A$..""..Z.0.1000:....)..A.2.T... ......).8..A$:.A$."".1080.2.B..230.;.P.. ".".C.Z.A.0._...A.A.1:.F$(A,1).."".2020. I...A.A.1.W....X1.1.A.1......X1;.5);F$(X 1,2)............1080......".NUMBER OF PR OGRAM ";A...B.."..LOAD"G(34);F$(A,2);G(3 4)",8...L.."....RUN"......".":.... ..".> ";.....B$."". ....A$:.A$."".4010.3....A$ .G(13).4040.K...B$.B$.A$:.A$;:.4010.].H. .1,8,15,B$: 1.F.R..230...
> CLICK IMAGE PREVIEW FOR FULL MODAL