) BOP COPYRIGHT(C) 1978 GLEN FISHERG CURSOR #4 OCTOBER, 1978g BOX 550, GOLETA,CA. 93017mx262000dRC(9,1),UP(9)nI09:RC(I,0),RC(I,1): Ix7,9,5,12,5,13,7,16,12,1712,21,7,22,5,25,5,26,7,29PT$""1RT$""UDN$""ZER1:RN(RC(4,0)RC(5,0))21:CN(RC(4,1)RC(5,1))2CR$(13)"";"DO YOU WANT TO:"" 1) SET UP FINGERS"" 2) READ THEM"" 3) WATCH THEM" " 4) COUNT TO 99"+" 5) QUIT"\"ENTER THE NUMBER OF YOUR CHOICE: ";:60000uIN$"1"9000:1000!IN$"2"9000:3500&IN$"3"9000:3000+IN$"4"9000:3700,IN$"5"560-"THANK'S FOR PLAYING.":#0"PLEASE TYPE '1', '2', '3', '4', OR '5'.,:510FNUM((1)99)1:RJ0i"SET UP THE NUMBER";NUM;"."NF09:UP(NF)04000NF:NF0"";(RT$,1RC(NF,1));(DN$,1RC(NF,0));$(PT$,1NF,1);"";LT$:T$""1100V" ";`T$","NFNF1:NF0NF95jT$"."NFNF1:NF9NF0GtT$"-"4000_~T$(13)RJ11200vT$(13)RJ0500RJ1T$" "5001050N0:I301:UP(I)ZER1230:NN10:II01270II01:UP(I)ZER1900 I"NN50(UP(4)ZER)-I69B :UP(I)ZER1310P:NN1:I_I91350j(II92:UP(I)ZER1900<IFNN5(UP(5)ZER)PNNUM"RIGHT!";:1500Z"NO.";:1500" THE NUMBER ON MY FINGERS IS";N;"." I12000:I5500!1000Kl"THAT ISN'T EVEN A NUMBER!": 1510^T((1)1024)jNF09~UP1T:T(T2)UP(NF)UP4000NF 2000 I11000:I 7000 NUMNM:NM0500 6000 NF09 UP(NF)F(NF)4000  NF: "";(RT$,CN(NM9));(DN$,RN);NUM;" "E 3000f NUM((1)100):NMNUM:6000r NF09 UP(NF)F(NF)4000 NF 7000:NM0500 NMNUM"RIGHT!";:3580 "NO."; " THE NUMBER IS";NUM;"."I12000:I3500)tNUM099:NMNUM:6000=uT$:T$""500jy"";(RT$,CN(NM9));(DN$,RN);NUM;" "v~NF09"";(RT$,1RC(NF,1));(DN$,1RC(NF,0));UP(NF)F(NF)4000NFI1500:INUM 500"";(RT$,1RC(NF,1));(DN$,1RC(NF,0));RNF15000,5010,5020,5030,5040,5050,5060,5070,5080,5090^"";:j"";UP(0)" ";:5003"";(" ",1UP(1),1);"";UP(0)1UP(0)""; UP(1)"  ";("",1UP(0),1);"";:5013C"";(" ",1UP(0),1);(" ",1UP(2),1);R"";dUP(1)1UP(1)ju"";UP(2)"  ";("",1UP(1),1);"";:5023"";(" ",1UP(1),1);(" ",1UP(3)2UP(4),1);""; UP(2)1UP(2)"";WUP(3)" ";("",1(UP(2)UP(4)),1);"";:5033"";(" ",1UP(2)2UP(4),1);"";"";UP(3)1UP(3)"";UP(4)("",1(UP(2)UP(3)),1);"͒͝ ";:5043- (" ",1UP(2)2UP(3),1);"  ";7"";IUP(4)1UP(4)O[ "";UP(5)"  ΝΝ";("̤",1(UP(6)UP(7)),1);: 5053 "ߒ ";("̥ ",1UP(6)2UP(7),1); "";UP(5)1UP(5) "";A UP(6) " ";("̥",1(UP(5) UP(7)),1);: 5063m "";("̤ ",1UP(5)2UP(7),1);~ "";UP(6)1UP(6) ""; UP(7) "  ";("̥",1UP(8),1);: 5073 "";("̥ ",1UP(5)2UP(6),1);(" ",1UP(8),1);) "";;UP(7)1UP(7)AM ""; UP(8) "  ";("̥",1UP(9),1);: 5083 "";(" ",1UP(7),1);(" ",1UP(9),1); "";UP(8)1UP(8) ""; UP(9) " ";: 50931 "";(" ",1UP(8),1);? "";QUP(9)1UP(9)Wc| "";r II1 3: " " II "";:pzI09:F(I)ZER:IT(NM5):NNM5T:NMT N0I6 5N:F(I)1F(I): I1 T(NM2):NNM2T:NMTD NF(5)1F(5)` T(NM5):NNM5T:NMT N0I34N1:F(I)1F(I):I T(NM2):NNM2T:NMT NF(4)1F(4)  X5500 "NUMBER? ";:60000 IN$""NM1:!IN$""7300!I1(IN$)A!:T$(IN$,I,1):T$"0"T$"9"T$"-"7160n!T$".""NO FRACTIONS, PLEASE.":7310x!7300!I!NM(IN$)! NM0"TOO SMALL.": 7310!NM99 "TOO BIG.": 7310! !"THAT'S NOT A NUMBER.""I11000:I"7000+"(#"";H"2#"";f"<#"  ";"F# " ";"P# "   ";"Z# "";"d# "";"n# " ߥ ";#x# " ";7## "   ";T## II0 9:UP(II)1: IIZ##{#`IN$" ":ZTTI:ZC2:ZD$(20)#jZ$: Z$""60070#tZTTI(" ",ZC,1);"";:ZC3ZC:ZTTI15#~60010#Z(Z$):ZL(IN$):(Z127)32" ";:60110-$FL(Z127)64(Z127)91Z$((Z128)255)?$ZL25460010Z$IN$IN$Z$:Z$;ZD$;Z$;y$Z13IN$(IN$,2):CR$;:$Z20ZL1IN$(IN$,ZL1):"";:60010$Z141Z$(20(ZL1)):Z2ZL:Z$;:Z:60000$60010 %(PN0PK(59468):59468,PK14:60250)%2"PRESS RETURN TO ";F%"FOR THE NUMBER6,PRESS YOUR(H"RIGHTTHUMBAND FOREFINGER ON THE TABLE.(R60200(\"TO SET THE FINGERS IN THIS GAME:)f"PRESS'.' TO GO RIGHT,%)p"PRESS ',' TO GO LEFT.Q)z"TO CHANGEA FINGER, USE THE'-' KEY.z)"AFTER YOU HAVE 'SET' THE FINGERS,)"PRESS RETURN TO ENTER YOUR ANSWER)"THERE ARE SEVERAL OPTIONS IN THIS GAME.*"YOU CAN ALWAYS GO BACK TO THE MAIN MENUE.*"BY PRESSINGRETURN OR THE SPACE BAR."9*60200