APPCLDR
FILE INFORMATION
FILENAME(S): APPCLDR
FILE TYPE(S): PRG
FILE SIZE: 12.6K
FIRST SEEN: 2025-12-02 23:22:52
APPEARS ON: 1 disk(s)
FILE HASH
4c55f8750fd0ab063b035f991bebf84dbb6636303f093cba8c1eb346f7926def
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| E1 | APPCLDR | PRG | swasti, dinkel | 7 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 8D 35 30 30 30 30 3A 97 36 34 |.......50000:.64|
00000010: 39 2C 30 3A 8D 32 30 30 30 30 00 51 08 0B 00 53 |9,0:.20000.Q...S|
00000020: 42 B2 32 35 30 3A 86 20 42 4C 24 28 34 30 29 2C |B.250:. BL$(40),|
00000030: 4E 24 28 53 42 29 2C 44 28 53 42 29 2C 44 55 28 |N$(SB),D(SB),DU(|
00000040: 53 42 29 2C 44 54 28 33 31 29 2C 4D 4D 28 31 32 |SB),DT(31),MM(12|
00000050: 29 00 80 08 0C 00 42 4C 24 B2 22 20 20 20 20 20 |).....BL$." |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000080: 00 C8 08 14 00 8D 31 37 30 30 30 3A 99 A6 39 29 |......17000:..9)|
00000090: 22 12 20 20 20 20 20 C1 D0 D0 CF C9 CE D4 CD C5 |". .........|
000000A0: CE D4 D3 20 20 20 20 20 22 3A 99 A6 39 29 22 12 |... ":..9)".|
000000B0: 20 20 20 20 20 20 20 C3 C1 CC C5 CE C4 C1 D2 20 | ........ |
000000C0: 20 20 20 20 20 20 92 22 00 EB 08 15 00 99 A6 39 | .".......9|
000000D0: 29 22 12 20 20 20 20 20 20 CD C1 C9 CE A0 A0 CD |)". .......|
000000E0: C5 CE D5 A0 A0 A0 A0 A0 A0 92 22 00 18 09 16 00 |..........".....|
000000F0: 58 B2 37 3A 59 B2 35 3A 8D 31 35 30 30 30 3A 99 |X.7:Y.5:.15000:.|
00000100: 22 12 20 31 20 92 20 20 C6 49 52 53 54 20 D4 49 |". 1 . .IRST .I|
00000110: 4D 45 A0 CD 45 4E 55 22 00 40 09 17 00 99 A6 37 |ME..ENU".@.....7|
00000120: 29 22 11 12 20 32 20 92 20 20 C6 49 4C 45 A0 CD |)".. 2 . .ILE..|
00000130: 41 49 4E 54 45 4E 41 4E 43 45 A0 CD 45 4E 55 22 |AINTENANCE..ENU"|
00000140: 00 78 09 18 00 99 A6 37 29 22 11 12 20 33 20 92 |.x.....7)".. 3 .|
00000150: 20 20 C1 44 44 2F C3 48 41 4E 47 45 2F C4 45 4C | .DD/.HANGE/.EL|
00000160: 45 54 45 22 3A 99 A6 31 32 29 22 C1 50 50 4F 49 |ETE":..12)".PPOI|
00000170: 4E 54 4D 45 4E 54 53 22 00 AD 09 19 00 99 A6 37 |NTMENTS".......7|
00000180: 29 22 11 12 20 34 20 92 20 20 C3 48 45 43 4B A0 |)".. 4 . .HECK.|
00000190: C1 50 50 4F 49 4E 54 4D 45 4E 54 53 22 A6 32 32 |.PPOINTMENTS".22|
000001A0: 29 22 54 4F A0 42 45 A0 CD 41 44 45 22 00 E5 09 |)"TO.BE..ADE"...|
000001B0: 1A 00 99 A6 37 29 22 11 12 20 35 20 92 20 20 D0 |....7)".. 5 . .|
000001C0: 52 49 4E 54 A0 C1 50 50 4F 49 4E 54 4D 45 4E 54 |RINT..PPOINTMENT|
000001D0: 53 22 A6 32 32 29 22 D4 4F 20 20 20 20 D0 52 49 |S".22)".O .RI|
000001E0: 4E 54 45 52 22 00 04 0A 1B 00 99 A6 37 29 22 11 |NTER".......7)".|
000001F0: 12 20 36 20 92 20 20 C5 4E 44 20 D4 48 49 53 20 |. 6 . .ND .HIS |
00000200: CA 4F 42 22 00 24 0A 1C 00 8D 37 35 31 30 3A 8B |.OB".$....7510:.|
00000210: 20 28 53 53 B3 31 29 20 B0 20 28 53 53 B1 36 29 | (SS.1) . (SS.6)|
00000220: 20 A7 32 38 00 4A 0A 1D 00 91 20 53 53 20 89 20 | .28.J.... SS . |
00000230: 31 32 30 2C 31 35 31 34 2C 33 37 30 2C 35 38 30 |120,1514,370,580|
00000240: 2C 31 33 39 30 2C 31 31 35 30 00 70 0A 46 00 45 |,1390,1150.p.F.E|
00000250: 45 B2 30 3A 9F 31 35 2C 38 2C 31 35 3A 84 31 35 |E.0:.15,8,15:.15|
00000260: 2C 41 2C 42 24 3A 8B 41 B2 30 A7 A0 31 35 3A 8E |,A,B$:.A.0..15:.|
00000270: 00 AB 0A 48 00 8D 31 37 30 30 30 3A 58 B2 38 3A |...H..17000:X.8:|
00000280: 59 B2 31 30 3A 8D 31 35 30 30 30 3A 99 41 3B 42 |Y.10:.15000:.A;B|
00000290: 24 3B 3A 81 5A 52 B2 31 A4 39 39 39 3A 82 5A 52 |$;:.ZR.1.999:.ZR|
000002A0: 3A A0 31 35 3A 45 45 B2 31 3A 8E 00 B9 0A 78 00 |:.15:EE.1:....x.|
000002B0: 8D 31 30 37 30 3A 4D B2 31 00 FD 0A 82 00 8D 31 |.1070:M.1......1|
000002C0: 37 30 30 30 3A 99 A6 35 29 22 11 11 11 11 11 11 |7000:..5)"......|
000002D0: C5 4E 54 45 52 20 C1 50 50 4F 49 4E 54 4D 45 4E |.NTER .PPOINTMEN|
000002E0: 54 20 C4 45 53 43 52 49 50 54 49 4F 4E 22 3B 3A |T .ESCRIPTION";:|
000002F0: 43 B2 31 38 3A 59 B2 37 3A 58 B2 31 31 00 10 0B |C.18:Y.7:X.11...|
00000300: 84 00 8D 37 30 30 30 3A 4E 24 28 4D 29 B2 54 24 |...7000:N$(M).T$|
00000310: 00 50 0B 92 00 59 B2 31 30 3A 58 B2 38 3A 8D 31 |.P...Y.10:X.8:.1|
00000320: 35 30 30 30 3A 99 22 C5 4E 54 45 52 20 C1 50 50 |5000:.".NTER .PP|
00000330: 4F 49 4E 54 4D 45 4E 54 20 CD 4F 4E 54 48 22 3A |OINTMENT .ONTH":|
00000340: 59 B2 31 32 3A 58 B2 31 32 3A 8D 31 35 30 30 30 |Y.12:X.12:.15000|
00000350: 00 7B 0B 93 00 99 22 28 31 2D 31 32 20 4F 52 20 |.{...."(1-12 OR |
00000360: 39 39 29 22 3A 58 B2 32 36 3A 43 B2 32 3A 8D 37 |99)":X.26:C.2:.7|
00000370: 30 30 30 3A 41 B2 C5 28 54 24 29 00 A2 0B 94 00 |000:A..(T$).....|
00000380: 54 4C B2 41 3A 8B 20 28 41 B3 31 29 B0 28 41 B1 |TL.A:. (A.1).(A.|
00000390: 31 32 29 A7 20 8B 20 41 B3 B1 39 39 20 A7 20 31 |12). . A..99 . 1|
000003A0: 34 36 00 B5 0B 95 00 8D 32 30 30 35 30 3A 44 55 |46......20050:DU|
000003B0: 28 4D 29 B2 41 00 F4 0B 96 00 58 B2 39 3A 59 B2 |(M).A.....X.9:Y.|
000003C0: 31 35 3A 8D 31 35 30 30 30 3A 99 22 C5 4E 54 45 |15:.15000:.".NTE|
000003D0: 52 20 C1 50 50 4F 49 4E 54 4D 45 4E 54 20 C4 41 |R .PPOINTMENT .A|
000003E0: 54 45 22 3A 58 B2 31 35 3A 59 B2 31 37 3A 8D 31 |TE":X.15:Y.17:.1|
000003F0: 35 30 30 30 00 1A 0C 97 00 99 22 28 31 2D C5 CF |5000......"(1-..|
00000400: CD 29 22 3A 43 B2 32 3A 58 B2 32 34 3A 8D 37 30 |.)":C.2:X.24:.70|
00000410: 30 30 3A 41 B2 C5 28 54 24 29 00 31 0C 98 00 8B |00:A..(T$).1....|
00000420: 20 28 41 B3 31 29 B0 28 41 B1 45 4F 29 A7 31 35 | (A.1).(A.EO).15|
00000430: 30 00 3C 0C 9B 00 44 28 4D 29 B2 41 00 6C 0C AA |0.<...D(M).A.l..|
00000440: 00 58 B2 39 3A 59 B2 32 32 3A 8D 31 35 30 30 30 |.X.9:Y.22:.15000|
00000450: 3A 99 22 C5 4E 54 45 52 20 CD 4F 52 45 20 C1 50 |:.".NTER .ORE .P|
00000460: 50 54 53 2E 20 28 59 2F 4E 29 22 3B 00 8B 0C AC |PTS. (Y/N)";....|
00000470: 00 8D 37 35 30 35 3A 8B 20 41 24 B2 22 59 22 A7 |..7505:. A$."Y".|
00000480: 20 4D B2 4D AA 31 3A 89 31 33 30 00 97 0C AF 00 | M.M.1:.130.....|
00000490: 8B 20 54 B2 31 A7 8E 00 C9 0C B4 00 8D 31 37 30 |. T.1........170|
000004A0: 30 30 3A 58 B2 31 31 3A 59 B2 31 31 3A 8D 31 35 |00:X.11:Y.11:.15|
000004B0: 30 30 30 3A 99 22 D4 48 49 53 20 49 53 20 59 4F |000:.".HIS IS YO|
000004C0: 55 52 20 41 50 50 54 2E 22 00 E4 0C B5 00 99 A6 |UR APPT.".......|
000004D0: 31 36 29 22 11 11 D3 55 4D 4D 41 52 59 22 3A 8D |16)"...UMMARY":.|
000004E0: 37 35 30 30 00 1C 0D B6 00 8D 31 37 30 30 30 3A |7500......17000:|
000004F0: 99 A6 39 29 22 12 20 23 20 20 20 20 C4 45 53 43 |..9)". # .ESC|
00000500: 52 49 50 54 49 4F 4E 20 20 20 20 20 92 22 3B 3A |RIPTION .";:|
00000510: 59 B2 35 3A 8B 4D B2 30 A7 32 30 30 00 3C 0D B7 |Y.5:.M.0.200.<..|
00000520: 00 81 20 49 B2 31 A4 4D 3A 58 B2 31 30 3A 8D 31 |.. I.1.M:X.10:.1|
00000530: 35 30 30 30 3A 99 4E 24 28 49 29 3B 00 57 0D B8 |5000:.N$(I);.W..|
00000540: 00 58 B2 36 3A 8D 31 35 30 30 30 3A 8B 49 B3 31 |.X.6:.15000:.I.1|
00000550: 30 A7 99 22 20 22 3B 00 A2 0D B9 00 99 49 3B 3A |0.." ";......I;:|
00000560: 59 B2 59 AA 32 3A 58 B2 39 3A 8D 31 35 30 30 30 |Y.Y.2:X.9:.15000|
00000570: 3A 99 22 20 20 C4 41 54 45 20 20 20 20 22 3B 44 |:." .ATE ";D|
00000580: 55 28 49 29 3A 58 B2 32 32 3A 8D 31 35 30 30 30 |U(I):X.22:.15000|
00000590: 3A 99 44 28 49 29 3A 8D 31 35 30 30 30 3A 99 22 |:.D(I):.15000:."|
000005A0: 2F 22 00 E3 0D BB 00 8B 20 59 B2 B1 31 38 A7 8D |/"...... Y..18..|
000005B0: 37 35 30 30 3A 59 B2 35 3A 8D 31 37 30 30 30 3A |7500:Y.5:.17000:|
000005C0: 99 A6 39 29 22 12 20 23 20 20 20 20 C4 45 53 43 |..9)". # .ESC|
000005D0: 52 49 50 54 49 4F 4E 20 20 20 20 92 22 3B 3A 89 |RIPTION .";:.|
000005E0: 31 39 31 00 ED 0D BE 00 59 B2 59 AA 32 00 F4 0D |191.....Y.Y.2...|
000005F0: BF 00 82 49 00 04 0E C3 00 8B 59 B3 B1 35 A7 8D |...I......Y..5..|
00000600: 37 35 30 30 00 12 0E C8 00 8B 20 54 B2 31 20 A7 |7500...... T.1 .|
00000610: 20 8E 00 1A 0E 24 01 89 32 30 00 24 0E 2C 01 8D | ....$..20.$.,..|
00000620: 31 35 33 30 00 60 0E 2F 01 8D 31 37 30 30 30 3A |1530.`./..17000:|
00000630: 59 B2 31 30 3A 58 B2 31 34 3A 8D 31 35 30 30 30 |Y.10:X.14:.15000|
00000640: 3A 99 22 CE 4F 57 20 20 D3 41 56 49 4E 47 22 3A |:.".OW .AVING":|
00000650: 59 B2 31 33 3A 58 B2 31 33 3A 8D 31 35 30 30 30 |Y.13:X.13:.15000|
00000660: 00 86 0E 30 01 99 22 C3 41 4C 45 4E 44 41 52 20 |...0..".ALENDAR |
00000670: C6 49 4C 45 22 3A 9F 31 35 2C 38 2C 31 35 2C 22 |.ILE":.15,8,15,"|
00000680: 49 22 3A A0 31 35 00 BD 0E 35 01 9F 31 2C 38 2C |I":.15...5..1,8,|
00000690: 32 2C 22 40 30 3A C1 D0 D0 D3 C3 C1 CC C5 CE C4 |2,"@0:..........|
000006A0: C1 D2 2C 53 2C 57 22 3A 8D 33 30 31 30 30 3A 8B |..,S,W":.30100:.|
000006B0: 41 B1 31 39 A7 A0 31 3A 89 31 35 31 34 00 F8 0E |A.19..1:.1514...|
000006C0: 37 01 48 24 B2 C7 28 31 33 29 3A 98 31 2C 4D 3B |7.H$..(13):.1,M;|
000006D0: 48 24 3B 3A 81 49 B2 31 A4 4D 3A 98 31 2C 4E 24 |H$;:.I.1.M:.1,N$|
000006E0: 28 49 29 3B 48 24 3B 44 28 49 29 3B 48 24 3B 44 |(I);H$;D(I);H$;D|
000006F0: 55 28 49 29 3B 48 24 3B 00 0D 0F 3A 01 82 49 3A |U(I);H$;...:..I:|
00000700: 8D 33 30 31 30 32 3A A0 31 35 3A A0 31 00 17 0F |.30102:.15:.1...|
00000710: 3B 01 89 31 35 31 34 00 21 0F 40 01 8D 31 35 33 |;..1514.!.@..153|
00000720: 30 00 5D 0F 45 01 8D 31 37 30 30 30 3A 59 B2 31 |0.].E..17000:Y.1|
00000730: 30 3A 58 B2 31 34 3A 8D 31 35 30 30 30 3A 99 22 |0:X.14:.15000:."|
00000740: CE 4F 57 20 CC 4F 41 44 49 4E 47 22 3A 59 B2 31 |.OW .OADING":Y.1|
00000750: 33 3A 58 B2 31 33 3A 8D 31 35 30 30 30 00 83 0F |3:X.13:.15000...|
00000760: 46 01 99 22 C3 41 4C 45 4E 44 41 52 20 C6 49 4C |F..".ALENDAR .IL|
00000770: 45 22 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A |E":.15,8,15,"I":|
00000780: A0 31 35 00 B9 0F 4A 01 9F 31 2C 38 2C 32 2C 22 |.15...J..1,8,2,"|
00000790: 30 3A C1 D0 D0 D3 C3 C1 CC C5 CE C4 C1 D2 2C 53 |0:............,S|
000007A0: 2C 52 22 3A 8D 33 30 31 30 30 3A 8B 41 B1 31 39 |,R":.30100:.A.19|
000007B0: A7 A0 31 3A 89 31 35 31 34 00 C2 0F 54 01 84 31 |..1:.1514...T..1|
000007C0: 2C 4D 00 E4 0F 5E 01 81 49 B2 31 A4 4D 3A 84 31 |,M...^..I.1.M:.1|
000007D0: 2C 4E 24 28 49 29 2C 44 28 49 29 2C 44 55 28 49 |,N$(I),D(I),DU(I|
000007E0: 29 3A 82 49 00 F6 0F 68 01 8D 33 30 31 30 32 3A |):.I...h..30102:|
000007F0: A0 31 35 3A A0 31 00 00 10 69 01 89 31 35 31 34 |.15:.1...i..1514|
00000800: 00 39 10 72 01 8D 31 37 30 30 30 3A 99 A6 39 29 |.9.r..17000:..9)|
00000810: 22 12 C1 C4 C4 2F C3 C8 C1 CE C7 C5 2F C4 C5 CC |"..../....../...|
00000820: C5 D4 C5 20 CD C5 CE D5 92 22 3A 59 B2 37 3A 58 |... .....":Y.7:X|
00000830: B2 36 3A 8D 31 35 30 30 30 00 54 10 74 01 99 22 |.6:.15000.T.t.."|
00000840: 12 20 31 20 92 20 20 C1 44 44 20 C1 50 50 4F 49 |. 1 . .DD .PPOI|
00000850: 4E 54 22 3B 00 87 10 75 01 99 22 4D 45 4E 54 20 |NT";...u.."MENT |
00000860: C4 41 54 41 22 3A 99 A6 36 29 22 11 12 20 32 20 |.ATA":..6)".. 2 |
00000870: 92 20 20 C4 45 4C 45 54 45 20 C1 50 50 4F 49 4E |. .ELETE .PPOIN|
00000880: 54 4D 45 4E 54 53 22 00 B1 10 76 01 99 A6 36 29 |TMENTS"...v...6)|
00000890: 22 11 12 20 33 20 92 20 20 C3 48 41 4E 47 45 20 |".. 3 . .HANGE |
000008A0: C1 50 50 4F 49 4E 54 4D 45 4E 54 20 C4 41 54 41 |.PPOINTMENT .ATA|
000008B0: 22 00 D6 10 77 01 99 A6 36 29 22 11 12 20 34 20 |"...w...6)".. 4 |
000008C0: 92 20 20 D0 52 49 4E 54 20 C1 50 50 4F 49 4E 54 |. .RINT .PPOINT|
000008D0: 4D 45 4E 54 22 3B 00 08 11 78 01 99 22 20 D3 55 |MENT";...x.." .U|
000008E0: 4D 4D 41 52 59 22 3A 99 A6 36 29 22 11 12 20 35 |MMARY":..6)".. 5|
000008F0: 20 92 20 20 D2 45 54 55 52 4E 20 54 4F 20 CD 41 | . .ETURN TO .A|
00000900: 49 4E 20 CD 45 4E 55 22 00 24 11 79 01 8D 37 35 |IN .ENU".$.y..75|
00000910: 31 30 3A 8B 53 53 B3 31 20 B0 28 53 53 B1 35 29 |10:.SS.1 .(SS.5)|
00000920: A7 33 37 37 00 42 11 86 01 91 20 53 53 20 89 20 |.377.B.... SS . |
00000930: 34 30 30 2C 34 31 30 2C 34 38 30 2C 35 37 30 2C |400,410,480,570,|
00000940: 32 30 00 5E 11 90 01 54 B2 31 3A 4D B2 4D AA 31 |20.^...T.1:M.M.1|
00000950: 3A 8D 31 33 30 3A 54 B2 30 3A 89 33 37 30 00 AB |:.130:T.0:.370..|
00000960: 11 9A 01 8D 31 37 30 30 30 3A 99 A6 39 29 22 12 |....17000:..9)".|
00000970: 20 20 20 20 20 C4 C5 CC C5 D4 C5 A0 A0 CD CF C4 | ...........|
00000980: C5 A0 20 20 A0 A0 92 22 3A 59 B2 39 3A 58 B2 31 |.. ...":Y.9:X.1|
00000990: 32 3A 8D 31 35 30 30 30 3A 99 22 C5 4E 54 45 52 |2:.15000:.".NTER|
000009A0: 20 CE 55 4D 42 45 52 20 CF 46 22 00 E5 11 9C 01 | .UMBER .F".....|
000009B0: 58 B2 31 33 3A 59 B2 31 32 3A 8D 31 35 30 30 30 |X.13:Y.12:.15000|
000009C0: 3A 99 22 C1 50 50 4F 49 4E 54 4D 45 4E 54 22 3A |:.".PPOINTMENT":|
000009D0: 58 B2 32 35 3A 8D 31 35 30 30 30 3A 43 B2 32 3A |X.25:.15000:C.2:|
000009E0: 8D 37 30 30 30 00 F2 11 A3 01 8B 4D B2 30 A7 34 |.7000......M.0.4|
000009F0: 34 30 00 FE 11 A4 01 42 B2 C5 28 54 24 29 00 12 |40.....B..(T$)..|
00000A00: 12 A6 01 8B 20 42 B3 31 B0 28 42 B1 4D 29 A7 34 |.... B.1.(B.M).4|
00000A10: 34 30 00 1B 12 A9 01 89 34 34 35 00 48 12 B8 01 |40......445.H...|
00000A20: 8D 31 37 30 30 30 3A 58 B2 31 33 3A 59 B2 39 3A |.17000:X.13:Y.9:|
00000A30: 8D 31 35 30 30 30 3A 99 22 D3 4F 52 52 59 21 20 |.15000:.".ORRY! |
00000A40: 20 C3 41 4E 4E 4F 54 22 00 70 12 B9 01 58 B2 31 | .ANNOT".p...X.1|
00000A50: 35 3A 59 B2 31 32 3A 8D 31 35 30 30 30 3A 99 22 |5:Y.12:.15000:."|
00000A60: C6 49 4E 44 20 23 20 22 3B 42 3A 8D 31 34 38 30 |.IND # ";B:.1480|
00000A70: 00 79 12 BA 01 89 33 37 30 00 AA 12 BD 01 8D 31 |.y....370......1|
00000A80: 37 30 30 30 3A 59 B2 39 3A 58 B2 31 32 3A 8D 31 |7000:Y.9:X.12:.1|
00000A90: 35 30 30 30 3A 99 22 C1 50 50 54 23 22 3B 42 3B |5000:.".PPT#";B;|
00000AA0: 22 20 49 53 20 4E 4F 57 20 22 00 D6 12 BF 01 58 |" IS NOW ".....X|
00000AB0: B2 31 33 3A 59 B2 31 32 3A 8D 31 35 30 30 30 3A |.13:Y.12:.15000:|
00000AC0: 99 22 42 45 49 4E 47 20 44 45 4C 45 54 45 44 22 |."BEING DELETED"|
00000AD0: 3A 8D 31 34 38 30 00 E4 12 C2 01 8B 42 B2 4D 20 |:.1480......B.M |
00000AE0: A7 34 37 30 00 23 13 CC 01 81 20 49 B2 42 20 A4 |.470.#.... I.B .|
00000AF0: 28 4D AB 31 29 3A 58 24 B2 4E 24 28 49 AA 31 29 |(M.1):X$.N$(I.1)|
00000B00: 3A 4E 24 28 49 29 B2 58 24 3A 59 B2 44 28 49 AA |:N$(I).X$:Y.D(I.|
00000B10: 31 29 3A 44 28 49 29 B2 59 3A 5A B2 44 55 28 49 |1):D(I).Y:Z.DU(I|
00000B20: AA 31 29 00 32 13 CE 01 44 55 28 49 29 B2 5A 3A |.1).2...DU(I).Z:|
00000B30: 82 49 00 41 13 D6 01 4D B2 4D AB 31 3A 89 33 37 |.I.A...M.M.1:.37|
00000B40: 30 00 8D 13 E0 01 8D 31 37 30 30 30 3A 99 A6 39 |0......17000:..9|
00000B50: 29 22 12 20 20 20 C3 C8 C1 CE C7 C5 A0 C1 D0 D0 |)". ..........|
00000B60: D4 A0 C9 CE C6 CF 20 20 20 92 22 3A 59 B2 39 3A |...... .":Y.9:|
00000B70: 58 B2 31 33 3A 8D 31 35 30 30 30 3A 99 22 C5 4E |X.13:.15000:.".N|
00000B80: 54 45 52 20 C1 50 50 54 23 20 D4 4F 22 00 CA 13 |TER .PPT# .O"...|
00000B90: E2 01 59 B2 31 32 3A 58 B2 31 35 3A 8D 31 35 30 |..Y.12:X.15:.150|
00000BA0: 30 30 3A 99 22 C3 48 41 4E 47 45 22 3A 58 B2 32 |00:.".HANGE":X.2|
00000BB0: 33 3A 8D 31 35 30 30 30 3A 43 B2 32 3A 8D 37 30 |3:.15000:C.2:.70|
00000BC0: 30 30 3A 42 B2 C5 28 54 24 29 00 DD 13 EA 01 8B |00:B..(T$)......|
00000BD0: 42 B3 31 B0 28 42 B1 4D 29 A7 35 30 30 00 E6 13 |B.1.(B.M).500...|
00000BE0: EC 01 89 35 31 30 00 1F 14 F4 01 8D 31 37 30 30 |...510......1700|
00000BF0: 30 3A 58 B2 31 33 3A 59 B2 39 3A 8D 31 35 30 30 |0:X.13:Y.9:.1500|
00000C00: 30 3A 99 22 D3 4F 52 52 59 21 20 20 C3 41 4E 4E |0:.".ORRY! .ANN|
00000C10: 4F 54 22 3A 59 B2 31 32 3A 8D 31 35 30 30 30 00 |OT":Y.12:.15000.|
00000C20: 3B 14 F5 01 99 22 C6 49 4E 44 20 C1 50 50 54 23 |;....".IND .PPT#|
00000C30: 20 22 3B 42 3B 3A 8D 31 34 38 30 00 44 14 F6 01 | ";B;:.1480.D...|
00000C40: 89 33 37 30 00 89 14 FE 01 8D 31 37 30 30 30 3A |.370......17000:|
00000C50: 99 A6 39 29 22 20 23 20 20 20 20 20 C4 C5 D3 C3 |..9)" # ....|
00000C60: D2 C9 D0 D4 C9 CF CE 20 20 20 22 3A 99 A6 39 29 |....... ":..9)|
00000C70: 22 20 B7 B7 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |" .. ...........|
00000C80: B7 B7 B7 B7 B7 B7 B7 B7 22 00 A9 14 FF 01 58 B2 |........".....X.|
00000C90: 39 3A 59 B2 36 3A 8D 31 35 30 30 30 3A 8B 20 42 |9:Y.6:.15000:. B|
00000CA0: B3 31 30 A7 99 22 A0 22 3B 00 F1 14 00 02 99 42 |.10..".";......B|
00000CB0: 3B 3A 59 B2 36 3A 58 B2 31 34 3A 8D 31 35 30 30 |;:Y.6:X.14:.1500|
00000CC0: 30 3A 99 4E 24 28 42 29 3B 3A 59 B2 37 3A 58 B2 |0:.N$(B);:Y.7:X.|
00000CD0: 31 32 3A 8D 31 35 30 30 30 3A 99 22 20 20 C4 41 |12:.15000:." .A|
00000CE0: 54 45 20 20 22 3A 58 B2 32 30 3A 8D 31 35 30 30 |TE ":X.20:.1500|
00000CF0: 30 00 1B 15 01 02 99 44 55 28 42 29 3A 58 B2 32 |0......DU(B):X.2|
00000D00: 33 3A 8D 31 35 30 30 30 3A 99 44 28 42 29 3A 8D |3:.15000:.D(B):.|
00000D10: 31 35 30 30 30 3A 99 22 2F 22 3B 00 5A 15 02 02 |15000:."/";.Z...|
00000D20: 59 B2 31 30 3A 58 B2 31 31 3A 8D 31 35 30 30 30 |Y.10:X.11:.15000|
00000D30: 3A 99 22 C5 4E 54 45 52 20 C4 45 53 43 52 49 50 |:.".NTER .ESCRIP|
00000D40: 54 49 4F 4E 22 3A 43 B2 31 38 3A 59 B2 31 32 3A |TION":C.18:Y.12:|
00000D50: 58 B2 31 31 3A 8D 37 30 30 30 00 75 15 03 02 8B |X.11:.7000.u....|
00000D60: 54 24 B3 B1 C8 28 42 4C 24 2C 43 29 A7 4E 24 28 |T$...(BL$,C).N$(|
00000D70: 42 29 B2 54 24 00 BB 15 05 02 59 B2 31 35 3A 58 |B).T$.....Y.15:X|
00000D80: B2 39 3A 8D 31 35 30 30 30 3A 99 22 CD 4F 4E 54 |.9:.15000:.".ONT|
00000D90: 48 20 28 31 2D 31 32 20 4F 52 20 39 39 29 22 3A |H (1-12 OR 99)":|
00000DA0: 43 B2 32 3A 58 B2 32 38 3A 8D 37 30 30 30 3A 8B |C.2:X.28:.7000:.|
00000DB0: 54 24 B2 22 20 20 22 A7 35 32 30 00 E4 15 06 02 |T$." ".520.....|
00000DC0: 54 4C B2 C5 28 54 24 29 3A 59 B2 54 4C 3A 8B 59 |TL..(T$):Y.TL:.Y|
00000DD0: B3 31 B0 28 59 B1 31 32 29 A7 8B 59 B3 B1 39 39 |.1.(Y.12)..Y..99|
00000DE0: A7 35 31 37 00 F0 15 07 02 44 55 28 42 29 B2 59 |.517.....DU(B).Y|
00000DF0: 00 28 16 08 02 59 B2 31 38 3A 58 B2 31 30 3A 8D |.(...Y.18:X.10:.|
00000E00: 31 35 30 30 30 3A 99 22 C4 55 45 20 C4 41 54 45 |15000:.".UE .ATE|
00000E10: 20 28 31 2D C5 CF CD 29 22 3A 58 B2 32 38 3A 43 | (1-...)":X.28:C|
00000E20: B2 32 3A 8D 37 30 30 30 00 40 16 09 02 8B 54 24 |.2:.7000.@....T$|
00000E30: B2 22 20 20 22 B0 44 28 42 29 B2 30 A7 35 36 31 |." ".D(B).0.561|
00000E40: 00 4C 16 0A 02 59 B2 C5 28 54 24 29 00 57 16 0D |.L...Y..(T$).W..|
00000E50: 02 44 28 42 29 B2 59 00 79 16 30 02 59 B2 44 28 |.D(B).Y.y.0.Y.D(|
00000E60: 42 29 3A 8D 32 30 30 35 30 3A 8B 59 B3 31 B0 28 |B):.20050:.Y.1.(|
00000E70: 59 B1 45 4F 29 A7 35 32 30 00 82 16 31 02 89 33 |Y.EO).520...1..3|
00000E80: 37 30 00 98 16 3A 02 54 B2 31 3A 8D 31 38 30 3A |70...:.T.1:.180:|
00000E90: 54 B2 30 3A 89 33 37 30 00 BF 16 44 02 8D 31 37 |T.0:.370...D..17|
00000EA0: 30 30 30 3A 99 A6 31 30 29 22 12 D0 52 49 4E 54 |000:..10)"..RINT|
00000EB0: 20 C3 41 4C 45 4E 44 41 52 20 CD 4F 44 45 22 00 | .ALENDAR .ODE".|
00000EC0: EC 16 45 02 59 B2 38 3A 58 B2 37 3A 8D 31 35 30 |..E.Y.8:X.7:.150|
00000ED0: 30 30 3A 99 22 12 20 31 20 92 20 20 D0 52 49 4E |00:.". 1 . .RIN|
00000EE0: 54 20 54 4F 20 D3 43 52 45 45 4E 22 00 10 17 46 |T TO .CREEN"...F|
00000EF0: 02 99 A6 37 29 22 11 11 12 20 32 20 92 20 20 D0 |...7)"... 2 . .|
00000F00: 52 49 4E 54 20 54 4F 20 D0 52 49 4E 54 45 52 22 |RINT TO .RINTER"|
00000F10: 00 37 17 47 02 99 A6 37 29 22 11 11 12 20 33 20 |.7.G...7)"... 3 |
00000F20: 92 20 20 D2 45 54 55 52 4E 20 54 4F 20 CD 41 49 |. .ETURN TO .AI|
00000F30: 4E 20 CD 45 4E 55 22 00 50 17 48 02 8D 37 35 31 |N .ENU".P.H..751|
00000F40: 30 3A 8B 53 53 B3 31 B0 53 53 B1 33 A7 35 38 34 |0:.SS.1.SS.3.584|
00000F50: 00 74 17 49 02 8B 53 53 B2 32 A7 45 5A B2 34 3A |.t.I..SS.2.EZ.4:|
00000F60: 8D 32 37 34 30 30 3A 8B 45 5A A7 45 5A B2 30 3A |.27400:.EZ.EZ.0:|
00000F70: 89 35 38 30 00 87 17 4A 02 50 52 B2 53 53 3A 8B |.580...J.PR.SS:.|
00000F80: 50 52 B2 33 A7 32 30 00 9B 17 4D 02 8C 3A 81 49 |PR.3.20...M..:.I|
00000F90: B2 31 A4 32 36 3A 87 5A 3A 82 49 00 DA 17 4E 02 |.1.26:.Z:.I...N.|
00000FA0: 8D 31 37 30 30 30 3A 58 B2 31 31 3A 59 B2 39 3A |.17000:X.11:Y.9:|
00000FB0: 8D 31 35 30 30 30 3A 99 22 C5 4E 54 45 52 20 C4 |.15000:.".NTER .|
00000FC0: 41 54 45 20 CD CD 2F D9 D9 D9 D9 22 3A 58 B2 31 |ATE ../....":X.1|
00000FD0: 37 3A 59 B2 31 32 3A 43 B2 32 00 1E 18 4F 02 8D |7:Y.12:C.2...O..|
00000FE0: 37 30 30 30 3A 4D 31 24 B2 54 24 3A 4D 31 B2 C5 |7000:M1$.T$:M1..|
00000FF0: 28 4D 31 24 29 3A 58 B2 31 39 3A 8D 31 35 30 30 |(M1$):X.19:.1500|
00001000: 30 3A 99 22 2F 22 3A 43 B2 34 3A 58 B2 32 30 3A |0:."/":C.4:X.20:|
00001010: 8B 20 4D 31 24 B2 22 20 20 22 A7 35 38 30 00 57 |. M1$." ".580.W|
00001020: 18 50 02 8D 37 30 30 30 3A 59 31 24 B2 54 24 3A |.P..7000:Y1$.T$:|
00001030: 59 31 B2 C5 28 59 31 24 29 3A 59 32 24 B2 C9 28 |Y1..(Y1$):Y2$..(|
00001040: 59 31 24 2C 32 29 3A 8B 20 59 31 24 B2 22 20 20 |Y1$,2):. Y1$." |
00001050: 20 20 22 A7 35 38 30 00 65 18 52 02 59 32 B2 C5 | ".580.e.R.Y2..|
00001060: 28 59 32 24 29 00 76 18 54 02 8B 59 31 B3 31 39 |(Y2$).v.T..Y1.19|
00001070: 38 30 A7 35 39 30 00 9C 18 58 02 81 49 B2 31 A4 |80.590...X..I.1.|
00001080: 32 38 3A 87 20 58 3A 44 54 28 49 29 B2 58 3A 82 |28:. X:DT(I).X:.|
00001090: 49 3A 59 54 B2 59 31 AB 31 39 37 39 00 C3 18 62 |I:YT.Y1.1979...b|
000010A0: 02 81 20 49 B2 59 54 A4 31 20 A9 AB 31 3A 4A B2 |.. I.YT.1 ..1:J.|
000010B0: B5 28 49 AD 32 38 29 3A 8B 4A B2 49 AD 32 38 A7 |.(I.28):.J.I.28.|
000010C0: 36 33 30 00 CA 18 67 02 82 49 00 D3 18 6C 02 89 |630...g..I...l..|
000010D0: 36 34 30 00 E2 18 76 02 59 54 B2 59 54 AB 4A AC |640...v.YT.YT.J.|
000010E0: 32 38 00 FB 18 80 02 59 54 B2 44 54 28 59 54 29 |28.....YT.DT(YT)|
000010F0: 3A 53 B2 30 3A 8D 31 37 30 30 30 00 30 19 8A 02 |:S.0:.17000.0...|
00001100: 81 20 4E B2 30 A4 31 32 3A 87 20 4D 4D 28 4E 29 |. N.0.12:. MM(N)|
00001110: 3A 82 4E 3A 59 4E B2 B5 28 59 32 AD 34 29 3A 8B |:.N:YN..(Y2.4):.|
00001120: 59 4E B2 59 32 AD 34 A7 4D 4D 28 32 29 B2 32 39 |YN.Y2.4.MM(2).29|
00001130: 00 75 19 94 02 8B 4D 31 B3 31 B0 28 4D 31 B1 31 |.u....M1.1.(M1.1|
00001140: 32 29 A7 8D 31 37 30 30 30 3A 59 B2 39 3A 58 B2 |2)..17000:Y.9:X.|
00001150: 31 34 3A 8D 31 35 30 30 30 3A 99 4D 31 3B 22 20 |14:.15000:.M1;" |
00001160: 49 53 20 4E 4F 54 20 41 22 3A 59 B2 31 32 3A 8D |IS NOT A":Y.12:.|
00001170: 31 35 30 30 30 00 A3 19 96 02 8B 4D 31 B3 31 B0 |15000......M1.1.|
00001180: 28 4D 31 B1 31 32 29 20 A7 99 22 56 41 4C 49 44 |(M1.12) .."VALID|
00001190: 20 20 4D 4F 4E 54 48 22 3A 8D 31 34 38 30 3A 89 | MONTH":.1480:.|
000011A0: 35 38 30 00 B4 19 9E 02 8B 20 4D 31 B2 31 20 A7 |580...... M1.1 .|
000011B0: 20 37 36 30 00 F1 19 A8 02 81 20 4C B2 31 20 A4 | 760...... L.1 .|
000011C0: 20 28 4D 31 AB 31 29 3A 53 B2 53 AA 4D 4D 28 4C | (M1.1):S.S.MM(L|
000011D0: AB 31 29 3A 81 57 B2 31 A4 36 3A 81 47 B2 31 A4 |.1):.W.1.6:.G.1.|
000011E0: 37 3A 59 54 B2 59 54 AA 31 3A 59 58 B2 59 54 AB |7:YT.YT.1:YX.YT.|
000011F0: 53 00 04 1A B2 02 8B 59 58 B1 4D 4D 28 4C 29 20 |S......YX.MM(L) |
00001200: A7 37 33 30 00 0B 1A BC 02 82 47 00 1F 1A C6 02 |.730......G.....|
00001210: 8B 20 59 58 B2 4D 4D 28 4C 29 20 A7 37 34 30 00 |. YX.MM(L) .740.|
00001220: 27 1A D0 02 82 20 57 00 33 1A DA 02 59 54 B2 59 |'.... W.3...YT.Y|
00001230: 54 AB 47 00 3A 1A E4 02 82 4C 00 4B 1A EE 02 53 |T.G.:....L.K...S|
00001240: B2 53 AA 4D 4D 28 4D 31 AB 31 29 00 62 1A F8 02 |.S.MM(M1.1).b...|
00001250: 81 49 B2 31 A4 31 32 3A 99 22 12 20 92 22 3B 3A |.I.1.12:.". .";:|
00001260: 82 49 00 9D 1A 02 03 91 20 4D 31 20 89 20 37 38 |.I...... M1 . 78|
00001270: 30 2C 37 39 30 2C 38 30 30 2C 38 31 30 2C 38 32 |0,790,800,810,82|
00001280: 30 2C 38 33 30 2C 38 34 30 2C 38 35 30 2C 38 36 |0,830,840,850,86|
00001290: 30 2C 38 37 30 2C 38 38 30 2C 38 39 30 00 B7 1A |0,870,880,890...|
000012A0: 0C 03 5A 51 24 B2 22 20 20 CA C1 CE D5 C1 D2 D9 |..ZQ$." .......|
000012B0: A0 22 3A 89 39 30 30 00 D1 1A 16 03 5A 51 24 B2 |.":.900.....ZQ$.|
000012C0: 22 20 C6 C5 C2 D2 D5 C1 D2 D9 20 22 3A 89 39 30 |" ........ ":.90|
000012D0: 30 00 EB 1A 20 03 5A 51 24 B2 22 20 20 20 CD C1 |0... .ZQ$." ..|
000012E0: D2 C3 C8 A0 A0 22 3A 89 39 30 30 00 05 1B 2A 03 |.....":.900...*.|
000012F0: 5A 51 24 B2 22 20 20 20 C1 D0 D2 C9 CC A0 20 22 |ZQ$." ...... "|
00001300: 3A 89 39 30 30 00 1F 1B 34 03 5A 51 24 B2 22 20 |:.900...4.ZQ$." |
00001310: 20 20 20 CD C1 D9 20 A0 A0 22 3A 89 39 30 30 00 | ... ..":.900.|
00001320: 39 1B 3E 03 5A 51 24 B2 22 20 20 20 CA D5 CE C5 |9.>.ZQ$." ....|
00001330: A0 20 A0 22 3A 89 39 30 30 00 53 1B 48 03 5A 51 |. .":.900.S.H.ZQ|
00001340: 24 B2 22 20 20 20 CA D5 CC D9 20 20 A0 22 3A 89 |$." .... .":.|
00001350: 39 30 30 00 6D 1B 52 03 5A 51 24 B2 22 20 20 C1 |900.m.R.ZQ$." .|
00001360: D5 C7 D5 D3 D4 20 20 22 3A 89 39 30 30 00 87 1B |..... ":.900...|
00001370: 5C 03 5A 51 24 B2 22 D3 C5 D0 D4 C5 CD C2 C5 D2 |\.ZQ$.".........|
00001380: 20 22 3A 89 39 30 30 00 A1 1B 66 03 5A 51 24 B2 | ":.900...f.ZQ$.|
00001390: 22 20 CF C3 D4 CF C2 C5 D2 20 20 22 3A 89 39 30 |" ....... ":.90|
000013A0: 30 00 BB 1B 70 03 5A 51 24 B2 22 20 CE CF D6 C5 |0...p.ZQ$." ....|
000013B0: CD C2 C5 D2 20 22 3A 89 39 30 30 00 D5 1B 7A 03 |.... ":.900...z.|
000013C0: 5A 51 24 B2 22 20 C4 C5 C3 C5 CD C2 C5 D2 20 22 |ZQ$." ........ "|
000013D0: 3A 89 39 30 30 00 FB 1B 84 03 99 5A 51 24 3B 59 |:.900......ZQ$;Y|
000013E0: 31 24 3B 22 20 22 3B 3A 81 20 49 B2 31 A4 31 38 |1$;" ";:. I.1.18|
000013F0: 3A 99 22 12 20 92 22 3B 3A 82 49 00 41 1C 86 03 |:.". .";:.I.A...|
00001400: 8B 50 52 B2 32 A7 20 4E 4C B2 31 36 3A 9F 34 2C |.PR.2. NL.16:.4,|
00001410: 34 2C 37 3A 98 34 2C 22 20 20 20 20 20 20 20 20 |4,7:.4," |
00001420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001430: 20 20 20 20 20 20 20 20 22 3B 5A 51 24 3B 59 31 | ";ZQ$;Y1|
00001440: 24 00 69 1C 8E 03 99 22 20 20 20 D3 A0 A0 20 CD |$.i...." ... .|
00001450: A0 A0 20 D4 A0 A0 20 D7 A0 A0 20 D4 A0 A0 20 C6 |.. ... ... ... .|
00001460: A0 A0 20 D3 A0 20 20 22 3B 00 AE 1C 90 03 8B 50 |.. .. ";......P|
00001470: 52 B2 32 A7 98 34 2C C7 28 31 33 29 3B C8 28 42 |R.2..4,.(13);.(B|
00001480: 4C 24 2C 32 35 29 3B 22 20 20 20 D3 A0 A0 20 CD |L$,25);" ... .|
00001490: A0 A0 20 D4 A0 A0 20 D7 A0 A0 20 D4 A0 A0 20 C6 |.. ... ... ... .|
000014A0: A0 A0 20 D3 A0 20 20 22 3B C7 28 31 33 29 00 C8 |.. .. ";.(13)..|
000014B0: 1C 98 03 81 20 49 B2 31 A4 34 34 3A 99 22 12 20 |.... I.1.44:.". |
000014C0: 92 22 3B 3A 82 49 3A 99 00 D4 1C A2 03 81 57 31 |.";:.I:.......W1|
000014D0: B2 31 A4 36 00 F2 1C AC 03 8B 57 31 B1 31 A7 99 |.1.6......W1.1..|
000014E0: C7 28 31 33 29 3B 3A 8B 50 52 B2 32 A7 98 34 2C |.(13);:.PR.2..4,|
000014F0: 22 22 00 0A 1D B4 03 8B 50 52 B2 32 A7 98 34 2C |""......PR.2..4,|
00001500: C8 28 42 4C 24 2C 32 36 29 3B 00 1D 1D B6 03 99 |.(BL$,26);......|
00001510: A6 36 29 3B 3A 81 20 47 31 B2 31 A4 37 00 31 1D |.6);:. G1.1.7.1.|
00001520: C0 03 59 54 B2 59 54 AA 31 3A 59 58 B2 59 54 AB |..YT.YT.1:YX.YT.|
00001530: 53 00 46 1D CA 03 8B 59 58 B1 4D 4D 28 4D 31 29 |S.F....YX.MM(M1)|
00001540: A7 20 31 30 32 35 00 6B 1D CF 03 8B 59 58 B3 B2 |. 1025.k....YX..|
00001550: 30 A7 99 22 20 20 20 20 22 3B 3A 8B 50 52 B2 32 |0.." ";:.PR.2|
00001560: A7 98 34 2C 22 20 20 20 20 22 3B 00 8A 1D D4 03 |..4," ";.....|
00001570: 8B 20 59 58 B1 B2 31 30 A7 99 59 58 3B 3A 8B 50 |. YX..10..YX;:.P|
00001580: 52 B2 32 A7 98 34 2C 59 58 3B 00 9B 1D D5 03 8B |R.2..4,YX;......|
00001590: 20 59 58 B1 B2 31 30 A7 39 39 30 00 C7 1D D9 03 | YX..10.990.....|
000015A0: 8B 59 58 B1 30 AF 28 59 58 B3 31 30 29 A7 99 22 |.YX.0.(YX.10).."|
000015B0: 20 22 3B 59 58 3B 3A 8B 50 52 B2 32 A7 98 34 2C | ";YX;:.PR.2..4,|
000015C0: 22 20 22 3B 59 58 3B 00 D0 1D DE 03 99 22 22 3B |" ";YX;......"";|
000015D0: 00 D9 1D E8 03 82 20 47 31 00 EF 1D F2 03 8B 20 |...... G1...... |
000015E0: 59 58 B2 4D 4D 28 4D 31 29 20 A7 31 30 32 35 00 |YX.MM(M1) .1025.|
000015F0: F8 1D FC 03 82 20 57 31 00 1E 1E 01 04 59 B2 39 |..... W1.....Y.9|
00001600: 3A 58 B2 30 3A 8D 31 35 30 30 30 3A 81 51 B2 31 |:X.0:.15000:.Q.1|
00001610: A4 34 30 3A 99 22 12 1D 92 22 3B 3A 82 51 00 29 |.40:."...";:.Q.)|
00001620: 1E 06 04 99 C7 28 31 33 29 00 6E 1E 10 04 59 B2 |.....(13).n...Y.|
00001630: 31 33 3A 58 B2 31 32 3A 8D 31 35 30 30 30 3A 99 |13:X.12:.15000:.|
00001640: 22 C1 D0 D0 27 53 20 C4 41 59 20 54 4F 20 C4 41 |"...'S .AY TO .A|
00001650: 59 22 3A 59 B2 31 36 3A 58 B2 31 33 3A 8D 31 35 |Y":Y.16:X.13:.15|
00001660: 30 30 30 3A 99 22 28 C4 C4 2F C4 C4 29 22 00 81 |000:."(../..)"..|
00001670: 1E 11 04 58 B2 32 32 3A 43 B2 35 3A 8D 37 30 30 |...X.22:C.5:.700|
00001680: 30 00 9D 1E 12 04 8B 50 52 B2 32 A7 53 53 24 B2 |0......PR.2.SS$.|
00001690: 54 24 3A 8D 33 30 30 30 3A 89 35 38 30 00 B9 1E |T$:.3000:.580...|
000016A0: 13 04 53 53 24 B2 54 24 3A 8D 31 35 31 30 3A 8D |..SS$.T$:.1510:.|
000016B0: 31 32 30 30 3A 89 35 38 30 00 F4 1E 2E 04 8D 31 |1200:.580......1|
000016C0: 37 30 30 30 3A 59 B2 35 3A 58 B2 39 3A 8D 31 35 |7000:Y.5:X.9:.15|
000016D0: 30 30 30 3A 99 22 20 20 20 20 20 20 D7 C1 D2 CE |000:." ....|
000016E0: C9 CE C7 21 21 21 22 3A 59 B2 59 AA 34 3A 8D 31 |...!!!":Y.Y.4:.1|
000016F0: 35 30 30 30 00 2C 1F 30 04 99 22 20 C4 4F 20 4E |5000.,.0.." .O N|
00001700: 4F 54 20 55 53 45 20 54 48 49 53 20 50 52 4F 2D |OT USE THIS PRO-|
00001710: 22 A6 32 30 29 22 43 45 44 55 52 45 20 55 4E 4C |".20)"CEDURE UNL|
00001720: 45 53 53 20 59 4F 55 20 41 52 45 22 00 69 1F 33 |ESS YOU ARE".i.3|
00001730: 04 99 A6 39 29 22 20 45 4E 54 45 52 49 4E 47 20 |...9)" ENTERING |
00001740: 44 41 54 41 20 46 4F 52 20 54 48 45 22 3B 3A 99 |DATA FOR THE";:.|
00001750: 3A 99 A6 39 29 22 20 46 49 52 53 54 20 54 49 4D |:..9)" FIRST TIM|
00001760: 45 21 21 21 21 21 21 21 22 00 95 1F 35 04 58 B2 |E!!!!!!!"...5.X.|
00001770: 31 3A 59 B2 31 39 3A 8D 31 35 30 30 30 3A 99 A6 |1:Y.19:.15000:..|
00001780: 39 29 22 45 4E 54 45 52 20 3C C3 3E 4F 4E 54 49 |9)"ENTER <.>ONTI|
00001790: 4E 55 45 20 22 00 D2 1F 37 04 59 B2 32 31 3A 58 |NUE "...7.Y.21:X|
000017A0: B2 31 36 3A 8D 31 35 30 30 30 3A 99 22 3C D2 3E |.16:.15000:."<.>|
000017B0: 45 54 55 52 4E 22 3B 3A 8D 37 35 30 35 3A 8B 20 |ETURN";:.7505:. |
000017C0: 41 24 B2 22 D2 22 B0 28 41 24 B2 22 52 22 29 A7 |A$.".".(A$."R").|
000017D0: 32 30 00 E9 1F 38 04 8B 20 41 24 B2 22 C3 22 B0 |20...8.. A$.".".|
000017E0: 41 24 B2 22 43 22 A7 20 8E 00 F4 1F 3A 04 89 20 |A$."C". ....:.. |
000017F0: 31 30 37 39 00 FE 1F 42 04 89 39 35 30 30 00 1B |1079...B..9500..|
00001800: 20 7E 04 45 5A B2 38 3A 8D 32 37 34 30 30 3A 8B | ~.EZ.8:.27400:.|
00001810: 45 5A A7 45 5A B2 30 3A 89 32 30 00 56 20 7F 04 |EZ.EZ.0:.20.V ..|
00001820: 97 36 34 39 2C 31 3A 8D 31 37 30 30 30 3A 99 22 |.649,1:.17000:."|
00001830: 13 11 11 11 11 11 11 11 11 11 11 11 22 A6 31 30 |............".10|
00001840: 29 22 C9 4E 53 45 52 54 20 D0 52 4F 47 52 41 4D |)".NSERT .ROGRAM|
00001850: 20 C4 49 53 4B 22 00 7A 20 80 04 99 22 11 11 11 | .ISK".z ..."...|
00001860: 22 A6 31 33 29 22 49 4E 54 4F 20 C4 52 49 56 45 |".13)"INTO .RIVE|
00001870: 20 23 30 22 3A 8D 37 35 30 30 00 B2 20 81 04 51 | #0":.7500.. ..Q|
00001880: 24 B2 C7 28 33 34 29 3A 99 C7 28 35 29 3A 99 22 |$..(34):..(5):."|
00001890: 93 4C 4F 41 44 22 51 24 22 43 4F 4C 4D 45 4E 55 |.LOAD"Q$"COLMENU|
000018A0: 22 51 24 22 2C 38 11 11 11 11 22 3A 99 22 52 55 |"Q$",8....":."RU|
000018B0: 4E 22 00 D7 20 82 04 97 36 33 31 2C 31 39 3A 97 |N".. ...631,19:.|
000018C0: 36 33 32 2C 31 33 3A 97 36 33 33 2C 31 33 3A 97 |632,13:.633,13:.|
000018D0: 31 39 38 2C 33 3A 80 00 12 21 B0 04 58 B2 34 3A |198,3:...!..X.4:|
000018E0: 59 B2 31 31 3A 44 58 24 B2 C8 28 53 53 24 2C 32 |Y.11:DX$..(SS$,2|
000018F0: 29 3A 44 59 24 B2 C9 28 53 53 24 2C 32 29 3A 44 |):DY$..(SS$,2):D|
00001900: 58 B2 C5 28 44 58 24 29 3A 44 59 B2 C5 28 44 59 |X..(DX$):DY..(DY|
00001910: 24 29 00 20 21 BA 04 81 20 4C B2 44 58 A4 44 59 |$). !... L.DX.DY|
00001920: 00 2C 21 C4 04 81 20 4A B2 31 A4 4D 00 54 21 CE |.,!... J.1.M.T!.|
00001930: 04 8B 4D 31 B2 44 55 28 4A 29 B0 20 28 44 55 28 |..M1.DU(J). (DU(|
00001940: 4A 29 B2 39 39 29 A7 8B 20 4C B2 44 28 4A 29 A7 |J).99).. L.D(J).|
00001950: 31 32 33 32 00 5E 21 CF 04 89 31 32 34 30 00 78 |1232.^!...1240.x|
00001960: 21 D0 04 8D 31 35 30 30 30 3A 8B 44 28 4A 29 B3 |!...15000:.D(J).|
00001970: 31 30 A7 99 22 20 22 3B 00 A1 21 D1 04 99 44 28 |10.." ";..!...D(|
00001980: 4A 29 3B 3A 58 B2 31 30 3A 8D 31 35 30 30 30 3A |J);:X.10:.15000:|
00001990: 99 4E 24 28 4A 29 3B 3A 58 B2 34 3A 59 B2 59 AA |.N$(J);:X.4:Y.Y.|
000019A0: 31 00 C1 21 D8 04 8B 59 B1 32 30 20 A7 8D 37 35 |1..!...Y.20 ..75|
000019B0: 30 30 3A 8D 31 35 31 30 3A 59 B2 31 31 3A 58 B2 |00:.1510:Y.11:X.|
000019C0: 34 00 C8 21 E2 04 82 4A 00 CF 21 EC 04 82 4C 00 |4..!...J..!...L.|
000019D0: D9 21 F6 04 8D 37 35 30 30 00 DF 21 00 05 8E 00 |.!...7500..!....|
000019E0: FC 21 6E 05 45 5A B2 34 3A 8D 32 37 34 30 30 3A |.!n.EZ.4:.27400:|
000019F0: 8B 45 5A A7 45 5A B2 30 3A 89 32 30 00 34 22 6F |.EZ.EZ.0:.20.4"o|
00001A00: 05 8D 31 37 30 30 30 3A 99 22 11 11 11 11 11 11 |..17000:."......|
00001A10: 11 11 11 11 11 11 11 22 A6 38 29 22 CE 4F 57 20 |.......".8)".OW |
00001A20: D0 52 49 4E 54 49 4E 47 20 C1 50 50 54 2E 20 C4 |.RINTING .PPT. .|
00001A30: 41 54 41 22 00 7D 22 78 05 48 24 B2 C7 28 31 33 |ATA".}"x.H$..(13|
00001A40: 29 3A 9F 34 2C 34 2C 37 3A 9D 34 3A 99 48 24 3B |):.4,4,7:.4:.H$;|
00001A50: 48 24 3B 3A 99 A6 33 34 29 3B 22 C1 D0 D0 CF C9 |H$;:..34);".....|
00001A60: CE D4 CD C5 CE D4 D3 22 3A 99 A6 33 34 29 3B 22 |.......":..34);"|
00001A70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 86 22 |------------".."|
00001A80: 79 05 4E 4C B2 38 00 A3 22 7A 05 99 48 24 3B 48 |y.NL.8.."z..H$;H|
00001A90: 24 3A 81 51 B2 31 A4 4D 3A 8B 51 B3 31 A7 99 22 |$:.Q.1.M:.Q.1.."|
00001AA0: 20 22 3B 00 E0 22 7C 05 99 A6 35 29 3B 51 3B 3A | ";.."|...5);Q;:|
00001AB0: 99 A6 31 35 29 3B A6 AB 28 44 55 28 51 29 B3 31 |..15);..(DU(Q).1|
00001AC0: 30 29 29 3B 44 55 28 51 29 3B 22 2F 22 3B A6 AB |0));DU(Q);"/";..|
00001AD0: 28 44 28 51 29 B3 31 30 29 29 3B 44 28 51 29 3B |(D(Q).10));D(Q);|
00001AE0: 00 F0 22 7E 05 99 A6 32 30 29 3B 4E 24 28 51 29 |.."~...20);N$(Q)|
00001AF0: 00 46 23 82 05 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D |.F#..."---------|
00001B00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B40: 2D 2D 2D 2D 2D 22 00 73 23 85 05 4E 4C B2 4E 4C |-----".s#..NL.NL|
00001B50: AA 32 3A 8B 4E 4C B2 B1 36 30 A7 81 58 43 B2 31 |.2:.NL..60..XC.1|
00001B60: A4 36 3A 99 C7 28 31 33 29 3B 3A 82 58 43 3A 4E |.6:..(13);:.XC:N|
00001B70: 4C B2 30 00 91 23 87 05 82 51 3A 81 58 43 B2 31 |L.0..#...Q:.XC.1|
00001B80: A4 32 35 3A 98 34 3A 82 58 43 3A A0 34 3A 89 32 |.25:.4:.XC:.4:.2|
00001B90: 30 00 A4 23 C8 05 81 20 51 B2 31 A4 37 35 30 3A |0..#... Q.1.750:|
00001BA0: 82 51 3A 8E 00 CD 23 E6 05 58 B2 30 3A 59 B2 31 |.Q:...#..X.0:Y.1|
00001BB0: 31 3A 8D 31 35 30 30 30 3A 81 51 B2 31 A4 32 30 |1:.15000:.Q.1.20|
00001BC0: 30 3A 99 22 20 20 22 3B 3A 82 51 3A 8E 00 D8 23 |0:." ";:.Q:...#|
00001BD0: EA 05 8D 31 37 30 30 30 00 0A 24 EB 05 99 A6 39 |...17000..$....9|
00001BE0: 29 22 12 C6 C9 CC C5 A0 CD C1 C9 CE D4 C5 CE C1 |)"..............|
00001BF0: CE C3 C5 A0 CD C5 CE D5 A0 92 22 3A 58 B2 37 3A |..........":X.7:|
00001C00: 59 B2 37 3A 8D 31 35 30 30 30 00 2B 24 ED 05 99 |Y.7:.15000.+$...|
00001C10: 22 12 20 31 20 92 20 20 CC 4F 41 44 20 C3 41 4C |". 1 . .OAD .AL|
00001C20: 45 4E 44 41 52 20 C6 49 4C 45 22 00 51 24 F0 05 |ENDAR .ILE".Q$..|
00001C30: 99 A6 37 29 22 11 11 12 20 32 20 92 20 20 D3 41 |..7)"... 2 . .A|
00001C40: 56 45 20 C3 41 4C 45 4E 44 41 52 20 C6 49 4C 45 |VE .ALENDAR .ILE|
00001C50: 22 00 73 24 F3 05 99 A6 37 29 22 11 11 12 20 33 |".s$....7)"... 3|
00001C60: 20 92 20 20 C4 49 53 4B 20 C4 49 52 45 43 54 4F | . .ISK .IRECTO|
00001C70: 52 59 22 00 9C 24 F4 05 99 A6 37 29 22 11 11 12 |RY"..$....7)"...|
00001C80: 20 34 20 92 20 20 C4 49 53 4B 20 CD 41 49 4E 54 | 4 . .ISK .AINT|
00001C90: 45 4E 41 4E 43 45 20 CD 45 4E 55 22 00 C3 24 F5 |ENANCE .ENU"..$.|
00001CA0: 05 99 A6 37 29 22 11 11 12 20 35 20 92 20 A0 D2 |...7)"... 5 . ..|
00001CB0: 45 54 55 52 4E 20 D4 4F 20 CD 41 49 4E 20 CD 45 |ETURN .O .AIN .E|
00001CC0: 4E 55 22 00 E8 24 F6 05 8D 37 35 31 30 3A 53 53 |NU"..$...7510:SS|
00001CD0: B2 C5 28 41 24 29 3A 8B 53 53 B3 31 B0 28 53 53 |..(A$):.SS.1.(SS|
00001CE0: B1 35 29 A7 31 35 32 36 00 0E 25 F7 05 8B 53 53 |.5).1526..%...SS|
00001CF0: B3 B1 35 A7 45 5A B2 38 3A 8D 32 37 34 30 30 3A |..5.EZ.8:.27400:|
00001D00: 8B 45 5A A7 45 5A B2 30 3A 89 31 35 31 34 00 2F |.EZ.EZ.0:.1514./|
00001D10: 25 F8 05 91 53 53 20 89 20 33 32 30 2C 33 30 30 |%...SS . 320,300|
00001D20: 2C 32 32 30 30 30 2C 32 37 30 30 30 2C 32 30 00 |,22000,27000,20.|
00001D30: 69 25 FA 05 8D 31 37 30 30 30 3A 59 B2 31 30 3A |i%...17000:Y.10:|
00001D40: 58 B2 31 33 3A 8D 31 35 30 30 30 3A 99 22 C9 4E |X.13:.15000:.".N|
00001D50: 53 45 52 54 20 C6 49 4C 45 20 C9 4E 22 3A 59 B2 |SERT .ILE .N":Y.|
00001D60: 31 33 3A 8D 31 35 30 30 30 00 7F 25 FB 05 99 22 |13:.15000..%..."|
00001D70: D3 54 4F 52 41 47 45 20 C4 45 56 49 43 45 22 00 |.TORAGE .EVICE".|
00001D80: 8B 25 FC 05 8D 37 35 30 30 3A 8E 00 BD 25 B8 0B |.%...7500:...%..|
00001D90: 44 58 24 B2 C8 28 53 53 24 2C 32 29 3A 44 59 24 |DX$..(SS$,2):DY$|
00001DA0: B2 C9 28 53 53 24 2C 32 29 3A 44 58 B2 C5 28 44 |..(SS$,2):DX..(D|
00001DB0: 58 24 29 3A 44 59 B2 C5 28 44 59 24 29 00 F0 25 |X$):DY..(DY$)..%|
00001DC0: BB 0B 48 24 B2 C7 28 31 33 29 3A 98 34 2C 48 24 |..H$..(13):.4,H$|
00001DD0: 3B 48 24 3B 3A 98 34 2C C8 28 42 4C 24 2C 33 34 |;H$;:.4,.(BL$,34|
00001DE0: 29 3B 22 C1 D0 D0 CF C9 CE D4 CD C5 CE D4 D3 22 |);"............"|
00001DF0: 00 17 26 BC 0B 98 34 2C C8 28 42 4C 24 2C 33 34 |..&...4,.(BL$,34|
00001E00: 29 3B 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |);"------------"|
00001E10: 3B 48 24 3B 48 24 3B 00 5D 26 BE 0B 98 34 2C 22 |;H$;H$;.]&...4,"|
00001E20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001E30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001E40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001E50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3B 00 7A 26 |-----------";.z&|
00001E60: C0 0B 98 34 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...4,"----------|
00001E70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 88 26 C2 0B 81 |---------"..&...|
00001E80: 20 4C B2 44 58 A4 44 59 00 94 26 CC 0B 81 20 4A | L.DX.DY..&... J|
00001E90: B2 31 A4 4D 00 BC 26 D6 0B 8B 4D 31 B2 44 55 28 |.1.M..&...M1.DU(|
00001EA0: 4A 29 B0 20 28 44 55 28 4A 29 B2 39 39 29 A7 8B |J). (DU(J).99)..|
00001EB0: 20 4C B2 44 28 4A 29 A7 33 30 33 32 00 C6 26 D7 | L.D(J).3032..&.|
00001EC0: 0B 89 33 30 35 30 00 EA 26 D8 0B 98 34 2C C8 28 |..3050..&...4,.(|
00001ED0: 42 4C 24 2C 32 32 29 3B 3A 8B 44 55 28 4A 29 B3 |BL$,22);:.DU(J).|
00001EE0: 31 30 A7 98 34 2C 22 20 22 3B 00 0D 27 DA 0B 98 |10..4," ";..'...|
00001EF0: 34 2C 44 55 28 4A 29 3B 22 2F 22 3B 3A 8B 44 28 |4,DU(J);"/";:.D(|
00001F00: 4A 29 B3 31 30 A7 98 34 2C 22 20 22 3B 00 1A 27 |J).10..4," ";..'|
00001F10: DB 0B 98 34 2C 44 28 4A 29 3B 00 31 27 DC 0B 98 |...4,D(J);.1'...|
00001F20: 34 2C C8 28 42 4C 24 2C 32 30 29 3B 4E 24 28 4A |4,.(BL$,20);N$(J|
00001F30: 29 00 77 27 DD 0B 98 34 2C 22 2D 2D 2D 2D 2D 2D |).w'...4,"------|
00001F40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F70: 2D 2D 2D 2D 2D 22 3B 00 94 27 DE 0B 98 34 2C 22 |-----";..'...4,"|
00001F80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001F90: 2D 2D 2D 22 00 C4 27 E9 0B 4E 4C B2 4E 4C AA 32 |---"..'..NL.NL.2|
00001FA0: 3A 8B 4E 4C B2 B1 35 36 A7 81 58 43 B2 31 A4 31 |:.NL..56..XC.1.1|
00001FB0: 30 3A 98 34 2C C7 28 31 33 29 3B 3A 82 58 43 3A |0:.4,.(13);:.XC:|
00001FC0: 4E 4C B2 30 00 CB 27 EA 0B 82 4A 00 D2 27 F4 0B |NL.0..'...J..'..|
00001FD0: 82 4C 00 E9 27 FE 0B 81 58 43 B2 31 A4 32 35 3A |.L..'...XC.1.25:|
00001FE0: 98 34 3A 82 58 43 3A A0 34 00 EF 27 08 0C 8E 00 |.4:.XC:.4..'....|
00001FF0: 0B 28 58 1B 51 B2 31 3A 97 36 34 39 2C 31 3A 54 |.(X.Q.1:.649,1:T|
00002000: 24 B2 22 22 3A 8D 31 35 30 30 30 00 3E 28 5A 1B |$."":.15000.>(Z.|
00002010: 99 22 12 22 C8 28 42 4C 24 2C 43 29 22 92 22 3A |.".".(BL$,C)".":|
00002020: 8D 31 35 30 30 30 3A 81 5A 51 B2 31 A4 43 3A 42 |.15000:.ZQ.1.C:B|
00002030: 4C 24 28 5A 51 29 B2 22 20 22 3A 82 5A 51 00 5E |L$(ZQ)." ":.ZQ.^|
00002040: 28 5B 1B A1 41 24 3A 99 22 92 22 42 4C 24 28 51 |([..A$:."."BL$(Q|
00002050: 29 22 9D 22 42 4C 24 28 51 29 22 9D 22 3B 00 7F |)"."BL$(Q)".";..|
00002060: 28 5D 1B 99 22 12 22 42 4C 24 28 51 29 22 9D 92 |(].."."BL$(Q)"..|
00002070: 22 3B 3A 8B 41 24 B3 B1 22 22 A7 37 30 30 38 00 |";:.A$.."".7008.|
00002080: 89 28 5F 1B 89 37 30 30 33 00 B8 28 60 1B 8B 41 |.(_..7003..(`..A|
00002090: 24 B2 C7 28 32 30 29 AF 51 B2 43 AF 43 B3 B1 31 |$..(20).Q.C.C..1|
000020A0: A7 42 4C 24 28 43 29 B2 22 20 22 3A 42 4C 24 28 |.BL$(C)." ":BL$(|
000020B0: 43 AB 31 29 B2 22 20 22 00 E4 28 61 1B 8B 41 24 |C.1)." "..(a..A$|
000020C0: B2 C7 28 32 30 29 AF 51 B2 43 AF 43 B3 B1 31 A7 |..(20).Q.C.C..1.|
000020D0: 51 B2 51 AB 31 3A 99 22 12 20 9D 9D 22 3B 3A 89 |Q.Q.1:.". ..";:.|
000020E0: 37 30 30 33 00 08 29 62 1B 8B 41 24 B2 C7 28 31 |7003..)b..A$..(1|
000020F0: 33 29 A7 99 22 12 22 42 4C 24 28 51 29 22 9D 92 |3).."."BL$(Q)"..|
00002100: 22 3B 3A 89 37 30 33 39 00 20 29 63 1B 8B 41 24 |";:.7039. )c..A$|
00002110: B3 B1 C7 28 32 30 29 B0 51 B2 31 A7 37 30 31 36 |...(20).Q.1.7016|
00002120: 00 53 29 64 1B 51 5A B2 58 3A 58 B2 B9 28 51 29 |.S)d.QZ.X:X..(Q)|
00002130: AB 31 3A 8D 31 35 30 30 30 3A 81 5A 51 B2 51 A4 |.1:.15000:.ZQ.Q.|
00002140: 43 3A 42 4C 24 28 5A 51 AB 31 29 B2 42 4C 24 28 |C:BL$(ZQ.1).BL$(|
00002150: 5A 51 29 00 7E 29 66 1B 99 22 12 22 42 4C 24 28 |ZQ).~)f.."."BL$(|
00002160: 5A 51 AB 31 29 22 92 22 3B 3A 82 3A 99 22 12 20 |ZQ.1)".";:.:.". |
00002170: 92 22 3B 3A 42 4C 24 28 43 29 B2 22 20 22 00 9A |.";:BL$(C)." "..|
00002180: 29 67 1B 8D 31 35 30 30 30 3A 58 B2 51 5A 3A 51 |)g..15000:X.QZ:Q|
00002190: B2 51 AB 31 3A 89 37 30 30 33 00 C0 29 68 1B 8B |.Q.1:.7003..)h..|
000021A0: 41 24 B2 C7 28 32 39 29 A7 8B 51 B3 B1 43 A7 99 |A$..(29)..Q..C..|
000021B0: 22 1D 22 3B 3A 51 B2 51 AA 31 3A 89 37 30 30 33 |".";:Q.Q.1:.7003|
000021C0: 00 E7 29 6A 1B 8B 41 24 B2 C7 28 31 35 37 29 A7 |..)j..A$..(157).|
000021D0: 8B 51 B3 B1 31 A7 99 22 9D 22 3B 3A 51 B2 51 AB |.Q..1..".";:Q.Q.|
000021E0: 31 3A 89 37 30 30 33 00 08 2A 72 1B 8B 41 24 B3 |1:.7003..*r..A$.|
000021F0: B1 C7 28 31 34 38 29 B0 42 4C 24 28 43 29 B3 B1 |..(148).BL$(C)..|
00002200: 22 20 22 A7 37 30 33 32 00 47 2A 74 1B 51 4B B2 |" ".7032.G*t.QK.|
00002210: 58 3A 51 5A B2 B9 28 58 29 3A 58 B2 58 AA 43 AB |X:QZ..(X):X.X.C.|
00002220: 31 3A 8D 31 35 30 30 30 3A 81 5A 51 B2 43 AB 31 |1:.15000:.ZQ.C.1|
00002230: A4 51 A9 AB 31 3A 42 4C 24 28 5A 51 AA 31 29 B2 |.Q..1:BL$(ZQ.1).|
00002240: 42 4C 24 28 5A 51 29 00 86 2A 76 1B 99 22 12 22 |BL$(ZQ)..*v.."."|
00002250: 42 4C 24 28 5A 51 AA 31 29 22 92 9D 9D 22 3B 3A |BL$(ZQ.1)"...";:|
00002260: 82 3A 42 4C 24 28 51 29 B2 22 20 22 3A 99 22 12 |.:BL$(Q)." ":.".|
00002270: 20 9D 9D 22 3B 3A 58 B2 51 5A 3A 8D 31 35 30 30 | ..";:X.QZ:.1500|
00002280: 30 3A 58 B2 51 4B 00 90 2A 77 1B 89 37 30 30 33 |0:X.QK..*w..7003|
00002290: 00 CC 2A 78 1B 53 53 B2 C6 28 41 24 29 3A 8B 53 |..*x.SS..(A$):.S|
000022A0: 53 B3 33 32 B0 28 53 53 B1 31 32 32 AF 53 53 B3 |S.32.(SS.122.SS.|
000022B0: 31 39 33 29 B0 53 53 B1 32 31 38 B0 53 53 B2 34 |193).SS.218.SS.4|
000022C0: 34 B0 53 53 B2 35 38 A7 37 30 30 33 00 FE 2A 79 |4.SS.58.7003..*y|
000022D0: 1B 8B 51 B3 B2 43 A7 42 4C 24 28 51 29 B2 41 24 |..Q..C.BL$(Q).A$|
000022E0: 3A 99 22 12 22 3B 41 24 3B 22 92 22 3B 3A 8B 51 |:.".";A$;".";:.Q|
000022F0: B3 43 A7 51 B2 51 AA 31 3A 89 37 30 30 33 00 0E |.C.Q.Q.1:.7003..|
00002300: 2B 7B 1B 99 22 9D 22 3B 3A 89 37 30 30 33 00 3B |+{..".";:.7003.;|
00002310: 2B 7F 1B 54 24 B2 22 22 3A 81 5A 51 B2 31 A4 43 |+..T$."":.ZQ.1.C|
00002320: 3A 54 24 B2 54 24 AA 42 4C 24 28 5A 51 29 3A 82 |:T$.T$.BL$(ZQ):.|
00002330: 5A 51 3A 97 36 34 39 2C 30 3A 8E 00 6E 2B 4C 1D |ZQ:.649,0:..n+L.|
00002340: 58 B2 37 3A 59 B2 32 32 3A 8D 31 35 30 30 30 3A |X.7:Y.22:.15000:|
00002350: 99 22 92 50 52 45 53 53 20 41 4E 59 20 4B 45 59 |.".PRESS ANY KEY|
00002360: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3B 00 79 | TO CONTINUE";.y|
00002370: 2B 51 1D 97 36 34 39 2C 31 00 90 2B 52 1D A1 20 |+Q..649,1..+R.. |
00002380: 41 24 3A 8B 20 41 24 B2 22 22 A7 20 37 35 30 36 |A$:. A$."". 7506|
00002390: 00 9D 2B 53 1D 97 36 34 39 2C 30 3A 8E 00 DA 2B |..+S..649,0:...+|
000023A0: 56 1D 58 B2 39 3A 59 B2 32 32 3A 8D 31 35 30 30 |V.X.9:Y.22:.1500|
000023B0: 30 3A 99 22 20 D7 48 41 54 20 49 53 20 59 4F 55 |0:." .HAT IS YOU|
000023C0: 52 20 43 48 4F 49 43 45 3F 22 3B 3A 8D 37 35 30 |R CHOICE?";:.750|
000023D0: 35 3A 53 53 B2 C5 28 41 24 29 00 E0 2B 57 1D 8E |5:SS..(A$)..+W..|
000023E0: 00 FD 2B 98 3A 97 32 31 34 2C 59 AA 31 3A 97 32 |..+.:.214,Y.1:.2|
000023F0: 31 31 2C 58 3A 9E 35 38 37 33 32 3A 8E 00 28 2C |11,X:.58732:..(,|
00002400: 68 42 5A B2 B5 28 BB 28 31 29 AC 31 35 AA 31 29 |hBZ..(.(1).15.1)|
00002410: 3A 97 35 33 32 38 30 2C 5A 3A 97 35 33 32 38 31 |:.53280,Z:.53281|
00002420: 2C 31 3A 99 22 93 22 3B 00 49 2C 69 42 99 22 13 |,1:.".";.I,iB.".|
00002430: 11 11 11 1D 1D 1D 22 3B 3A 81 5A 51 B2 31 A4 33 |......";:.ZQ.1.3|
00002440: 34 3A 99 22 B9 22 3B 3A 82 00 69 2C 6A 42 99 3A |4:.".";:..i,jB.:|
00002450: 81 5A 51 B2 31 A4 32 30 3A 99 22 1D 1D 1D B5 22 |.ZQ.1.20:."...."|
00002460: A6 33 32 29 22 B6 22 3A 82 00 8E 2C 6B 42 99 22 |.32)".":...,kB."|
00002470: 1D 1D 1D 22 3B 3A 81 5A 51 B2 31 A4 33 34 3A 99 |...";:.ZQ.1.34:.|
00002480: 22 B8 22 3B 3A 82 3A 99 22 13 22 3B 3A 8E 00 A0 |".";:.:.".";:...|
00002490: 2C 20 4E 99 22 93 22 C7 28 38 29 C7 28 31 34 29 |, N.".".(8).(14)|
000024A0: 00 BF 2C 21 4E 81 49 B2 38 32 38 A4 38 32 38 AA |..,!N.I.828.828.|
000024B0: 32 35 3A 87 58 58 3A 97 49 2C 58 58 3A 82 49 00 |25:.XX:.I,XX:.I.|
000024C0: D6 2C 23 4E 8B 20 C2 28 35 33 32 34 37 29 B3 B1 |.,#N. .(53247)..|
000024D0: 31 36 39 A7 20 A2 00 F2 2C 24 4E 96 20 A5 52 28 |169. ...,$N. .R(|
000024E0: 56 29 B2 B5 28 56 AC 31 30 30 AA 2E 35 29 AD 31 |V)..(V.100..5).1|
000024F0: 30 30 00 37 2D 25 4E 83 20 31 36 35 2C 32 35 31 |00.7-%N. 165,251|
00002500: 2C 31 36 36 2C 32 35 32 2C 31 36 34 2C 32 35 33 |,166,252,164,253|
00002510: 2C 33 32 2C 31 38 36 2C 32 35 35 2C 31 36 39 2C |,32,186,255,169,|
00002520: 30 2C 33 32 2C 31 38 39 2C 32 35 35 2C 33 32 2C |0,32,189,255,32,|
00002530: 31 39 32 2C 32 35 35 00 5E 2D 27 4E 83 20 33 32 |192,255.^-'N. 32|
00002540: 2C 31 38 33 2C 32 35 35 2C 31 36 35 2C 32 35 31 |,183,255,165,251|
00002550: 2C 33 32 2C 31 39 35 2C 32 35 35 2C 39 36 00 AB |,32,195,255,96..|
00002560: 2D 28 4E 83 2D 32 2C 2D 34 2C 2D 35 2C 2D 36 2C |-(N.-2,-4,-5,-6,|
00002570: 30 2C 2D 32 2C 2D 33 2C 2D 34 2C 2D 35 2C 30 2C |0,-2,-3,-4,-5,0,|
00002580: 2D 31 2C 2D 32 2C 2D 33 2C 2D 35 2C 2D 36 2C 30 |-1,-2,-3,-5,-6,0|
00002590: 2C 2D 31 2C 2D 33 2C 2D 34 2C 2D 35 2C 2D 36 2C |,-1,-3,-4,-5,-6,|
000025A0: 2D 31 2C 2D 32 2C 2D 33 2C 2D 34 00 DF 2D 29 4E |-1,-2,-3,-4..-)N|
000025B0: 83 20 2D 36 2C 30 2C 2D 31 2C 30 2C 33 31 2C 32 |. -6,0,-1,0,31,2|
000025C0: 38 2C 33 31 2C 33 30 2C 33 31 2C 33 30 2C 33 31 |8,31,30,31,30,31|
000025D0: 2C 33 31 2C 33 30 2C 33 31 2C 33 30 2C 33 31 00 |,31,30,31,30,31.|
000025E0: E5 2D 2A 4E 8E 00 1A 2E 52 4E 8C 3A 81 55 B2 31 |.-*N....RN.:.U.1|
000025F0: A4 35 35 3A 87 56 3A 82 55 3A 81 55 B2 31 A4 31 |.55:.V:.U:.U.1.1|
00002600: 32 3A 87 4D 4D 28 55 29 3A 82 55 3A 8B 54 4C B2 |2:.MM(U):.U:.TL.|
00002610: 39 39 A7 45 4F B2 33 31 3A 8E 00 2A 2E 53 4E 45 |99.EO.31:..*.SNE|
00002620: 4F B2 4D 4D 28 54 4C 29 3A 8E 00 5D 2E F0 55 43 |O.MM(TL):..]..UC|
00002630: 54 B2 30 3A 8D 32 32 34 30 30 3A 99 22 13 11 11 |T.0:.22400:."...|
00002640: 11 11 11 22 A6 31 33 29 22 44 49 53 4B 2F 49 44 |...".13)"DISK/ID|
00002650: 22 3A 99 22 13 11 11 11 11 11 11 22 3B 00 6D 2E |":.".......";.m.|
00002660: 54 56 9F 31 2C 38 2C 30 2C 22 24 30 22 00 7B 2E |TV.1,8,0,"$0".{.|
00002670: 5E 56 A1 23 31 2C 41 24 2C 42 24 00 8F 2E 68 56 |^V.#1,A$,B$...hV|
00002680: 44 24 B2 22 22 3A A1 23 31 2C 41 24 2C 42 24 00 |D$."":.#1,A$,B$.|
00002690: 9D 2E 72 56 A1 23 31 2C 41 24 2C 42 24 00 A5 2E |..rV.#1,A$,B$...|
000026A0: 7C 56 43 B2 30 00 BA 2E 86 56 8B 20 41 24 B3 B1 ||VC.0....V. A$..|
000026B0: 22 22 A7 43 B2 C6 28 41 24 29 00 D5 2E 90 56 8B |"".C..(A$)....V.|
000026C0: 20 42 24 B3 B1 22 22 A7 43 B2 43 AA C6 28 42 24 | B$.."".C.C..(B$|
000026D0: 29 AC 32 35 36 00 F3 2E 9A 56 99 22 1D 1D 1D 1D |).256....V."....|
000026E0: 22 CA 28 C4 28 43 29 2C 32 29 3B A3 38 29 3B 22 |".(.(C),2);.8);"|
000026F0: 12 22 3B 00 0C 2F A4 56 A1 23 31 2C 42 24 3A 8B |.";../.V.#1,B$:.|
00002700: 20 53 54 B3 B1 30 A7 32 32 33 30 30 00 22 2F AE | ST..0.22300."/.|
00002710: 56 8B 20 42 24 B3 B1 C7 28 33 34 29 A7 32 32 31 |V. B$...(34).221|
00002720: 38 30 00 4D 2F B8 56 A1 23 31 2C 42 24 3A 8B 42 |80.M/.V.#1,B$:.B|
00002730: 24 B3 B1 C7 28 33 34 29 A7 99 42 24 3B 3A 44 24 |$...(34)..B$;:D$|
00002740: B2 44 24 AA 42 24 3A 89 32 32 32 30 30 00 6F 2F |.D$.B$:.22200.o/|
00002750: C2 56 A1 23 31 2C 42 24 3A 8B 42 24 B2 C7 28 33 |.V.#1,B$:.B$..(3|
00002760: 32 29 A7 99 22 20 22 3B 3A 89 32 32 32 31 30 00 |2).." ";:.22210.|
00002770: 80 2F CC 56 99 A3 32 38 29 3B 3A 43 24 B2 22 22 |./.V..28);:C$.""|
00002780: 00 A3 2F D6 56 43 24 B2 43 24 AA 42 24 3A A1 23 |../.VC$.C$.B$:.#|
00002790: 31 2C 42 24 3A 8B 20 42 24 B3 B1 22 22 A7 32 32 |1,B$:. B$.."".22|
000027A0: 32 33 30 00 B3 2F E0 56 99 22 92 22 C8 28 43 24 |230../.V.".".(C$|
000027B0: 2C 33 29 00 F8 2F F4 56 8B 53 54 B2 30 A7 99 22 |,3)../.V.ST.0.."|
000027C0: 11 22 3A 43 54 B2 43 54 AA 31 3A 4E 24 28 43 4E |.":CT.CT.1:N$(CN|
000027D0: 29 B2 44 24 3A 8B 43 54 B2 35 A7 43 54 B2 30 3A |).D$:.CT.5.CT.0:|
000027E0: 8D 37 35 30 30 3A 8D 32 32 34 30 30 3A 99 22 13 |.7500:.22400:.".|
000027F0: 11 11 11 11 11 11 22 3B 00 03 30 F9 56 89 32 32 |......";..0.V.22|
00002800: 31 32 30 00 29 30 1C 57 99 22 42 4C 4F 43 4B 53 |120.)0.W."BLOCKS|
00002810: 20 46 52 45 45 22 3A 8D 33 30 31 30 30 3A 8B 41 | FREE":.30100:.A|
00002820: B3 31 39 A7 8D 37 35 30 30 00 3A 30 1D 57 A0 31 |.19..7500.:0.W.1|
00002830: 3A A0 31 35 3A 89 31 35 31 34 00 6B 30 80 57 8D |:.15:.1514.k0.W.|
00002840: 31 37 30 30 30 3A 99 22 13 22 A6 37 29 22 12 20 |17000:.".".7)". |
00002850: 20 20 20 20 20 C4 C9 D3 CB 20 C4 C9 D2 C5 C3 D4 | .... ......|
00002860: CF D2 D9 20 20 20 20 20 20 92 22 00 97 30 82 57 |... ."..0.W|
00002870: 99 22 13 11 11 1D 23 42 4C 4F 43 4B 53 20 20 20 |."....#BLOCKS |
00002880: 20 20 20 4E 41 4D 45 20 20 20 20 20 20 20 20 20 | NAME |
00002890: 54 59 50 45 22 3A 8E 00 D0 30 E4 57 42 24 B2 22 |TYPE":...0.WB$."|
000028A0: 22 3A 81 5A 51 B2 30 A4 4A 3A A1 23 31 2C 41 24 |":.ZQ.0.J:.#1,A$|
000028B0: 3A 8B 41 24 B3 B1 C7 28 39 36 29 A7 8B 41 24 B3 |:.A$...(96)..A$.|
000028C0: B1 C7 28 31 36 30 29 A7 42 24 B2 42 24 AA 41 24 |..(160).B$.B$.A$|
000028D0: 00 D8 30 E5 57 82 3A 8E 00 13 31 C0 5D 8D 31 37 |..0.W.:...1.].17|
000028E0: 30 30 30 3A 99 22 13 11 11 11 11 11 11 11 11 11 |000:."..........|
000028F0: 11 11 11 11 22 A6 37 29 22 D0 52 45 53 53 20 20 |....".7)".RESS |
00002900: 5B CD 5D 45 4E 55 20 4F 52 20 5B C6 5D 4F 52 4D |[.]ENU OR [.]ORM|
00002910: 41 54 22 00 33 31 C1 5D 8D 37 35 31 30 3A 8B 41 |AT".31.].7510:.A|
00002920: 24 B2 22 4D 22 B0 41 24 B2 22 CD 22 A7 89 32 37 |$."M".A$."."..27|
00002930: 30 30 30 00 4F 31 C2 5D 8B 20 41 24 B3 B1 22 46 |000.O1.]. A$.."F|
00002940: 22 AF 41 24 B3 B1 22 C6 22 A7 32 34 30 30 31 00 |".A$..".".24001.|
00002950: 85 31 C4 5D 99 22 93 22 3B 3A 8D 31 37 30 30 30 |.1.].".";:.17000|
00002960: 3A 99 22 13 11 11 11 11 11 11 11 11 11 11 11 22 |:."............"|
00002970: A6 31 32 29 22 C9 4E 53 45 52 54 20 C4 49 53 4B |.12)".NSERT .ISK|
00002980: 45 54 54 45 22 00 A9 31 C6 5D 99 22 11 11 11 22 |ETTE"..1.]."..."|
00002990: A6 31 33 29 22 49 4E 54 4F 20 C4 52 49 56 45 20 |.13)"INTO .RIVE |
000029A0: 23 30 22 3A 8D 37 35 30 30 00 E1 31 C8 5D 99 22 |#0":.7500..1.]."|
000029B0: 93 22 3B 3A 8D 31 37 30 30 30 3A 99 22 13 11 11 |.";:.17000:."...|
000029C0: 11 11 11 11 11 11 11 11 11 22 A6 31 31 29 22 C5 |.........".11)".|
000029D0: 4E 54 45 52 20 CE 45 57 20 C4 49 53 4B 20 C9 C4 |NTER .EW .ISK ..|
000029E0: 22 00 1C 32 CA 5D 43 B2 31 36 3A 59 B2 31 34 3A |"..2.]C.16:Y.14:|
000029F0: 58 B2 31 30 3A 8D 37 30 30 30 3A 58 B2 32 36 3A |X.10:.7000:X.26:|
00002A00: 8D 31 35 30 30 30 3A 99 22 2C 22 3B 3A 54 54 24 |.15000:.",";:TT$|
00002A10: B2 54 24 3A 58 B2 32 37 3A 43 B2 32 00 26 32 CB |.T$:X.27:C.2.&2.|
00002A20: 5D 8D 37 30 30 30 00 63 32 CC 5D 99 22 93 11 11 |].7000.c2.]."...|
00002A30: 11 11 11 11 11 11 11 11 11 11 22 A6 31 34 29 22 |..........".14)"|
00002A40: 12 D0 4C 45 41 53 45 20 20 D7 41 49 54 92 22 3A |..LEASE .AIT.":|
00002A50: 51 24 B2 22 4E 30 3A 22 AA 54 54 24 AA 22 2C 22 |Q$."N0:".TT$.","|
00002A60: AA 54 24 00 73 32 CD 5D 9F 31 35 2C 38 2C 31 35 |.T$.s2.].15,8,15|
00002A70: 2C 51 24 00 8D 32 CE 5D A0 31 35 3A 8D 33 30 31 |,Q$..2.].15:.301|
00002A80: 30 30 3A A0 31 35 3A 89 32 37 30 30 30 00 AE 32 |00:.15:.27000..2|
00002A90: A8 61 4D 4D B2 30 3A 54 54 24 B2 C4 28 A5 52 28 |.aMM.0:TT$..(.R(|
00002AA0: 54 54 29 29 3A 52 52 B2 C3 28 54 54 24 29 00 CD |TT)):RR..(TT$)..|
00002AB0: 32 A9 61 8B B6 28 54 54 29 B3 2E 30 30 34 39 39 |2.a..(TT)..00499|
00002AC0: A7 54 54 24 B2 22 30 2E 30 30 22 3A 8E 00 F8 32 |.TT$."0.00":...2|
00002AD0: AA 61 81 50 50 B2 C3 28 54 54 24 29 A4 31 A9 AB |.a.PP..(TT$).1..|
00002AE0: 31 3A 8B CA 28 54 54 24 2C 50 50 2C 31 29 B2 22 |1:..(TT$,PP,1)."|
00002AF0: 2E 22 A7 32 35 30 30 36 00 08 33 AB 61 4D 4D B2 |.".25006..3.aMM.|
00002B00: 4D 4D AA 31 3A 82 50 50 00 1C 33 AC 61 54 54 24 |MM.1:.PP..3.aTT$|
00002B10: B2 54 54 24 AA 22 2E 30 30 22 3A 8E 00 33 33 AE |.TT$.".00":..33.|
00002B20: 61 8B 4D 4D B2 30 A7 54 54 24 B2 54 54 24 AA 22 |a.MM.0.TT$.TT$."|
00002B30: 30 30 22 00 49 33 AF 61 8B 4D 4D B2 31 A7 54 54 |00".I3.a.MM.1.TT|
00002B40: 24 B2 54 54 24 AA 22 30 22 00 6A 33 B0 61 8B 4D |$.TT$."0".j3.a.M|
00002B50: 4D B1 32 A7 54 54 24 B2 CA 28 54 54 24 2C 28 52 |M.2.TT$..(TT$,(R|
00002B60: 52 AB 4D 4D AA 32 29 2C 31 29 00 9E 33 B1 61 8B |R.MM.2),1)..3.a.|
00002B70: 28 4D 4D B2 52 52 AB 32 29 A7 54 54 24 B2 C8 28 |(MM.RR.2).TT$..(|
00002B80: 54 54 24 2C 31 29 AA 22 30 22 AA CA 28 54 54 24 |TT$,1)."0"..(TT$|
00002B90: 2C 32 2C 28 C3 28 54 54 24 29 AB 31 29 29 00 A4 |,2,(.(TT$).1))..|
00002BA0: 33 B2 61 8E 00 CD 33 78 69 8D 31 37 30 30 30 3A |3.a...3xi.17000:|
00002BB0: 99 A6 39 29 22 12 C4 49 53 4B 20 CD 41 49 4E 54 |..9)"..ISK .AINT|
00002BC0: 45 4E 41 4E 43 45 20 CD 45 4E 55 92 22 00 F4 33 |ENANCE .ENU."..3|
00002BD0: 79 69 99 A6 37 29 22 11 11 11 11 11 11 12 20 31 |yi..7)"....... 1|
00002BE0: 20 92 20 20 C9 4E 49 54 49 41 4C 49 5A 45 20 C4 | . .NITIALIZE .|
00002BF0: 49 53 4B 22 00 15 34 7A 69 99 A6 37 29 22 11 11 |ISK"..4zi..7)"..|
00002C00: 12 20 32 20 92 20 20 D6 41 4C 49 44 41 54 45 20 |. 2 . .ALIDATE |
00002C10: C4 49 53 4B 22 00 3A 34 7B 69 99 A6 37 29 22 11 |.ISK".:4{i..7)".|
00002C20: 11 12 20 33 20 92 20 20 D3 43 52 41 54 43 48 20 |.. 3 . .CRATCH |
00002C30: C4 49 53 4B 20 C6 49 4C 45 22 00 59 34 7C 69 99 |.ISK .ILE".Y4|i.|
00002C40: A6 37 29 22 11 11 12 20 34 20 92 20 20 C6 4F 52 |.7)"... 4 . .OR|
00002C50: 4D 41 54 20 C4 49 53 4B 22 00 7B 34 7D 69 99 A6 |MAT .ISK".{4}i..|
00002C60: 37 29 22 11 11 12 20 35 20 92 20 20 D2 45 54 55 |7)"... 5 . .ETU|
00002C70: 52 4E 20 54 4F 20 C6 49 4C 45 22 00 96 34 7E 69 |RN TO .ILE"..4~i|
00002C80: 99 A6 31 32 29 22 CD 41 49 4E 54 41 4E 43 45 20 |..12)".AINTANCE |
00002C90: CD 45 4E 55 22 3B 00 BA 34 7F 69 8D 37 35 31 30 |.ENU";..4.i.7510|
00002CA0: 3A 53 53 B2 C5 28 41 24 29 3A 8B 53 53 B3 31 B0 |:SS..(A$):.SS.1.|
00002CB0: 53 53 B1 35 A7 32 37 30 30 37 00 E1 34 80 69 91 |SS.5.27007..4.i.|
00002CC0: 53 53 20 89 20 32 37 31 30 30 2C 32 37 32 30 30 |SS . 27100,27200|
00002CD0: 2C 32 37 33 30 30 2C 32 34 30 30 30 2C 31 35 31 |,27300,24000,151|
00002CE0: 34 00 0E 35 DC 69 99 22 93 22 3B 3A 9F 31 35 2C |4..5.i.".";:.15,|
00002CF0: 38 2C 31 35 2C 22 49 22 3A A0 31 35 3A 8D 33 30 |8,15,"I":.15:.30|
00002D00: 31 30 30 3A A0 31 35 3A 89 32 37 30 30 30 00 3B |100:.15:.27000.;|
00002D10: 35 40 6A 99 22 93 22 3B 3A 9F 31 35 2C 38 2C 31 |5@j.".";:.15,8,1|
00002D20: 35 2C 22 56 22 3A A0 31 35 3A 8D 33 30 31 30 30 |5,"V":.15:.30100|
00002D30: 3A A0 31 35 3A 89 32 37 30 30 30 00 73 35 A4 6A |:.15:.27000.s5.j|
00002D40: 8D 31 37 30 30 30 3A 99 22 11 11 11 11 11 11 11 |.17000:.".......|
00002D50: 11 11 11 22 A6 37 29 22 C5 4E 54 45 52 20 C6 49 |...".7)".NTER .I|
00002D60: 4C 45 20 CE 41 4D 45 20 54 4F 20 D3 43 52 41 54 |LE .AME TO .CRAT|
00002D70: 43 48 22 00 A0 35 A6 6A 43 B2 31 36 3A 59 B2 31 |CH"..5.jC.16:Y.1|
00002D80: 33 3A 58 B2 31 32 3A 8D 37 30 30 30 3A 8B 54 24 |3:X.12:.7000:.T$|
00002D90: B2 C8 28 42 4C 24 2C 31 36 29 A7 32 37 30 30 30 |..(BL$,16).27000|
00002DA0: 00 D4 35 A7 6A 8B 51 B3 31 36 B0 C9 28 54 24 2C |..5.j.Q.16..(T$,|
00002DB0: 31 29 B2 C7 28 33 32 29 B0 C9 28 54 24 2C 31 29 |1)..(32)..(T$,1)|
00002DC0: B2 C7 28 31 36 30 29 A7 54 24 B2 C8 28 54 24 2C |..(160).T$..(T$,|
00002DD0: 51 AB 31 29 00 FC 35 A8 6A 54 24 B2 22 53 3A 22 |Q.1)..5.jT$."S:"|
00002DE0: AA 54 24 3A 9F 31 35 2C 38 2C 31 35 2C 54 24 3A |.T$:.15,8,15,T$:|
00002DF0: 98 31 35 2C 22 56 22 3B 3A A0 31 35 00 12 36 A9 |.15,"V";:.15..6.|
00002E00: 6A 8D 33 30 31 30 30 3A A0 31 35 3A 89 32 37 30 |j.30100:.15:.270|
00002E10: 30 30 00 3B 36 08 6B 8B 20 45 5A B2 38 A7 97 32 |00.;6.k. EZ.8..2|
00002E20: 35 31 2C 31 35 3A 97 32 35 32 2C 38 3A 97 32 35 |51,15:.252,8:.25|
00002E30: 33 2C 31 35 3A 89 32 37 34 30 32 00 54 36 09 6B |3,15:.27402.T6.k|
00002E40: 97 32 35 31 2C 34 3A 97 32 35 32 2C 34 3A 97 32 |.251,4:.252,4:.2|
00002E50: 35 33 2C 34 00 6F 36 0A 6B 9E 38 32 38 3A 8B C2 |53,4.o6.k.828:..|
00002E60: 28 31 34 34 29 AF 31 32 38 A7 32 37 34 30 34 00 |(144).128.27404.|
00002E70: 7A 36 0B 6B 45 5A B2 30 3A 8E 00 98 36 0C 6B 8B |z6.kEZ.0:...6.k.|
00002E80: 45 5A B2 38 A7 56 24 B2 22 C4 52 49 56 45 23 30 |EZ.8.V$.".RIVE#0|
00002E90: 22 3A 89 32 37 34 30 36 00 A9 36 0D 6B 56 24 B2 |":.27406..6.kV$.|
00002EA0: 22 D0 52 49 4E 54 45 52 22 00 EC 36 0E 6B 8D 31 |".RINTER"..6.k.1|
00002EB0: 37 30 30 30 3A 45 5A B2 AB 31 3A 99 22 11 11 11 |7000:EZ..1:."...|
00002EC0: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |................|
00002ED0: 12 C5 52 52 4F 52 92 20 22 56 24 22 20 49 53 20 |..RROR. "V$" IS |
00002EE0: 4E 4F 54 20 4F 4E 20 4C 49 4E 45 22 00 F8 36 10 |NOT ON LINE"..6.|
00002EF0: 6B 8D 37 35 30 30 3A 8E 00 05 37 94 75 9F 31 35 |k.7500:...7.u.15|
00002F00: 2C 38 2C 31 35 00 1E 37 96 75 84 31 35 2C 41 2C |,8,15..7.u.15,A,|
00002F10: 42 24 2C 43 2C 44 3A 8B 41 B3 31 39 A7 8E 00 58 |B$,C,D:.A.19...X|
00002F20: 37 97 75 8D 31 37 30 30 30 3A 99 22 13 12 11 11 |7.u.17000:."....|
00002F30: 11 11 11 1D 1D 1D 1D C5 52 52 4F 52 23 1D 1D 1D |........RROR#...|
00002F40: 4E 41 4D 45 1D 1D 1D 1D 1D 1D 54 52 41 43 4B 2F |NAME......TRACK/|
00002F50: 53 45 43 54 4F 52 92 22 00 8B 37 98 75 99 22 13 |SECTOR."..7.u.".|
00002F60: 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D |................|
00002F70: 1D 22 41 22 20 22 42 24 A3 32 35 29 43 3B 44 3A |."A" "B$.25)C;D:|
00002F80: A0 31 35 3A 8D 37 35 30 30 3A 8E 00 AD 37 50 C3 |.15:.7500:...7P.|
00002F90: 97 35 33 32 38 30 2C 31 3A 97 35 33 32 38 31 2C |.53280,1:.53281,|
00002FA0: 31 3A 99 C7 28 38 29 C7 28 31 34 32 29 00 E1 37 |1:..(8).(142)..7|
00002FB0: 52 C3 99 22 93 12 1F B0 C0 C0 C0 C0 C0 C0 C0 C0 |R.."............|
00002FC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002FD0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 |..............."|
00002FE0: 3B 00 12 38 53 C3 99 22 DD B0 C0 C0 C0 C0 C0 C0 |;..8S.."........|
00002FF0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003000: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE DD |................|
00003010: 22 3B 00 4F 38 54 C3 81 5A 51 B2 31 A4 33 3A 99 |";.O8T..ZQ.1.3:.|
00003020: 22 DD DD 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00003030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003040: 20 20 20 20 20 20 20 DD DD 22 3B 3A 82 5A 51 00 | ..";:.ZQ.|
00003050: 80 38 55 C3 99 22 DD AD C0 C0 C0 C0 C0 C0 C0 C0 |.8U.."..........|
00003060: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003070: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD DD 22 3B |..............";|
00003080: 00 B1 38 56 C3 99 22 AD C0 C0 C0 C0 C0 C0 C0 C0 |..8V..".........|
00003090: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000030A0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 22 |..............."|
000030B0: 3B 00 EE 38 58 C3 99 22 11 12 1C B0 C0 C0 C0 C0 |;..8X.."........|
000030C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000030D0: AE 22 3A 99 22 12 1C DD B0 C0 C0 C0 C0 C0 C0 C0 |.":."...........|
000030E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE DD 22 00 1A |............."..|
000030F0: 39 5B C3 81 5A 51 B2 31 A4 33 3A 99 22 1C 12 DD |9[..ZQ.1.3:."...|
00003100: DD 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00003110: 20 20 20 DD DD 22 3A 82 5A 51 00 56 39 5C C3 99 | ..":.ZQ.V9\..|
00003120: 22 12 1C DD AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00003130: C0 C0 C0 C0 C0 C0 C0 BD DD 22 3A 99 22 12 1C AD |.........":."...|
00003140: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00003150: C0 C0 C0 C0 BD 22 00 7C 39 64 C3 99 A6 32 33 29 |.....".|9d...23)|
00003160: 22 91 91 91 91 91 91 91 1C D5 C0 C9 9D 9D 9D 11 |"...............|
00003170: AB C0 B3 11 9D 9D 9D B1 20 B1 22 3B 00 92 39 69 |........ .";..9i|
00003180: C3 99 22 1F 91 50 50 4F 49 4E 54 4D 45 4E 54 53 |.."..PPOINTMENTS|
00003190: 11 22 00 AE 39 6E C3 99 A6 32 33 29 22 11 1C D5 |."..9n...23)"...|
000031A0: C0 C9 11 9D 9D 9D DD 11 9D CA C0 CB 22 3B 00 C0 |............";..|
000031B0: 39 73 C3 99 22 91 1F 41 4C 45 4E 44 41 52 11 22 |9s.."..ALENDAR."|
000031C0: 00 DE 39 75 C3 99 A6 32 32 29 22 11 11 11 1D 1D |..9u...22)".....|
000031D0: 1D 1D 1D CE DF 12 20 20 20 20 20 20 DF 22 00 FA |...... ."..|
000031E0: 39 78 C3 99 A6 32 32 29 22 1D 1D 1D 1D CE 20 20 |9x...22)"..... |
000031F0: DF 12 20 20 20 20 20 20 DF 22 00 19 3A 7B C3 99 |.. ."..:{..|
00003200: A6 32 32 29 22 1D 1D 1D 1C 12 A9 92 1F 46 55 54 |.22)"........FUT|
00003210: 55 52 45 48 4F 55 53 45 22 00 31 3A 7C C3 99 A6 |UREHOUSE".1:|...|
00003220: 32 32 29 22 1D 1D 1C 12 A9 20 20 20 20 20 20 DF |22)"..... .|
00003230: 22 00 4A 3A 7D C3 99 A6 32 32 29 22 1D 1C 12 A9 |".J:}...22)"....|
00003240: 20 20 20 20 20 20 20 20 DF 22 00 7F 3A 82 C3 99 | ."..:...|
00003250: 22 11 1D 1D 1D 1D 1D 1D 1D 50 52 45 53 53 20 41 |"........PRESS A|
00003260: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN|
00003270: 55 45 22 3B 3A 92 31 39 38 2C 31 3A A1 41 24 00 |UE";:.198,1:.A$.|
00003280: 91 3A 83 C3 99 22 93 1F 22 C7 28 31 34 29 3B 3A |.:..."..".(14);:|
00003290: 8E 00 00 00 |.... |
.......50000:.649,0:.20000.Q...SB.250:.
BL$(40),N$(SB),D(SB),DU(SB),DT(31),MM(12
).....BL$."
".H....17000:..9)". APPOINTME
NTS ":..9)". CALENDAR ."
.......9)". MAIN MENU .".....
X.7:Y.5:.15000:.". 1 . FIRST TIME MENU"
.@.....7)".. 2 . FILE MAINTENANCE MENU"
.X.....7)".. 3 . ADD/CHANGE/DELETE":..1
2)"APPOINTMENTS".......7)".. 4 . CHECK
APPOINTMENTS".22)"TO BE MADE".......7)".
. 5 . PRINT APPOINTMENTS".22)"TO PRI
NTER".......7)".. 6 . END THIS JOB".$..
..7510:. (SS.1) . (SS.6) .28.J.... SS .
120,1514,370,580,1390,1150.P.F.EE.0:.15,
8,15:.15,A,B$:.A.0. 15:....H..17000:X.8:
Y.10:.15000:.A;B$;:.ZR.1.999:.ZR: 15:EE.
1:....X..1070:M.1......17000:..5)"......
ENTER APPOINTMENT DESCRIPTION";:C.18:Y.7
:X.11......7000:N$(M).T$.P...Y.10:X.8:.1
5000:."ENTER APPOINTMENT MONTH":Y.12:X.1
2:.15000.{...."(1-12 OR 99)":X.26:C.2:.7
000:A.E(T$).....TL.A:. (A.1).(A.12). . A
..99 . 146......20050:DU(M).A.....X.9:Y.
15:.15000:."ENTER APPOINTMENT DATE":X.15
:Y.17:.15000......"(1-EOM)":C.2:X.24:.70
00:A.E(T$).1.... (A.1).(A.EO).150.<...D(
M).A.L...X.9:Y.22:.15000:."ENTER MORE AP
PTS. (Y/N)";......7505:. A$."Y". M.M.1:.
130...... T.1...I....17000:X.11:Y.11:.15
000:."THIS IS YOUR APPT.".......16)"..SU
MMARY":.7500......17000:..9)". # DESC
RIPTION .";:Y.5:.M.0.200.<.... I.1.M
:X.10:.15000:.N$(I);.W...X.6:.15000:.I.1
0.." ";......I;:Y.Y.2:X.9:.15000:." DAT
E ";DU(I):X.22:.15000:.D(I):.15000:."
/"...... Y..18..7500:Y.5:.17000:..9)". #
DESCRIPTION .";:.191.....Y.Y.2...
...I...C..Y..5..7500...H.. T.1 . ....$..
20.$.,..1530.`./..17000:Y.10:X.14:.15000
:."NOW SAVING":Y.13:X.13:.15000...0.."C
ALENDAR FILE":.15,8,15,"I": 15...5..1,8,
2,"@0:APPSCALENDAR,S,W":.30100:.A.19. 1:
.1514...7.H$.G(13):.1,M;H$;:.I.1.M:.1,N$
(I);H$;D(I);H$;DU(I);H$;...:..I:.30102:
15: 1...;..1514.!.@..1530.].E..17000:Y.1
0:X.14:.15000:."NOW LOADING":Y.13:X.13:.
15000...F.."CALENDAR FILE":.15,8,15,"I":
15...J..1,8,2,"0:APPSCALENDAR,S,R":.301
00:.A.19. 1:.1514.B.T..1,M...^..I.1.M:.1
,N$(I),D(I),DU(I):.I...H..30102: 15: 1..
.I..1514.9.R..17000:..9)".ADD/CHANGE/DEL
ETE MENU.":Y.7:X.6:.15000.T.T..". 1 . A
DD APPOINT";...U.."MENT DATA":..6)".. 2
. DELETE APPOINTMENTS"...V...6)".. 3 .
CHANGE APPOINTMENT DATA".V.W...6)".. 4
. PRINT APPOINTMENT";...X.." SUMMARY":.
.6)".. 5 . RETURN TO MAIN MENU".$.Y..75
10:.SS.1 .(SS.5).377.B.... SS . 400,410,
480,570,20.^...T.1:M.M.1:.130:T.0:.370..
....17000:..9)". DELETE MODE ."
:Y.9:X.12:.15000:."ENTER NUMBER OF".....
X.13:Y.12:.15000:."APPOINTMENT":X.25:.15
000:C.2:.7000......M.0.440.....B.E(T$)..
.... B.1.(B.M).440......445.H....17000:X
.13:Y.9:.15000:."SORRY! CANNOT".P...X.1
5:Y.12:.15000:."FIND # ";B:.1480.Y....37
0......17000:Y.9:X.12:.15000:."APPT#";B;
" IS NOW ".V...X.13:Y.12:.15000:."BEING
DELETED":.1480...B..B.M .470.#.L.. I.B .
(M.1):X$.N$(I.1):N$(I).X$:Y.D(I.1):D(I).
Y:Z.DU(I.1).2.N.DU(I).Z:.I.A.V.M.M.1:.37
0......17000:..9)". CHANGE APPT INFO
.":Y.9:X.13:.15000:."ENTER APPT# TO".J.
..Y.12:X.15:.15000:."CHANGE":X.23:.15000
:C.2:.7000:B.E(T$)......B.1.(B.M).500...
...510......17000:X.13:Y.9:.15000:."SORR
Y! CANNOT":Y.12:.15000.;...."FIND APPT#
";B;:.1480.D....370......17000:..9)" #
DESCRIPTION ":..9)" .. ...........
........".....X.9:Y.6:.15000:. B.10.." "
;......B;:Y.6:X.14:.15000:.N$(B);:Y.7:X.
12:.15000:." DATE ":X.20:.15000......D
U(B):X.23:.15000:.D(B):.15000:."/";.Z...
Y.10:X.11:.15000:."ENTER DESCRIPTION":C.
18:Y.12:X.11:.7000.U....T$..H(BL$,C).N$(
B).T$.....Y.15:X.9:.15000:."MONTH (1-12
OR 99)":C.2:X.28:.7000:.T$." ".520.....
TL.E(T$):Y.TL:.Y.1.(Y.12)..Y..99.517....
.DU(B).Y.(...Y.18:X.10:.15000:."DUE DATE
(1-EOM)":X.28:C.2:.7000.@....T$." ".D(
B).0.561.L...Y.E(T$).W...D(B).Y.Y.0.Y.D(
B):.20050:.Y.1.(Y.EO).520...1..370...:.T
.1:.180:T.0:.370...D..17000:..10)".PRINT
CALENDAR MODE"...E.Y.8:X.7:.15000:.". 1
. PRINT TO SCREEN"...F...7)"... 2 . P
RINT TO PRINTER".7.G...7)"... 3 . RETUR
N TO MAIN MENU".P.H..7510:.SS.1.SS.3.584
.T.I..SS.2.EZ.4:.27400:.EZ.EZ.0:.580...J
.PR.SS:.PR.3.20...M..:.I.1.26:.Z:.I.Z.N.
.17000:X.11:Y.9:.15000:."ENTER DATE MM/Y
YYY":X.17:Y.12:C.2...O..7000:M1$.T$:M1.E
(M1$):X.19:.15000:."/":C.4:X.20:. M1$."
".580.W.P..7000:Y1$.T$:Y1.E(Y1$):Y2$.I(
Y1$,2):. Y1$." ".580.E.R.Y2.E(Y2$).V.
T..Y1.1980.590...X..I.1.28:. X:DT(I).X:.
I:YT.Y1.1979.C.B.. I.YT.1 ..1:J..(I.28):
.J.I.28.630.J.G..I.S.L..640...V.YT.YT.J.
28.....YT.DT(YT):S.0:.17000.0.... N.0.12
:. MM(N):.N:YN..(Y2.4):.YN.Y2.4.MM(2).29
.U....M1.1.(M1.12)..17000:Y.9:X.14:.1500
0:.M1;" IS NOT A":Y.12:.15000......M1.1.
(M1.12) .."VALID MONTH":.1480:.580.....
. M1.1 . 760...... L.1 . (M1.1):S.S.MM(L
.1):.W.1.6:.G.1.7:YT.YT.1:YX.YT.S......Y
X.MM(L) .730......G...F.. YX.MM(L) .740.
'.P.. W.3.Z.YT.YT.G.:....L.K...S.S.MM(M1
.1).B....I.1.12:.". .";:.I...... M1 . 78
0,790,800,810,820,830,840,850,860,870,88
0,890.....ZQ$." JANUARY ":.900.Q...ZQ$.
" FEBRUARY ":.900... .ZQ$." MARCH ":.
900...*.ZQ$." APRIL ":.900...4.ZQ$."
MAY ":.900.9.>.ZQ$." JUNE ":.90
0.S.H.ZQ$." JULY ":.900.M.R.ZQ$." A
UGUST ":.900...\.ZQ$."SEPTEMBER ":.900.
..F.ZQ$." OCTOBER ":.900...P.ZQ$." NOVE
MBER ":.900.U.Z.ZQ$." DECEMBER ":.900...
...ZQ$;Y1$;" ";:. I.1.18:.". .";:.I.A...
.PR.2. NL.16:.4,4,7:.4,"
";ZQ$;Y1$.I...." S M
T W T F S ";......PR.2..4,G
(13);H(BL$,25);" S M T W T F
S ";G(13).H.... I.1.44:.". .";:.I:.
.T....W1.1.6......W1.1..G(13);:.PR.2..4,
""......PR.2..4,H(BL$,26);.......6);:. G
1.1.7.1...YT.YT.1:YX.YT.S.F.J..YX.MM(M1)
. 1025.K.O..YX..0.." ";:.PR.2..4,"
";...T.. YX..10..YX;:.PR.2..4,YX;...U..
YX..10.990.G.Y..YX.0.(YX.10).." ";YX;:.
PR.2..4," ";YX;.P...."";.Y.... G1......
YX.MM(M1) .1025...... W1.....Y.9:X.0:.15
000:.Q.1.40:."...";:.Q.)....G(13).N...Y.
13:X.12:.15000:."APP'S DAY TO DAY":Y.16:
X.13:.15000:."(DD/DD)".....X.22:C.5:.700
0......PR.2.SS$.T$:.3000:.580.....SS$.T$
:.1510:.1200:.580......17000:Y.5:X.9:.15
000:." WARNING!!!":Y.Y.4:.15000.,.0
.." DO NOT USE THIS PRO-".20)"CEDURE UNL
ESS YOU ARE".I.3...9)" ENTERING DATA FOR
THE";:.:..9)" FIRST TIME!!!!!!!"...5.X.
1:Y.19:.15000:..9)"ENTER <C>ONTINUE ".R.
7.Y.21:X.16:.15000:."<R>ETURN";:.7505:.
A$."R".(A$."R").20...8.. A$."C".A$."C".
....:.. 1079...B..9500.. ~.EZ.8:.27400:.
EZ.EZ.0:.20.V ..649,1:.17000:."........
....".10)"INSERT PROGRAM DISK".Z ..."...
".13)"INTO DRIVE #0":.7500.. ..Q$.G(34):
.G(5):.".LOAD"Q$"COLMENU"Q$",8....":."RU
N".W ...631,19:.632,13:.633,13:.198,3:..
.!..X.4:Y.11:DX$.H(SS$,2):DY$.I(SS$,2):D
X.E(DX$):DY.E(DY$). !... L.DX.DY.,!D.. J
.1.M.T!N..M1.DU(J). (DU(J).99).. L.D(J).
1232.^!O..1240.X!P..15000:.D(J).10.." ";
..!Q..D(J);:X.10:.15000:.N$(J);:X.4:Y.Y.
1.A!X..Y.20 ..7500:.1510:Y.11:X.4.H!...J
.O!...L.Y!...7500..!.....!N.EZ.4:.27400:
.EZ.EZ.0:.20.4"O..17000:."............."
.8)"NOW PRINTING APPT. DATA".}"X.H$.G(13
):.4,4,7:.4:.H$;H$;:..34);"APPOINTMENTS"
:..34);"------------".."Y.NL.8.."Z..H$;H
$:.Q.1.M:.Q.1.." ";.."|...5);Q;:..15);..
(DU(Q).10));DU(Q);"/";..(D(Q).10));D(Q);
.."~...20);N$(Q).F#..."-----------------
----------------------------------------
---------------------".S#..NL.NL.2:.NL..
60..XC.1.6:.G(13);:.XC:NL.0..#...Q:.XC.1
.25:.4:.XC: 4:.20..#H.. Q.1.750:.Q:..M#.
.X.0:Y.11:.15000:.Q.1.200:." ";:.Q:..X#
...17000..$....9)".FILE MAINTENANCE MENU
.":X.7:Y.7:.15000.+$...". 1 . LOAD CAL
ENDAR FILE".Q$....7)"... 2 . SAVE CALEN
DAR FILE".S$....7)"... 3 . DISK DIRECTO
RY"..$....7)"... 4 . DISK MAINTENANCE M
ENU".C$....7)"... 5 . RETURN TO MAIN ME
NU"..$...7510:SS.E(A$):.SS.1.(SS.5).1526
..%...SS..5.EZ.8:.27400:.EZ.EZ.0:.1514./
%...SS . 320,300,22000,27000,20.I%...170
00:Y.10:X.13:.15000:."INSERT FILE IN":Y.
13:.15000.%..."STORAGE DEVICE"..%...750
0:...%..DX$.H(SS$,2):DY$.I(SS$,2):DX.E(D
X$):DY.E(DY$)..%..H$.G(13):.4,H$;H$;:.4,
H(BL$,34);"APPOINTMENTS"..&...4,H(BL$,34
);"------------";H$;H$;.]&...4,"--------
----------------------------------------
-----------";.Z&...4,"------------------
-"..&B.. L.DX.DY..&L.. J.1.M..&V..M1.DU(
J). (DU(J).99).. L.D(J).3032.F&W..3050..
&X..4,H(BL$,22);:.DU(J).10..4," ";..'Z..
4,DU(J);"/";:.D(J).10..4," ";..'...4,D(J
);.1'...4,H(BL$,20);N$(J).W'...4,"------
----------------------------------------
-------------";..'...4,"----------------
---".D'..NL.NL.2:.NL..56..XC.1.10:.4,G(1
3);:.XC:NL.0.K'...J.R'...L..'...XC.1.25:
.4:.XC: 4..'.....(X.Q.1:.649,1:T$."":.15
000.>(Z.."."H(BL$,C)".":.15000:.ZQ.1.C:B
L$(ZQ)." ":.ZQ.^([..A$:."."BL$(Q)"."BL$(
Q)".";.(].."."BL$(Q)"..";:.A$.."".7008.
.(_..7003..(`..A$.G(20).Q.C.C..1.BL$(C).
" ":BL$(C.1)." "..(A..A$.G(20).Q.C.C..1.
Q.Q.1:.". ..";:.7003..)B..A$.G(13).."."B
L$(Q)"..";:.7039. )C..A$..G(20).Q.1.7016
.S)D.QZ.X:X..(Q).1:.15000:.ZQ.Q.C:BL$(ZQ
.1).BL$(ZQ).~)F.."."BL$(ZQ.1)".";:.:.".
.";:BL$(C)." "..)G..15000:X.QZ:Q.Q.1:.70
03..)H..A$.G(29)..Q..C..".";:Q.Q.1:.7003
..)J..A$.G(157)..Q..1..".";:Q.Q.1:.7003.
.*R..A$..G(148).BL$(C).." ".7032.G*T.QK.
X:QZ..(X):X.X.C.1:.15000:.ZQ.C.1.Q..1:BL
$(ZQ.1).BL$(ZQ)..*V.."."BL$(ZQ.1)"...";:
.:BL$(Q)." ":.". ..";:X.QZ:.15000:X.QK..
*W..7003.L*X.SS.F(A$):.SS.32.(SS.122.SS.
193).SS.218.SS.44.SS.58.7003..*Y..Q..C.B
L$(Q).A$:.".";A$;".";:.Q.C.Q.Q.1:.7003..
+{..".";:.7003.;+.T$."":.ZQ.1.C:T$.T$.B
L$(ZQ):.ZQ:.649,0:..N+L.X.7:Y.22:.15000:
.".PRESS ANY KEY TO CONTINUE";.Y+Q..649,
1..+R.. A$:. A$."". 7506..+S..649,0:..Z+
V.X.9:Y.22:.15000:." WHAT IS YOUR CHOICE
?";:.7505:SS.E(A$)..+W....+.:.214,Y.1:.2
11,X:.58732:..(,HBZ..(.(1).15.1):.53280,
Z:.53281,1:.".";.I,IB.".......";:.ZQ.1.3
4:.".";:..I,JB.:.ZQ.1.20:."....".32)".":
...,KB."...";:.ZQ.1.34:.".";:.:.".";:..
, N."."G(8)G(14)..,!N.I.828.828.25:.XX:.
I,XX:.I.V,#N. B(53247)..169. ...,$N. .R(
V)..(V.100..5).100.7-%N. 165,251,166,252
,164,253,32,186,255,169,0,32,189,255,32,
192,255.^-'N. 32,183,255,165,251,32,195,
255,96..-(N.-2,-4,-5,-6,0,-2,-3,-4,-5,0,
-1,-2,-3,-5,-6,0,-1,-3,-4,-5,-6,-1,-2,-3
,-4..-)N. -6,0,-1,0,31,28,31,30,31,30,31
,31,30,31,30,31..-*N....RN.:.U.1.55:.V:.
U:.U.1.12:.MM(U):.U:.TL.99.EO.31:..*.SNE
O.MM(TL):..]..UCT.0:.22400:."......".13)
"DISK/ID":.".......";.M.TV.1,8,0,"$0".{.
^V.#1,A$,B$...HVD$."":.#1,A$,B$...RV.#1,
A$,B$...|VC.0....V. A$.."".C.F(A$).U..V.
B$.."".C.C.F(B$).256....V."...."J(D(C),
2);.8);".";../.V.#1,B$:. ST..0.22300."/.
V. B$..G(34).22180.M/.V.#1,B$:.B$..G(34)
..B$;:D$.D$.B$:.22200.O/BV.#1,B$:.B$.G(3
2).." ";:.22210../LV..28);:C$.""../VVC$.
C$.B$:.#1,B$:. B$.."".22230../.V."."H(C$
,3)../.V.ST.0..".":CT.CT.1:N$(CN).D$:.CT
.5.CT.0:.7500:.22400:.".......";..0.V.22
120.)0.W."BLOCKS FREE":.30100:.A.19..750
0.:0.W 1: 15:.1514.K0.W.17000:.".".7)".
DISK DIRECTORY ."..0.W."....#B
LOCKS NAME TYPE":..P0.WB$."
":.ZQ.0.J:.#1,A$:.A$..G(96)..A$..G(160).
B$.B$.A$.X0.W.:...1.].17000:."..........
....".7)"PRESS [M]ENU OR [F]ORMAT".31A]
.7510:.A$."M".A$."M"..27000.O1B]. A$.."F
".A$.."F".24001..1D].".";:.17000:.".....
.......".12)"INSERT DISKETTE"..1F]."..."
.13)"INTO DRIVE #0":.7500..1H].".";:.170
00:."............".11)"ENTER NEW DISK ID
"..2J]C.16:Y.14:X.10:.7000:X.26:.15000:.
",";:TT$.T$:X.27:C.2.&2K].7000.C2L]."...
..........".14)".PLEASE WAIT.":Q$."N0:"
.TT$.",".T$.S2M].15,8,15,Q$..2N] 15:.301
00: 15:.27000..2.AMM.0:TT$.D(.R(TT)):RR.
C(TT$).M2.A..(TT)..00499.TT$."0.00":...2
.A.PP.C(TT$).1..1:.J(TT$,PP,1).".".25006
..3.AMM.MM.1:.PP..3.ATT$.TT$.".00":..33.
A.MM.0.TT$.TT$."00".I3.A.MM.1.TT$.TT$."0
".J3.A.MM.2.TT$.J(TT$,(RR.MM.2),1)..3.A.
(MM.RR.2).TT$.H(TT$,1)."0".J(TT$,2,(C(TT
$).1))..3.A..M3XI.17000:..9)".DISK MAINT
ENANCE MENU."..3YI..7)"....... 1 . INIT
IALIZE DISK"..4ZI..7)"... 2 . VALIDATE
DISK".:4{I..7)"... 3 . SCRATCH DISK FIL
E".Y4|I..7)"... 4 . FORMAT DISK".{4}I..
7)"... 5 . RETURN TO FILE"..4~I..12)"MA
INTANCE MENU";..4I.7510:SS.E(A$):.SS.1.
SS.5.27007..4.I.SS . 27100,27200,27300,2
4000,1514..5.I.".";:.15,8,15,"I": 15:.30
100: 15:.27000.;5@J.".";:.15,8,15,"V": 1
5:.30100: 15:.27000.S5.J.17000:.".......
...".7)"ENTER FILE NAME TO SCRATCH". 5.J
C.16:Y.13:X.12:.7000:.T$.H(BL$,16).27000
.T5.J.Q.16.I(T$,1).G(32).I(T$,1).G(160).
T$.H(T$,Q.1)..5.JT$."S:".T$:.15,8,15,T$:
.15,"V";: 15..6.J.30100: 15:.27000.;6.K.
EZ.8..251,15:.252,8:.253,15:.27402.T6.K
.251,4:.252,4:.253,4.O6.K.828:.B(144).12
8.27404.Z6.KEZ.0:...6.K.EZ.8.V$."DRIVE#0
":.27406..6.KV$."PRINTER"..6.K.17000:EZ.
.1:."....................ERROR. "V$" IS
NOT ON LINE"..6.K.7500:...7.U.15,8,15..7
.U.15,A,B$,C,D:.A.19...X7.U.17000:."....
.......ERROR#...NAME......TRACK/SECTOR."
..7.U.".................."A" "B$.25)C;D:
15:.7500:...7PC.53280,1:.53281,1:.G(8)G
(142)..7RC."............................
...............";..8SC."................
........................";.O8TC.ZQ.1.3:.
".. .
.";:.ZQ..8UC."..........................
..............";..8VC.".................
.......................";..8XC."........
.................":."...................
....."..9[C.ZQ.1.3:."....
..":.ZQ.V9\C.".......................
.":."........................".|9DC..23)
"........U.I............ .";..9IC."..PPO
INTMENTS."..9NC..23)"..U.I.......J.K";..
9SC."..ALENDAR."..9UC..22)"........N..
."..9XC..22)"....N .. ."..:{C.
.22)"........FUTUREHOUSE".1:|C..22)"....
. .".J:}C..22)".... .".:.C.
"........PRESS ANY KEY TO CONTINUE";:.19
8,1:.A$..:.C.".."G(14);:....
> CLICK IMAGE PREVIEW FOR FULL MODAL