Multiple names: CLASS PROGRAM.C, CLASS RECORD
FILE INFORMATION
FILENAME(S):
• CLASS PROGRAM.C<br>• CLASS RECORD
FILE TYPE(S): PRG
FILE SIZE: 5.8K
FIRST SEEN: 2025-11-30 01:08:03
APPEARS ON: 4 disk(s)
FILE HASH
1a39e1aac7f3fbc2a52a59c94e4839225ee6b006b523ee8c869ae25165d54c5c
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | CLASS PROGRAM.C | PRG | Treasure Chest - Wolfgang Rauprich | 4 | 2 | DOWNLOAD FILE |
| D IVERSE | CLASS PROGRAM.C | PRG | Treasure Chest - Wolfgang Rauprich | 4 | 2 | DOWNLOAD FILE |
| TERRY TO BOB | CLASS RECORD | PRG | UK CD | 5 | 4 | DOWNLOAD FILE |
| TPUG MAY 84 C | CLASS PROGRAM.C | PRG | DuncanTwain | 33 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 00 2F 08 02 00 8F 20 2A |********./.... *|
00000020: 42 59 20 4D 49 4B 45 20 46 4C 41 56 45 4C 2A 00 |BY MIKE FLAVEL*.|
00000030: 46 08 03 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |F.... **********|
00000040: 2A 2A 2A 2A 2A 2A 00 67 08 09 00 86 53 24 28 34 |******.g....S$(4|
00000050: 30 29 2C 41 28 34 30 29 2C 4D 28 34 30 2C 34 30 |0),A(40),M(40,40|
00000060: 29 2C 55 28 34 30 29 00 89 08 0A 00 97 35 33 32 |),U(40)......532|
00000070: 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A 99 C7 |80,0:.53281,0:..|
00000080: 28 38 29 2C C7 28 31 34 29 00 A8 08 0B 00 99 22 |(8),.(14)......"|
00000090: 93 22 A3 31 33 29 22 98 B0 C0 C0 C0 C0 C0 C0 C0 |.".13)".........|
000000A0: C0 C0 C0 C0 C0 C0 AE 22 00 C4 08 14 00 99 A3 31 |.......".......1|
000000B0: 33 29 22 98 DD C3 4C 41 53 53 20 D0 52 4F 47 52 |3)"...LASS .ROGR|
000000C0: 41 4D DD 22 00 E0 08 15 00 99 A3 31 33 29 22 AD |AM.".......13)".|
000000D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 97 22 |..............."|
000000E0: 00 F6 08 1E 00 99 22 11 22 3B A3 31 38 29 22 05 |......".";.18)".|
000000F0: CD 45 4E 55 97 22 00 07 09 23 00 99 A3 31 38 29 |.ENU."...#...18)|
00000100: 22 05 A3 A3 A3 A3 22 00 22 09 28 00 99 22 11 99 |".....".".(.."..|
00000110: 5B 31 5D 20 C3 52 45 41 54 20 41 20 C3 4C 41 53 |[1] .REAT A .LAS|
00000120: 53 22 00 3C 09 29 00 99 22 A3 A3 A3 A3 A3 A3 A3 |S".<.)..".......|
00000130: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 97 22 00 56 09 32 |...........".V.2|
00000140: 00 99 22 5B 32 5D 20 D2 45 56 49 45 57 20 41 20 |.."[2] .EVIEW A |
00000150: C3 4C 41 53 53 22 00 70 09 33 00 99 22 A3 A3 A3 |.LASS".p.3.."...|
00000160: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 22 |..............."|
00000170: 00 85 09 37 00 99 22 98 5B 33 5D 20 C1 44 44 20 |...7..".[3] .DD |
00000180: CD 41 52 4B 22 00 99 09 38 00 99 22 A3 A3 A3 A3 |.ARK"...8.."....|
00000190: A3 A3 A3 A3 A3 A3 A3 A3 22 00 B1 09 3C 00 99 22 |........"...<.."|
000001A0: 9E 5B 34 5D 20 C1 44 44 20 D3 54 55 44 45 4E 54 |.[4] .DD .TUDENT|
000001B0: 22 00 C8 09 3D 00 99 22 A3 A3 A3 A3 A3 A3 A3 A3 |"...=.."........|
000001C0: A3 A3 A3 A3 A3 A3 A3 22 00 E7 09 3E 00 99 22 98 |......."...>..".|
000001D0: 5B 35 5D 20 D0 52 49 4E 54 20 4F 55 54 20 4F 46 |[5] .RINT OUT OF|
000001E0: 20 43 4C 41 53 53 22 00 05 0A 3F 00 99 22 A3 A3 | CLASS"...?.."..|
000001F0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000200: A3 A3 A3 A3 22 00 1D 0A 41 00 99 22 81 5B 36 5D |...."...A..".[6]|
00000210: 20 C3 48 41 4E 47 45 20 4D 41 52 4B 22 00 34 0A | .HANGE MARK".4.|
00000220: 42 00 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |B.."............|
00000230: A3 A3 A3 22 00 45 0A 43 00 99 22 9B 5B 37 5D 20 |...".E.C..".[7] |
00000240: C5 4E 44 20 22 00 54 0A 44 00 99 22 A3 A3 A3 A3 |.ND ".T.D.."....|
00000250: A3 A3 A3 22 00 73 0A 45 00 99 22 05 5B 38 5D 20 |...".s.E..".[8] |
00000260: D2 45 41 44 20 45 52 52 4F 52 20 43 48 41 4E 4E |.EAD ERROR CHANN|
00000270: 45 4C 22 00 91 0A 46 00 99 22 A3 A3 A3 A3 A3 A3 |EL"...F.."......|
00000280: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000290: 22 00 99 0A 4A 00 A1 41 24 00 A9 0A 4B 00 8B C5 |"...J..A$...K...|
000002A0: 28 41 24 29 B2 30 A7 37 34 00 B5 0A 50 00 41 B2 |(A$).0.74...P.A.|
000002B0: C5 28 41 24 29 00 E1 0A 5A 00 91 41 89 31 30 30 |.(A$)...Z..A.100|
000002C0: 2C 35 30 30 2C 39 30 30 2C 31 36 30 30 2C 31 39 |,500,900,1600,19|
000002D0: 30 30 2C 32 34 30 30 2C 32 33 30 30 2C 33 31 30 |00,2400,2300,310|
000002E0: 30 00 F5 0A 64 00 8F 20 43 52 45 41 54 20 41 20 |0...d.. CREAT A |
000002F0: 43 4C 41 53 53 00 0C 0B 69 00 99 22 99 93 C3 52 |CLASS...i.."...R|
00000300: 45 41 54 20 41 20 43 4C 41 53 53 22 00 2D 0B 6E |EAT A CLASS".-.n|
00000310: 00 85 22 97 11 11 C5 4E 54 45 52 20 4E 41 4D 45 |.."....NTER NAME|
00000320: 20 4F 46 20 43 4C 41 53 53 22 3B 43 24 00 46 0B | OF CLASS";C$.F.|
00000330: 78 00 99 22 93 11 11 C7 52 45 41 54 45 52 20 54 |x.."....REATER T|
00000340: 48 41 4E 20 31 22 00 72 0B 79 00 85 22 13 C5 4E |HAN 1".r.y.."..N|
00000350: 54 45 52 20 4E 55 4D 42 45 52 20 4F 46 20 53 54 |TER NUMBER OF ST|
00000360: 55 44 45 4E 54 53 20 49 4E 20 43 4C 41 53 53 22 |UDENTS IN CLASS"|
00000370: 3B 53 00 80 0B 7A 00 8B 53 B3 B2 31 A7 31 32 31 |;S...z..S..1.121|
00000380: 00 8B 0B 82 00 81 5A B2 31 A4 53 00 AD 0B 86 00 |......Z.1.S.....|
00000390: 99 22 93 11 D3 54 55 44 45 4E 54 53 20 45 4E 54 |."...TUDENTS ENT|
000003A0: 45 52 45 44 20 53 4F 20 46 41 52 3A 22 00 C5 0B |ERED SO FAR:"...|
000003B0: 87 00 81 46 B2 31 A4 5A 3A 99 53 24 28 46 29 2C |...F.1.Z:.S$(F),|
000003C0: 3A 82 46 3A 99 00 E5 0B 8C 00 99 22 13 05 C5 4E |:.F:......."...N|
000003D0: 54 45 52 20 53 54 55 44 45 4E 54 20 23 22 3B 5A |TER STUDENT #";Z|
000003E0: 3B 22 05 22 3B 00 F0 0B 96 00 85 53 24 28 5A 29 |;".";......S$(Z)|
000003F0: 00 FB 0B A0 00 8F 20 5A 45 52 4F 00 30 0C A1 00 |...... ZERO.0...|
00000400: 99 22 93 97 C8 4F 57 20 4D 41 4E 59 20 4D 41 52 |."...OW MANY MAR|
00000410: 4B 53 20 44 4F 20 59 4F 55 20 57 49 53 48 20 54 |KS DO YOU WISH T|
00000420: 4F 20 47 49 56 45 20 22 3A 99 53 24 28 5A 29 3B |O GIVE ":.S$(Z);|
00000430: 00 4E 0C A5 00 99 22 20 41 54 20 54 48 45 20 50 |.N...." AT THE P|
00000440: 52 45 53 45 4E 54 20 54 49 4D 45 2E 97 22 00 58 |RESENT TIME..".X|
00000450: 0C AA 00 85 41 28 5A 29 00 68 0C AB 00 8B 41 28 |....A(Z).h....A(|
00000460: 5A 29 B3 31 A7 32 32 30 00 76 0C B4 00 81 59 B2 |Z).1.220.v....Y.|
00000470: 31 A4 41 28 5A 29 00 9C 0C BE 00 99 22 93 C5 4E |1.A(Z)......"..N|
00000480: 54 45 52 20 4D 41 52 4B 20 23 22 3B 59 3B 22 20 |TER MARK #";Y;" |
00000490: 46 4F 52 20 22 3B 53 24 28 5A 29 3B 00 A8 0C C8 |FOR ";S$(Z);....|
000004A0: 00 85 4D 28 5A 2C 59 29 00 AF 0C D2 00 82 59 00 |..M(Z,Y)......Y.|
000004B0: BB 0C DC 00 99 22 93 22 3A 82 5A 00 D8 0C E6 00 |.....".":.Z.....|
000004C0: 99 22 93 CE 4F 57 20 53 41 56 49 4E 47 20 55 4E |."..OW SAVING UN|
000004D0: 44 45 52 20 22 3B 43 24 00 E3 0C F0 00 8F 20 53 |DER ";C$...... S|
000004E0: 41 56 45 00 1D 0D FA 00 99 22 11 11 11 11 11 11 |AVE......"......|
000004F0: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |................|
00000500: 1D 1D 1D 50 52 45 53 53 20 41 4E 59 20 4B 45 59 |...PRESS ANY KEY|
00000510: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 30 0D | TO CONTINUE".0.|
00000520: 04 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 36 30 |...A$:.A$."".260|
00000530: 00 3A 0D 09 01 8D 33 30 30 30 00 54 0D 0E 01 9F |.:....3000.T....|
00000540: 32 2C 38 2C 32 2C 22 30 3A 22 AA 43 24 AA 22 2C |2,8,2,"0:".C$.",|
00000550: 53 2C 57 22 00 5D 0D 18 01 98 32 2C 53 00 68 0D |S,W".]....2,S.h.|
00000560: 36 01 81 5A B2 31 A4 53 00 74 0D 40 01 98 32 2C |6..Z.1.S.t.@..2,|
00000570: 41 28 5A 29 00 7B 0D 4A 01 82 5A 00 86 0D 63 01 |A(Z).{.J..Z...c.|
00000580: 81 5A B2 31 A4 53 00 94 0D 68 01 81 59 B2 31 A4 |.Z.1.S...h..Y.1.|
00000590: 41 28 5A 29 00 A2 0D 72 01 98 32 2C 4D 28 5A 2C |A(Z)...r..2,M(Z,|
000005A0: 59 29 00 A9 0D 7C 01 82 59 00 B0 0D 86 01 82 5A |Y)...|..Y......Z|
000005B0: 00 BB 0D A4 01 81 5A B2 31 A4 53 00 C8 0D AE 01 |......Z.1.S.....|
000005C0: 98 32 2C 53 24 28 5A 29 00 CF 0D B8 01 82 5A 00 |.2,S$(Z)......Z.|
000005D0: D6 0D C2 01 A0 32 00 E7 0D CC 01 99 22 93 12 C4 |.....2......"...|
000005E0: CF CE C5 21 21 92 22 00 0E 0E D6 01 99 22 D0 52 |...!!."......".R|
000005F0: 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 52 |ESS ANY KEY TO R|
00000600: 45 54 55 52 4E 20 54 4F 20 4D 45 4E 55 22 00 21 |ETURN TO MENU".!|
00000610: 0E E0 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 38 |....A$:.A$."".48|
00000620: 30 00 27 0E EA 01 8A 00 3A 0E F4 01 8F 20 52 45 |0.'.....:.... RE|
00000630: 56 49 45 57 20 43 4C 41 53 53 00 52 0E F9 01 99 |VIEW CLASS.R....|
00000640: 22 93 97 D2 45 56 49 45 57 20 41 20 43 4C 41 53 |"...EVIEW A CLAS|
00000650: 53 22 00 72 0E FE 01 85 22 11 11 C5 4E 54 45 52 |S".r...."...NTER|
00000660: 20 4E 41 4D 45 20 4F 46 20 43 4C 41 53 53 22 3B | NAME OF CLASS";|
00000670: 43 24 00 9A 0E 08 02 99 22 D0 4C 45 41 53 45 20 |C$......".LEASE |
00000680: 57 41 49 54 20 46 4F 52 20 41 42 4F 55 54 20 31 |WAIT FOR ABOUT 1|
00000690: 30 20 53 45 43 4F 4E 44 53 22 00 A5 0E 12 02 8F |0 SECONDS"......|
000006A0: 20 57 4F 52 4B 00 BF 0E 1C 02 9F 32 2C 38 2C 32 | WORK......2,8,2|
000006B0: 2C 22 30 3A 22 AA 43 24 AA 22 2C 53 2C 52 22 00 |,"0:".C$.",S,R".|
000006C0: C8 0E 26 02 84 32 2C 53 00 D3 0E 44 02 81 5A B2 |..&..2,S...D..Z.|
000006D0: 31 A4 53 00 DF 0E 4E 02 84 32 2C 41 28 5A 29 00 |1.S...N..2,A(Z).|
000006E0: E6 0E 58 02 82 5A 00 F1 0E 76 02 81 5A B2 31 A4 |..X..Z...v..Z.1.|
000006F0: 53 00 FF 0E 80 02 81 59 B2 31 A4 41 28 5A 29 00 |S......Y.1.A(Z).|
00000700: 0D 0F 8A 02 84 32 2C 4D 28 5A 2C 59 29 00 14 0F |.....2,M(Z,Y)...|
00000710: 94 02 82 59 00 1B 0F 9E 02 82 5A 00 26 0F BC 02 |...Y......Z.&...|
00000720: 81 5A B2 31 A4 53 00 33 0F C6 02 84 32 2C 53 24 |.Z.1.S.3....2,S$|
00000730: 28 5A 29 00 3A 0F D0 02 82 5A 00 41 0F DA 02 A0 |(Z).:....Z.A....|
00000740: 32 00 55 0F E4 02 99 22 93 12 C6 C9 CE C9 D3 C8 |2.U...."........|
00000750: C5 C4 21 21 22 00 7A 0F EE 02 99 22 D0 52 45 53 |..!!".z....".RES|
00000760: 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 42 45 47 |S ANY KEY TO BEG|
00000770: 49 4E 20 52 45 56 49 45 57 22 00 8D 0F F3 02 A1 |IN REVIEW"......|
00000780: 41 24 3A 8B 41 24 B2 22 22 A7 37 35 35 00 98 0F |A$:.A$."".755...|
00000790: F8 02 81 5A B2 31 A4 53 00 AF 0F 02 03 99 22 93 |...Z.1.S......".|
000007A0: D3 54 55 44 45 4E 54 3A 22 3B 53 24 28 5A 29 00 |.TUDENT:";S$(Z).|
000007B0: BE 0F 0C 03 99 22 11 CD 41 52 4B 53 3A 22 00 EB |....."..ARKS:"..|
000007C0: 0F 11 03 8B 41 28 5A 29 B3 31 A7 99 22 CE 4F 20 |....A(Z).1..".O |
000007D0: 4D 41 52 4B 20 41 54 20 50 52 45 53 45 4E 54 20 |MARK AT PRESENT |
000007E0: 54 49 4D 45 2E 22 3A 89 38 33 31 00 F9 0F 16 03 |TIME.":.831.....|
000007F0: 81 59 B2 31 A4 41 28 5A 29 00 0A 10 20 03 99 4D |.Y.1.A(Z)... ..M|
00000800: 28 5A 2C 59 29 3B 22 1D 22 3B 00 1B 10 2A 03 41 |(Z,Y);".";...*.A|
00000810: 56 B2 4D 28 5A 2C 59 29 AA 41 56 00 22 10 34 03 |V.M(Z,Y).AV.".4.|
00000820: 82 59 00 34 10 3D 03 54 B2 54 AA 28 41 56 AD 41 |.Y.4.=.T.T.(AV.A|
00000830: 28 5A 29 29 00 5B 10 3E 03 99 22 13 11 11 11 11 |(Z)).[.>..".....|
00000840: 11 11 11 11 11 C1 56 45 52 41 47 45 20 49 53 3A |......VERAGE IS:|
00000850: 22 3B 28 41 56 AD 41 28 5A 29 29 00 61 10 3F 03 |";(AV.A(Z)).a.?.|
00000860: 8F 00 83 10 40 03 99 22 11 D0 52 45 53 53 20 41 |....@.."..RESS A|
00000870: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN|
00000880: 55 45 22 00 96 10 41 03 A1 41 24 3A 8B 41 24 B2 |UE"...A..A$:.A$.|
00000890: 22 22 A7 38 33 33 00 9F 10 42 03 41 56 B2 30 00 |"".833...B.AV.0.|
000008A0: A6 10 48 03 82 5A 00 B3 10 49 03 8B 54 B3 31 A7 |..H..Z...I..T.1.|
000008B0: 38 34 36 00 D2 10 4D 03 99 22 C3 4C 41 53 53 20 |846...M..".LASS |
000008C0: 41 56 45 52 41 47 45 3A 22 3B 54 AD 53 3A 89 38 |AVERAGE:";T.S:.8|
000008D0: 35 30 00 F8 10 4E 03 99 22 11 C3 4C 41 53 53 20 |50...N.."..LASS |
000008E0: 41 56 45 52 41 47 45 20 49 53 20 55 4E 44 45 54 |AVERAGE IS UNDET|
000008F0: 45 52 4D 49 4E 41 4C 22 00 21 11 52 03 99 22 11 |ERMINAL".!.R..".|
00000900: 11 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 |..RESS ANY KEY T|
00000910: 4F 20 52 45 54 55 52 4E 20 54 4F 20 4D 45 4E 55 |O RETURN TO MENU|
00000920: 22 00 34 11 5C 03 A1 41 24 3A 8B 41 24 B2 22 22 |".4.\..A$:.A$.""|
00000930: A7 38 36 30 00 3A 11 66 03 8A 00 4A 11 84 03 8F |.860.:.f...J....|
00000940: 20 41 44 44 20 4D 41 52 4B 53 00 5D 11 89 03 99 | ADD MARKS.]....|
00000950: 22 98 93 C1 44 44 20 4D 41 52 4B 53 22 00 7A 11 |"...DD MARKS".z.|
00000960: 8E 03 85 22 11 11 C5 4E 54 45 52 20 43 4C 41 53 |..."...NTER CLAS|
00000970: 53 20 4E 41 4D 45 22 3B 43 24 00 94 11 98 03 9F |S NAME";C$......|
00000980: 32 2C 38 2C 32 2C 22 30 3A 22 AA 43 24 AA 22 2C |2,8,2,"0:".C$.",|
00000990: 53 2C 52 22 00 9D 11 A2 03 84 32 2C 53 00 A8 11 |S,R"......2,S...|
000009A0: AC 03 81 5A B2 31 A4 53 00 B4 11 B6 03 84 32 2C |...Z.1.S......2,|
000009B0: 41 28 5A 29 00 BB 11 C0 03 82 5A 00 C6 11 CA 03 |A(Z)......Z.....|
000009C0: 81 5A B2 31 A4 53 00 D4 11 D4 03 81 59 B2 31 A4 |.Z.1.S......Y.1.|
000009D0: 41 28 5A 29 00 E2 11 DE 03 84 32 2C 4D 28 5A 2C |A(Z)......2,M(Z,|
000009E0: 59 29 00 E9 11 E8 03 82 59 00 F0 11 F2 03 82 5A |Y)......Y......Z|
000009F0: 00 FB 11 FC 03 81 5A B2 31 A4 53 00 08 12 06 04 |......Z.1.S.....|
00000A00: 84 32 2C 53 24 28 5A 29 00 0F 12 10 04 82 5A 00 |.2,S$(Z)......Z.|
00000A10: 16 12 1A 04 A0 32 00 3B 12 24 04 99 22 50 52 45 |.....2.;.$.."PRE|
00000A20: 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 42 45 |SS ANY KEY TO BE|
00000A30: 47 49 4E 20 52 45 56 49 45 57 22 00 4F 12 2E 04 |GIN REVIEW".O...|
00000A40: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 30 37 30 00 |.A$:.A$."".1070.|
00000A50: 5A 12 38 04 81 5A B2 31 A4 53 00 71 12 42 04 99 |Z.8..Z.1.S.q.B..|
00000A60: 22 93 D3 54 55 44 45 4E 54 3A 22 3B 53 24 28 5A |"..TUDENT:";S$(Z|
00000A70: 29 00 80 12 4C 04 99 22 11 CD 41 52 4B 53 3A 22 |)...L.."..ARKS:"|
00000A80: 00 AD 12 51 04 8B 41 28 5A 29 B3 31 A7 99 22 CE |...Q..A(Z).1..".|
00000A90: 4F 20 4D 41 52 4B 20 41 54 20 50 52 45 53 45 4E |O MARK AT PRESEN|
00000AA0: 54 20 54 49 4D 45 22 3A 89 31 31 36 30 00 BB 12 |T TIME":.1160...|
00000AB0: 56 04 81 59 B2 31 A4 41 28 5A 29 00 CC 12 60 04 |V..Y.1.A(Z)...`.|
00000AC0: 99 4D 28 5A 2C 59 29 3B 22 1D 22 3B 00 DD 12 6A |.M(Z,Y);".";...j|
00000AD0: 04 41 56 B2 4D 28 5A 2C 59 29 AA 41 56 00 E4 12 |.AV.M(Z,Y).AV...|
00000AE0: 74 04 82 59 00 0A 13 7E 04 99 22 13 11 11 11 11 |t..Y...~..".....|
00000AF0: 11 11 11 11 C1 56 45 52 41 47 45 20 49 53 3A 22 |.....VERAGE IS:"|
00000B00: 3B 28 41 56 AD 41 28 5A 29 29 00 2B 13 88 04 99 |;(AV.A(Z)).+....|
00000B10: 22 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 |".RESS ANY KEY T|
00000B20: 4F 20 43 4F 4E 54 49 4E 55 45 22 00 3F 13 92 04 |O CONTINUE".?...|
00000B30: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 31 37 30 00 |.A$:.A$."".1170.|
00000B40: 48 13 9C 04 41 56 B2 30 00 4F 13 A6 04 82 5A 00 |H...AV.0.O....Z.|
00000B50: 78 13 C4 04 85 22 93 C5 4E 54 45 52 20 4E 41 4D |x...."..NTER NAM|
00000B60: 45 20 59 4F 55 20 57 49 53 48 20 54 4F 20 41 44 |E YOU WISH TO AD|
00000B70: 44 20 54 4F 22 3B 5A 24 00 96 13 CE 04 99 22 93 |D TO";Z$......".|
00000B80: CE 4F 57 20 53 45 41 52 43 48 49 4E 47 20 46 4F |.OW SEARCHING FO|
00000B90: 52 20 22 3B 5A 24 00 A1 13 D8 04 81 5A B2 31 A4 |R ";Z$......Z.1.|
00000BA0: 53 00 B4 13 E2 04 8B 5A 24 B2 53 24 28 5A 29 A7 |S......Z$.S$(Z).|
00000BB0: 31 32 38 30 00 BB 13 EC 04 82 5A 00 F3 13 F6 04 |1280......Z.....|
00000BC0: 99 22 93 CE 41 4D 45 20 4E 4F 54 20 46 4F 55 4E |."..AME NOT FOUN|
00000BD0: 44 2E 20 D2 45 54 55 52 4E 49 4E 47 20 54 4F 20 |D. .ETURNING TO |
00000BE0: 4D 45 4E 55 22 3A 81 50 B2 31 A4 33 30 30 30 3A |MENU":.P.1.3000:|
00000BF0: 82 3A 8A 00 06 14 00 05 99 22 93 CE 41 4D 45 20 |.:......."..AME |
00000C00: 46 4F 55 4E 44 22 00 2A 14 0A 05 99 22 13 11 C8 |FOUND".*...."...|
00000C10: 45 52 45 20 41 52 45 20 48 49 53 20 43 55 52 52 |ERE ARE HIS CURR|
00000C20: 45 4E 54 20 4D 41 52 4B 53 22 00 38 14 14 05 81 |ENT MARKS".8....|
00000C30: 59 B2 31 A4 41 28 5A 29 00 49 14 1E 05 99 4D 28 |Y.1.A(Z).I....M(|
00000C40: 5A 2C 59 29 3B 22 20 22 3B 00 4F 14 28 05 82 00 |Z,Y);" ";.O.(...|
00000C50: 76 14 32 05 99 22 13 11 11 11 11 C5 4E 54 45 52 |v.2.."......NTER|
00000C60: 20 54 48 45 20 22 3B 41 28 5A 29 AA 31 3B 22 20 | THE ";A(Z).1;" |
00000C70: 4D 41 52 4B 2E 22 00 87 14 3C 05 85 4D 28 5A 2C |MARK."...<..M(Z,|
00000C80: 41 28 5A 29 AA 31 29 00 97 14 46 05 41 28 5A 29 |A(Z).1)...F.A(Z)|
00000C90: B2 41 28 5A 29 AA 31 00 C0 14 47 05 99 22 9E D0 |.A(Z).1...G.."..|
00000CA0: 52 45 53 53 20 5B 46 31 5D 20 54 4F 20 41 44 44 |RESS [F1] TO ADD|
00000CB0: 20 41 4E 4F 54 48 45 52 20 4D 41 52 4B 2E 97 22 | ANOTHER MARK.."|
00000CC0: 00 D4 14 48 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 |...H..A$:.A$."".|
00000CD0: 31 33 35 32 00 E5 14 49 05 8B 41 24 B2 22 85 22 |1352...I..A$."."|
00000CE0: A7 31 32 32 30 00 EF 14 4B 05 8D 33 30 30 30 00 |.1220...K..3000.|
00000CF0: 02 15 50 05 99 22 93 CE 4F 57 20 53 41 56 49 4E |..P.."..OW SAVIN|
00000D00: 47 22 00 1D 15 5A 05 9F 32 2C 38 2C 32 2C 22 40 |G"...Z..2,8,2,"@|
00000D10: 30 3A 22 AA 43 24 AA 22 2C 53 2C 57 22 00 26 15 |0:".C$.",S,W".&.|
00000D20: 64 05 98 32 2C 53 00 31 15 6E 05 81 5A B2 31 A4 |d..2,S.1.n..Z.1.|
00000D30: 53 00 3D 15 78 05 98 32 2C 41 28 5A 29 00 44 15 |S.=.x..2,A(Z).D.|
00000D40: 82 05 82 5A 00 4F 15 8C 05 81 5A B2 31 A4 53 00 |...Z.O....Z.1.S.|
00000D50: 5D 15 96 05 81 59 B2 31 A4 41 28 5A 29 00 6B 15 |]....Y.1.A(Z).k.|
00000D60: A0 05 98 32 2C 4D 28 5A 2C 59 29 00 72 15 AA 05 |...2,M(Z,Y).r...|
00000D70: 82 59 00 79 15 B4 05 82 5A 00 84 15 BE 05 81 5A |.Y.y....Z......Z|
00000D80: B2 31 A4 53 00 91 15 C8 05 98 32 2C 53 24 28 5A |.1.S......2,S$(Z|
00000D90: 29 00 98 15 D2 05 82 5A 00 9F 15 DC 05 A0 32 00 |)......Z......2.|
00000DA0: A5 15 E6 05 8A 00 B9 15 40 06 8F 20 41 44 44 20 |........@.. ADD |
00000DB0: 41 20 53 54 55 44 45 4E 54 00 D7 15 45 06 99 22 |A STUDENT...E.."|
00000DC0: 93 9E C1 44 44 20 53 54 55 44 45 4E 54 20 54 4F |...DD STUDENT TO|
00000DD0: 20 43 4C 41 53 53 22 00 0C 16 4A 06 99 22 11 11 | CLASS"...J.."..|
00000DE0: 9F C5 4E 54 45 52 20 C3 4C 41 53 53 20 4E 41 4D |..NTER .LASS NAM|
00000DF0: 45 20 59 4F 55 20 57 49 53 48 20 54 4F 20 41 44 |E YOU WISH TO AD|
00000E00: 44 20 53 54 55 44 45 4E 54 54 4F 22 00 14 16 54 |D STUDENTTO"...T|
00000E10: 06 85 43 24 00 2E 16 5E 06 9F 32 2C 38 2C 32 2C |..C$...^..2,8,2,|
00000E20: 22 30 3A 22 AA 43 24 AA 22 2C 53 2C 52 22 00 37 |"0:".C$.",S,R".7|
00000E30: 16 68 06 84 32 2C 53 00 42 16 72 06 81 5A B2 31 |.h..2,S.B.r..Z.1|
00000E40: A4 53 00 4E 16 7C 06 84 32 2C 41 28 5A 29 00 55 |.S.N.|..2,A(Z).U|
00000E50: 16 86 06 82 5A 00 60 16 90 06 81 5A B2 31 A4 53 |....Z.`....Z.1.S|
00000E60: 00 6E 16 9A 06 81 59 B2 31 A4 41 28 5A 29 00 7C |.n....Y.1.A(Z).||
00000E70: 16 A4 06 84 32 2C 4D 28 5A 2C 59 29 00 83 16 B8 |....2,M(Z,Y)....|
00000E80: 06 82 59 00 8A 16 C2 06 82 5A 00 95 16 CC 06 81 |..Y......Z......|
00000E90: 5A B2 31 A4 53 00 A2 16 D6 06 84 32 2C 53 24 28 |Z.1.S......2,S$(|
00000EA0: 5A 29 00 A9 16 E0 06 82 5A 00 B0 16 EA 06 A0 32 |Z)......Z......2|
00000EB0: 00 D5 16 F4 06 85 22 C5 4E 54 45 52 20 4E 41 4D |......".NTER NAM|
00000EC0: 45 20 4F 46 20 53 54 55 44 45 4E 54 22 3B 53 24 |E OF STUDENT";S$|
00000ED0: 28 53 AA 31 29 00 01 17 FE 06 99 22 93 05 C5 4E |(S.1)......"...N|
00000EE0: 54 45 52 20 4E 55 4D 42 45 52 20 4F 46 20 4D 41 |TER NUMBER OF MA|
00000EF0: 52 4B 53 20 54 4F 20 42 45 20 47 49 56 45 4E 97 |RKS TO BE GIVEN.|
00000F00: 22 00 0D 17 08 07 85 41 28 53 AA 31 29 00 20 17 |"......A(S.1). .|
00000F10: 0D 07 8B 41 28 53 AA 31 29 B3 31 A7 31 38 36 30 |...A(S.1).1.1860|
00000F20: 00 30 17 12 07 81 59 B2 31 A4 41 28 53 AA 31 29 |.0....Y.1.A(S.1)|
00000F30: 00 59 17 1C 07 99 22 1E C5 4E 54 45 52 20 4D 41 |.Y...."..NTER MA|
00000F40: 52 4B 20 23 22 3B 59 3B 22 20 46 4F 52 20 22 3B |RK #";Y;" FOR ";|
00000F50: 53 24 28 5A 29 3B 22 97 22 00 67 17 26 07 85 4D |S$(Z);".".g.&..M|
00000F60: 28 53 AA 31 2C 59 29 00 6E 17 30 07 82 59 00 78 |(S.1,Y).n.0..Y.x|
00000F70: 17 44 07 53 B2 53 AA 31 00 82 17 49 07 8D 33 30 |.D.S.S.1...I..30|
00000F80: 30 30 00 8C 17 4E 07 89 31 33 36 30 00 A1 17 6C |00...N..1360...l|
00000F90: 07 8F 20 43 4C 41 53 53 20 50 52 49 4E 54 4F 55 |.. CLASS PRINTOU|
00000FA0: 54 00 B9 17 6D 07 99 22 93 98 C3 4C 41 53 53 20 |T...m.."...LASS |
00000FB0: 50 52 49 4E 54 4F 55 54 22 00 D6 17 71 07 85 22 |PRINTOUT"...q.."|
00000FC0: 11 11 C5 4E 54 45 52 20 43 4C 41 53 53 20 4E 41 |...NTER CLASS NA|
00000FD0: 4D 45 22 3B 43 24 00 F0 17 76 07 9F 32 2C 38 2C |ME";C$...v..2,8,|
00000FE0: 32 2C 22 30 3A 22 AA 43 24 AA 22 2C 53 2C 52 22 |2,"0:".C$.",S,R"|
00000FF0: 00 F9 17 80 07 84 32 2C 53 00 04 18 8A 07 81 5A |......2,S......Z|
00001000: B2 31 A4 53 00 10 18 94 07 84 32 2C 41 28 5A 29 |.1.S......2,A(Z)|
00001010: 00 17 18 9E 07 82 5A 00 22 18 A8 07 81 5A B2 31 |......Z."....Z.1|
00001020: A4 53 00 30 18 B2 07 81 59 B2 31 A4 41 28 5A 29 |.S.0....Y.1.A(Z)|
00001030: 00 3E 18 BC 07 84 32 2C 4D 28 5A 2C 59 29 00 45 |.>....2,M(Z,Y).E|
00001040: 18 C6 07 82 59 00 4C 18 D0 07 82 5A 00 57 18 DA |....Y.L....Z.W..|
00001050: 07 81 5A B2 31 A4 53 00 64 18 E4 07 84 32 2C 53 |..Z.1.S.d....2,S|
00001060: 24 28 5A 29 00 6B 18 EE 07 82 5A 00 72 18 F8 07 |$(Z).k....Z.r...|
00001070: A0 32 00 A2 18 02 08 99 22 93 05 D7 48 45 4E 20 |.2......"...HEN |
00001080: 59 4F 55 20 48 41 56 45 20 50 41 50 45 52 20 49 |YOU HAVE PAPER I|
00001090: 4E 20 54 48 45 20 50 52 49 4E 54 45 52 20 41 4E |N THE PRINTER AN|
000010A0: 44 22 00 DB 18 0C 08 99 22 59 4F 55 20 48 41 56 |D"......"YOU HAV|
000010B0: 45 20 54 55 52 4E 45 44 20 54 48 45 20 50 52 49 |E TURNED THE PRI|
000010C0: 4E 54 45 52 20 4F 4E 2C 20 50 52 45 53 53 20 20 |NTER ON, PRESS |
000010D0: 20 41 4E 59 20 4B 45 59 2E 97 22 00 EF 18 16 08 | ANY KEY..".....|
000010E0: A1 41 24 3A 8B 41 24 B2 22 22 A7 32 30 37 30 00 |.A$:.A$."".2070.|
000010F0: FA 18 20 08 9F 33 2C 34 2C 37 00 17 19 2A 08 98 |.. ..3,4,7...*..|
00001100: 33 2C C7 28 31 36 29 22 31 38 C3 4C 41 53 53 20 |3,.(16)"18.LASS |
00001110: D2 45 50 4F 52 54 22 00 1E 19 34 08 98 33 00 36 |.EPORT"...4..3.6|
00001120: 19 3E 08 98 33 2C 22 C3 4C 41 53 53 20 4E 41 4D |.>..3,".LASS NAM|
00001130: 45 3A 22 3B 43 24 00 40 19 48 08 98 33 3A 98 33 |E:";C$.@.H..3:.3|
00001140: 00 4B 19 52 08 81 5A B2 31 A4 53 00 63 19 5C 08 |.K.R..Z.1.S.c.\.|
00001150: 98 33 2C 22 D3 54 55 44 45 4E 54 3A 22 3B 53 24 |.3,".TUDENT:";S$|
00001160: 28 5A 29 00 7B 19 66 08 98 33 2C 22 D3 54 55 44 |(Z).{.f..3,".TUD|
00001170: 45 4E 54 53 20 CD 41 52 4B 53 22 00 AB 19 6B 08 |ENTS .ARKS"...k.|
00001180: 8B 41 28 5A 29 B3 31 A7 98 33 2C 22 CE 4F 20 4D |.A(Z).1..3,".O M|
00001190: 41 52 4B 53 20 41 54 20 50 52 45 53 45 4E 54 20 |ARKS AT PRESENT |
000011A0: 54 49 4D 45 22 3A 89 32 31 38 38 00 B9 19 70 08 |TIME":.2188...p.|
000011B0: 81 59 B2 31 A4 41 28 5A 29 00 C8 19 75 08 54 B2 |.Y.1.A(Z)...u.T.|
000011C0: 54 AA 4D 28 5A 2C 59 29 00 DB 19 7A 08 98 33 2C |T.M(Z,Y)...z..3,|
000011D0: 4D 28 5A 2C 59 29 3B 22 20 22 3B 00 E2 19 84 08 |M(Z,Y);" ";.....|
000011E0: 82 59 00 00 1A 89 08 98 33 2C C7 28 31 30 29 22 |.Y......3,.(10)"|
000011F0: C1 56 45 52 41 47 45 3A 22 3B 54 AD 41 28 5A 29 |.VERAGE:";T.A(Z)|
00001200: 00 13 1A 8A 08 43 41 B2 43 41 AA 28 54 AD 41 28 |.....CA.CA.(T.A(|
00001210: 5A 29 29 00 1B 1A 8C 08 54 B2 30 00 28 1A 8D 08 |Z)).....T.0.(...|
00001220: 98 33 2C C7 28 31 33 29 00 2F 1A 8E 08 82 5A 00 |.3,.(13)./....Z.|
00001230: 3E 1A 92 08 8B 43 41 B3 31 A7 32 31 39 36 00 64 |>....CA.1.2196.d|
00001240: 1A 93 08 98 33 2C 22 C3 4C 41 53 53 20 41 56 45 |....3,".LASS AVE|
00001250: 52 41 47 45 20 49 53 3A 22 3B 43 41 AD 53 3A 89 |RAGE IS:";CA.S:.|
00001260: 32 32 30 30 00 8B 1A 94 08 98 33 2C 22 C3 4C 41 |2200......3,".LA|
00001270: 53 53 20 41 56 45 52 41 47 45 20 49 53 20 55 4E |SS AVERAGE IS UN|
00001280: 44 45 54 45 52 4D 49 4E 41 4C 22 00 98 1A 95 08 |DETERMINAL".....|
00001290: 98 33 2C C7 28 31 33 29 00 9F 1A 98 08 A0 33 00 |.3,.(13)......3.|
000012A0: A5 1A AC 08 8A 00 B0 1A FC 08 99 22 93 22 3A 80 |...........".":.|
000012B0: 00 C2 1A 60 09 8F 20 43 48 41 4E 47 45 20 4D 41 |...`.. CHANGE MA|
000012C0: 52 4B 00 D7 1A 65 09 99 22 81 93 C3 48 41 4E 47 |RK...e.."...HANG|
000012D0: 45 20 4D 41 52 4B 22 00 F7 1A 6A 09 85 22 11 11 |E MARK"...j.."..|
000012E0: C5 4E 54 45 52 20 4E 41 4D 45 20 4F 46 20 43 4C |.NTER NAME OF CL|
000012F0: 41 53 53 22 3B 43 24 00 1F 1B 74 09 99 22 D0 4C |ASS";C$...t..".L|
00001300: 45 41 53 45 20 57 41 49 54 20 46 4F 52 20 41 42 |EASE WAIT FOR AB|
00001310: 4F 55 54 20 31 30 20 53 45 43 4F 4E 44 53 22 00 |OUT 10 SECONDS".|
00001320: 2A 1B 7E 09 8F 20 57 4F 52 4B 00 44 1B 88 09 9F |*.~.. WORK.D....|
00001330: 32 2C 38 2C 32 2C 22 30 3A 22 AA 43 24 AA 22 2C |2,8,2,"0:".C$.",|
00001340: 53 2C 52 22 00 4D 1B 92 09 84 32 2C 53 00 58 1B |S,R".M....2,S.X.|
00001350: 9C 09 81 5A B2 31 A4 53 00 64 1B A6 09 84 32 2C |...Z.1.S.d....2,|
00001360: 41 28 5A 29 00 6B 1B B0 09 82 5A 00 76 1B BA 09 |A(Z).k....Z.v...|
00001370: 81 5A B2 31 A4 53 00 84 1B C4 09 81 59 B2 31 A4 |.Z.1.S......Y.1.|
00001380: 41 28 5A 29 00 92 1B CE 09 84 32 2C 4D 28 5A 2C |A(Z)......2,M(Z,|
00001390: 59 29 00 99 1B D8 09 82 59 00 A0 1B E2 09 82 5A |Y)......Y......Z|
000013A0: 00 AB 1B EC 09 81 5A B2 31 A4 53 00 B8 1B F6 09 |......Z.1.S.....|
000013B0: 84 32 2C 53 24 28 5A 29 00 BF 1B 00 0A 82 5A 00 |.2,S$(Z)......Z.|
000013C0: C6 1B 0A 0A A0 32 00 EE 1B 14 0A 99 22 05 93 C5 |.....2......"...|
000013D0: 4E 54 45 52 20 4E 41 4D 45 20 59 4F 55 20 57 49 |NTER NAME YOU WI|
000013E0: 53 48 20 54 4F 20 43 48 41 4E 47 45 2E 22 00 F6 |SH TO CHANGE."..|
000013F0: 1B 1E 0A 85 56 24 00 01 1C 28 0A 81 5A B2 31 A4 |....V$...(..Z.1.|
00001400: 53 00 14 1C 32 0A 8B 53 24 28 5A 29 B2 56 24 A7 |S...2..S$(Z).V$.|
00001410: 32 36 34 30 00 1B 1C 3C 0A 82 5A 00 53 1C 46 0A |2640...<..Z.S.F.|
00001420: 99 22 CE 41 4D 45 20 4E 4F 54 20 46 4F 55 4E 44 |.".AME NOT FOUND|
00001430: 2E 20 D2 45 54 55 52 4E 49 4E 47 20 54 4F 20 4D |. .ETURNING TO M|
00001440: 45 4E 55 2E 22 3A 81 47 B2 31 A4 33 30 30 30 3A |ENU.":.G.1.3000:|
00001450: 82 3A 8A 00 74 1C 50 0A 99 22 93 97 CE 41 4D 45 |.:..t.P.."...AME|
00001460: 3A 22 3B 53 24 28 5A 29 3A 99 22 11 05 CD 41 52 |:";S$(Z):."...AR|
00001470: 4B 53 3A 22 00 82 1C 5A 0A 81 59 B2 31 A4 41 28 |KS:"...Z..Y.1.A(|
00001480: 5A 29 00 92 1C 64 0A 99 4D 28 5A 2C 59 29 22 20 |Z)...d..M(Z,Y)" |
00001490: 22 3B 00 99 1C 6E 0A 82 59 00 C7 1C 78 0A 85 22 |";...n..Y...x.."|
000014A0: 13 11 11 11 11 11 11 C5 4E 54 45 52 20 4D 41 52 |........NTER MAR|
000014B0: 4B 20 59 4F 55 20 57 49 53 48 20 54 4F 20 43 48 |K YOU WISH TO CH|
000014C0: 41 4E 47 45 22 3B 47 00 D5 1C 82 0A 81 58 B2 31 |ANGE";G......X.1|
000014D0: A4 41 28 5A 29 00 E8 1C 8C 0A 8B 47 B2 4D 28 5A |.A(Z)......G.M(Z|
000014E0: 2C 58 29 A7 32 37 33 30 00 EF 1C 96 0A 82 58 00 |,X).2730......X.|
000014F0: 27 1D A0 0A 99 22 CD 41 52 4B 20 4E 4F 54 20 46 |'....".ARK NOT F|
00001500: 4F 55 4E 44 2E 20 D2 45 54 55 52 4E 49 4E 47 20 |OUND. .ETURNING |
00001510: 54 4F 20 4D 45 4E 55 2E 22 3A 81 47 B2 31 A4 33 |TO MENU.":.G.1.3|
00001520: 30 30 30 3A 82 3A 8A 00 3C 1D AA 0A 99 22 93 05 |000:.:..<...."..|
00001530: CD 41 52 4B 20 46 4F 55 4E 44 2E 22 00 59 1D B4 |.ARK FOUND.".Y..|
00001540: 0A 85 22 C5 4E 54 45 52 20 4E 45 57 20 4D 41 52 |..".NTER NEW MAR|
00001550: 4B 22 3B 4D 28 5A 2C 58 29 00 63 1D BE 0A 89 31 |K";M(Z,X).c....1|
00001560: 33 36 30 00 6F 1D B8 0B 88 46 4C 41 47 B2 30 00 |360.o....FLAG.0.|
00001570: 7C 1D C2 0B 81 5A B2 31 A4 53 AB 31 00 95 1D CC ||....Z.1.S.1....|
00001580: 0B 8B 53 24 28 5A 29 B3 B2 53 24 28 5A AA 31 29 |..S$(Z)..S$(Z.1)|
00001590: A7 33 30 37 30 00 C2 1D D6 0B 48 24 B2 53 24 28 |.3070.....H$.S$(|
000015A0: 5A 29 3A 48 B2 41 28 5A 29 3A 81 51 B2 31 A4 41 |Z):H.A(Z):.Q.1.A|
000015B0: 28 5A 29 3A 55 28 51 29 B2 4D 28 5A 2C 51 29 3A |(Z):U(Q).M(Z,Q):|
000015C0: 82 51 00 FF 1D E0 0B 53 24 28 5A 29 B2 53 24 28 |.Q.....S$(Z).S$(|
000015D0: 5A AA 31 29 3A 41 28 5A 29 B2 41 28 5A AA 31 29 |Z.1):A(Z).A(Z.1)|
000015E0: 3A 81 51 B2 31 A4 41 28 5A AA 31 29 3A 4D 28 5A |:.Q.1.A(Z.1):M(Z|
000015F0: 2C 51 29 B2 4D 28 5A AA 31 2C 51 29 3A 82 51 00 |,Q).M(Z.1,Q):.Q.|
00001600: 34 1E EA 0B 53 24 28 5A AA 31 29 B2 48 24 3A 41 |4...S$(Z.1).H$:A|
00001610: 28 5A AA 31 29 B2 48 3A 81 51 B2 31 A4 41 28 5A |(Z.1).H:.Q.1.A(Z|
00001620: AA 31 29 3A 4D 28 5A AA 31 2C 51 29 B2 55 28 51 |.1):M(Z.1,Q).U(Q|
00001630: 29 3A 82 51 00 40 1E F4 0B 88 46 4C 41 47 B2 31 |):.Q.@....FLAG.1|
00001640: 00 47 1E FE 0B 82 5A 00 58 1E 08 0C 8B 46 4C 41 |.G....Z.X....FLA|
00001650: 47 B2 31 A7 33 30 30 30 00 5E 1E 12 0C 8E 00 77 |G.1.3000.^.....w|
00001660: 1E 1C 0C 8F 20 52 45 41 44 20 45 52 52 4F 52 20 |.... READ ERROR |
00001670: 43 48 41 4E 4E 45 4C 00 99 1E 26 0C 99 22 93 98 |CHANNEL...&.."..|
00001680: D2 45 41 44 20 44 52 49 56 45 20 45 52 52 4F 52 |.EAD DRIVE ERROR|
00001690: 20 43 48 41 4E 4E 45 4C 22 00 A6 1E 30 0C 9F 31 | CHANNEL"...0..1|
000016A0: 35 2C 38 2C 31 35 00 BA 1E 3A 0C 84 31 35 2C 41 |5,8,15...:..15,A|
000016B0: 24 2C 42 24 2C 43 24 2C 44 24 00 C2 1E 44 0C A0 |$,B$,C$,D$...D..|
000016C0: 31 35 00 F0 1E 4E 0C 99 22 11 C4 52 49 56 45 20 |15...N.."..RIVE |
000016D0: 53 54 41 54 55 53 3A 22 3B 41 24 3B 22 20 22 3B |STATUS:";A$;" ";|
000016E0: 42 24 3B 22 20 22 3B 43 24 3B 22 20 22 3B 44 24 |B$;" ";C$;" ";D$|
000016F0: 00 13 1F 58 0C 99 22 11 11 D0 52 45 53 53 20 41 |...X.."...RESS A|
00001700: 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E |NY KEY TO CONTIN|
00001710: 55 45 22 00 27 1F 62 0C A1 41 24 3A 8B 41 24 B2 |UE".'.b..A$:.A$.|
00001720: 22 22 A7 33 31 37 30 00 2D 1F 6C 0C 8A 00 00 00 |"".3170.-.l.....|
....... ****************./.... *BY MIKE
FLAVEL*.F.... ****************.G....S$(4
0),A(40),M(40,40),U(40)......53280,0:.53
281,0:.G(8),G(14)......".".13)".........
.......".D.....13)"..CLASS PROGRAM."....
...13)"................"......".";.18)".
MENU."...#...18)".....".".(.."..[1] CREA
T A CLASS".<.).."..................".V.2
.."[2] REVIEW A CLASS".P.3.."...........
......."...7..".[3] ADD MARK"...8.."....
........"...<..".[4] ADD STUDENT".H.=.."
..............."...>..".[5] PRINT OUT OF
CLASS"...?.."......................"...
A..".[6] CHANGE MARK".4.B.."............
...".E.C..".[7] END ".T.D..".......".S.E
..".[8] READ ERROR CHANNEL"...F.."......
................"...J..A$...K..E(A$).0.7
4...P.A.E(A$)...Z..A.100,500,900,1600,19
00,2400,2300,3100...D.. CREAT A CLASS...
I.."..CREAT A CLASS".-.N.."...ENTER NAME
OF CLASS";C$.F.X.."...GREATER THAN 1".R
.Y..".ENTER NUMBER OF STUDENTS IN CLASS"
;S...Z..S..1.121......Z.1.S......"..STUD
ENTS ENTERED SO FAR:".E....F.1.Z:.S$(F),
:.F:......."..ENTER STUDENT #";Z;".";...
...S$(Z)... .. ZERO.0...."..HOW MANY MAR
KS DO YOU WISH TO GIVE ":.S$(Z);.N...."
AT THE PRESENT TIME..".X....A(Z).H....A(
Z).1.220.V....Y.1.A(Z)......".ENTER MARK
#";Y;" FOR ";S$(Z);...H..M(Z,Y)...R..Y.
.....".":.Z.X....".NOW SAVING UNDER ";C$
...... SAVE......"......................
...PRESS ANY KEY TO CONTINUE".0....A$:.A
$."".260.:....3000.T....2,8,2,"0:".C$.",
S,W".]....2,S.H.6..Z.1.S.T.@..2,A(Z).{.J
..Z...C..Z.1.S...H..Y.1.A(Z)...R..2,M(Z,
Y)...|..Y......Z......Z.1.S.H....2,S$(Z)
.O....Z.V.B. 2...L.."..DONE!!."...V.."PR
ESS ANY KEY TO RETURN TO MENU".!....A$:.
A$."".480.'.....:.... REVIEW CLASS.R....
"..REVIEW A CLASS".R...."..ENTER NAME OF
CLASS";C$......"PLEASE WAIT FOR ABOUT 1
0 SECONDS"...... WORK......2,8,2,"0:".C$
.",S,R".H.&..2,S.S.D..Z.1.S...N..2,A(Z).
..X..Z...V..Z.1.S......Y.1.A(Z)......2,M
(Z,Y)......Y......Z.&....Z.1.S.3.F..2,S$
(Z).:.P..Z.A.Z. 2.U...."..FINISHED!!".Z.
..."PRESS ANY KEY TO BEGIN REVIEW"......
A$:.A$."".755......Z.1.S......".STUDENT:
";S$(Z)......".MARKS:"......A(Z).1.."NO
MARK AT PRESENT TIME.":.831......Y.1.A(Z
)... ..M(Z,Y);".";...*.AV.M(Z,Y).AV.".4.
.Y.4.=.T.T.(AV.A(Z)).[.>.."..........AVE
RAGE IS:";(AV.A(Z)).A.?.....@..".PRESS A
NY KEY TO CONTINUE"...A..A$:.A$."".833..
.B.AV.0...H..Z...I..T.1.846.R.M.."CLASS
AVERAGE:";T.S:.850...N..".CLASS AVERAGE
IS UNDETERMINAL".!.R.."..PRESS ANY KEY T
O RETURN TO MENU".4.\..A$:.A$."".860.:.F
...J.... ADD MARKS.]...."..ADD MARKS".Z.
..."..ENTER CLASS NAME";C$......2,8,2,"0
:".C$.",S,R"......2,S......Z.1.S......2,
A(Z)......Z.F.J..Z.1.S.T.T..Y.1.A(Z)....
..2,M(Z,Y)......Y......Z......Z.1.S.....
.2,S$(Z)......Z..... 2.;.$.."PRESS ANY K
EY TO BEGIN REVIEW".O....A$:.A$."".1070.
Z.8..Z.1.S.Q.B..".STUDENT:";S$(Z)...L.."
.MARKS:"...Q..A(Z).1.."NO MARK AT PRESEN
T TIME":.1160...V..Y.1.A(Z).L.`..M(Z,Y);
".";...J.AV.M(Z,Y).AV...T..Y...~..".....
....AVERAGE IS:";(AV.A(Z)).+...."PRESS A
NY KEY TO CONTINUE".?....A$:.A$."".1170.
H...AV.0.O....Z.X.D..".ENTER NAME YOU WI
SH TO ADD TO";Z$...N..".NOW SEARCHING FO
R ";Z$...X..Z.1.S......Z$.S$(Z).1280....
..Z......".NAME NOT FOUND. RETURNING TO
MENU":.P.1.3000:.:.......".NAME FOUND".*
...."..HERE ARE HIS CURRENT MARKS".8....
Y.1.A(Z).I....M(Z,Y);" ";.O.(...V.2.."..
...ENTER THE ";A(Z).1;" MARK."...<..M(Z,
A(Z).1)...F.A(Z).A(Z).1...G..".PRESS [F1
] TO ADD ANOTHER MARK..".T.H..A$:.A$."".
1352...I..A$.".".1220...K..3000...P..".N
OW SAVING"...Z..2,8,2,"@0:".C$.",S,W".&.
D..2,S.1.N..Z.1.S.=.X..2,A(Z).D....Z.O..
..Z.1.S.]....Y.1.A(Z).K. ..2,M(Z,Y).R...
.Y.Y....Z......Z.1.S...H..2,S$(Z)...R..Z
..... 2.........@.. ADD A STUDENT.W.E.."
..ADD STUDENT TO CLASS"...J.."...ENTER C
LASS NAME YOU WISH TO ADD STUDENTTO"...T
..C$...^..2,8,2,"0:".C$.",S,R".7.H..2,S.
B.R..Z.1.S.N.|..2,A(Z).U....Z.`....Z.1.S
.N....Y.1.A(Z).|....2,M(Z,Y)......Y...B.
.Z...L..Z.1.S...V..2,S$(Z)......Z..... 2
.U...."ENTER NAME OF STUDENT";S$(S.1)...
..."..ENTER NUMBER OF MARKS TO BE GIVEN.
"......A(S.1). ....A(S.1).1.1860.0....Y.
1.A(S.1).Y....".ENTER MARK #";Y;" FOR ";
S$(Z);".".G.&..M(S.1,Y).N.0..Y.X.D.S.S.1
...I..3000...N..1360...L.. CLASS PRINTOU
T...M.."..CLASS PRINTOUT".V.Q.."..ENTER
CLASS NAME";C$...V..2,8,2,"0:".C$.",S,R"
......2,S......Z.1.S......2,A(Z)......Z.
"....Z.1.S.0....Y.1.A(Z).>....2,M(Z,Y).E
.F..Y.L.P..Z.W.Z..Z.1.S.D....2,S$(Z).K..
..Z.R... 2......"..WHEN YOU HAVE PAPER I
N THE PRINTER AND"......"YOU HAVE TURNED
THE PRINTER ON, PRESS ANY KEY..".....
.A$:.A$."".2070... ..3,4,7...*..3,G(16)"
18CLASS REPORT"...4..3.6.>..3,"CLASS NAM
E:";C$.@.H..3:.3.K.R..Z.1.S.C.\..3,"STUD
ENT:";S$(Z).{.F..3,"STUDENTS MARKS"...K.
.A(Z).1..3,"NO MARKS AT PRESENT TIME":.2
188...P..Y.1.A(Z).H.U.T.T.M(Z,Y)...Z..3,
M(Z,Y);" ";......Y......3,G(10)"AVERAGE:
";T.A(Z).....CA.CA.(T.A(Z)).....T.0.(...
.3,G(13)./....Z.>....CA.1.2196.D....3,"C
LASS AVERAGE IS:";CA.S:.2200......3,"CLA
SS AVERAGE IS UNDETERMINAL"......3,G(13)
..... 3............".":..B.`.. CHANGE MA
RK.W.E.."..CHANGE MARK"...J.."..ENTER NA
ME OF CLASS";C$...T.."PLEASE WAIT FOR AB
OUT 10 SECONDS".*.~.. WORK.D....2,8,2,"0
:".C$.",S,R".M....2,S.X....Z.1.S.D....2,
A(Z).K....Z.V....Z.1.S...D..Y.1.A(Z)...N
..2,M(Z,Y)...X..Y. ....Z......Z.1.S.....
.2,S$(Z)......Z.F... 2......"..ENTER NAM
E YOU WISH TO CHANGE."......V$...(..Z.1.
S...2..S$(Z).V$.2640...<..Z.S.F.."NAME N
OT FOUND. RETURNING TO MENU.":.G.1.3000:
.:..T.P.."..NAME:";S$(Z):."..MARKS:"...Z
..Y.1.A(Z)...D..M(Z,Y)" ";...N..Y.G.X.."
.......ENTER MARK YOU WISH TO CHANGE";G.
U....X.1.A(Z)......G.M(Z,X).2730......X.
'. .."MARK NOT FOUND. RETURNING TO MENU.
":.G.1.3000:.:..<...."..MARK FOUND.".Y..
.."ENTER NEW MARK";M(Z,X).C....1360.O...
.FLAG.0.|.B..Z.1.S.1...L..S$(Z)..S$(Z.1)
.3070.B.V.H$.S$(Z):H.A(Z):.Q.1.A(Z):U(Q)
.M(Z,Q):.Q.....S$(Z).S$(Z.1):A(Z).A(Z.1)
:.Q.1.A(Z.1):M(Z,Q).M(Z.1,Q):.Q.4...S$(Z
.1).H$:A(Z.1).H:.Q.1.A(Z.1):M(Z.1,Q).U(Q
):.Q.@....FLAG.1.G....Z.X....FLAG.1.3000
.^.....W.... READ ERROR CHANNEL...&.."..
READ DRIVE ERROR CHANNEL"...0..15,8,15..
.:..15,A$,B$,C$,D$.B.D. 15...N..".DRIVE
STATUS:";A$;" ";B$;" ";C$;" ";D$...X..".
.PRESS ANY KEY TO CONTINUE".'.B..A$:.A$.
"".3170.-.L.....
> CLICK IMAGE PREVIEW FOR FULL MODAL