C64S tape image fileMATH GAMES ")MATH MANIA  !REVERSEHG BACKFIRE -UNIT3QUIZ AUNIT4DRILL 4UNIT5QUIZ ,SENTENCES GUNIT7QUIZ  MATH MANIA5 TO THE BEST OF OUR KNOWLEDGEU THIS PROGRAM IS IN THEp PUBLIC DOMAIN AUTHOR: G. BRANNAN VERSION: C16,PLUS/4221000#40(UR$"":UI$"":UL0UL39-"";:UI$:UI$""45-2UA(UI$):UR(UR$):UA13UR0" ";:70b7UA20(UR0)45:UR$(UR$,UR1):" ";:45p<URUL45A95:UR$UR$UI$:UI$;:45FUR$UX$" ";:145KUIUR11:(UR$,UI,1)" "PUR$(UR$,UI)::_(US$)0110dUI1(US$):UI$(US$,UI,1):UI$""$i1nUA46DsUA32UR0WxUA47UA58j}UA64UA91UA193UA218UI$"":(142)"DO YOU WANT TO RESTART THE GAME?"UI$:UI$""146UI$"Y"150:UI$"N"146150:""(9):,I07:1375I,FK(I):::""(14)rUT$" ATH ANIA":UH1:UP0:UG$"TUDENT NST":850" HIS PROGRAM TESTS YOU ON YOUR"" ABILITIES ON THE FOUR BASIC MATHEM-"" ATICAL OPERATIONS (+,-,/,*). UES-"%" TIONS WILL APPEAR AT THE TOP OF THE"O" SCREEN AND YOUR JOB IS TO ANSWER"x" THEM CORRECTLY. ":835:UH1:850" OU GET THE SAME NUMBER OF"" POINTS AS THE CORRECT ANSWER OF THE"" QUESTION. NSWERS UNDER TEN WILL SCORE"" TEN POINTS."=" F YOU GIVE AN INCORRECT ANSWER, "f" YOUR TOTAL SCORE WILL BE CUT IN"" HALF. OU WIN WHEN YOU REACH 1000"" POINTS.835:UH1:850" HERE IS A TWIST TO THE PROGRAM." " UESTIONS DO NOT AUTOMATICALLY":" APPEAR ON THE SCREEN. O GET A QUES-"h" TION PRINTED ON THE SCREEN, YOU WILL"" BE GIVEN A CAR. OU HAVE TO DRIVE"" INTO ONE OF THE QUESTION MARKS ? ON"" THE SCREEN TO GET A QUESTION PRINTED."835:UH1:8501" OUR CAR WILL APPEAR AS A (>,<,^" ^,V) DEPENDING ON THE DIRECTION IT"" IS MOVING. HE CONTROLS FOR THE CAR"" ARE..."" UP" " ɒ" LEFTʒ ̒RIGHT!" ˒8" Q" DOWNZ835` 0,2:4,15,1:""(142);%" &"  '" ߚ C O M M O D O R E(" *"SOFTWARE,4"":R9$"H5R9$"**************g6R9$"* MATH MANIA *7R9$"**************9UI0:UI$:UI$" "UIUI1:UI150826;""(14);:4,15,4:=:C(UD$,24);"PRESS SPACE BAR TO CONTINUE"HUI$:UI$" "840$MVRUPUP1:""(UT$UP$,21);(UP$UG$(UP),18)W" --------------------------------------"\UH0(UD$,24);(UP$,7);"QUIT - PRESS Q "aUH0:"":k(UD$,24);" ONE MOMENT PLEASE... ":0UK$"Q":US12256:U4205:UC$(154)WI07:FK(I)(1375I):1375I,0:UD$"":UP$" "(8):900:800:400""UC$(142);:LZZ0$V SETS UP BORDERS ANA SETS UP FOR GAMEF`"":IUS80US119:I,218:gjIUS159US99940:I,218:tIUS998US9601:I,218:~IUS960US12040:I,218:IUSUS79:I,96:LOUS500:L%30SC0W(TY100)"SCORE: ";SCUS8,96:US9,96= 470-490 SETS SKILL LEVELV"1) EASYo"2) NOT SO EASY"3) MEDIUM"4) HARD" WHAT LEVEL? ";:US$"1234":UL1:35:LV(UR$)"TO QUIT PRESS Q"B8:LV1510,1520,1530,15404QU11:SP97:T1731:T21001:T31501:1550`QU16:SP95:T1601:T2831:T31201:1550QU26:SP92:T1301:T2531:T3801:1550QU51:SP88:T1131:T2301:T3601"";:ZY110:""UP$:" PUTS ON ?'S,I126AN(I)((1)1000)US?@(AN(I))218AN(I)US500AN(I)US801590aJAN(I),191::A0:TI$"000000"vT(LO)1911820^ DECIDES WHERE YOU WANT TO MOVEhLO,L%r((1)100)SP2080|A$:A$""1690}A$"I"A8~A$"J"A4 A$"L"A6 A$"K"A2; A$"Q"ZZ1:"";:145:ZZ0:1660j A1690,1710,1690,1740,1690,1770,1690,1800| AB:A01660 1680  FROM HERE TO 5010 IS MOVEMENT CONTROL L%22:A2:BA:LOUS9191800 LOLO40:LO40,32:1620!L%60:A4:BA:LOLO1:(LO)2181760/!LO1,32:1620A!LOLO1:1770k!L%62:LOLO1:A6:BA:(LO)2181790~!LO1,32:1620!LOLO1:1740!L%30:A8:BA:LOUS1601710!LOLO40:LO40,32:1620" FORMS QUESTIONS AND CALCULATES SCORE!"&I19:A$:T"0KUSUS79:K,32::"ANSWER:";:A((1)4)1}":"TIME- ";(TI$,3,2);":";(TI$,2);"?"PRESS Q TO QUIT""DC((1)QU):D((1)QU)1"IUS$"Q0123456789-":UL10"NA1880,1930,1960,1980+#X"";C;" +";D;" = ";:35:E(UR$):ECD19105#bECD]#l"";29)"WRONG:"E:SC(SC2):2000~#v"";33)"RIGHT!":E10E10#SCSCE:2000#C((1)QU):D((1)QU):CD1930#""C"-"D"= ";:35:E(UR$):ECD1910#ECD:1900.$""C"*"D"= ";:35:E(UR$):ECD1910>$ECD:1900q$""DC"/"D"= ";:35:E(UR$):EC1910$EC:1900$ PRINTS SCORE$3000:IUSUS79:I,96::LOAN(1)2030$F2:2040$F1%AN(F)((1)1000)US:(AN(F))32AN(F)US802040:%AN(F),191:"SCORE:"SC;:SC9992140U% "PRESS Q TO QUIT"_%A0:v%  MOVES ?'S%*F((1)2)1:AN(F),32:AN(F)((1)1000)US%4AN(F)((1)1000)US%>(AN(F))32AN(F)US802100%HAN(F),191:>&R 7500- GIVES RATING AND ASKS IF YOU WANT TO PLAY AGAINx&\835:"--- YOU WIN! --- "&f" TIME- ";(TI$,3,2);":";(TI$,2)&pTY(TI$)&zTYT12230&TYT22220&TYT32210'"TRY AGAIN, YOU CAN'T GET ANY WORSE":2240H'" YOU'RE GETTING THERE":2240o'"GOOD TIME!":2240'"TERRIFIC TIME!!"'"DO YOU WANT TO TRY AGAIN? ";'US$"YNQ":UL1:35:A$UR$'A$"Y"1110$("":US,79:IUS1US38:I,99::US39,80P(IUS79US95940:I,103::US999,122|(IUS998US9611:I,100::US960,76( IUS920US4040:I,101:( "OH WELL, IF THAT'S YOUR CHOICE"( 835:900:145) ""UP$:"PRESS SPACE BAR TO CONTINUE":840 )  ***REVERSE***8 TO THE BEST OF OUR KNOWLEDGEX THIS PROGRAM IS IN THEr PUBLIC DOMAIN AUTHOR : UNKNOWN VERSION: C16 PLUS/4221000#40(UR$"":UI$"":UL0UL39-"";:UI$:UI$""45-2UA(UI$):UR(UR$):UA13UR0" ";:70b7UA20(UR0)45:UR$(UR$,UR1):" ";:45p<URUL45A95:UR$UR$UI$:UI$;:45FUR$UX$" ";:145KUIUR11:(UR$,UI,1)" "PUR$(UR$,UI)::_(US$)0110dUI1(US$):UI$(US$,UI,1):UI$""$i1nUA46DsUA32UR0WxUA47UA58j}UA64UA91UA193UA218UI$"":(142)"DO YOU WANT TO RESTART THE GAME?"UI$:UI$""146UI$"Y"150:UI$"N"146150:""(9):,I07:1375I,FK(I):::""(14)tUT$" EVERSE":UH1:UP0:UG$"INSTRUCTIONS":"":850"EVERSE" O WIN THIS GAME YOU ARRANGE THE" LIST OF NUMBERS 1 THROUGH 9 IN NUMERIC" ORDER FROM LEFT TO RIGHT.>" N YOUR COMMAND THE COMPUTER WILLu" REVERSE THE FIRST 'N' NUMBERS IN THE  LIST.835:UH1:"":850" ERE IS AN EXAMPLE:"5 4 3 1 2 6 7 8 9"1 2 3 4 5 6 7 8 9/" F YOU REVERSE THE FIRST 5 THE RESULT WILL BE:R" 2 1 3 4 5 6 7 8 9w"1 2 3 4 5 6 7 8 9" OW IF YOU REVERSE THE FIRST 2 YOU WILL WIN:"1 2 3 4 5 6 7 8 9"1 2 3 4 5 6 7 8 9":" OOD LUCK!":8358 0,2:4,15,1:""(142);P%" g&"  '" ߚ C O M M O D O R E(" *"SOFTWARE4"":R9$"5R9$"***********6R9$"* REVERSE *37R9$"***********<9UI0c:UI$:UI$" "UIUI1:UI150826w;"";:4,15,4:}=:C(UD$,24);"PRESS SPACE BAR TO CONTINUE"HUI$:UI$" "840MRUPUP1:""(UT$UP$,21);(UP$UG$(UP),18)0W" --------------------------------------"j\UH0(UD$,24);(UP$,7);"QUIT - PRESS Q "{aUH0:"":k(UD$,24);" ONE MOMENT PLEASE... ":UX$"H":US12256:U4204:UC$(154),UD$"":UP$" "SI07:FK(I)(1375I):1375I,0:Yy(14):(8):800:900:400""UC$(142);:UP0I110:LC$(I):EE1A(1)((N1)(1)2)K29A(K)(9(1)1)J1K1A(K)A(J)JK1:J:1460#J,KDUT$" REVERSE":UG$"PROBLEM"L,T0@" ";TI19:"  ";:^""h" "|"";:R9:2200:8503:" HOW MANY SHALL I REVERSE? ";=2580ER$QR(A$)_R02160iTT1 *** REVERSE R NUMBERS AND PRINT NEW LISTK1(R2)0ZA(K)DA(K)A(RK1)XA(RK1)ZlK2200 *** CHECK FOR A WIN K19A(K)K1680#K,""f" YOU WON IN ";T;" MOVES! "" " " DO YOU WANT TO PLAY AGAIN? ";:UL1:US$"YN":35:A$UR$HA$"N"1440 REE0\145p145%1600R *** SUBROUTINE PRINT LIST A(1) TO A(N)f"";lJ1R: LC$(10);:"";K1RLC$(A(K)); K$ :"1 2 3 4 5 6 7 8 9";8 L "     "<` "     "ht "      " "    " "     " "      " "    "D "       "x "      " "     " UL1:US$"Q0123456789":35:A$UR$( < "HE ONLY HELP I CAN GIVE IS "