DOS128-TEACHER
FILE INFORMATION
FILENAME(S): DOS128-TEACHER
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-11-02 16:39:54
APPEARS ON: 1 disk(s)
FILE HASH
9a017e0250812440b9e29147821110e13e85ea015d12ec178c9846f04cf3c591
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 6 | DOS128-TEACHER | PRG | Treasure Chest - Plattfuss | 33 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 0A 1C 02 00 99 22 93 22 00 60 1C 03 00 81 |.......".".`....| 00000010: 4A B2 31 A4 31 30 30 3A 99 22 11 11 11 11 11 1D |J.1.100:."......| 00000020: 1D 1D 1D 1D 1D 1D 1D 1D 12 44 4F 53 31 32 38 2D |.........DOS128-| 00000030: 54 45 41 43 48 45 52 92 22 3A 99 22 93 22 3A 99 |TEACHER.":.".":.| 00000040: 22 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 |"..............D| 00000050: 4F 53 31 32 38 2D 54 45 41 43 48 45 52 22 3A 82 |OS128-TEACHER":.| 00000060: 00 85 1C 04 00 99 22 1D 1D 1D 1D 1D 11 11 11 11 |......".........| 00000070: 11 4C 49 53 54 20 54 48 45 20 50 52 4F 47 52 41 |.LIST THE PROGRA| 00000080: 4D 20 54 4F 22 00 BB 1C 05 00 99 22 1D 1D 1D 1D |M TO"......"....| 00000090: 1D 4C 45 41 52 4E 20 42 41 53 49 43 20 43 4F 4D |.LEARN BASIC COM| 000000A0: 4D 41 4E 44 53 22 3A 99 22 1D 1D 1D 1D 1D 42 59 |MANDS":.".....BY| 000000B0: 20 43 20 43 41 4C 4C 41 52 49 22 00 CC 1C 06 00 | C CALLARI".....| 000000C0: 81 44 4C B2 31 A4 33 30 30 30 3A 82 00 D5 1C 0A |.DL.1.3000:.....| 000000D0: 00 99 22 93 22 00 E8 1C 0F 00 E7 30 2C 31 3A E7 |.."."......0,1:.| 000000E0: 34 2C 32 3A 99 22 05 22 00 0F 1D 14 00 99 22 1D |4,2:."."......".| 000000F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 11 |................| 00000100: 11 11 11 12 4D 41 49 4E 20 4D 45 4E 55 92 22 00 |....MAIN MENU.".| 00000110: 19 1D 1E 00 99 3A 99 3A 99 00 30 1D 28 00 99 A6 |.....:.:..0.(...| 00000120: 31 35 29 22 31 2E 20 56 41 4C 49 44 41 54 45 22 |15)"1. VALIDATE"| 00000130: 00 46 1D 32 00 99 A6 31 35 29 22 32 2E 20 53 43 |.F.2...15)"2. SC| 00000140: 52 41 54 43 48 22 00 5F 1D 3C 00 99 A6 31 35 29 |RATCH"._.<...15)| 00000150: 22 33 2E 20 49 4E 49 54 49 41 4C 49 5A 45 22 00 |"3. INITIALIZE".| 00000160: 73 1D 46 00 99 A6 31 35 29 22 34 2E 20 57 52 49 |s.F...15)"4. WRI| 00000170: 54 45 22 00 86 1D 50 00 99 A6 31 35 29 22 35 2E |TE"...P...15)"5.| 00000180: 20 52 45 41 44 22 00 9E 1D 5A 00 99 A6 31 35 29 | READ"...Z...15)| 00000190: 22 36 2E 20 44 49 52 45 43 54 4F 52 59 22 00 B3 |"6. DIRECTORY"..| 000001A0: 1D 5D 00 99 A6 31 35 29 22 37 2E 20 46 4F 52 4D |.]...15)"7. FORM| 000001B0: 41 54 22 00 D5 1D 5F 00 99 A6 31 35 29 22 38 2E |AT"..._...15)"8.| 000001C0: 20 41 42 4F 52 54 28 43 4C 45 41 52 20 49 54 20 | ABORT(CLEAR IT | 000001D0: 41 4C 4C 29 22 00 DF 1D 64 00 99 3A 99 3A 99 00 |ALL)"...d..:.:..| 000001E0: FF 1D 6E 00 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..n.."..........| 000001F0: 1D 1D 1D 1D 1D 43 48 4F 53 45 20 4F 4E 45 22 00 |.....CHOSE ONE".| 00000200: 18 1E 78 00 99 22 13 22 3A 97 32 31 2C 36 34 3A |..x..".":.21,64:| 00000210: 85 4D 3A 97 32 31 2C 30 00 2B 1E 91 00 8B 4D 20 |.M:.21,0.+....M | 00000220: B3 31 B0 20 4D 20 B1 38 A7 31 30 00 39 1E 96 00 |.1. M .8.10.9...| 00000230: 8B 4D B2 31 A7 89 33 30 30 00 46 1E A0 00 8B 4D |.M.1..300.F....M| 00000240: B2 32 A7 35 30 30 00 53 1E AA 00 8B 4D B2 33 A7 |.2.500.S....M.3.| 00000250: 38 30 30 00 61 1E B4 00 8B 4D B2 34 A7 31 31 30 |800.a....M.4.110| 00000260: 30 00 6F 1E BE 00 8B 4D B2 35 A7 31 34 30 30 00 |0.o....M.5.1400.| 00000270: 7D 1E C8 00 8B 4D B2 36 A7 31 37 30 30 00 8B 1E |}....M.6.1700...| 00000280: D2 00 8B 4D B2 37 A7 32 30 30 30 00 9B 1E DC 00 |...M.7.2000.....| 00000290: 8B 4D B2 38 A7 9E 36 35 33 34 31 00 A4 1E 2C 01 |.M.8..65341...,.| 000002A0: 99 22 93 22 00 B7 1E 36 01 E7 30 2C 32 3A E7 34 |."."...6..0,2:.4| 000002B0: 2C 32 3A 99 22 90 22 00 D2 1E 3B 01 99 A6 38 29 |,2:."."...;...8)| 000002C0: 22 11 11 11 11 11 49 4E 53 45 52 54 20 44 49 53 |".....INSERT DIS| 000002D0: 4B 22 00 EC 1E 3D 01 99 A6 35 29 22 54 4F 20 42 |K"...=...5)"TO B| 000002E0: 45 20 56 41 4C 49 44 41 54 45 44 22 00 08 1F 40 |E VALIDATED"...@| 000002F0: 01 99 A6 35 29 22 11 11 54 48 45 4E 20 48 49 54 |...5)"..THEN HIT| 00000300: 20 52 45 54 55 52 4E 22 00 22 1F 4A 01 99 22 13 | RETURN".".J..".| 00000310: 22 3A 97 32 31 2C 36 34 3A 85 56 24 3A 97 32 31 |":.21,64:.V$:.21| 00000320: 2C 30 00 34 1F 54 01 8B 56 24 B2 C7 28 31 33 29 |,0.4.T..V$..(13)| 00000330: A7 33 34 35 00 60 1F 59 01 99 22 93 22 3A 99 A6 |.345.`.Y..".":..| 00000340: 31 30 29 22 11 11 11 11 11 11 11 11 11 11 12 56 |10)"...........V| 00000350: 41 4C 49 44 41 54 49 4E 47 20 44 49 53 4B 92 22 |ALIDATING DISK."| 00000360: 00 6D 1F 5E 01 9F 31 35 2C 38 2C 31 35 00 79 1F |.m.^..15,8,15.y.| 00000370: 68 01 98 31 35 2C 22 56 22 00 85 1F 6D 01 A0 31 |h..15,"V"...m..1| 00000380: 35 3A 89 31 30 00 9F 1F F4 01 E7 30 2C 31 36 3A |5:.10......0,16:| 00000390: E7 34 2C 31 36 3A 99 22 1C 22 3A 99 22 93 22 00 |.4,16:.".":.".".| 000003A0: C7 1F FE 01 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 |....."..........| 000003B0: 11 11 11 11 11 11 11 4E 41 4D 45 20 4F 46 20 46 |.......NAME OF F| 000003C0: 49 4C 45 20 54 4F 22 00 EB 1F 08 02 99 20 20 20 |ILE TO"...... | 000003D0: 20 20 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 42 45 20 | "..........BE | 000003E0: 53 43 52 41 54 43 48 45 44 3F 22 00 05 20 12 02 |SCRATCHED?".. ..| 000003F0: 99 22 13 22 3A 97 32 31 2C 36 34 3A 85 53 24 3A |.".":.21,64:.S$:| 00000400: 97 32 31 2C 30 00 12 20 30 02 9F 31 35 2C 38 2C |.21,0.. 0..15,8,| 00000410: 31 35 00 22 20 3A 02 98 31 35 2C 22 53 30 3A 22 |15." :..15,"S0:"| 00000420: 53 24 00 2F 20 44 02 A0 31 35 3A 99 22 93 22 00 |S$./ D..15:.".".| 00000430: 3F 20 4E 02 99 22 1D 1D 1D 1D 1D 11 11 11 22 00 |? N.."........".| 00000440: 4C 20 58 02 EE 3A 99 C7 28 31 33 29 00 6A 20 62 |L X..:..(13).j b| 00000450: 02 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 11 48 49 |.."...........HI| 00000460: 54 20 41 4E 59 20 4B 45 59 22 00 80 20 6C 02 97 |T ANY KEY".. l..| 00000470: 32 31 2C 36 34 3A 85 53 31 24 3A 97 32 31 2C 30 |21,64:.S1$:.21,0| 00000480: 00 95 20 76 02 53 31 24 B2 22 22 3A 8B C7 28 31 |.. v.S1$."":..(1| 00000490: 33 29 A7 31 30 00 AD 20 20 03 E7 30 2C 35 3A E7 |3).10.. ..0,5:.| 000004A0: 34 2C 35 3A 99 22 9E 22 3A 99 22 93 22 00 D5 20 |4,5:.".":.".".. | 000004B0: 2A 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 |*.."............| 000004C0: 11 11 11 11 11 11 11 11 11 49 4E 53 45 52 54 20 |.........INSERT | 000004D0: 44 49 53 4B 22 00 F3 20 2F 03 99 22 1D 1D 1D 1D |DISK".. /.."....| 000004E0: 1D 1D 1D 1D 1D 1D 1D 11 48 49 54 20 52 45 54 55 |........HIT RETU| 000004F0: 52 4E 22 00 0D 21 34 03 99 22 13 22 3A 97 32 31 |RN"..!4..".":.21| 00000500: 2C 36 34 3A 85 49 24 3A 97 32 31 2C 30 00 3F 21 |,64:.I$:.21,0.?!| 00000510: 3E 03 8B 49 24 B2 C7 28 31 33 29 A7 99 22 93 11 |>..I$..(13).."..| 00000520: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 49 4E 49 |.............INI| 00000530: 54 49 41 4C 49 5A 49 4E 47 20 44 49 53 4B 22 00 |TIALIZING DISK".| 00000540: 4C 21 48 03 9F 31 35 2C 38 2C 31 35 00 58 21 52 |L!H..15,8,15.X!R| 00000550: 03 98 31 35 2C 22 49 22 00 64 21 5C 03 A0 31 35 |..15,"I".d!\..15| 00000560: 3A 89 31 30 00 7E 21 4C 04 E7 30 2C 31 32 3A E7 |:.10.~!L..0,12:.| 00000570: 34 2C 31 32 3A E7 35 2C 38 3A 99 22 93 22 00 A7 |4,12:.5,8:."."..| 00000580: 21 56 04 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |!V.."...........| 00000590: 11 11 11 11 11 11 11 11 11 11 11 49 4E 53 45 52 |...........INSER| 000005A0: 54 20 44 49 53 4B 22 00 C5 21 60 04 99 22 1D 1D |T DISK"..!`.."..| 000005B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 46 4F 52 20 57 52 49 |.........FOR WRI| 000005C0: 54 49 4E 47 22 00 E2 21 6A 04 99 22 1D 1D 1D 1D |TING"..!j.."....| 000005D0: 1D 1D 1D 1D 1D 1D 1D 48 49 54 20 52 45 54 55 52 |.......HIT RETUR| 000005E0: 4E 22 00 FC 21 74 04 99 22 13 22 3A 97 32 31 2C |N"..!t..".":.21,| 000005F0: 36 34 3A 85 57 24 3A 97 32 31 2C 30 00 0C 22 7E |64:.W$:.21,0.."~| 00000600: 04 8B C7 28 31 33 29 A7 31 31 35 35 00 3C 22 83 |...(13).1155.<".| 00000610: 04 99 22 93 22 3A 99 22 11 11 11 11 11 11 11 11 |..".":."........| 00000620: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 4E 41 |..............NA| 00000630: 4D 45 20 4F 46 20 46 49 4C 45 3F 22 00 5E 22 85 |ME OF FILE?".^".| 00000640: 04 99 22 1D 1D 1D 1D 54 59 50 45 20 2A 2A 2A 20 |.."....TYPE *** | 00000650: 54 4F 20 43 4C 4F 53 45 20 46 49 4C 45 22 00 79 |TO CLOSE FILE".y| 00000660: 22 88 04 99 22 13 22 3A 97 32 31 2C 36 34 3A 85 |"...".":.21,64:.| 00000670: 57 31 24 3A 97 32 31 2C 30 00 86 22 9C 04 9F 31 |W1$:.21,0.."...1| 00000680: 35 2C 38 2C 31 35 00 A1 22 A6 04 9F 31 2C 38 2C |5,8,15.."...1,8,| 00000690: 35 2C 22 30 3A 22 AA 57 31 24 AA 22 2C 53 2C 57 |5,"0:".W1$.",S,W| 000006A0: 22 00 B2 22 B0 04 84 31 35 2C 45 2C 45 24 2C 54 |".."...15,E,E$,T| 000006B0: 2C 53 00 CF 22 BA 04 8B 45 B1 31 39 A7 99 45 3B |,S.."...E.19..E;| 000006C0: 45 24 3B 54 3B 53 3A A0 31 3A A0 31 35 3A 90 00 |E$;T;S:.1:.15:..| 000006D0: EB 22 C4 04 99 22 93 13 22 3A 97 32 31 2C 36 34 |."..."..":.21,64| 000006E0: 3A 85 57 32 24 3A 97 32 31 2C 30 00 FF 22 CE 04 |:.W2$:.21,0.."..| 000006F0: 8B 57 32 24 B2 22 2A 2A 2A 22 A7 31 32 37 35 00 |.W2$."***".1275.| 00000700: 0A 23 E2 04 98 31 2C 57 32 24 00 14 23 EC 04 89 |.#...1,W2$..#...| 00000710: 31 32 30 30 00 40 23 FB 04 99 22 93 1D 1D 1D 1D |1200.@#...".....| 00000720: 1D 1D 1D 1D 1D 1D 1D 11 11 11 11 11 11 53 41 56 |.............SAV| 00000730: 49 4E 47 20 46 49 4C 45 22 3A A0 31 3A A0 31 35 |ING FILE":.1:.15| 00000740: 00 6A 23 00 05 99 22 93 22 3A 99 22 1D 1D 1D 1D |.j#...".":."....| 00000750: 1D 1D 1D 1D 1D 1D 48 49 54 20 52 45 54 55 52 4E |......HIT RETURN| 00000760: 20 46 4F 52 20 4D 45 4E 55 22 00 85 23 05 05 99 | FOR MENU"..#...| 00000770: 22 13 22 3A 97 32 31 2C 36 34 3A 85 57 34 24 3A |".":.21,64:.W4$:| 00000780: 97 32 31 2C 30 00 9A 23 0A 05 57 34 24 B2 22 22 |.21,0..#..W4$.""| 00000790: 3A 8B C7 28 31 33 29 A7 31 30 00 A3 23 78 05 99 |:..(13).10..#x..| 000007A0: 22 93 22 00 B8 23 82 05 E7 30 2C 31 30 3A E7 34 |"."..#...0,10:.4| 000007B0: 2C 31 30 3A E7 35 2C 32 00 E6 23 8C 05 99 22 11 |,10:.5,2..#...".| 000007C0: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |................| 000007D0: 1D 1D 1D 1D 1D 49 4E 53 45 52 54 20 46 49 4C 45 |.....INSERT FILE| 000007E0: 20 44 49 53 4B 22 00 03 24 91 05 99 22 1D 1D 1D | DISK"..$..."...| 000007F0: 1D 1D 1D 1D 1D 1D 1D 1D 48 49 54 20 52 45 54 55 |........HIT RETU| 00000800: 52 4E 22 00 1E 24 96 05 99 22 13 22 3A 97 32 31 |RN"..$...".":.21| 00000810: 2C 36 34 3A 85 52 31 24 3A 97 32 31 2C 30 00 2E |,64:.R1$:.21,0..| 00000820: 24 A0 05 8B C7 28 31 33 29 A7 31 34 35 30 00 5B |$....(13).1450.[| 00000830: 24 AA 05 99 22 93 22 3A 99 22 11 11 11 11 11 11 |$...".":."......| 00000840: 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000850: 46 49 4C 45 20 4E 41 4D 45 3F 22 00 78 24 B4 05 |FILE NAME?".x$..| 00000860: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 4F 20 |."...........TO | 00000870: 42 45 20 52 45 41 44 22 00 93 24 BE 05 99 22 13 |BE READ"..$...".| 00000880: 22 3A 97 32 31 2C 36 34 3A 85 52 32 24 3A 97 32 |":.21,64:.R2$:.2| 00000890: 31 2C 30 00 9C 24 C3 05 99 22 93 22 00 A9 24 C8 |1,0..$..."."..$.| 000008A0: 05 9F 31 35 2C 38 2C 31 35 00 BD 24 D2 05 9F 31 |..15,8,15..$...1| 000008B0: 2C 38 2C 35 2C 22 30 3A 22 AA 52 32 24 00 CE 24 |,8,5,"0:".R2$..$| 000008C0: DC 05 84 31 35 2C 45 2C 45 24 2C 54 2C 53 00 EB |...15,E,E$,T,S..| 000008D0: 24 E6 05 8B 45 B1 31 39 A7 99 45 2C 45 24 2C 54 |$...E.19..E,E$,T| 000008E0: 2C 53 3A A0 31 3A A0 31 35 3A 90 00 FC 24 F0 05 |,S:.1:.15:...$..| 000008F0: 84 31 2C 41 24 3A 99 3A 99 41 24 3B 00 0B 25 F5 |.1,A$:.:.A$;..%.| 00000900: 05 8B 53 54 B2 30 A7 31 35 30 30 00 16 25 FA 05 |..ST.0.1500..%..| 00000910: A0 31 3A A0 31 35 00 3D 25 0E 06 99 22 1D 1D 1D |.1:.15.=%..."...| 00000920: 1D 1D 1D 1D 1D 11 11 11 11 48 49 54 20 52 45 54 |.........HIT RET| 00000930: 55 52 4E 20 46 4F 52 20 4D 45 4E 55 22 00 60 25 |URN FOR MENU".`%| 00000940: 18 06 99 22 1D 1D 1D 1D 1D 1D 1D 1D 22 3A 97 32 |..."........":.2| 00000950: 31 2C 36 34 3A 85 52 52 33 24 3A 97 32 31 2C 30 |1,64:.RR3$:.21,0| 00000960: 00 75 25 22 06 52 33 24 B2 22 22 3A 8B C7 28 31 |.u%".R3$."":..(1| 00000970: 33 29 A7 31 30 00 8D 25 A4 06 E7 30 2C 39 3A E7 |3).10..%...0,9:.| 00000980: 34 2C 39 3A 99 22 90 22 3A 99 22 93 22 00 BA 25 |4,9:.".":."."..%| 00000990: AE 06 99 22 11 11 11 11 11 11 11 11 11 11 11 1D |..."............| 000009A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 49 4E 53 45 52 54 |..........INSERT| 000009B0: 20 44 49 53 4B 20 41 4E 44 22 00 D7 25 B8 06 99 | DISK AND"..%...| 000009C0: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 48 49 54 20 |"...........HIT | 000009D0: 52 45 54 55 52 4E 22 00 F1 25 C2 06 99 22 13 22 |RETURN"..%..."."| 000009E0: 3A 97 32 31 2C 36 34 3A 85 44 24 3A 97 32 31 2C |:.21,64:.D$:.21,| 000009F0: 30 00 04 26 CC 06 8B 44 24 B2 C7 28 31 33 29 A7 |0..&...D$..(13).| 00000A00: 31 37 34 35 00 16 26 D1 06 99 22 93 1D 1D 1D 1D |1745..&...".....| 00000A10: 1D 1D 11 11 11 22 00 2F 26 D6 06 9F 31 35 2C 38 |....."./&...15,8| 00000A20: 2C 31 35 3A 9F 31 2C 38 2C 30 2C 22 24 30 22 00 |,15:.1,8,0,"$0".| 00000A30: 47 26 DB 06 A1 23 31 2C 41 24 3A A1 23 31 2C 41 |G&...#1,A$:.#1,A| 00000A40: 24 3A 42 59 B2 32 36 00 59 26 E0 06 A1 23 31 2C |$:BY.26.Y&...#1,| 00000A50: 41 24 3A A1 23 31 2C 41 24 00 72 26 E5 06 A1 23 |A$:.#1,A$.r&...#| 00000A60: 31 2C 41 24 3A 42 4C B2 C6 28 41 24 AA C7 28 30 |1,A$:BL..(A$..(0| 00000A70: 29 29 00 92 26 EA 06 A1 23 31 2C 41 24 3A 42 4C |))..&...#1,A$:BL| 00000A80: B2 42 4C AA 32 35 36 AC C6 28 41 24 AA C7 28 30 |.BL.256..(A$..(0| 00000A90: 29 29 00 A4 26 EF 06 4E 24 B2 22 22 3A 81 4B B2 |))..&..N$."":.K.| 00000AA0: 31 A4 42 59 00 BB 26 F4 06 A1 23 31 2C 41 24 3A |1.BY..&...#1,A$:| 00000AB0: 8B 53 54 B3 B1 30 89 31 38 30 30 00 CA 26 F9 06 |.ST..0.1800..&..| 00000AC0: 4E 24 B2 4E 24 AA 41 24 3A 82 00 DB 26 FE 06 99 |N$.N$.A$:...&...| 00000AD0: 42 4C 3B 4E 24 3A 42 59 B2 32 38 00 EA 26 03 07 |BL;N$:BY.28..&..| 00000AE0: 8B 53 54 B2 30 89 31 37 36 30 00 F5 26 08 07 99 |.ST.0.1760..&...| 00000AF0: 42 4C 3B 4E 24 00 00 27 12 07 A0 31 3A A0 31 35 |BL;N$..'...1:.15| 00000B00: 00 19 27 30 07 99 22 11 11 11 48 49 54 20 4D 20 |..'0.."...HIT M | 00000B10: 46 4F 52 20 4D 45 4E 55 22 00 33 27 3A 07 99 22 |FOR MENU".3':.."| 00000B20: 11 48 49 54 20 41 20 46 4F 52 20 41 4E 4F 54 48 |.HIT A FOR ANOTH| 00000B30: 45 52 22 00 49 27 44 07 97 32 31 2C 36 34 3A 85 |ER".I'D..21,64:.| 00000B40: 44 31 24 3A 97 32 31 2C 30 00 59 27 4E 07 8B 44 |D1$:.21,0.Y'N..D| 00000B50: 31 24 B2 22 4D 22 A7 31 30 00 6B 27 58 07 8B 44 |1$."M".10.k'X..D| 00000B60: 31 24 B2 22 41 22 A7 31 37 30 30 00 83 27 D0 07 |1$."A".1700..'..| 00000B70: E7 30 2C 33 3A E7 34 2C 33 3A E7 35 2C 34 3A 99 |.0,3:.4,3:.5,4:.| 00000B80: 22 93 22 00 AF 27 DA 07 99 22 1D 1D 1D 1D 1D 1D |"."..'..."......| 00000B90: 1D 1D 1D 1D 1D 11 11 11 11 11 11 11 11 11 11 11 |................| 00000BA0: 49 4E 53 45 52 54 20 44 49 53 4B 20 54 4F 22 00 |INSERT DISK TO".| 00000BB0: CE 27 E4 07 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.'..."..........| 00000BC0: 1D 42 45 20 46 4F 52 4D 41 54 54 45 44 22 00 DF |.BE FORMATTED"..| 00000BD0: 27 E9 07 81 44 4C B2 31 A4 35 30 30 30 3A 82 00 |'...DL.1.5000:..| 00000BE0: E8 27 EE 07 99 22 93 22 00 28 28 F8 07 99 22 1D |.'...".".((...".| 00000BF0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 11 11 11 11 11 |................| 00000C00: 11 11 11 11 4E 41 4D 45 20 4F 46 20 44 49 53 4B |....NAME OF DISK| 00000C10: 3F 22 3A 99 22 13 22 3A 97 32 31 2C 36 34 3A 85 |?":.".":.21,64:.| 00000C20: 46 24 3A 97 32 31 2C 30 00 3B 28 02 08 8B C3 28 |F$:.21,0.;(....(| 00000C30: 46 24 29 B1 31 36 A7 32 30 33 30 00 44 28 0C 08 |F$).16.2030.D(..| 00000C40: 99 22 93 22 00 80 28 16 08 99 22 1D 1D 1D 1D 1D |."."..(...".....| 00000C50: 1D 1D 1D 1D 1D 1D 11 11 11 11 11 11 11 11 11 11 |................| 00000C60: 44 49 53 4B 20 49 44 3F 22 3A 99 22 13 22 3A 97 |DISK ID?":.".":.| 00000C70: 32 31 2C 36 34 3A 85 49 44 24 3A 97 32 31 2C 30 |21,64:.ID$:.21,0| 00000C80: 00 93 28 20 08 8B C3 28 49 44 24 29 B1 32 A7 32 |..( ...(ID$).2.2| 00000C90: 30 36 30 00 C2 28 2A 08 99 22 93 1D 1D 1D 1D 1D |060..(*.."......| 00000CA0: 1D 1D 1D 1D 1D 1D 11 11 11 11 11 11 11 11 11 11 |................| 00000CB0: 12 46 4F 52 4D 41 54 54 49 4E 47 20 44 49 53 4B |.FORMATTING DISK| 00000CC0: 92 22 00 CF 28 34 08 9F 31 35 2C 38 2C 31 35 00 |."..(4..15,8,15.| 00000CD0: E6 28 3E 08 98 31 35 2C 22 4E 45 57 3A 22 46 24 |.(>..15,"NEW:"F$| 00000CE0: 22 2C 22 49 44 24 00 FB 28 48 08 A0 31 35 3A 99 |","ID$..(H..15:.| 00000CF0: 22 93 1D 1D 1D 1D 1D 11 11 11 22 00 08 29 52 08 |"........."..)R.| 00000D00: EE 3A 99 C7 28 31 33 29 00 22 29 57 08 99 22 1D |.:..(13).")W..".| 00000D10: 1D 1D 1D 1D 1D 1D 1D 48 49 54 20 52 45 54 55 52 |.......HIT RETUR| 00000D20: 4E 22 00 38 29 5C 08 97 32 31 2C 36 34 3A 85 46 |N".8)\..21,64:.F| 00000D30: 31 24 3A 97 32 31 2C 30 00 4D 29 66 08 46 31 24 |1$:.21,0.M)f.F1$| 00000D40: B2 22 22 3A 8B C7 28 31 33 29 A7 31 30 00 00 00 |."":..(13).10...|
.......".".`....J.1.100:.".............. .DOS128-TEACHER.":.".":."..............D OS128-TEACHER":......."..........LIST TH E PROGRAM TO"......".....LEARN BASIC COM MANDS":.".....BY C CALLARI".L....DL.1.30 00:..U...."."......0,1:.4,2:."."......". ....................MAIN MENU."......:.: ..0.(...15)"1. VALIDATE".F.2...15)"2. SC RATCH"._.<...15)"3. INITIALIZE".S.F...15 )"4. WRITE"...P...15)"5. READ"...Z...15) "6. DIRECTORY"...]...15)"7. FORMAT".U._. ..15)"8. ABORT(CLEAR IT ALL)"...D..:.:.. ..N.."...............CHOSE ONE"...X.."." :.21,64:.M:.21,0.+....M .1. M .8.10.9... .M.1..300.F. ..M.2.500.S....M.3.800.A... .M.4.1100.O....M.5.1400.}.H..M.6.1700... R..M.7.2000......M.8..65341...,.."."...6 ..0,2:.4,2:.".".R.;...8)".....INSERT DIS K"...=...5)"TO BE VALIDATED"...@...5)".. THEN HIT RETURN".".J..".":.21,64:.V$:.21 ,0.4.T..V$.G(13).345.`.Y..".":..10)".... .......VALIDATING DISK.".M.^..15,8,15.Y. H..15,"V"...M. 15:.10......0,16:.4,16:." .":.".".G....".................NAME OF F ILE TO"...... "..........BE SCRATCHE D?".. ...".":.21,64:.S$:.21,0.. 0..15,8, 15." :..15,"S0:"S$./ D. 15:.".".? N..".. ......".L X..:.G(13).J B.."...........HI T ANY KEY".. L..21,64:.S1$:.21,0.. V.S1$ ."":.G(13).10.. ..0,5:.4,5:.".":.".".U *..".....................INSERT DISK".. /.."............HIT RETURN"..!4..".":.21 ,64:.I$:.21,0.?!>..I$.G(13)..".......... .....INITIALIZING DISK".L!H..15,8,15.X!R ..15,"I".D!\. 15:.10.~!L..0,12:.4,12:.5, 8:."."..!V.."......................INSER T DISK".E!`.."...........FOR WRITING"..! J.."...........HIT RETURN"..!T..".":.21, 64:.W$:.21,0.."~..G(13).1155.<"...".":." ......................NAME OF FILE?".^". .."....TYPE *** TO CLOSE FILE".Y"...".": .21,64:.W1$:.21,0.."...15,8,15.."...1,8, 5,"0:".W1$.",S,W".."...15,E,E$,T,S.O"... E.19..E;E$;T;S: 1: 15:..."D.."..":.21,64 :.W2$:.21,0.."N..W2$."***".1275..#...1,W 2$..#...1200.@#..."..................SAV ING FILE": 1: 15.J#...".":."..........HI T RETURN FOR MENU"..#...".":.21,64:.W4$: .21,0..#..W4$."":.G(13).10..#X.."."..#.. .0,10:.4,10:.5,2..#..."................. .....INSERT FILE DISK"..$..."........... HIT RETURN"..$...".":.21,64:.R1$:.21,0.. $ ..G(13).1450.[$...".":.".............. ........FILE NAME?".X$..."...........TO BE READ"..$...".":.21,64:.R2$:.21,0..$C. ."."..$H..15,8,15..$R..1,8,5,"0:".R2$.N$ ...15,E,E$,T,S..$...E.19..E,E$,T,S: 1: 1 5:...$...1,A$:.:.A$;..%...ST.0.1500..%.. 1: 15.=%..."............HIT RETURN FOR MENU".`%..."........":.21,64:.RR3$:.21,0 .U%".R3$."":.G(13).10..%...0,9:.4,9:."." :."."..%..."......................INSERT DISK AND".W%..."...........HIT RETURN". .%B..".":.21,64:.D$:.21,0..&L..D$.G(13). 1745..&Q..".........."./&V..15,8,15:.1,8 ,0,"$0".G&...#1,A$:.#1,A$:BY.26.Y&...#1, A$:.#1,A$.R&...#1,A$:BL.F(A$.G(0))..&... #1,A$:BL.BL.256.F(A$.G(0))..&..N$."":.K. 1.BY..&...#1,A$:.ST..0.1800.J&..N$.N$.A$ :...&...BL;N$:BY.28..&...ST.0.1760..&... BL;N$..'.. 1: 15..'0.."...HIT M FOR MENU ".3':..".HIT A FOR ANOTHER".I'D..21,64:. D1$:.21,0.Y'N..D1$."M".10.K'X..D1$."A".1 700..'P..0,3:.4,3:.5,4:."."..'Z.."...... ................INSERT DISK TO".N'...".. .........BE FORMATTED"..'...DL.1.5000:.. .'...".".((...".....................NAME OF DISK?":.".":.21,64:.F$:.21,0.;(...C( F$).16.2030.D(..."."..(..."............. ........DISK ID?":.".":.21,64:.ID$:.21,0 ..( ..C(ID$).2.2060.B(*..".............. .........FORMATTING DISK.".O(4..15,8,15. .(>..15,"NEW:"F$","ID$..(H. 15:."....... .."..)R..:.G(13).")W.."........HIT RETUR N".8)\..21,64:.F1$:.21,0.M)F.F1$."":.G(1 3).10...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL