GBOOKB
FILE INFORMATION
FILENAME(S): GBOOKB
FILE TYPE(S): PRG
FILE SIZE: 4.7K
FIRST SEEN: 2025-11-30 21:07:11
APPEARS ON: 1 disk(s)
FILE HASH
6856319ca4ff36135eeb3dbf80925927326f5321c28834d6bb559df3df72fb1e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CURSOR 4 | GBOOKB | PRG | DuncanTwain | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 28 04 00 00 9C 3A 97 35 39 34 36 38 2C 31 |..(....:.59468,1|
00000010: 32 3A 8B C2 28 31 29 B2 32 35 35 A7 94 22 47 42 |2:..(1).255.."GB|
00000020: 4F 4F 4B 20 42 22 3A 80 00 52 04 01 00 8F 20 47 |OOK B":..R.... G|
00000030: 42 4F 4F 4B 42 20 43 4F 50 59 52 49 47 48 54 20 |BOOKB COPYRIGHT |
00000040: 28 43 29 20 31 39 38 30 20 48 41 4C 20 43 41 52 |(C) 1980 HAL CAR|
00000050: 45 59 00 6B 04 02 00 8F 20 39 30 30 32 20 42 45 |EY.k.... 9002 BE|
00000060: 52 43 4C 41 49 52 20 52 4F 41 44 00 85 04 03 00 |RCLAIR ROAD.....|
00000070: 8F 20 48 55 4E 54 53 56 49 4C 4C 45 20 41 4C 20 |. HUNTSVILLE AL |
00000080: 39 35 38 30 32 00 8B 04 04 00 3A 00 A5 04 05 00 |95802.....:.....|
00000090: 8F 20 43 55 52 53 4F 52 20 23 31 39 20 41 50 52 |. CURSOR #19 APR|
000000A0: 49 4C 20 38 30 00 C6 04 06 00 8F 20 42 4F 58 20 |IL 80...... BOX |
000000B0: 35 35 30 2C 20 47 4F 4C 45 54 41 2C 20 43 41 2E |550, GOLETA, CA.|
000000C0: 20 39 33 30 31 37 00 CC 04 08 00 3A 00 E9 04 0A | 93017.....:....|
000000D0: 00 8F 20 41 53 20 4F 46 20 32 39 20 41 50 52 20 |.. AS OF 29 APR |
000000E0: 38 30 20 39 3A 31 35 50 4D 00 F4 04 5A 00 8D 36 |80 9:15PM...Z..6|
000000F0: 32 30 30 30 00 09 05 64 00 46 44 25 B2 31 3A 8F |2000...d.FD%.1:.|
00000100: 20 49 2F 4F 20 55 4E 49 54 00 19 05 BE 00 4E 53 | I/O UNIT.....NS|
00000110: B2 34 30 3A 4E 41 B2 31 35 00 42 05 D2 00 86 41 |.40:NA.15.B....A|
00000120: 24 28 4E 41 29 2C 57 28 4E 41 29 2C 53 24 28 4E |$(NA),W(NA),S$(N|
00000130: 53 29 2C 47 25 28 4E 53 2C 4E 41 29 2C 42 24 28 |S),G%(NS,NA),B$(|
00000140: 35 29 00 87 05 DC 00 42 24 28 31 29 B2 22 20 39 |5).....B$(1)." 9|
00000150: 30 22 3A 42 24 28 32 29 B2 22 20 38 30 22 3A 42 |0":B$(2)." 80":B|
00000160: 24 28 33 29 B2 22 20 37 30 22 3A 42 24 28 34 29 |$(3)." 70":B$(4)|
00000170: B2 22 20 36 35 22 3A 41 53 24 B2 22 41 53 53 49 |." 65":AS$."ASSI|
00000180: 47 4E 4D 45 4E 54 22 00 A6 05 0E 01 45 24 B2 22 |GNMENT".....E$."|
00000190: 91 22 3A 81 49 B2 31 A4 34 30 3A 45 24 B2 45 24 |.":.I.1.40:E$.E$|
000001A0: AA 22 20 22 3A 82 00 B6 05 40 01 46 24 B2 22 47 |." ":....@.F$."G|
000001B0: 52 41 44 45 53 22 00 C5 05 4A 01 44 52 B2 30 3A |RADES"...J.DR.0:|
000001C0: 8D 31 38 30 30 00 DF 05 54 01 43 24 B2 22 30 22 |.1800...T.C$."0"|
000001D0: 3A 54 53 B2 30 3A 54 41 B2 30 3A 4D 4C B2 30 00 |:TS.0:TA.0:ML.0.|
000001E0: E9 05 68 01 84 31 2C 43 24 00 F3 05 72 01 84 31 |..h..1,C$...r..1|
000001F0: 2C 54 53 00 FD 05 7C 01 84 31 2C 54 41 00 28 06 |,TS...|..1,TA.(.|
00000200: 86 01 81 53 B2 31 A4 54 53 3A 84 31 2C 53 24 28 |...S.1.TS:.1,S$(|
00000210: 53 29 3A 4E B2 C3 28 53 24 28 53 29 29 3A 8B 4E |S):N..(S$(S)):.N|
00000220: B1 4D 4C A7 4D 4C B2 4E 00 2F 06 8B 01 82 53 00 |.ML.ML.N./....S.|
00000230: 46 06 90 01 81 41 B2 31 A4 54 41 3A 84 31 2C 41 |F....A.1.TA:.1,A|
00000240: 24 28 41 29 3A 82 00 5C 06 9A 01 81 41 B2 31 A4 |$(A):..\....A.1.|
00000250: 54 41 3A 84 31 2C 57 28 41 29 3A 82 00 7B 06 AE |TA:.1,W(A):..{..|
00000260: 01 81 41 B2 31 A4 54 41 3A 81 53 B2 31 A4 54 53 |..A.1.TA:.S.1.TS|
00000270: 3A 84 31 2C 47 25 28 53 2C 41 29 00 84 06 B8 01 |:.1,G%(S,A).....|
00000280: 82 53 2C 41 00 8E 06 C2 01 8D 32 30 30 30 00 A7 |.S,A......2000..|
00000290: 06 C7 01 4D 4C B2 4D 4C AA 31 3A 8B 4D 4C B3 32 |...ML.ML.1:.ML.2|
000002A0: 32 A7 4D 4C B2 32 32 00 CA 06 CC 01 48 59 24 B2 |2.ML.22.....HY$.|
000002B0: 22 2E 22 3A 81 49 B2 31 A4 4D 4C 3A 48 59 24 B2 |".":.I.1.ML:HY$.|
000002C0: 48 59 24 AA 22 2E 22 3A 82 49 00 E6 06 D6 01 99 |HY$.".":.I......|
000002D0: 22 93 11 A4 A4 A4 A4 A4 A4 22 3A 99 22 12 47 42 |"........":.".GB|
000002E0: 4F 4F 4B 42 11 11 00 EE 06 E5 01 99 43 24 00 0C |OOKB........C$..|
000002F0: 07 E7 01 99 3A 99 54 53 22 53 54 55 44 45 4E 54 |....:.TS"STUDENT|
00000300: 53 2C 22 54 41 3B 41 53 24 3B 22 53 00 27 07 EA |S,"TA;AS$;"S.'..|
00000310: 01 99 22 11 12 43 92 20 20 43 48 41 4E 47 45 20 |.."..C. CHANGE |
00000320: 41 20 47 52 41 44 45 00 4A 07 F4 01 99 22 11 12 |A GRADE.J...."..|
00000330: 45 92 20 20 45 58 49 54 2C 20 44 52 4F 50 50 49 |E. EXIT, DROPPI|
00000340: 4E 47 20 43 48 41 4E 47 45 53 00 66 07 F9 01 99 |NG CHANGES.f....|
00000350: 20 22 20 20 20 53 49 4E 43 45 20 4C 41 53 54 20 | " SINCE LAST |
00000360: 12 53 92 41 56 45 00 87 07 FE 01 99 22 11 12 47 |.S.AVE......"..G|
00000370: 92 20 20 45 4E 54 45 52 20 4C 49 53 54 20 4F 46 |. ENTER LIST OF|
00000380: 20 47 52 41 44 45 53 00 98 07 08 02 99 22 11 12 | GRADES......"..|
00000390: 53 92 20 20 53 41 56 45 00 B3 07 12 02 99 22 11 |S. SAVE......".|
000003A0: 12 50 92 20 20 50 52 49 4E 54 20 48 41 52 44 43 |.P. PRINT HARDC|
000003B0: 4F 50 59 00 DA 07 1C 02 99 22 11 11 11 43 48 4F |OPY......"...CHO|
000003C0: 49 43 45 3F 20 22 3B 3A 8D 36 30 30 30 30 3A 47 |ICE? ";:.60000:G|
000003D0: 24 B2 C8 28 49 4E 24 2C 31 29 00 FC 07 26 02 81 |$..(IN$,1)...&..|
000003E0: 49 B2 31 A4 35 3A 8B 47 24 B2 CA 28 22 43 45 47 |I.1.5:.G$..("CEG|
000003F0: 53 50 22 2C 49 2C 31 29 89 35 37 30 00 07 08 30 |SP",I,1).570...0|
00000400: 02 82 3A 89 34 37 30 00 23 08 3A 02 91 49 89 35 |..:.470.#.:..I.5|
00000410: 39 30 2C 39 35 30 2C 36 36 30 2C 38 35 30 2C 31 |90,950,660,850,1|
00000420: 30 37 30 00 58 08 4E 02 99 22 93 43 48 41 4E 47 |070.X.N..".CHANG|
00000430: 45 20 47 52 41 44 45 20 46 4F 52 20 22 3B 41 53 |E GRADE FOR ";AS|
00000440: 24 3B 22 20 23 20 22 3B 3A 8D 36 30 30 30 30 3A |$;" # ";:.60000:|
00000450: 41 B2 C5 28 49 4E 24 29 00 7C 08 53 02 8B 41 B3 |A..(IN$).|.S..A.|
00000460: 31 B0 41 B1 54 41 A7 99 22 11 4E 4F 20 53 55 43 |1.A.TA..".NO SUC|
00000470: 48 20 22 3B 41 53 24 3A 89 36 35 35 00 90 08 58 |H ";AS$:.655...X|
00000480: 02 99 45 24 3B 41 53 24 3B 41 3B 41 24 28 41 29 |..E$;AS$;A;A$(A)|
00000490: 00 B4 08 62 02 99 22 11 53 54 55 44 45 4E 54 20 |...b..".STUDENT |
000004A0: 23 20 22 3B 3A 8D 36 30 30 30 30 3A 53 B2 C5 28 |# ";:.60000:S..(|
000004B0: 49 4E 24 29 00 DB 08 67 02 8B 53 B3 31 B0 53 B1 |IN$)...g..S.1.S.|
000004C0: 54 53 A7 99 22 11 4E 4F 20 53 55 43 48 20 53 54 |TS..".NO SUCH ST|
000004D0: 55 44 45 4E 54 22 3A 89 36 35 35 00 F3 08 6C 02 |UDENT":.655...l.|
000004E0: 99 45 24 22 53 54 55 44 45 4E 54 22 53 3B 53 24 |.E$"STUDENT"S;S$|
000004F0: 28 53 29 00 1A 09 71 02 54 B2 47 25 28 53 2C 41 |(S)...q.T.G%(S,A|
00000500: 29 3A 99 22 11 47 52 41 44 45 20 57 41 53 20 22 |):.".GRADE WAS "|
00000510: 3B 3A 8B 54 B1 B2 30 A7 99 54 00 28 09 72 02 8B |;:.T..0..T.(.r..|
00000520: 54 B3 30 A7 99 22 2A 22 00 56 09 76 02 99 22 11 |T.0.."*".V.v..".|
00000530: 43 48 41 4E 47 45 20 47 52 41 44 45 20 54 4F 3A |CHANGE GRADE TO:|
00000540: 20 22 3B 3A 8D 36 30 30 30 30 3A 8B 49 4E 24 B2 | ";:.60000:.IN$.|
00000550: 22 22 A7 36 32 35 00 73 09 7B 02 8B 49 4E 24 B2 |"".625.s.{..IN$.|
00000560: 22 2A 22 A7 47 25 28 53 2C 41 29 B2 AB 31 3A 89 |"*".G%(S,A)..1:.|
00000570: 34 37 30 00 93 09 80 02 4E B2 C5 28 49 4E 24 29 |470.....N..(IN$)|
00000580: 3A 8B 4E B3 30 A7 99 22 12 3C 30 3F 3F 22 3A 89 |:.N.0..".<0??":.|
00000590: 36 32 35 00 AE 09 85 02 8B 4E B1 31 30 30 A7 99 |625......N.100..|
000005A0: 22 12 3E 31 30 30 3F 3F 22 3A 89 36 32 35 00 C1 |".>100??":.625..|
000005B0: 09 8A 02 47 25 28 53 2C 41 29 B2 4E 3A 89 34 37 |...G%(S,A).N:.47|
000005C0: 30 00 D0 09 8F 02 8D 31 36 38 30 3A 89 34 37 30 |0......1680:.470|
000005D0: 00 F7 09 94 02 8B 54 41 B2 4E 41 A7 99 22 4E 4F |......TA.NA.."NO|
000005E0: 20 52 4F 4F 4D 22 3A 81 49 B2 31 A4 35 30 30 3A | ROOM":.I.1.500:|
000005F0: 82 49 3A 89 34 37 30 00 08 0A 9E 02 54 41 B2 54 |.I:.470.....TA.T|
00000600: 41 AA 31 3A 41 B2 54 41 00 2D 0A A8 02 99 22 93 |A.1:A.TA.-....".|
00000610: 47 52 41 44 45 20 49 4E 50 55 54 53 20 46 4F 52 |GRADE INPUTS FOR|
00000620: 20 22 3B 41 53 24 3B 22 20 23 22 54 41 00 5E 0A | ";AS$;" #"TA.^.|
00000630: B2 02 99 22 11 11 34 2D 4C 45 54 54 45 52 20 4E |..."..4-LETTER N|
00000640: 41 4D 45 20 4F 46 20 22 41 53 24 22 3A 20 22 3B |AME OF "AS$": ";|
00000650: 3A 8D 36 30 30 30 30 3A 47 24 B2 49 4E 24 00 7C |:.60000:G$.IN$.||
00000660: 0A BC 02 41 24 28 41 29 B2 C9 28 22 20 20 20 20 |...A$(A)..(" |
00000670: 22 AA C8 28 47 24 2C 34 29 2C 34 29 00 AB 0A C6 |"..(G$,4),4)....|
00000680: 02 99 22 11 11 57 45 49 47 48 54 20 4F 46 20 22 |.."..WEIGHT OF "|
00000690: 41 53 24 22 3A 20 22 3B 3A 8D 36 30 30 30 30 3A |AS$": ";:.60000:|
000006A0: 57 28 41 29 B2 C5 28 49 4E 24 29 00 D8 0A D0 02 |W(A)..(IN$).....|
000006B0: 99 22 93 22 41 53 24 22 20 23 22 54 41 22 20 22 |."."AS$" #"TA" "|
000006C0: 41 24 28 41 29 22 2C 20 57 45 49 47 48 54 3A 22 |A$(A)", WEIGHT:"|
000006D0: 57 28 41 29 22 11 11 22 00 FF 0A DA 02 99 22 11 |W(A)".."......".|
000006E0: 28 54 59 50 45 20 2A 20 46 4F 52 20 49 4E 43 4F |(TYPE * FOR INCO|
000006F0: 4D 50 4C 45 54 45 20 22 41 53 24 3B 22 29 11 00 |MPLETE "AS$;")..|
00000700: 22 0B E4 02 99 22 20 23 20 20 20 4E 41 4D 45 20 |"...." # NAME |
00000710: 20 20 20 20 20 20 20 20 20 20 20 20 20 47 52 41 | GRA|
00000720: 44 45 00 2E 0B EE 02 81 53 B2 31 A4 54 53 00 46 |DE......S.1.TS.F|
00000730: 0B F8 02 99 53 3B C8 28 53 24 28 53 29 AA 48 59 |....S;.(S$(S).HY|
00000740: 24 2C 4D 4C 29 3B 00 64 0B 02 03 8D 36 30 30 30 |$,ML);.d....6000|
00000750: 30 3A 47 24 B2 49 4E 24 3A 8B 49 4E 24 B2 22 22 |0:G$.IN$:.IN$.""|
00000760: A7 37 36 30 00 80 0B 0C 03 8B 47 24 B2 22 2A 22 |.760......G$."*"|
00000770: A7 47 25 28 53 2C 41 29 B2 AB 31 3A 89 38 31 30 |.G%(S,A)..1:.810|
00000780: 00 A3 0B 16 03 47 B2 C5 28 47 24 29 3A 8B 47 B1 |.....G..(G$):.G.|
00000790: 31 30 30 A7 99 22 12 3E 31 30 30 3F 3F 22 3A 89 |100..".>100??":.|
000007A0: 37 36 30 00 BA 0B 1B 03 8B 47 B3 30 A7 99 22 12 |760......G.0..".|
000007B0: 3C 30 3F 3F 22 3A 89 37 36 30 00 C8 0B 20 03 47 |<0??":.760... .G|
000007C0: 25 28 53 2C 41 29 B2 47 00 CE 0B 2A 03 82 00 D7 |%(S,A).G...*....|
000007D0: 0B 34 03 89 34 37 30 00 E7 0B 52 03 46 24 B2 22 |.4..470...R.F$."|
000007E0: 47 52 41 44 45 53 22 00 FD 0B 5C 03 44 52 B2 31 |GRADES"...\.DR.1|
000007F0: 3A 8D 31 38 30 30 3A 52 24 B2 43 52 24 00 10 0C |:.1800:R$.CR$...|
00000800: 66 03 98 31 2C 43 24 52 24 3B 3A 8D 31 37 30 30 |f..1,C$R$;:.1700|
00000810: 00 24 0C 70 03 98 31 2C 54 53 3B 52 24 3B 3A 8D |.$.p..1,TS;R$;:.|
00000820: 31 37 30 30 00 38 0C 7A 03 98 31 2C 54 41 3B 52 |1700.8.z..1,TA;R|
00000830: 24 3B 3A 8D 31 37 30 30 00 58 0C 84 03 81 53 B2 |$;:.1700.X....S.|
00000840: 31 A4 54 53 3A 98 31 2C 53 24 28 53 29 52 24 3B |1.TS:.1,S$(S)R$;|
00000850: 3A 8D 31 37 30 30 3A 82 00 78 0C 8E 03 81 41 B2 |:.1700:..x....A.|
00000860: 31 A4 54 41 3A 98 31 2C 41 24 28 41 29 52 24 3B |1.TA:.1,A$(A)R$;|
00000870: 3A 8D 31 37 30 30 3A 82 00 97 0C 98 03 81 41 B2 |:.1700:.......A.|
00000880: 31 A4 54 41 3A 98 31 2C 57 28 41 29 52 24 3B 3A |1.TA:.1,W(A)R$;:|
00000890: 8D 31 37 30 30 3A 82 00 C3 0C A2 03 81 41 B2 31 |.1700:.......A.1|
000008A0: A4 54 41 3A 81 53 B2 31 A4 54 53 3A 98 31 2C 47 |.TA:.S.1.TS:.1,G|
000008B0: 25 28 53 2C 41 29 52 24 3B 3A 8D 31 37 30 30 3A |%(S,A)R$;:.1700:|
000008C0: 82 3A 82 00 D2 0C AC 03 8D 32 30 30 30 3A 89 34 |.:.......2000:.4|
000008D0: 37 30 00 E0 0C B6 03 99 22 93 11 11 11 22 3A 80 |70......"....":.|
000008E0: 00 F8 0C 2E 04 99 22 93 54 55 52 4E 20 4F 4E 20 |......".TURN ON |
000008F0: 50 52 49 4E 54 45 52 2E 00 1E 0D 38 04 99 22 11 |PRINTER....8..".|
00000900: 11 49 4E 53 45 52 54 20 50 41 50 45 52 20 54 4F |.INSERT PAPER TO|
00000910: 20 54 4F 50 20 4F 46 20 47 55 49 44 45 2E 00 4C | TOP OF GUIDE..L|
00000920: 0D 42 04 99 22 11 57 48 41 54 20 49 53 20 54 4F |.B..".WHAT IS TO|
00000930: 44 41 59 27 53 20 44 41 54 45 3F 20 22 3B 3A 8D |DAY'S DATE? ";:.|
00000940: 36 30 30 30 30 3A 44 24 B2 49 4E 24 00 64 0D 4C |60000:D$.IN$.d.L|
00000950: 04 99 22 93 4A 55 53 54 20 41 20 4D 49 4E 55 54 |..".JUST A MINUT|
00000960: 45 2E 2E 2E 00 78 0D 56 04 81 53 B2 31 A4 54 53 |E....x.V..S.1.TS|
00000970: 3A 4E B2 30 3A 44 B2 30 00 84 0D 60 04 81 41 B2 |:N.0:D.0...`..A.|
00000980: 31 A4 54 41 00 AE 0D 6A 04 8B 47 25 28 53 2C 41 |1.TA...j..G%(S,A|
00000990: 29 B1 B2 30 A7 4E B2 4E AA 47 25 28 53 2C 41 29 |)..0.N.N.G%(S,A)|
000009A0: AC 57 28 41 29 3A 44 B2 44 AA 57 28 41 29 00 B5 |.W(A):D.D.W(A)..|
000009B0: 0D 74 04 82 41 00 D5 0D 7E 04 47 25 28 53 2C 30 |.t..A...~.G%(S,0|
000009C0: 29 B2 30 3A 8B 44 A7 47 25 28 53 2C 30 29 B2 4E |).0:.D.G%(S,0).N|
000009D0: AD 44 AA 2E 35 00 DC 0D 88 04 82 53 00 F0 0D 92 |.D..5......S....|
000009E0: 04 81 41 B2 31 A4 54 41 3A 4E B2 30 3A 44 B2 30 |..A.1.TA:N.0:D.0|
000009F0: 00 1A 0E 9C 04 81 53 B2 31 A4 54 53 3A 8B 47 25 |......S.1.TS:.G%|
00000A00: 28 53 2C 41 29 B1 B2 30 A7 4E B2 4E AA 47 25 28 |(S,A)..0.N.N.G%(|
00000A10: 53 2C 41 29 3A 44 B2 44 AA 31 00 21 0E A6 04 82 |S,A):D.D.1.!....|
00000A20: 53 00 3E 0E B0 04 47 25 28 30 2C 41 29 B2 30 3A |S.>...G%(0,A).0:|
00000A30: 8B 44 A7 47 25 28 30 2C 41 29 B2 4E AD 44 00 45 |.D.G%(0,A).N.D.E|
00000A40: 0E BA 04 82 41 00 4E 0E CE 04 9F 34 2C 34 00 5B |....A.N....4,4.[|
00000A50: 0E D8 04 98 34 3A 98 34 3A 98 34 00 65 0E E2 04 |....4:.4:.4.e...|
00000A60: 98 34 2C 43 24 00 72 0E EC 04 98 34 2C 44 24 3A |.4,C$.r....4,D$:|
00000A70: 98 34 00 9F 0E F6 04 50 24 B2 22 20 20 20 20 20 |.4.....P$." |
00000A80: 22 AA 41 53 24 3A 50 24 B2 22 20 20 20 22 AA C8 |".AS$:P$." "..|
00000A90: 28 50 24 AA 48 59 24 2C 4D 4C 29 AA 22 20 22 00 |(P$.HY$,ML)." ".|
00000AA0: C1 0E 00 05 81 41 B2 31 A4 54 41 3A 50 24 B2 50 |.....A.1.TA:P$.P|
00000AB0: 24 AA 22 20 22 AA C4 28 41 29 AA 22 20 20 22 3A |$." "..(A)." ":|
00000AC0: 82 00 D9 0E 0A 05 50 24 B2 50 24 AA 22 41 56 45 |......P$.P$."AVE|
00000AD0: 52 41 47 45 20 20 20 23 22 00 E3 0E 14 05 98 34 |RAGE #"......4|
00000AE0: 2C 50 24 00 ED 0E 1E 05 50 24 B2 22 22 00 16 0F |,P$.....P$.""...|
00000AF0: 28 05 81 41 B2 31 A4 54 41 3A 50 24 B2 50 24 AA |(..A.1.TA:P$.P$.|
00000B00: C8 28 41 24 28 41 29 AA 22 20 20 20 20 20 20 22 |.(A$(A)." "|
00000B10: 2C 35 29 20 3A 82 00 2F 0F 32 05 50 24 B2 50 24 |,5) :../.2.P$.P$|
00000B20: AA 22 20 20 20 20 20 20 20 20 20 49 4E 43 22 00 |." INC".|
00000B30: 40 0F 3C 05 98 34 2C A6 4D 4C AA 34 29 3B 50 24 |@.<..4,.ML.4);P$|
00000B40: 00 70 0F 46 05 50 24 B2 22 20 20 20 20 20 57 45 |.p.F.P$." WE|
00000B50: 49 47 48 54 20 22 3A 50 24 B2 22 20 20 20 22 AA |IGHT ":P$." ".|
00000B60: C8 28 50 24 AA 48 59 24 2C 4D 4C 29 AA 22 20 22 |.(P$.HY$,ML)." "|
00000B70: 00 9B 0F 50 05 81 41 B2 31 A4 54 41 3A 50 24 B2 |...P..A.1.TA:P$.|
00000B80: 50 24 AA C9 28 22 20 20 22 AA C4 28 57 28 41 29 |P$..(" "..(W(A)|
00000B90: 29 2C 33 29 AA 22 20 20 22 3A 82 00 A5 0F 5A 05 |),3)." ":....Z.|
00000BA0: 98 34 2C 50 24 00 AC 0F 64 05 98 34 00 BC 0F 6E |.4,P$...d..4...n|
00000BB0: 05 81 53 B2 31 A4 54 53 3A 4E B2 30 00 E6 0F 78 |..S.1.TS:N.0...x|
00000BC0: 05 3A 50 24 B2 C9 28 C4 28 53 29 2C 32 29 AA 22 |.:P$..(.(S),2)."|
00000BD0: 20 22 AA C8 28 53 24 28 53 29 AA 48 59 24 2C 4D | "..(S$(S).HY$,M|
00000BE0: 4C 29 AA 22 20 22 00 F2 0F 82 05 81 41 B2 31 A4 |L)." "......A.1.|
00000BF0: 54 41 00 1B 10 8C 05 8B 47 25 28 53 2C 41 29 B3 |TA......G%(S,A).|
00000C00: 30 A7 50 24 B2 50 24 AA 22 20 20 2A 20 20 22 3A |0.P$.P$." * ":|
00000C10: 4E B2 4E AA 31 3A 89 31 34 34 30 00 40 10 96 05 |N.N.1:.1440.@...|
00000C20: 50 24 B2 50 24 AA C9 28 22 20 20 20 22 AA C4 28 |P$.P$..(" "..(|
00000C30: 47 25 28 53 2C 41 29 29 2C 33 29 AA 22 20 20 22 |G%(S,A)),3)." "|
00000C40: 00 47 10 A0 05 82 41 00 64 10 AA 05 58 24 B2 C9 |.G....A.d...X$..|
00000C50: 28 22 20 20 20 22 AA C4 28 47 25 28 53 2C 30 29 |(" "..(G%(S,0)|
00000C60: 29 2C 33 29 00 7A 10 B4 05 50 24 B2 50 24 AA 22 |),3).z...P$.P$."|
00000C70: 20 20 22 AA 58 24 AA 22 20 22 00 82 10 BE 05 49 | ".X$." ".....I|
00000C80: B2 31 00 9C 10 C8 05 8B 58 24 B3 42 24 28 49 29 |.1......X$.B$(I)|
00000C90: A7 49 B2 49 AA 31 3A 89 31 34 38 30 00 BA 10 D2 |.I.I.1:.1480....|
00000CA0: 05 50 24 B2 50 24 AA 22 20 22 AA CA 28 22 41 42 |.P$.P$." "..("AB|
00000CB0: 43 44 46 26 22 2C 49 2C 31 29 00 D0 10 DC 05 8B |CDF&",I,1)......|
00000CC0: 4E A7 50 24 B2 50 24 AA 22 20 22 AA C4 28 4E 29 |N.P$.P$." "..(N)|
00000CD0: 00 DA 10 E6 05 98 34 2C 50 24 00 E1 10 F0 05 82 |......4,P$......|
00000CE0: 53 00 E8 10 FA 05 98 34 00 16 11 04 06 50 24 B2 |S......4.....P$.|
00000CF0: 41 53 24 AA 22 20 41 56 45 52 41 47 45 20 22 3A |AS$." AVERAGE ":|
00000D00: 98 34 2C 22 20 20 20 22 3B C8 28 50 24 AA 48 59 |.4," ";.(P$.HY|
00000D10: 24 2C 4D 4C 29 3B 00 22 11 0E 06 81 41 B2 31 A4 |$,ML);."....A.1.|
00000D20: 54 41 00 45 11 18 06 98 34 2C C9 28 22 20 20 20 |TA.E....4,.(" |
00000D30: 20 22 AA C4 28 47 25 28 30 2C 41 29 29 2C 34 29 | "..(G%(0,A)),4)|
00000D40: 3B 22 20 22 3B 00 4C 11 22 06 82 41 00 5C 11 36 |;" ";.L."..A.\.6|
00000D50: 06 81 49 B2 31 A4 37 3A 98 34 3A 82 00 63 11 40 |..I.1.7:.4:..c.@|
00000D60: 06 A0 34 00 6C 11 4A 06 89 34 37 30 00 87 11 72 |..4.l.J..470...r|
00000D70: 06 81 53 B2 32 A4 54 53 3A 53 24 B2 53 24 28 53 |..S.2.TS:S$.S$(S|
00000D80: 29 3A 4A B2 53 AB 31 00 AF 11 7C 06 8B 53 24 B3 |):J.S.1...|..S$.|
00000D90: 53 24 28 4A 29 A7 53 24 28 4A AA 31 29 B2 53 24 |S$(J).S$(J.1).S$|
00000DA0: 28 4A 29 3A 4A B2 4A AB 31 3A 89 31 36 36 30 00 |(J):J.J.1:.1660.|
00000DB0: C2 11 86 06 53 24 28 4A AA 31 29 B2 53 24 3A 82 |....S$(J.1).S$:.|
00000DC0: 3A 8E 00 D7 11 90 06 81 44 4C B2 31 A4 31 35 30 |:.......DL.1.150|
00000DD0: 30 3A 82 44 4C 3A 8E 00 EB 11 9A 06 8B 5A 5A B3 |0:.DL:.......ZZ.|
00000DE0: B2 C2 28 51 43 29 89 31 37 32 30 00 04 12 A4 06 |..(QC).1720.....|
00000DF0: 8B 54 49 AB 5A 39 B3 32 30 B0 46 44 25 B2 38 A7 |.TI.Z9.20.FD%.8.|
00000E00: 31 37 39 30 00 14 12 AE 06 8B 46 44 25 B2 32 A7 |1790......FD%.2.|
00000E10: 31 37 36 30 00 22 12 B8 06 97 35 39 34 31 31 2C |1760."....59411,|
00000E20: 35 33 00 31 12 C2 06 81 5A 5A B2 31 A4 36 30 3A |53.1....ZZ.1.60:|
00000E30: 82 00 3F 12 CC 06 97 35 39 34 31 31 2C 36 31 00 |..?....59411,61.|
00000E40: 49 12 D6 06 89 31 37 39 30 00 61 12 E0 06 97 35 |I....1790.a....5|
00000E50: 39 34 35 36 2C C2 28 35 39 34 35 36 29 AF 32 33 |9456,.(59456).23|
00000E60: 39 00 70 12 EA 06 81 5A 5A B2 31 A4 36 30 3A 82 |9.p....ZZ.1.60:.|
00000E70: 00 87 12 F4 06 97 35 39 34 35 36 2C C2 28 35 39 |......59456,.(59|
00000E80: 34 35 36 29 B0 31 36 00 93 12 FE 06 5A 39 B2 54 |456).16.....Z9.T|
00000E90: 49 3A 8E 00 A3 12 08 07 8B 46 44 25 B2 38 A7 31 |I:.......FD%.8.1|
00000EA0: 39 30 30 00 CC 12 12 07 99 22 11 52 45 57 49 4E |900......".REWIN|
00000EB0: 44 20 54 41 50 45 22 46 44 25 22 41 4E 44 20 50 |D TAPE"FD%"AND P|
00000EC0: 52 45 53 53 20 12 52 45 54 55 52 4E 00 E0 12 1C |RESS .RETURN....|
00000ED0: 07 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 31 38 32 30 |..Z$:.Z$."".1820|
00000EE0: 00 F4 12 26 07 97 51 42 2C 31 32 32 3A 97 51 42 |...&..QB,122:.QB|
00000EF0: AA 31 2C 32 00 0E 13 2B 07 8B 46 44 25 B2 32 A7 |.1,2...+..FD%.2.|
00000F00: 97 51 42 2C 35 38 3A 97 51 42 AA 31 2C 33 00 1F |.QB,58:.QB.1,3..|
00000F10: 13 30 07 9F 31 2C 46 44 25 2C 44 52 2C 46 24 00 |.0..1,FD%,DR,F$.|
00000F20: 2B 13 3A 07 5A 50 B2 54 49 3A 8E 00 54 13 6C 07 |+.:.ZP.TI:..T.l.|
00000F30: 46 24 B2 22 30 3A 22 AA 46 24 3A 9F 31 35 2C 38 |F$."0:".F$:.15,8|
00000F40: 2C 31 35 3A 8B 44 52 B2 31 A7 98 31 35 2C 22 53 |,15:.DR.1..15,"S|
00000F50: 22 3B 46 24 00 7D 13 76 07 46 24 B2 46 24 AA 22 |";F$.}.v.F$.F$."|
00000F60: 2C 53 2C 22 AA CA 28 22 52 57 22 2C 44 52 AA 31 |,S,"..("RW",DR.1|
00000F70: 2C 31 29 3A 9F 31 2C 38 2C 32 2C 46 24 00 92 13 |,1):.1,8,2,F$...|
00000F80: 80 07 84 31 35 2C 45 52 2C 45 52 24 2C 54 4B 2C |...15,ER,ER$,TK,|
00000F90: 53 43 00 A5 13 8A 07 8B 45 52 B2 30 A7 45 52 24 |SC......ER.0.ER$|
00000FA0: B2 22 22 3A 8E 00 BD 13 94 07 99 22 11 22 45 52 |."":......."."ER|
00000FB0: 3B 45 52 24 3B 54 4B 3B 53 43 3A A0 31 00 E4 13 |;ER$;TK;SC:.1...|
00000FC0: 9E 07 99 22 11 46 49 58 20 50 52 4F 42 4C 45 4D |...".FIX PROBLEM|
00000FD0: 20 41 4E 44 20 54 59 50 45 20 27 43 4F 4E 54 27 | AND TYPE 'CONT'|
00000FE0: 2E 22 3A 80 00 EE 13 A8 07 89 31 39 31 30 00 00 |.":.......1910..|
00000FF0: 14 D0 07 A0 31 3A 8B 46 44 25 B2 38 A7 A0 31 35 |....1:.FD%.8..15|
00001000: 00 06 14 DA 07 8E 00 27 14 60 EA 49 4E 24 B2 22 |.......'.`.IN$."|
00001010: 20 22 3A 5A 54 B2 54 49 3A 5A 43 B2 32 3A 5A 44 | ":ZT.TI:ZC.2:ZD|
00001020: 24 B2 C7 28 32 30 29 00 3D 14 6A EA A1 5A 24 3A |$..(20).=.j..Z$:|
00001030: 8B 5A 24 B3 B1 22 22 A7 36 30 30 37 30 00 6D 14 |.Z$.."".60070.m.|
00001040: 74 EA 8B 5A 54 B3 B2 54 49 A7 99 CA 28 22 20 A6 |t..ZT..TI...(" .|
00001050: 22 2C 5A 43 2C 31 29 3B 22 9D 22 3B 3A 5A 43 B2 |",ZC,1);".";:ZC.|
00001060: 33 AB 5A 43 3A 5A 54 B2 54 49 AA 31 35 00 78 14 |3.ZC:ZT.TI.15.x.|
00001070: 7E EA 89 36 30 30 31 30 00 A8 14 A6 EA 5A B2 C6 |~..60010.....Z..|
00001080: 28 5A 24 29 3A 5A 4C B2 C3 28 49 4E 24 29 3A 8B |(Z$):ZL..(IN$):.|
00001090: 28 5A AF 31 32 37 29 B3 33 32 A7 99 22 20 9D 22 |(Z.127).32.." ."|
000010A0: 3B 3A 89 36 30 31 31 30 00 D8 14 B0 EA 8B 46 4C |;:.60110......FL|
000010B0: AF 28 5A AF 31 32 37 29 B1 36 34 AF 28 5A AF 31 |.(Z.127).64.(Z.1|
000010C0: 32 37 29 B3 39 31 A7 5A 24 B2 C7 28 28 5A AA 31 |27).91.Z$..((Z.1|
000010D0: 32 38 29 AF 32 35 35 29 00 EA 14 BA EA 8B 5A 4C |28).255)......ZL|
000010E0: B1 32 35 34 A7 36 30 30 31 30 00 05 15 C4 EA 49 |.254.60010.....I|
000010F0: 4E 24 B2 49 4E 24 AA 5A 24 3A 99 5A 24 3B 5A 44 |N$.IN$.Z$:.Z$;ZD|
00001100: 24 3B 5A 24 3B 00 24 15 CE EA 8B 5A B2 31 33 A7 |$;Z$;.$....Z.13.|
00001110: 49 4E 24 B2 CA 28 49 4E 24 2C 32 29 3A 99 43 52 |IN$..(IN$,2):.CR|
00001120: 24 3B 3A 8E 00 50 15 D8 EA 8B 5A B2 32 30 AF 5A |$;:..P....Z.20.Z|
00001130: 4C B1 31 A7 49 4E 24 B2 C8 28 49 4E 24 2C 5A 4C |L.1.IN$..(IN$,ZL|
00001140: AB 31 29 3A 99 22 9D 22 3B 3A 89 36 30 30 31 30 |.1):.".";:.60010|
00001150: 00 83 15 E2 EA 8B 5A B2 31 34 31 A7 5A 24 B2 C7 |......Z.141.Z$..|
00001160: 28 AB 32 30 AC 28 5A 4C B1 31 29 29 3A 81 5A B2 |(.20.(ZL.1)):.Z.|
00001170: 32 A4 5A 4C 3A 99 5A 24 3B 3A 82 5A 3A 89 36 30 |2.ZL:.Z$;:.Z:.60|
00001180: 30 30 30 00 8E 15 EC EA 89 36 30 30 31 30 00 A5 |000......60010..|
00001190: 15 8C EB 99 22 93 22 3A 9C 3A 8D 36 30 34 30 30 |....".":.:.60400|
000011A0: 3A 89 31 30 30 00 B3 15 F0 EB 43 52 24 B2 C7 28 |:.100.....CR$..(|
000011B0: 31 33 29 00 DF 15 FA EB 51 42 B2 32 31 34 3A 51 |13).....QB.214:Q|
000011C0: 43 B2 31 38 37 3A 8B C2 28 35 30 30 30 30 29 B2 |C.187:..(50000).|
000011D0: 30 A7 51 42 B2 32 34 33 3A 51 43 B2 36 32 35 00 |0.QB.243:QC.625.|
000011E0: E5 15 04 EC 8E 00 FF 15 54 EC 81 49 B2 31 A4 31 |........T..I.1.1|
000011F0: 30 3A 99 22 C0 C0 C0 C0 22 3B 3A 82 49 3A 8E 00 |0:."....";:.I:..|
00001200: 22 16 30 F2 99 22 93 11 11 22 3B A3 39 29 3B 22 |".0.."...";.9);"|
00001210: 43 55 52 53 4F 52 20 23 31 39 20 20 47 42 4F 4F |CURSOR #19 GBOO|
00001220: 4B 42 00 4C 16 3A F2 99 22 11 20 43 4F 50 59 52 |KB.L.:..". COPYR|
00001230: 49 47 48 54 20 28 43 29 20 31 39 38 30 20 20 42 |IGHT (C) 1980 B|
00001240: 59 20 48 41 4C 20 43 41 52 45 59 11 00 57 16 44 |Y HAL CAREY..W.D|
00001250: F2 8D 36 30 35 30 30 00 76 16 4E F2 99 22 11 45 |..60500.v.N..".E|
00001260: 4E 54 45 52 20 41 4E 44 20 4D 4F 44 49 46 59 20 |NTER AND MODIFY |
00001270: 47 52 41 44 45 53 00 97 16 58 F2 99 22 11 50 52 |GRADES...X..".PR|
00001280: 45 53 53 20 12 52 45 54 55 52 4E 92 20 54 4F 20 |ESS .RETURN. TO |
00001290: 42 45 47 49 4E 22 3B 00 AC 16 62 F2 A1 54 24 3A |BEGIN";...b..T$:|
000012A0: 8B 54 24 B2 22 22 A7 36 32 30 35 30 00 B7 16 6C |.T$."".62050...l|
000012B0: F2 89 36 30 33 30 30 00 00 00 |..60300... |
..(....:.59468,12:.B(1).255.."GBOOK B":.
.R.... GBOOKB COPYRIGHT (C) 1980 HAL CAR
EY.K.... 9002 BERCLAIR ROAD...... HUNTSV
ILLE AL 95802.....:...... CURSOR #19 APR
IL 80.F.... BOX 550, GOLETA, CA. 93017.L
...:...... AS OF 29 APR 80 9:15PM...Z..6
2000...D.FD%.1:. I/O UNIT.....NS.40:NA.1
5.B.R..A$(NA),W(NA),S$(NS),G%(NS,NA),B$(
5).....B$(1)." 90":B$(2)." 80":B$(3)." 7
0":B$(4)." 65":AS$."ASSIGNMENT".....E$."
.":.I.1.40:E$.E$." ":....@.F$."GRADES".E
.J.DR.0:.1800...T.C$."0":TS.0:TA.0:ML.0.
..H..1,C$...R..1,TS...|..1,TA.(....S.1.T
S:.1,S$(S):N.C(S$(S)):.N.ML.ML.N./....S.
F....A.1.TA:.1,A$(A):..\....A.1.TA:.1,W(
A):..{....A.1.TA:.S.1.TS:.1,G%(S,A).....
.S,A...B..2000...G.ML.ML.1:.ML.22.ML.22.
J.L.HY$.".":.I.1.ML:HY$.HY$.".":.I...V..
"........":.".GBOOKB........C$......:.TS
"STUDENTS,"TA;AS$;"S.'...."..C. CHANGE
A GRADE.J...."..E. EXIT, DROPPING CHANG
ES.F.... " SINCE LAST .S.AVE......"..G
. ENTER LIST OF GRADES......"..S. SAVE
......"..P. PRINT HARDCOPY.Z...."...CHO
ICE? ";:.60000:G$.H(IN$,1)...&..I.1.5:.G
$.J("CEGSP",I,1).570...0..:.470.#.:..I.5
90,950,660,850,1070.X.N..".CHANGE GRADE
FOR ";AS$;" # ";:.60000:A.E(IN$).|.S..A.
1.A.TA..".NO SUCH ";AS$:.655...X..E$;AS$
;A;A$(A)...B..".STUDENT # ";:.60000:S.E(
IN$)...G..S.1.S.TS..".NO SUCH STUDENT":.
655...L..E$"STUDENT"S;S$(S)...Q.T.G%(S,A
):.".GRADE WAS ";:.T..0..T.(.R..T.0.."*"
.V.V..".CHANGE GRADE TO: ";:.60000:.IN$.
"".625.S.{..IN$."*".G%(S,A)..1:.470.....
N.E(IN$):.N.0..".<0??":.625......N.100..
".>100??":.625.A...G%(S,A).N:.470.P....1
680:.470......TA.NA.."NO ROOM":.I.1.500:
.I:.470.....TA.TA.1:A.TA.-....".GRADE IN
PUTS FOR ";AS$;" #"TA.^...."..4-LETTER N
AME OF "AS$": ";:.60000:G$.IN$.|...A$(A)
.I(" ".H(G$,4),4)...F.."..WEIGHT OF "
AS$": ";:.60000:W(A).E(IN$).X.P.."."AS$"
#"TA" "A$(A)", WEIGHT:"W(A)".."...Z..".
(TYPE * FOR INCOMPLETE "AS$;").."...." #
NAME GRADE......S.1.TS.F
....S;H(S$(S).HY$,ML);.D....60000:G$.IN$
:.IN$."".760......G$."*".G%(S,A)..1:.810
.....G.E(G$):.G.100..".>100??":.760.....
.G.0..".<0??":.760.H. .G%(S,A).G.N.*...W
.4..470...R.F$."GRADES"...\.DR.1:.1800:R
$.CR$...F..1,C$R$;:.1700.$.P..1,TS;R$;:.
1700.8.Z..1,TA;R$;:.1700.X....S.1.TS:.1,
S$(S)R$;:.1700:..X....A.1.TA:.1,A$(A)R$;
:.1700:.......A.1.TA:.1,W(A)R$;:.1700:..
C....A.1.TA:.S.1.TS:.1,G%(S,A)R$;:.1700:
.:..R....2000:.470......"....":.......".
TURN ON PRINTER....8.."..INSERT PAPER TO
TOP OF GUIDE..L.B..".WHAT IS TODAY'S DA
TE? ";:.60000:D$.IN$.D.L..".JUST A MINUT
E....X.V..S.1.TS:N.0:D.0...`..A.1.TA...J
..G%(S,A)..0.N.N.G%(S,A).W(A):D.D.W(A)..
.T..A.U.~.G%(S,0).0:.D.G%(S,0).N.D..5...
...S......A.1.TA:N.0:D.0......S.1.TS:.G%
(S,A)..0.N.N.G%(S,A):D.D.1.!....S.>...G%
(0,A).0:.D.G%(0,A).N.D.E....A.N.N..4,4.[
.X..4:.4:.4.E....4,C$.R....4,D$:.4.....P
$." ".AS$:P$." ".H(P$.HY$,ML)." ".
A....A.1.TA:P$.P$." ".D(A)." ":..Y...P$
.P$."AVERAGE #"......4,P$.....P$.""...
(..A.1.TA:P$.P$.H(A$(A)." ",5) :../
.2.P$.P$." INC".@.<..4,.ML.4);P$
.P.F.P$." WEIGHT ":P$." ".H(P$.HY$
,ML)." "...P..A.1.TA:P$.P$.I(" ".D(W(A)
),3)." ":....Z..4,P$...D..4...N..S.1.TS
:N.0...X.:P$.I(D(S),2)." ".H(S$(S).HY$,M
L)." "......A.1.TA......G%(S,A).0.P$.P$.
" * ":N.N.1:.1440.@...P$.P$.I(" ".D(
G%(S,A)),3)." ".G. ..A.D...X$.I(" ".D
(G%(S,0)),3).Z...P$.P$." ".X$." ".....I
.1...H..X$.B$(I).I.I.1:.1480...R.P$.P$."
".J("ABCDF&",I,1).P....N.P$.P$." ".D(N)
.Z....4,P$......S......4.....P$.AS$." AV
ERAGE ":.4," ";H(P$.HY$,ML);."....A.1.
TA.E....4,I(" ".D(G%(0,A)),4);" ";.L.
"..A.\.6..I.1.7:.4:..C.@. 4.L.J..470...R
..S.2.TS:S$.S$(S):J.S.1...|..S$.S$(J).S$
(J.1).S$(J):J.J.1:.1660.B...S$(J.1).S$:.
:..W....DL.1.1500:.DL:.......ZZ..B(QC).1
720......TI.Z9.20.FD%.8.1790......FD%.2.
1760."....59411,53.1.B..ZZ.1.60:..?.L..5
9411,61.I.V..1790.A....59456,B(59456).23
9.P....ZZ.1.60:.......59456,B(59456).16.
....Z9.TI:.......FD%.8.1900.L....".REWIN
D TAPE"FD%"AND PRESS .RETURN......Z$:.Z$
."".1820...&..QB,122:.QB.1,2...+..FD%.2.
.QB,58:.QB.1,3...0..1,FD%,DR,F$.+.:.ZP.T
I:..T.L.F$."0:".F$:.15,8,15:.DR.1..15,"S
";F$.}.V.F$.F$.",S,".J("RW",DR.1,1):.1,8
,2,F$......15,ER,ER$,TK,SC......ER.0.ER$
."":......."."ER;ER$;TK;SC: 1......".FIX
PROBLEM AND TYPE 'CONT'.":.......1910..
.P. 1:.FD%.8. 15...Z...'.`.IN$." ":ZT.TI
:ZC.2:ZD$.G(20).=.J..Z$:.Z$.."".60070.M.
T..ZT..TI..J(" .",ZC,1);".";:ZC.3.ZC:ZT.
TI.15.X.~..60010.....Z.F(Z$):ZL.C(IN$):.
(Z.127).32.." .";:.60110.X....FL.(Z.127)
.64.(Z.127).91.Z$.G((Z.128).255)......ZL
.254.60010...D.IN$.IN$.Z$:.Z$;ZD$;Z$;.$.
N..Z.13.IN$.J(IN$,2):.CR$;:..P.X..Z.20.Z
L.1.IN$.H(IN$,ZL.1):.".";:.60010......Z.
141.Z$.G(.20.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.60
000......60010......".":.:.60400:.100...
..CR$.G(13).....QB.214:QC.187:.B(50000).
0.QB.243:QC.625.........T..I.1.10:."....
";:.I:..".0.."...";.9);"CURSOR #19 GBOO
KB.L.:..". COPYRIGHT (C) 1980 BY HAL CA
REY..W.D..60500.V.N..".ENTER AND MODIFY
GRADES...X..".PRESS .RETURN. TO BEGIN";.
..B..T$:.T$."".62050...L..60300...
> CLICK IMAGE PREVIEW FOR FULL MODAL