*d" GRADING ASSISTANT"Un" FOR THE COMMODORE 64 OR 128"|x" BY CHRIS NOLLET"" WOULD YOU LIKE INSTRUCTIONS (Y/N)?"A$:A$"Y"A$"N"140A$"Y"690 X0:"# OF GRADES";GN GN1160( G(GN),GP(GN),N$(GN)8 GP100:GS0D I1GNv X0""GPGS"% REMAINING"25)"GRADE"I"OF"GN X0"NAME OF GRADE";N$(I) X0"PERCENTAGE OF TOTAL GRADE (E.G. 40)";GP(I) X1""N$(I);":" "GRADE";G$ G$"A"G(I)4:3900 G$"A-"G(I)3.67:390L G$"B+"G(I)3.33:390d "G$"B"G(I)3:390 ,G$"B-"G(I)2.67:390 6G$"C+"G(I)2.33:390 @G$"C"G(I)2:390 JG$"C-"G(I)1.67:390 TG$"D+"G(I)1.33:390 ^G$"D"G(I)1:390 hG$"D-"G(I).67:3907 rG$"F"G(I)0:390@ |250P GSGSGP(I)V  GS100"ERROR IN PERCENTAGES":I11000:I: GR0 I1GN GRGR((GP(I)100)G(I)) I GR3.83G$"A":580 GR3.5G$"A-":580 GR3.16G$"B+":580, GR2.83G$"B":580F GR2.5G$"B-":580a GR2.16G$"C+":580{ GR1.83G$"C":580 GR1.5G$"C-":580 GR1.16G$"D+":580 &GR.83G$"D":580 0GR.5G$"D-":580 :G$"F" D"TOTAL GPA=";GR N"FINAL GRADE= ";G$5 X::"ANOTHER (Y/N)? "R bA$:A$"Y"A$"N"610g lA$"Y"X1:670 v"RUN ANOTHER SERIES (Y/N)?" A$:A$"Y"A$"N"640 A$"N"  I1GN:G(I)0 I:190" THIS IS A SIMPLE AND RELATIVELY"2"GOOF-PROOF PROGRAM THAT ALLOWS YOU TO"\"INPUT A NUMBER OF GRADES AND THEIR""PERCENTAGE OF THE TOTAL GRADE FOR A""PARTICULAR STUDENT. THE PROGRAM THEN""CALCULATES THE FINAL GRADE AND GPA FOR""THAT STUDENT."$" THE PROGRAM WILL FIRST ASK YOU FOR"Q"THE NUMBER OF GRADES THAT YOU WANT TO"} "INCLUDE IN YOUR TOTAL. IT WILL THEN""ASK YOU FOR THE NAME OF EACH GRADE" "(EXAMPLE: MIDTERM EXAM), THE PERCENTAGE"*"OF THE TOTAL GRADE THAT THE GRADE IS"04"WORTH (EXAMPLE: 50), AND THE STUDENT'S"X>"ACTUAL GRADE (EXAMPLE: A-). THE"H"PERCENT OF THE TOTAL GRADE WHICH IS"R"STILL AVAILABLE WILL BE DISPLAYED AT"\"THE TOP OF THE SCREEN AS A MEMORY AID." f"IF YOUR GRADE PERCENTAGES DO NOT ADD"5p"UP TO 100%, THE PROGRAM WILL DISPLAY"]z"AN ERROR MESSAGE AND START OVER.""PRESS ANY KEY TO CONTINUE"A$:A$""910" AFTER ALL GRADES FOR A PARTICULAR""STUDENT ARE ENTERED, THE PROGRAM WILL""DISPLAY THE FINAL GRADE FOR THE STUDENT"K"AND ASK YOU IF YOU WANT TO RUN THE SAME"z"GRADE SERIES AGAIN (FOR ANOTHER STUDENT""FOR EXAMPLE). IF YOU SELECT 'Y' THE ""PROGRAM WILL RE-RUN, USING THE SAME""GRADE NAMES AND PERCENTAGES. IF YOU")"SELECT 'N' THE PROGRAM WILL ASK YOU"V"IF YOU WANT TO RUN A DIFFERENT SET OF"e"GRADES.""PRESS ANY KEY TO CONTINUE"A$:A$""1040" I HOPE THAT YOU FIND THIS PROGRAM"$"USEFUL. IF YOU HAVE ANY COMMENTS OR"."QUESTIONS, PLEASE LET ME KNOW:"98" CHRIS NOLLET"VB" ROUTE 1, BOX 67A"wL" WENTWORTH, WI, 54874"V"PRESS ANY KEY TO RUN THE PROGRAM"`A$:A$""1120j160