MINI GRADES.C
FILE INFORMATION
FILENAME(S): MINI GRADES.C
FILE TYPE(S): PRG
FILE SIZE: 5.9K
FIRST SEEN: 2025-10-19 22:48:29
APPEARS ON: 1 disk(s)
FILE HASH
a56ee3685e0ac6fd0847927d177d9729a43134b0b8e87a998ffd96e9dfed96af
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG NOV 84 C | MINI GRADES.C | PRG | Radd Maxx | 4 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2E 08 01 00 8D 36 30 30 30 3A 99 C7 28 31 |.......6000:..(1|
00000010: 34 37 29 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 |47):.53280,0:.53|
00000020: 32 38 31 2C 30 3A 43 4C B2 35 34 32 37 32 00 6D |281,0:CL.54272.m|
00000030: 08 02 00 81 49 B2 30 A4 33 39 3A 41 B2 31 31 30 |....I.0.39:A.110|
00000040: 34 AA 49 3A 42 B2 31 33 30 34 AA 49 3A 97 41 2C |4.I:B.1304.I:.A,|
00000050: 31 36 30 3A 97 41 AA 43 4C 2C 34 3A 97 42 2C 31 |160:.A.CL,4:.B,1|
00000060: 36 30 3A 97 42 AA 43 4C 2C 34 3A 82 49 00 AD 08 |60:.B.CL,4:.I...|
00000070: 03 00 81 49 B2 30 A4 32 30 30 A9 34 30 3A 41 B2 |...I.0.200.40:A.|
00000080: 31 31 30 34 AA 49 3A 42 B2 31 31 34 33 AA 49 3A |1104.I:B.1143.I:|
00000090: 97 41 2C 31 36 30 3A 97 41 AA 43 4C 2C 34 3A 97 |.A,160:.A.CL,4:.|
000000A0: 42 2C 31 36 30 3A 97 42 AA 43 4C 2C 34 00 EA 08 |B,160:.B.CL,4...|
000000B0: 04 00 82 49 3A 99 A3 31 33 29 22 11 11 11 11 1F |...I:..13)".....|
000000C0: 4D 49 4E 49 2D 47 52 41 44 45 53 22 3A 81 49 B2 |MINI-GRADES":.I.|
000000D0: 30 A4 34 30 30 A9 34 30 3A 41 B2 31 33 38 34 AA |0.400.40:A.1384.|
000000E0: 49 3A 42 B2 31 34 30 33 AA 49 00 27 09 05 00 43 |I:B.1403.I.'...C|
000000F0: B2 31 34 32 33 AA 49 3A 97 41 2C 31 36 30 3A 97 |.1423.I:.A,160:.|
00000100: 41 AA 43 4C 2C 35 3A 97 42 2C 31 36 30 3A 97 42 |A.CL,5:.B,160:.B|
00000110: AA 43 4C 2C 35 3A 97 43 2C 31 36 30 3A 97 43 AA |.CL,5:.C,160:.C.|
00000120: 43 4C 2C 35 3A 82 49 00 66 09 06 00 81 49 B2 30 |CL,5:.I.f....I.0|
00000130: A4 33 39 3A 41 B2 31 33 38 34 AA 49 3A 42 B2 31 |.39:A.1384.I:B.1|
00000140: 37 38 34 AA 49 3A 97 41 2C 31 36 30 3A 97 41 AA |784.I:.A,160:.A.|
00000150: 43 4C 2C 35 3A 97 42 2C 31 36 30 3A 97 42 AA 43 |CL,5:.B,160:.B.C|
00000160: 4C 2C 35 3A 82 49 00 99 09 07 00 99 A3 33 29 22 |L,5:.I.......3)"|
00000170: 11 11 11 11 11 1C 4C 45 54 54 45 52 20 47 52 41 |......LETTER GRA|
00000180: 44 45 53 22 A3 32 33 29 22 9F 4E 55 4D 45 52 49 |DES".23)".NUMERI|
00000190: 43 20 53 43 4F 52 45 53 22 00 B4 09 08 00 99 A3 |C SCORES".......|
000001A0: 39 29 22 11 11 12 1C 46 31 22 A3 32 39 29 22 12 |9)"....F1".29)".|
000001B0: 9F 46 33 22 00 FC 09 09 00 99 22 13 11 11 11 11 |.F3"......".....|
000001C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000001D0: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 9E 20 50 52 |............. PR|
000001E0: 45 53 53 20 44 45 53 49 52 45 44 20 4B 45 59 20 |ESS DESIRED KEY |
000001F0: 22 3A 81 54 B2 31 A4 32 30 30 3A 82 00 43 0A 0A |":.T.1.200:..C..|
00000200: 00 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000210: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |................|
00000220: 1D 1D 1D 9E 20 50 52 45 53 53 20 44 45 53 49 52 |.... PRESS DESIR|
00000230: 45 44 20 4B 45 59 20 22 3A 81 54 B2 31 A4 32 30 |ED KEY ":.T.1.20|
00000240: 30 3A 82 00 54 0A 0B 00 A1 41 24 3A 8B 41 24 B2 |0:..T....A$:.A$.|
00000250: 22 22 A7 39 00 6B 0A 0C 00 8B 41 24 B3 B1 22 85 |"".9.k....A$..".|
00000260: 22 AF 41 24 B3 B1 22 86 22 A7 39 00 7C 0A 0D 00 |".A$..".".9.|...|
00000270: 8B 41 24 B2 22 86 22 A7 33 30 30 30 00 B2 0A 0E |.A$.".".3000....|
00000280: 00 9C 3A 99 C7 28 31 34 37 29 3A 43 4C B2 35 34 |..:..(147):CL.54|
00000290: 32 37 32 3A 81 49 B2 31 31 30 34 A4 31 31 34 33 |272:.I.1104.1143|
000002A0: 3A 97 49 2C 31 36 30 3A 97 49 AA 43 4C 2C 31 34 |:.I,160:.I.CL,14|
000002B0: 3A 82 00 E8 0A 0F 00 81 49 B2 31 31 34 33 A4 31 |:.......I.1143.1|
000002C0: 37 30 33 A9 34 30 3A 97 49 2C 31 36 30 3A 97 49 |703.40:.I,160:.I|
000002D0: AA 43 4C 2C 31 34 3A 82 3A 81 49 B2 31 37 30 33 |.CL,14:.:.I.1703|
000002E0: A4 31 36 36 34 AB AB 31 00 21 0B 10 00 97 49 2C |.1664..1.!....I,|
000002F0: 31 36 30 3A 97 49 AA 43 4C 2C 31 34 3A 82 3A 81 |160:.I.CL,14:.:.|
00000300: 49 B2 31 36 36 34 A4 31 31 30 34 A9 AB 34 30 3A |I.1664.1104..40:|
00000310: 97 49 2C 31 36 30 3A 97 49 AA 43 4C 2C 31 34 3A |.I,160:.I.CL,14:|
00000320: 82 00 47 0B 11 00 99 A3 38 29 22 11 11 11 99 4C |..G.....8)"....L|
00000330: 45 54 54 45 52 20 47 52 41 44 45 20 41 56 45 52 |ETTER GRADE AVER|
00000340: 41 47 49 4E 47 20 22 00 55 0B 14 00 99 A3 31 37 |AGING ".U.....17|
00000350: 29 22 42 59 22 00 6D 0B 19 00 99 A3 31 32 29 22 |)"BY".m.....12)"|
00000360: 44 41 4E 49 45 4C 20 46 4C 49 4E 4E 22 00 9B 0B |DANIEL FLINN"...|
00000370: 1B 00 81 54 B2 31 A4 35 30 30 3A 82 54 3A 81 49 |...T.1.500:.T:.I|
00000380: B2 31 33 34 35 A4 31 33 38 32 3A 97 49 2C 31 36 |.1345.1382:.I,16|
00000390: 30 3A 97 49 AA 43 4C 2C 31 3A 82 00 CE 0B 1E 00 |0:.I.CL,1:......|
000003A0: 99 A3 32 29 22 11 11 11 9A 57 45 4C 43 4F 4D 45 |..2)"....WELCOME|
000003B0: 20 54 4F 20 41 20 50 52 4F 47 52 41 4D 20 54 48 | TO A PROGRAM TH|
000003C0: 41 54 20 41 4C 4C 4F 57 53 20 54 48 45 22 00 FD |AT ALLOWS THE"..|
000003D0: 0B 20 00 99 A3 32 29 22 54 45 41 43 48 45 52 20 |. ...2)"TEACHER |
000003E0: 54 4F 20 41 56 45 52 41 47 45 20 4C 45 54 54 45 |TO AVERAGE LETTE|
000003F0: 52 20 47 52 41 44 45 53 20 41 4E 44 22 00 1C 0C |R GRADES AND"...|
00000400: 22 00 99 A3 32 29 22 54 48 45 4E 20 50 52 49 4E |"...2)"THEN PRIN|
00000410: 54 20 54 48 45 4D 20 4F 55 54 2E 22 00 3E 0C 23 |T THEM OUT.".>.#|
00000420: 00 99 A3 31 31 29 22 11 11 11 11 11 11 12 9E 20 |...11)"........ |
00000430: 50 52 45 53 53 20 52 45 54 55 52 4E 20 22 00 50 |PRESS RETURN ".P|
00000440: 0C 28 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 30 |.(..A$:.A$."".40|
00000450: 00 62 0C 2D 00 8B 41 24 B3 B1 C7 28 31 33 29 A7 |.b.-..A$...(13).|
00000460: 34 30 00 6E 0C 32 00 99 C7 28 31 34 37 29 00 8F |40.n.2...(147)..|
00000470: 0C 4A 00 85 22 48 4F 57 20 4D 41 4E 59 20 53 54 |.J.."HOW MANY ST|
00000480: 55 44 45 4E 54 53 20 54 4F 44 41 59 22 3B 49 00 |UDENTS TODAY";I.|
00000490: A2 0C 4C 00 86 20 4E 24 28 49 29 2C 4F 47 24 28 |..L.. N$(I),OG$(|
000004A0: 49 29 00 C1 0C 50 00 99 3A 85 22 41 4E 44 20 48 |I)...P..:."AND H|
000004B0: 4F 57 20 4D 41 4E 59 20 47 52 41 44 45 53 22 3B |OW MANY GRADES";|
000004C0: 58 00 F0 0C 55 00 99 3A 99 22 11 11 11 11 11 49 |X...U..:.".....I|
000004D0: 53 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 43 4F |S INFORMATION CO|
000004E0: 52 52 45 43 54 3F 12 28 59 20 4F 52 20 4E 29 22 |RRECT?.(Y OR N)"|
000004F0: 00 05 0D 57 00 A1 20 42 24 3A 8B 20 42 24 B2 22 |...W.. B$:. B$."|
00000500: 22 A7 20 38 37 00 24 0D 5A 00 8B 20 42 24 B3 B1 |". 87.$.Z.. B$..|
00000510: 22 59 22 A7 20 99 20 C7 28 31 34 37 29 3A 9C 3A |"Y". . .(147):.:|
00000520: 89 20 37 34 00 30 0D 5D 00 99 C7 28 31 34 37 29 |. 74.0.]...(147)|
00000530: 00 3E 0D 5F 00 81 20 43 B2 31 20 A4 20 49 00 69 |.>._.. C.1 . I.i|
00000540: 0D 64 00 99 22 54 59 50 45 20 49 4E 20 4E 41 4D |.d.."TYPE IN NAM|
00000550: 45 20 46 4F 52 20 53 54 55 44 45 4E 54 20 23 22 |E FOR STUDENT #"|
00000560: 3B 43 3A 85 4E 24 28 43 29 00 92 0D 66 00 99 22 |;C:.N$(C)...f.."|
00000570: 12 99 20 45 4E 54 45 52 20 4F 4E 4C 59 20 4C 45 |.. ENTER ONLY LE|
00000580: 54 54 45 52 20 47 52 41 44 45 53 20 4E 45 58 54 |TTER GRADES NEXT|
00000590: 20 22 00 A0 0D 69 00 81 20 5A B2 31 20 A4 20 58 | "...i.. Z.1 . X|
000005A0: 00 E0 0D 6E 00 99 3A 99 22 45 4E 54 45 52 20 4C |...n..:."ENTER L|
000005B0: 45 54 54 45 52 20 47 52 41 44 45 20 23 22 3B 5A |ETTER GRADE #";Z|
000005C0: 3A 85 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |:.".............|
000005D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 22 3B 47 24 |............";G$|
000005E0: 00 F9 0D 04 01 8B 20 47 24 B2 22 41 22 A7 20 41 |...... G$."A". A|
000005F0: B2 31 31 3A 89 20 33 38 30 00 14 0E 0E 01 8B 20 |.11:. 380...... |
00000600: 47 24 B2 22 41 2D 22 20 A7 20 41 B2 31 30 3A 89 |G$."A-" . A.10:.|
00000610: 20 33 38 30 00 2E 0E 18 01 8B 20 47 24 B2 22 42 | 380...... G$."B|
00000620: 2B 22 20 A7 20 41 B2 39 3A 89 20 33 38 30 00 47 |+" . A.9:. 380.G|
00000630: 0E 22 01 8B 20 47 24 B2 22 42 22 20 A7 20 41 B2 |.".. G$."B" . A.|
00000640: 38 3A 89 20 33 38 30 00 61 0E 2C 01 8B 20 47 24 |8:. 380.a.,.. G$|
00000650: B2 22 42 2D 22 20 A7 20 41 B2 37 3A 89 20 33 38 |."B-" . A.7:. 38|
00000660: 30 00 7B 0E 36 01 8B 20 47 24 B2 22 43 2B 22 20 |0.{.6.. G$."C+" |
00000670: A7 20 41 B2 36 3A 89 20 33 38 30 00 95 0E 40 01 |. A.6:. 380...@.|
00000680: 8B 20 47 24 B2 22 43 22 20 A7 20 20 41 B2 35 3A |. G$."C" . A.5:|
00000690: 89 20 33 38 30 00 AF 0E 4A 01 8B 20 47 24 B2 22 |. 380...J.. G$."|
000006A0: 43 2D 22 20 A7 20 41 B2 34 3A 89 20 33 38 30 00 |C-" . A.4:. 380.|
000006B0: C9 0E 54 01 8B 20 47 24 B2 22 44 2B 22 20 A7 20 |..T.. G$."D+" . |
000006C0: 41 B2 33 3A 89 20 33 38 30 00 E2 0E 5E 01 8B 20 |A.3:. 380...^.. |
000006D0: 47 24 B2 22 44 22 20 A7 20 41 B2 32 3A 89 20 33 |G$."D" . A.2:. 3|
000006E0: 38 30 00 FC 0E 68 01 8B 20 47 24 B2 22 44 2D 22 |80...h.. G$."D-"|
000006F0: 20 A7 20 41 B2 31 3A 89 20 33 38 30 00 12 0F 6B | . A.1:. 380...k|
00000700: 01 8B 20 47 24 B2 22 46 22 A7 41 B2 30 3A 89 33 |.. G$."F".A.0:.3|
00000710: 38 30 00 1E 0F 7C 01 54 41 B2 54 41 AA 41 00 24 |80...|.TA.TA.A.$|
00000720: 0F 86 01 82 00 46 0F 90 01 99 22 11 11 41 52 45 |.....F...."..ARE|
00000730: 20 53 43 4F 52 45 53 20 43 4F 52 52 45 43 54 3F | SCORES CORRECT?|
00000740: 20 28 59 2F 4E 29 00 59 0F 95 01 A1 41 24 3A 8B | (Y/N).Y....A$:.|
00000750: 41 24 B2 22 22 A7 34 30 35 00 74 0F 9A 01 8B 41 |A$."".405.t....A|
00000760: 24 B3 B1 22 59 22 A7 54 41 B2 30 3A 41 B2 30 3A |$.."Y".TA.0:A.0:|
00000770: 89 31 30 32 00 80 0F F4 01 41 56 B2 54 41 AD 58 |.102.....AV.TA.X|
00000780: 00 8C 0F 26 02 99 C7 28 31 34 37 29 00 9C 0F 44 |...&...(147)...D|
00000790: 02 8B 41 56 B3 2E 35 31 A7 39 39 35 00 B1 0F 58 |..AV..51.995...X|
000007A0: 02 8B 20 41 56 B3 31 2E 35 31 20 A7 20 31 30 30 |.. AV.1.51 . 100|
000007B0: 30 00 C5 0F 62 02 8B 20 41 56 B3 32 2E 35 31 A7 |0...b.. AV.2.51.|
000007C0: 20 31 30 31 30 00 D9 0F 6C 02 8B 20 41 56 B3 33 | 1010...l.. AV.3|
000007D0: 2E 35 31 A7 20 31 30 32 30 00 ED 0F 76 02 8B 20 |.51. 1020...v.. |
000007E0: 41 56 B3 34 2E 35 31 A7 20 31 30 33 30 00 01 10 |AV.4.51. 1030...|
000007F0: 80 02 8B 20 41 56 B3 35 2E 35 31 A7 20 31 30 34 |... AV.5.51. 104|
00000800: 30 00 15 10 8A 02 8B 20 41 56 B3 36 2E 35 31 A7 |0...... AV.6.51.|
00000810: 20 31 30 35 30 00 29 10 94 02 8B 20 41 56 B3 37 | 1050.).... AV.7|
00000820: 2E 35 31 A7 20 31 30 36 30 00 3D 10 9E 02 8B 20 |.51. 1060.=.... |
00000830: 41 56 B3 38 2E 35 31 A7 20 31 30 37 30 00 51 10 |AV.8.51. 1070.Q.|
00000840: A8 02 8B 20 41 56 B3 39 2E 35 31 A7 20 31 30 38 |... AV.9.51. 108|
00000850: 30 00 65 10 B2 02 8B 20 41 56 B3 31 30 2E 35 31 |0.e.... AV.10.51|
00000860: A7 31 30 39 30 00 79 10 BC 02 8B 20 41 56 B3 31 |.1090.y.... AV.1|
00000870: 31 2E 35 31 A7 31 31 30 30 00 8B 10 E3 03 4F 47 |1.51.1100.....OG|
00000880: 24 B2 22 46 22 3A 89 32 30 30 30 00 9F 10 E8 03 |$."F":.2000.....|
00000890: 4F 47 24 B2 22 44 2D 22 3A 89 20 32 30 30 30 00 |OG$."D-":. 2000.|
000008A0: B2 10 F2 03 4F 47 24 B2 22 44 22 3A 89 20 32 30 |....OG$."D":. 20|
000008B0: 30 30 00 C6 10 FC 03 4F 47 24 B2 22 44 2B 22 3A |00.....OG$."D+":|
000008C0: 89 20 32 30 30 30 00 DA 10 06 04 4F 47 24 B2 22 |. 2000.....OG$."|
000008D0: 43 2D 22 3A 89 20 32 30 30 30 00 ED 10 10 04 4F |C-":. 2000.....O|
000008E0: 47 24 B2 22 43 22 3A 89 20 32 30 30 30 00 01 11 |G$."C":. 2000...|
000008F0: 1A 04 4F 47 24 B2 22 43 2B 22 3A 89 20 32 30 30 |..OG$."C+":. 200|
00000900: 30 00 15 11 24 04 4F 47 24 B2 22 42 2D 22 3A 89 |0...$.OG$."B-":.|
00000910: 20 32 30 30 30 00 28 11 2E 04 4F 47 24 B2 22 42 | 2000.(...OG$."B|
00000920: 22 3A 89 20 32 30 30 30 00 3C 11 38 04 4F 47 24 |":. 2000.<.8.OG$|
00000930: B2 22 42 2B 22 3A 89 20 32 30 30 30 00 50 11 42 |."B+":. 2000.P.B|
00000940: 04 4F 47 24 B2 22 41 2D 22 3A 89 20 32 30 30 30 |.OG$."A-":. 2000|
00000950: 00 63 11 4C 04 4F 47 24 B2 22 41 22 3A 89 20 32 |.c.L.OG$."A":. 2|
00000960: 30 30 30 00 72 11 D0 07 4F 47 24 28 43 29 B2 4F |000.r...OG$(C).O|
00000970: 47 24 00 7B 11 D5 07 54 41 B2 30 00 83 11 DA 07 |G$.{...TA.0.....|
00000980: 82 20 43 00 91 11 E4 07 81 20 43 B2 31 20 A4 20 |. C...... C.1 . |
00000990: 49 00 C1 11 E9 07 4E 24 28 43 29 B2 4E 24 28 43 |I.....N$(C).N$(C|
000009A0: 29 AA 22 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 3A |)."...........":|
000009B0: 4E 24 28 43 29 B2 C8 28 4E 24 28 43 29 2C 31 32 |N$(C)..(N$(C),12|
000009C0: 29 00 EA 11 EE 07 99 43 3B 4E 24 28 43 29 22 2E |)......C;N$(C)".|
000009D0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 3B |..............";|
000009E0: A3 32 37 29 4F 47 24 28 43 29 00 F2 11 F3 07 82 |.27)OG$(C)......|
000009F0: 20 43 00 08 12 F8 07 85 20 22 43 4C 41 53 53 20 | C...... "CLASS |
00000A00: 4E 41 4D 45 22 3B 44 24 00 1C 12 FD 07 99 22 59 |NAME";D$......"Y|
00000A10: 4F 55 52 20 43 48 4F 49 43 45 3F 22 00 3E 12 02 |OUR CHOICE?".>..|
00000A20: 08 99 3A 99 22 50 3D 53 45 4E 44 20 47 52 41 44 |..:."P=SEND GRAD|
00000A30: 45 53 20 54 4F 20 50 52 49 4E 54 45 52 22 00 56 |ES TO PRINTER".V|
00000A40: 12 0C 08 99 3A 99 22 51 3D 51 55 49 54 20 50 52 |....:."Q=QUIT PR|
00000A50: 4F 47 52 41 4D 22 00 79 12 0D 08 99 3A 99 22 12 |OGRAM".y....:.".|
00000A60: 52 92 3D 52 55 4E 20 54 48 45 20 50 52 4F 47 52 |R.=RUN THE PROGR|
00000A70: 41 4D 20 41 47 41 49 4E 22 00 91 12 11 08 A1 20 |AM AGAIN"...... |
00000A80: 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 32 30 36 |A$:. A$."" . 206|
00000A90: 35 00 B3 12 13 08 8B 41 24 B3 B1 22 50 22 AF 41 |5......A$.."P".A|
00000AA0: 24 B3 B1 22 51 22 AF 41 24 B3 B1 22 52 22 A7 32 |$.."Q".A$.."R".2|
00000AB0: 30 36 35 00 C9 12 16 08 8B 20 41 24 B2 22 50 22 |065...... A$."P"|
00000AC0: 20 A7 20 89 20 32 35 30 30 00 E3 12 20 08 8B 20 | . . 2500... .. |
00000AD0: 41 24 B2 22 52 22 A7 99 C7 28 31 34 37 29 3A 89 |A$."R"...(147):.|
00000AE0: 20 31 33 00 F4 12 2A 08 8B 20 41 24 B2 22 51 22 | 13...*.. A$."Q"|
00000AF0: 20 A7 20 80 00 FD 12 C4 09 9F 34 2C 34 00 17 13 | . .......4,4...|
00000B00: C9 09 9D 34 3A 99 22 47 52 41 44 45 53 20 46 4F |...4:."GRADES FO|
00000B10: 52 3A 20 22 3B 44 24 00 25 13 CE 09 81 20 43 B2 |R: ";D$.%.... C.|
00000B20: 31 20 A4 20 49 00 4C 13 D8 09 9D 34 3A 99 43 3B |1 . I.L....4:.C;|
00000B30: 4E 24 28 43 29 22 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |N$(C)"..........|
00000B40: 2E 2E 2E 2E 2E 22 4F 47 24 28 43 29 00 54 13 DD |....."OG$(C).T..|
00000B50: 09 82 20 43 00 6D 13 DF 09 99 22 48 41 56 45 20 |.. C.m...."HAVE |
00000B60: 41 20 4E 49 43 45 20 44 41 59 21 21 22 00 76 13 |A NICE DAY!!".v.|
00000B70: E2 09 A0 34 3A 80 00 9F 13 B8 0B 9C 3A 43 4C B2 |...4:.......:CL.|
00000B80: 35 34 32 37 32 3A 99 C7 28 31 35 37 29 3A 97 35 |54272:..(157):.5|
00000B90: 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 |3280,0:.53281,0.|
00000BA0: C1 13 BD 0B 81 49 B2 31 33 30 34 A4 31 33 34 33 |.....I.1304.1343|
00000BB0: 3A 97 49 2C 31 36 30 3A 97 49 AA 43 4C 2C 36 3A |:.I,160:.I.CL,6:|
00000BC0: 82 00 E6 13 C2 0B 81 49 B2 31 33 34 33 A4 31 37 |.......I.1343.17|
00000BD0: 30 33 A9 34 30 3A 97 49 2C 31 36 30 3A 97 49 AA |03.40:.I,160:.I.|
00000BE0: 43 4C 2C 36 3A 82 00 0B 14 CC 0B 81 49 B2 31 37 |CL,6:.......I.17|
00000BF0: 30 33 A4 31 36 36 34 A9 AB 31 3A 97 49 2C 31 36 |03.1664..1:.I,16|
00000C00: 30 3A 97 49 AA 43 4C 2C 36 3A 82 00 3E 14 D1 0B |0:.I.CL,6:..>...|
00000C10: 81 49 B2 31 36 36 34 A4 31 33 30 34 A9 AB 34 30 |.I.1664.1304..40|
00000C20: 3A 97 49 2C 31 36 30 3A 97 49 AA 43 4C 2C 36 3A |:.I,160:.I.CL,6:|
00000C30: 82 3A 81 54 B2 31 A4 31 30 30 30 3A 82 54 00 76 |.:.T.1.1000:.T.v|
00000C40: 14 D6 0B 99 A3 31 29 22 11 11 11 11 11 11 11 11 |.....1)"........|
00000C50: 57 45 4C 43 4F 4D 45 20 54 4F 20 54 48 45 20 53 |WELCOME TO THE S|
00000C60: 45 43 54 49 4F 4E 20 4F 46 20 54 48 45 20 50 52 |ECTION OF THE PR|
00000C70: 4F 47 52 41 4D 22 00 A3 14 DB 0B 99 A3 31 29 22 |OGRAM".......1)"|
00000C80: 11 57 48 49 43 48 20 41 56 45 52 41 47 45 53 20 |.WHICH AVERAGES |
00000C90: 4E 55 4D 45 52 49 43 20 53 43 4F 52 45 53 20 41 |NUMERIC SCORES A|
00000CA0: 4E 44 22 00 E0 14 DD 0B 99 A3 31 29 22 11 54 48 |ND".......1)".TH|
00000CB0: 45 4E 20 50 52 49 4E 54 53 20 54 48 45 4D 20 4F |EN PRINTS THEM O|
00000CC0: 55 54 20 46 4F 52 20 54 48 45 20 54 45 41 43 48 |UT FOR THE TEACH|
00000CD0: 45 52 22 3A 81 54 B2 31 A4 32 30 30 30 3A 82 54 |ER":.T.1.2000:.T|
00000CE0: 00 02 15 E0 0B 99 A3 31 31 29 22 11 11 11 11 11 |.......11)".....|
00000CF0: 11 12 9E 20 50 52 45 53 53 20 52 45 54 55 52 4E |... PRESS RETURN|
00000D00: 20 22 00 16 15 E5 0B A1 41 24 3A 8B 41 24 B2 22 | "......A$:.A$."|
00000D10: 22 A7 33 30 34 35 00 2A 15 EA 0B 8B 41 24 B3 B1 |".3045.*....A$..|
00000D20: C7 28 31 33 29 A7 33 30 34 35 00 5D 15 1C 0C 99 |.(13).3045.]....|
00000D30: 20 C7 28 31 34 37 29 22 4E 4F 57 20 4C 45 54 27 | .(147)"NOW LET'|
00000D40: 53 20 43 48 4F 4F 53 45 20 41 20 43 4F 4C 4F 52 |S CHOOSE A COLOR|
00000D50: 20 42 41 43 4B 47 52 4F 55 4E 44 2E 22 00 91 15 | BACKGROUND."...|
00000D60: 80 0C 99 3A 99 3A 99 22 31 3D 57 48 49 54 45 22 |...:.:."1=WHITE"|
00000D70: 3A 99 22 32 3D 50 55 52 50 4C 45 22 3A 99 22 33 |:."2=PURPLE":."3|
00000D80: 3D 47 52 45 45 4E 22 3A 99 22 34 3D 42 4C 55 45 |=GREEN":."4=BLUE|
00000D90: 22 00 A0 15 81 0C 99 22 35 3D 42 4C 41 43 4B 22 |"......"5=BLACK"|
00000DA0: 00 D9 15 82 0C 99 22 13 11 11 11 11 11 11 11 11 |......".........|
00000DB0: 11 11 11 11 12 81 20 50 52 45 53 53 20 54 48 45 |...... PRESS THE|
00000DC0: 20 44 45 53 49 52 45 44 20 4B 45 59 20 22 3A 81 | DESIRED KEY ":.|
00000DD0: 54 B2 31 A4 32 30 30 3A 82 00 11 16 84 0C 99 22 |T.1.200:......."|
00000DE0: 13 11 11 11 11 11 11 11 11 11 11 11 11 81 20 50 |.............. P|
00000DF0: 52 45 53 53 20 54 48 45 20 44 45 53 49 52 45 44 |RESS THE DESIRED|
00000E00: 20 4B 45 59 20 22 3A 81 54 B2 31 A4 32 30 30 3A | KEY ":.T.1.200:|
00000E10: 82 00 28 16 8A 0C A1 20 41 24 3A 8B 20 41 24 B2 |..(.... A$:. A$.|
00000E20: 22 22 A7 20 33 32 30 32 00 5A 16 8F 0C 8B 41 24 |"". 3202.Z....A$|
00000E30: B3 B1 22 31 22 AF 41 24 B3 B1 22 32 22 AF 41 24 |.."1".A$.."2".A$|
00000E40: B3 B1 22 33 22 AF 41 24 B3 B1 22 34 22 AF 41 24 |.."3".A$.."4".A$|
00000E50: B3 B1 22 35 22 A7 33 32 30 32 00 84 16 94 0C 8B |.."5".3202......|
00000E60: 20 41 24 B2 22 31 22 A7 20 97 20 35 33 32 38 30 | A$."1". . 53280|
00000E70: 2C 31 3A 97 20 35 33 32 38 31 2C 31 3A 97 20 36 |,1:. 53281,1:. 6|
00000E80: 34 36 2C 30 00 AF 16 9E 0C 8B 20 41 24 B2 22 32 |46,0...... A$."2|
00000E90: 22 20 A7 20 97 20 35 33 32 38 30 2C 34 3A 97 20 |" . . 53280,4:. |
00000EA0: 35 33 32 38 31 2C 34 3A 97 20 36 34 36 2C 30 00 |53281,4:. 646,0.|
00000EB0: DA 16 A8 0C 8B 20 41 24 B2 22 33 22 20 A7 20 97 |..... A$."3" . .|
00000EC0: 20 35 33 32 38 30 2C 35 3A 97 20 35 33 32 38 31 | 53280,5:. 53281|
00000ED0: 2C 35 3A 97 20 36 34 36 2C 30 00 05 17 B2 0C 8B |,5:. 646,0......|
00000EE0: 20 41 24 B2 22 34 22 20 A7 20 97 20 35 33 32 38 | A$."4" . . 5328|
00000EF0: 30 2C 36 3A 97 20 35 33 32 38 31 2C 36 3A 97 20 |0,6:. 53281,6:. |
00000F00: 36 34 36 2C 30 00 1C 17 B7 0C 8B 41 24 B2 22 35 |646,0......A$."5|
00000F10: 22 A7 56 B2 31 3A 97 36 34 36 2C 36 00 29 17 BC |".V.1:.646,6.)..|
00000F20: 0C 99 20 C7 28 31 34 37 29 00 47 17 C6 0C 85 20 |.. .(147).G.... |
00000F30: 22 50 4F 49 4E 54 53 20 50 4F 53 53 49 42 4C 45 |"POINTS POSSIBLE|
00000F40: 22 3B 54 3A 99 3A 99 00 67 17 D0 0C 85 20 22 48 |";T:.:..g.... "H|
00000F50: 4F 57 20 4D 41 4E 59 20 53 54 55 44 45 4E 54 53 |OW MANY STUDENTS|
00000F60: 22 3B 49 3A 99 3A 99 00 85 17 D5 0C 86 20 4E 24 |";I:.:....... N$|
00000F70: 28 49 29 2C 20 4C 24 28 49 29 2C 4D 28 49 29 2C |(I), L$(I),M(I),|
00000F80: 4D 25 28 49 29 00 9F 17 DA 0C 85 20 22 48 4F 57 |M%(I)...... "HOW|
00000F90: 20 4D 41 4E 59 20 53 43 4F 52 45 53 22 3B 58 00 | MANY SCORES";X.|
00000FA0: C9 17 E4 0C 99 3A 99 22 49 53 20 49 4E 46 4F 52 |.....:."IS INFOR|
00000FB0: 4D 41 54 49 4F 4E 20 43 4F 52 52 45 43 54 3F 20 |MATION CORRECT? |
00000FC0: 28 59 20 4F 52 20 4E 29 22 00 E0 17 48 0D A1 20 |(Y OR N)"...H.. |
00000FD0: 42 24 3A 8B 20 42 24 B2 22 22 A7 20 33 34 30 30 |B$:. B$."". 3400|
00000FE0: 00 F8 17 52 0D 8B 20 42 24 B3 B1 22 59 22 A7 3A |...R.. B$.."Y".:|
00000FF0: 9C 3A 89 20 33 32 36 30 00 06 18 5C 0D 81 20 43 |.:. 3260...\.. C|
00001000: B2 31 20 A4 20 49 00 13 18 66 0D 99 20 C7 28 31 |.1 . I...f.. .(1|
00001010: 34 37 29 00 3C 18 70 0D 99 22 45 4E 54 45 52 20 |47).<.p.."ENTER |
00001020: 4E 41 4D 45 20 46 4F 52 20 53 54 55 44 45 4E 54 |NAME FOR STUDENT|
00001030: 20 23 22 3B 43 3A 85 4E 24 28 43 29 00 6D 18 75 | #";C:.N$(C).m.u|
00001040: 0D 99 22 11 12 81 52 45 4D 45 4D 42 45 52 20 54 |.."...REMEMBER T|
00001050: 4F 20 45 4E 54 45 52 20 4E 55 4D 42 45 52 20 53 |O ENTER NUMBER S|
00001060: 43 4F 52 45 53 20 4F 4E 4C 59 21 22 3A 00 7D 18 |CORES ONLY!":.}.|
00001070: 7A 0D 8B 56 B2 30 A7 97 36 34 36 2C 30 00 8D 18 |z..V.0..646,0...|
00001080: 7F 0D 8B 56 B2 31 A7 97 36 34 36 2C 36 00 9B 18 |...V.1..646,6...|
00001090: 98 0D 81 20 41 B2 31 20 A4 20 58 00 BD 18 A2 0D |... A.1 . X.....|
000010A0: 99 3A 99 22 45 4E 54 45 52 20 4E 55 4D 42 45 52 |.:."ENTER NUMBER|
000010B0: 20 23 22 3B 41 3B 3A 85 20 42 28 41 29 00 C3 18 | #";A;:. B(A)...|
000010C0: AC 0D 82 00 EF 18 B6 0D 99 3A 99 3A 99 22 49 53 |.........:.:."IS|
000010D0: 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 43 4F 52 | INFORMATION COR|
000010E0: 52 45 43 54 3F 20 28 59 20 4F 52 20 4E 29 22 00 |RECT? (Y OR N)".|
000010F0: 06 19 C0 0D A1 20 47 24 3A 8B 20 47 24 B2 22 22 |..... G$:. G$.""|
00001100: A7 20 33 35 32 30 00 26 19 CA 0D 8B 20 47 24 B2 |. 3520.&.... G$.|
00001110: 20 22 59 22 20 A7 20 99 20 C7 28 31 34 37 29 3A | "Y" . . .(147):|
00001120: 89 20 33 35 34 30 00 3C 19 CF 0D 8B 20 47 24 B2 |. 3540.<.... G$.|
00001130: 22 4E 22 20 A7 20 89 20 33 34 33 30 00 45 19 D4 |"N" . . 3430.E..|
00001140: 0D 53 55 B2 30 00 53 19 DE 0D 81 20 41 B2 31 20 |.SU.0.S.... A.1 |
00001150: A4 20 58 00 62 19 E8 0D 53 55 B2 53 55 AA 42 28 |. X.b...SU.SU.B(|
00001160: 41 29 00 68 19 F2 0D 82 00 74 19 FC 0D 99 C7 28 |A).h.....t.....(|
00001170: 31 34 37 29 00 83 19 06 0E 4D B2 53 55 AD 54 AC |147).....M.SU.T.|
00001180: 31 30 30 00 97 19 1A 0E 8B 20 4D B3 34 39 2E 35 |100...... M.49.5|
00001190: 20 A7 20 33 38 30 30 00 AB 19 24 0E 8B 20 4D B3 | . 3800...$.. M.|
000011A0: 35 32 2E 35 20 A7 20 33 38 31 30 00 BF 19 2E 0E |52.5 . 3810.....|
000011B0: 8B 20 4D B3 35 36 2E 35 20 A7 20 33 38 32 30 00 |. M.56.5 . 3820.|
000011C0: D3 19 38 0E 8B 20 4D B3 35 39 2E 35 20 A7 20 33 |..8.. M.59.5 . 3|
000011D0: 38 33 30 00 E7 19 42 0E 8B 20 4D B3 36 34 2E 35 |830...B.. M.64.5|
000011E0: 20 A7 20 33 38 34 30 00 FB 19 4C 0E 8B 20 4D B3 | . 3840...L.. M.|
000011F0: 37 34 2E 35 20 A7 20 33 38 35 30 00 0F 1A 56 0E |74.5 . 3850...V.|
00001200: 8B 20 4D B3 37 39 2E 35 20 A7 20 33 38 36 30 00 |. M.79.5 . 3860.|
00001210: 23 1A 60 0E 8B 20 4D B3 38 32 2E 35 20 A7 20 33 |#.`.. M.82.5 . 3|
00001220: 38 37 30 00 37 1A 6A 0E 8B 20 4D B3 38 36 2E 35 |870.7.j.. M.86.5|
00001230: 20 A7 20 33 38 38 30 00 4B 1A 74 0E 8B 20 4D B3 | . 3880.K.t.. M.|
00001240: 38 39 2E 35 20 A7 20 33 38 39 30 00 5F 1A 7E 0E |89.5 . 3890._.~.|
00001250: 8B 20 4D B3 39 34 2E 35 20 A7 20 33 39 30 30 00 |. M.94.5 . 3900.|
00001260: 73 1A 88 0E 8B 20 4D B1 39 34 2E 35 20 A7 20 33 |s.... M.94.5 . 3|
00001270: 39 31 30 00 85 1A D8 0E 4C 24 B2 22 46 22 3A 89 |910.....L$."F":.|
00001280: 20 33 39 32 30 00 98 1A E2 0E 4C 24 B2 22 44 2D | 3920.....L$."D-|
00001290: 22 3A 89 20 33 39 32 30 00 AA 1A EC 0E 4C 24 B2 |":. 3920.....L$.|
000012A0: 22 44 22 3A 89 20 33 39 32 30 00 BD 1A F6 0E 4C |"D":. 3920.....L|
000012B0: 24 B2 22 44 2B 22 3A 89 20 33 39 32 30 00 D0 1A |$."D+":. 3920...|
000012C0: 00 0F 4C 24 B2 22 43 2D 22 3A 89 20 33 39 32 30 |..L$."C-":. 3920|
000012D0: 00 E2 1A 0A 0F 4C 24 B2 22 43 22 3A 89 20 33 39 |.....L$."C":. 39|
000012E0: 32 30 00 F5 1A 14 0F 4C 24 B2 22 43 2B 22 3A 89 |20.....L$."C+":.|
000012F0: 20 33 39 32 30 00 08 1B 1E 0F 4C 24 B2 22 42 2D | 3920.....L$."B-|
00001300: 22 3A 89 20 33 39 32 30 00 1A 1B 28 0F 4C 24 B2 |":. 3920...(.L$.|
00001310: 22 42 22 3A 89 20 33 39 32 30 00 2D 1B 32 0F 4C |"B":. 3920.-.2.L|
00001320: 24 B2 22 42 2B 22 3A 89 20 33 39 32 30 00 40 1B |$."B+":. 3920.@.|
00001330: 3C 0F 4C 24 B2 22 41 2D 22 3A 89 20 33 39 32 30 |<.L$."A-":. 3920|
00001340: 00 52 1B 46 0F 4C 24 B2 22 41 22 3A 89 20 33 39 |.R.F.L$."A":. 39|
00001350: 32 30 00 5D 1B 50 0F 4D 28 43 29 B2 4D 00 6A 1B |20.].P.M(C).M.j.|
00001360: 5A 0F 4C 24 28 43 29 B2 4C 24 00 72 1B 64 0F 82 |Z.L$(C).L$.r.d..|
00001370: 20 43 00 80 1B 6E 0F 81 20 43 B2 31 20 A4 20 49 | C...n.. C.1 . I|
00001380: 00 BB 1B 78 0F 4E 24 28 43 29 B2 4E 24 28 43 29 |...x.N$(C).N$(C)|
00001390: AA 22 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 3A 4E |."...........":N|
000013A0: 24 28 43 29 B2 C8 28 4E 24 28 43 29 2C 31 32 29 |$(C)..(N$(C),12)|
000013B0: 3A 4D 25 B2 4D 28 43 29 AA 2E 35 00 F1 1B 82 0F |:M%.M(C)..5.....|
000013C0: 99 20 43 3B A3 34 29 4E 24 28 43 29 22 2E 2E 2E |. C;.4)N$(C)"...|
000013D0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 3B A3 32 |............";.2|
000013E0: 37 29 3B 4D 25 22 25 22 A3 33 37 29 4C 24 28 43 |7);M%"%".37)L$(C|
000013F0: 29 00 F9 1B 8C 0F 82 20 43 00 0F 1C 96 0F 85 20 |)...... C...... |
00001400: 22 43 4C 41 53 53 20 4E 41 4D 45 22 3B 44 24 00 |"CLASS NAME";D$.|
00001410: 23 1C A0 0F 99 22 59 4F 55 52 20 43 48 4F 49 43 |#...."YOUR CHOIC|
00001420: 45 3F 22 00 42 1C A5 0F 9B 3A 99 3A 99 22 53 45 |E?".B....:.:."SE|
00001430: 4E 44 20 54 4F 20 50 52 49 4E 54 45 52 3D 12 50 |ND TO PRINTER=.P|
00001440: 92 22 00 60 1C A7 0F 99 3A 99 22 51 55 49 54 20 |.".`....:."QUIT |
00001450: 54 48 45 20 50 52 4F 47 52 41 4D 3D 12 51 92 22 |THE PROGRAM=.Q."|
00001460: 00 82 1C A8 0F 99 3A 99 22 52 55 4E 20 54 48 45 |......:."RUN THE|
00001470: 20 50 52 4F 47 52 41 4D 20 41 47 41 49 4E 3D 12 | PROGRAM AGAIN=.|
00001480: 52 92 00 99 1C AA 0F A1 50 24 3A 8B 20 50 24 B2 |R.......P$:. P$.|
00001490: 22 22 20 A7 20 34 30 31 30 00 BB 1C AF 0F 8B 50 |"" . 4010......P|
000014A0: 24 B3 B1 22 51 22 AF 50 24 B3 B1 22 50 22 AF 50 |$.."Q".P$.."P".P|
000014B0: 24 B3 B1 22 52 22 A7 34 30 31 30 00 CD 1C B4 0F |$.."R".4010.....|
000014C0: 8B 20 50 24 B2 22 51 22 20 20 A7 20 80 00 E1 1C |. P$."Q" . ....|
000014D0: BE 0F 8B 20 50 24 B2 22 50 22 20 A7 20 35 30 30 |... P$."P" . 500|
000014E0: 30 00 FE 1C C3 0F 8B 20 50 24 B2 22 52 22 A7 20 |0...... P$."R". |
000014F0: 99 C7 28 31 34 37 29 3A 89 20 33 30 30 30 00 07 |..(147):. 3000..|
00001500: 1D 88 13 9F 34 2C 34 00 22 1D 92 13 9D 34 3A 99 |....4,4."....4:.|
00001510: 22 47 52 41 44 45 53 20 46 4F 52 3A 20 20 22 3B |"GRADES FOR: ";|
00001520: 44 24 00 30 1D 9C 13 81 20 43 B2 31 20 A4 20 49 |D$.0.... C.1 . I|
00001530: 00 3F 1D A1 13 4D 25 B2 4D 28 43 29 AA 2E 35 00 |.?...M%.M(C)..5.|
00001540: 73 1D A6 13 9D 34 3A 99 43 3B 4E 24 28 43 29 22 |s....4:.C;N$(C)"|
00001550: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 |..............."|
00001560: 3B 4D 25 22 25 22 3B 22 2E 2E 2E 2E 22 3B 4C 24 |;M%"%";"....";L$|
00001570: 28 43 29 00 7B 1D B0 13 82 20 43 00 A4 1D BA 13 |(C).{.... C.....|
00001580: 99 22 54 48 41 4E 4B 20 59 4F 55 20 46 4F 52 20 |."THANK YOU FOR |
00001590: 55 53 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 |USING THIS PROGR|
000015A0: 41 4D 2E 22 00 BD 1D C4 13 99 22 48 41 56 45 20 |AM."......"HAVE |
000015B0: 41 20 48 41 50 50 59 20 44 41 59 21 22 00 C3 1D |A HAPPY DAY!"...|
000015C0: CE 13 80 00 E0 1D 70 17 97 35 33 32 38 30 2C 30 |......p..53280,0|
000015D0: 3A 97 35 33 32 38 31 2C 30 3A 97 36 34 36 2C 34 |:.53281,0:.646,4|
000015E0: 00 09 1E 7A 17 99 C7 28 31 34 37 29 3A 99 A3 38 |...z...(147):..8|
000015F0: 29 22 91 12 20 4E 4F 54 45 20 54 4F 20 49 4E 53 |)".. NOTE TO INS|
00001600: 54 52 55 43 54 4F 52 20 22 00 55 1E 7F 17 99 22 |TRUCTOR ".U...."|
00001610: 11 11 11 20 20 20 54 48 45 20 47 52 41 44 45 20 |... THE GRADE |
00001620: 53 43 41 4C 45 20 46 4F 52 20 4C 45 54 54 45 52 |SCALE FOR LETTER|
00001630: 20 47 52 41 44 45 20 20 20 20 20 41 56 45 52 41 | GRADE AVERA|
00001640: 47 49 4E 47 20 4D 41 59 20 42 45 20 41 4C 54 45 |GING MAY BE ALTE|
00001650: 52 45 44 22 3B 00 A0 1E 84 17 99 22 20 42 59 20 |RED";......" BY |
00001660: 4C 49 53 54 49 4E 47 20 20 20 20 20 41 4E 44 20 |LISTING AND |
00001670: 43 48 41 4E 47 49 4E 47 20 54 48 45 20 53 54 41 |CHANGING THE STA|
00001680: 54 45 4D 45 4E 54 53 20 46 52 4F 4D 20 4C 49 4E |TEMENTS FROM LIN|
00001690: 45 53 20 20 32 36 30 20 54 4F 20 33 36 33 2E 22 |ES 260 TO 363."|
000016A0: 00 E2 1E 8E 17 99 22 11 11 20 20 20 54 48 45 20 |......".. THE |
000016B0: 47 52 41 44 45 20 53 43 41 4C 45 20 46 4F 52 20 |GRADE SCALE FOR |
000016C0: 4E 55 4D 45 52 49 43 20 41 56 45 52 41 47 49 4E |NUMERIC AVERAGIN|
000016D0: 47 4D 41 59 20 42 45 20 41 4C 54 45 52 45 44 20 |GMAY BE ALTERED |
000016E0: 22 3B 00 2A 1F 98 17 99 22 42 59 20 4C 49 53 54 |";.*...."BY LIST|
000016F0: 49 4E 47 20 41 4E 44 20 43 48 41 4E 47 49 4E 47 |ING AND CHANGING|
00001700: 20 20 54 48 45 20 53 54 41 54 45 4D 45 4E 54 53 | THE STATEMENTS|
00001710: 20 46 52 4F 4D 20 4C 49 4E 45 53 20 33 36 31 30 | FROM LINES 3610|
00001720: 20 54 4F 20 33 39 31 30 2E 22 00 4B 1F A2 17 99 | TO 3910.".K....|
00001730: A3 31 31 29 22 11 11 11 11 11 12 9E 20 50 52 45 |.11)"....... PRE|
00001740: 53 53 20 52 45 54 55 52 4E 20 22 00 5F 1F A7 17 |SS RETURN "._...|
00001750: A1 41 24 3A 8B 41 24 B2 22 22 A7 36 30 35 35 00 |.A$:.A$."".6055.|
00001760: 73 1F AC 17 8B 41 24 B3 B1 C7 28 31 33 29 A7 36 |s....A$...(13).6|
00001770: 30 35 35 00 79 1F B1 17 8E 00 00 00 |055.y....... |
.......6000:.G(147):.53280,0:.53281,0:CL
.54272.M....I.0.39:A.1104.I:B.1304.I:.A,
160:.A.CL,4:.B,160:.B.CL,4:.I......I.0.2
00.40:A.1104.I:B.1143.I:.A,160:.A.CL,4:.
B,160:.B.CL,4......I:..13)".....MINI-GRA
DES":.I.0.400.40:A.1384.I:B.1403.I.'...C
.1423.I:.A,160:.A.CL,5:.B,160:.B.CL,5:.C
,160:.C.CL,5:.I.F....I.0.39:A.1384.I:B.1
784.I:.A,160:.A.CL,5:.B,160:.B.CL,5:.I..
.....3)"......LETTER GRADES".23)".NUMERI
C SCORES".......9)"....F1".29)"..F3"....
..".................................. PR
ESS DESIRED KEY ":.T.1.200:..C....".....
............................ PRESS DESIR
ED KEY ":.T.1.200:..T....A$:.A$."".9.K..
..A$..".".A$..".".9.|....A$.".".3000....
..:.G(147):CL.54272:.I.1104.1143:.I,160:
.I.CL,14:.......I.1143.1703.40:.I,160:.I
.CL,14:.:.I.1703.1664..1.!....I,160:.I.C
L,14:.:.I.1664.1104..40:.I,160:.I.CL,14:
..G.....8)"....LETTER GRADE AVERAGING ".
U.....17)"BY".M.....12)"DANIEL FLINN"...
...T.1.500:.T:.I.1345.1382:.I,160:.I.CL,
1:..N.....2)"....WELCOME TO A PROGRAM TH
AT ALLOWS THE"... ...2)"TEACHER TO AVERA
GE LETTER GRADES AND"..."...2)"THEN PRIN
T THEM OUT.".>.#...11)"........ PRESS RE
TURN ".P.(..A$:.A$."".40.B.-..A$..G(13).
40.N.2..G(147)...J.."HOW MANY STUDENTS T
ODAY";I...L.. N$(I),OG$(I).A.P..:."AND H
OW MANY GRADES";X...U..:.".....IS INFORM
ATION CORRECT?.(Y OR N)"...W.. B$:. B$."
". 87.$.Z.. B$.."Y". . G(147):.:. 74.0.]
..G(147).>._.. C.1 . I.I.D.."TYPE IN NAM
E FOR STUDENT #";C:.N$(C)...F..".. ENTER
ONLY LETTER GRADES NEXT ". .I.. Z.1 . X
...N..:."ENTER LETTER GRADE #";Z:.".....
....................";G$...... G$."A". A
.11:. 380...... G$."A-" . A.10:. 380....
.. G$."B+" . A.9:. 380.G.".. G$."B" . A.
8:. 380.A.,.. G$."B-" . A.7:. 380.{.6..
G$."C+" . A.6:. 380...@.. G$."C" . A.5:
. 380...J.. G$."C-" . A.4:. 380.I.T.. G$
."D+" . A.3:. 380...^.. G$."D" . A.2:. 3
80...H.. G$."D-" . A.1:. 380...K.. G$."F
".A.0:.380...|.TA.TA.A.$.....F...."..ARE
SCORES CORRECT? (Y/N).Y....A$:.A$."".40
5.T....A$.."Y".TA.0:A.0:.102.....AV.TA.X
...&..G(147)...D..AV..51.995...X.. AV.1.
51 . 1000.E.B.. AV.2.51. 1010.Y.L.. AV.3
.51. 1020...V.. AV.4.51. 1030...... AV.5
.51. 1040...... AV.6.51. 1050.).... AV.7
.51. 1060.=.... AV.8.51. 1070.Q.... AV.9
.51. 1080.E.... AV.10.51.1090.Y.... AV.1
1.51.1100.....OG$."F":.2000.....OG$."D-"
:. 2000.....OG$."D":. 2000.F...OG$."D+":
. 2000.Z...OG$."C-":. 2000.....OG$."C":.
2000.....OG$."C+":. 2000...$.OG$."B-":.
2000.(...OG$."B":. 2000.<.8.OG$."B+":.
2000.P.B.OG$."A-":. 2000.C.L.OG$."A":. 2
000.R.P.OG$(C).OG$.{.U.TA.0...Z.. C.....
. C.1 . I.A...N$(C).N$(C)."...........":
N$(C).H(N$(C),12)......C;N$(C)".........
......";.27)OG$(C)...... C...... "CLASS
NAME";D$......"YOUR CHOICE?".>....:."P=S
END GRADES TO PRINTER".V....:."Q=QUIT PR
OGRAM".Y....:.".R.=RUN THE PROGRAM AGAIN
"...... A$:. A$."" . 2065......A$.."P".A
$.."Q".A$.."R".2065.I.... A$."P" . . 250
0... .. A$."R"..G(147):. 13...*.. A$."Q"
. ....D..4,4...I..4:."GRADES FOR: ";D$.
%.N.. C.1 . I.L.X..4:.C;N$(C)"..........
....."OG$(C).T.... C.M...."HAVE A NICE D
AY!!".V... 4:.......:CL.54272:.G(157):.5
3280,0:.53281,0.A....I.1304.1343:.I,160:
.I.CL,6:....B..I.1343.1703.40:.I,160:.I.
CL,6:....L..I.1703.1664..1:.I,160:.I.CL,
6:..>.Q..I.1664.1304..40:.I,160:.I.CL,6:
.:.T.1.1000:.T.V.V...1)"........WELCOME
TO THE SECTION OF THE PROGRAM".......1)"
.WHICH AVERAGES NUMERIC SCORES AND".....
..1)".THEN PRINTS THEM OUT FOR THE TEACH
ER":.T.1.2000:.T.......11)"........ PRES
S RETURN "......A$:.A$."".3045.*....A$..
G(13).3045.].... G(147)"NOW LET'S CHOOSE
A COLOR BACKGROUND."......:.:."1=WHITE"
:."2=PURPLE":."3=GREEN":."4=BLUE". ...."
5=BLACK".Y...."............... PRESS THE
DESIRED KEY ":.T.1.200:......."........
...... PRESS THE DESIRED KEY ":.T.1.200:
..(.... A$:. A$."". 3202.Z....A$.."1".A$
.."2".A$.."3".A$.."4".A$.."5".3202......
A$."1". . 53280,1:. 53281,1:. 646,0....
.. A$."2" . . 53280,4:. 53281,4:. 646,0.
Z.... A$."3" . . 53280,5:. 53281,5:. 646
,0...... A$."4" . . 53280,6:. 53281,6:.
646,0......A$."5".V.1:.646,6.).... G(147
).G.F.. "POINTS POSSIBLE";T:.:..G.P.. "H
OW MANY STUDENTS";I:.:....U.. N$(I), L$(
I),M(I),M%(I)...Z.. "HOW MANY SCORES";X.
I....:."IS INFORMATION CORRECT? (Y OR N)
"...H.. B$:. B$."". 3400...R.. B$.."Y".:
.:. 3260...\.. C.1 . I...F.. G(147).<.P.
."ENTER NAME FOR STUDENT #";C:.N$(C).M.U
.."...REMEMBER TO ENTER NUMBER SCORES ON
LY!":.}.Z..V.0..646,0.....V.1..646,6...
... A.1 . X......:."ENTER NUMBER #";A;:.
B(A).C..........:.:."IS INFORMATION COR
RECT? (Y OR N)"...... G$:. G$."". 3520.&
.J.. G$. "Y" . . G(147):. 3540.<.O.. G$.
"N" . . 3430.E.T.SU.0.S.... A.1 . X.B...
SU.SU.B(A).H.....T....G(147).....M.SU.T.
100...... M.49.5 . 3800...$.. M.52.5 . 3
810...... M.56.5 . 3820.S.8.. M.59.5 . 3
830...B.. M.64.5 . 3840...L.. M.74.5 . 3
850...V.. M.79.5 . 3860.#.`.. M.82.5 . 3
870.7.J.. M.86.5 . 3880.K.T.. M.89.5 . 3
890._.~.. M.94.5 . 3900.S.... M.94.5 . 3
910...X.L$."F":. 3920.....L$."D-":. 3920
.....L$."D":. 3920.....L$."D+":. 3920.P.
..L$."C-":. 3920.....L$."C":. 3920.....L
$."C+":. 3920.....L$."B-":. 3920...(.L$.
"B":. 3920.-.2.L$."B+":. 3920.@.<.L$."A-
":. 3920.R.F.L$."A":. 3920.].P.M(C).M.J.
Z.L$(C).L$.R.D.. C...N.. C.1 . I...X.N$(
C).N$(C)."...........":N$(C).H(N$(C),12)
:M%.M(C)..5...... C;.4)N$(C)"...........
....";.27);M%"%".37)L$(C)...... C......
"CLASS NAME";D$.#. .."YOUR CHOICE?".B...
.:.:."SEND TO PRINTER=.P.".`....:."QUIT
THE PROGRAM=.Q."......:."RUN THE PROGRAM
AGAIN=.R.......P$:. P$."" . 4010......P
$.."Q".P$.."P".P$.."R".4010.M.... P$."Q"
. ....... P$."P" . 5000...C.. P$."R".
.G(147):. 3000......4,4."....4:."GRADES
FOR: ";D$.0.... C.1 . I.?...M%.M(C)..5.
S....4:.C;N$(C)"...............";M%"%";"
....";L$(C).{.... C......"THANK YOU FOR
USING THIS PROGRAM."...D.."HAVE A HAPPY
DAY!".C.N.....P..53280,0:.53281,0:.646,4
...Z..G(147):..8)".. NOTE TO INSTRUCTOR
".U..."... THE GRADE SCALE FOR LETTER
GRADE AVERAGING MAY BE ALTERED";. .
..." BY LISTING AND CHANGING THE STA
TEMENTS FROM LINES 260 TO 363."......".
. THE GRADE SCALE FOR NUMERIC AVERAGIN
GMAY BE ALTERED ";.*...."BY LISTING AND
CHANGING THE STATEMENTS FROM LINES 3610
TO 3910.".K.....11)"....... PRESS RETUR
N "._....A$:.A$."".6055.S....A$..G(13).6
055.Y.......
> CLICK IMAGE PREVIEW FOR FULL MODAL