_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL