WDDFCCC1RL WORD GUESSBY DONNY CHERF WRITTEN FOR ANTIC MAGAZINE ^^--- !! DO NOT RENUMBER PROGRAM WITHOUT CHANGING LINE 350 SINCE IT DEALS WITH THE DATA !! ##-----------------------------##| |##| created by |(##| |2##| DONNY CHERF |<##| |F##| August 13, 1984 |P##| |Z##-----------------------------cBB--- ALL REMS MAY BE REMOVED EASILY SINCE ONLY REMS END IN 9.dy6-6-@'6-@++7@I@@9[AAmA@yARm--- THIS IS ALL SET-UP.n.;@,;@8,.@Kw--- TITLE.xq-@@$( WORD GUESS'(k(?Obj: Guess words before time runs out for highest score.n(q(Q A0(>:@(,8(Do you need instructions<Q7<,0YA@EE--- INSTRUCTIONS. BRING CURSOR UP TO PRINT OVER PREVIOUS LINE.b(>:@(,b(LIns: A clue will flash to the screen followed by a string of hyphensSS(K (---). The clue is used to figure out the word. You mustSS(K enter letters from the beginning of the word to the end withoutTT(L repeating. The computer treats duplications and letters out ofTT(L order as incorrect responses. Pay attention so as not to typeSS(K in a letter that has already been represented by either yourselfUU(M or the computer. You should try to enter letters as often as youRR(J can since the computer will continually enter letters forTT(L you according to a time system based on your level, penalizing?( you also.(?( Press when ready. )AUA@66--- BRING CURSOR UP TO PRINT OVER PREVIOUS LINE.a(>:@(,a(KSco: For each correct letter entered by you, you'll be awarded yourTT(L level * 2 + 1. Each incorrect letter or any letter entered byQQ(I the computer will lower your score for that word by half.V(V(KCau: If the computer enters all the letters of one word, or if you"RR(J press , the computer will end the game and display your,( final result.6(( Good luck.@.(.(# Press to begin game.J )AUA0Scc--- START. POKE 766,C1 DISABLES CURSOR CONTROLS SO PLAYER CAN'T CLEAR SCREEN OR MOVE CURSOR.T{ B(>:A%,&Af,6-26->6-A A(P( WORD GUESSS(V(x( I will start you at level 0.{(]hh--- SET RESTORE IN LINE 350 TO FIRST DATA LINE. SET INT(RND(C0)*__) TO NUMBER OF DATA STATEMENTS.^%#A@%P:H:,$@P,$%"g22--- ALLOW PLAYER TO DECIDE WHEN TO SEE CLUE.hYAdAU(S(6 When you are ready for the next clue, press .V(Y(q----- IF IS PRESSED, GAME WILL END.r )"@'A {''--- OTHERWISE GETS CLUE.|AUApgg--- PRINT CLUE AND HYPHENS. 'RO' FINDS WHICH ROW THE HYPHENS ARE PRINTED TO USE POSITION COMMAND.G( (6-F:@,6-%6-.6-B:,46-<-C(-G AdAU@ !Ap--- SET TIMER. F:Ad,AUAPII--- IF TIMER SURPASSES V (VELOCITY), BRANCH TO PRINT RANDOM LETTER.F:@ ,!A0==--- OTHERWISE CHECK TO SEE IF PLAYER HAS PRESSED A KEY. A LL--- LINES 450 AND 460 MAKE SURE LETTERS ARE NON-INVERSED AND CAPITALS.$ )!A'$6-&A(!@6-&@2@@--- IF LETTER IS INCORRECT, BRANCH TO PRINT RANDOM LETTER.@:7,,A0@@--- POSITIVE SOUND TO LET PLAYER KNOW LETTER WAS ACCEPTED."-@62" / -(>:,67<,.>:,'6-%/6-%AA--- 'K' IS FIRST UNCHANGED LETTER OF WORD. ALWAYS UPDATED.+ Ap6-%+7<,4>:,AEE--- CHECK IF ANOTHER LETTER WAS ENTERED WHILE WORKING. IF NOT,* B*F:Ad,"AUA&&--- IF A LETTER WAS ENTERED THEN APMM--- ROUTINE TO CHOOSE RANDOM LETTER FOR WRONG OR NO RESPONSE BY PLAYER.'6-P:H:,$,%'@:7,,"A0DD--- NEGATIVE SOUND TO TELL PLAYER OF INCORRECT OR NO RESPONSE.(-@6$2@( &E -(7<,!67<,.>:,)6-%76-'@EA0 A9--- CLEAR KEYBOARD ENTRY.:AdAU((CMM--- IF PLAYER DIDN'T ENTER ANYTHING ON A WORD, THEN COMPUTER ENDS GAME.D(A M%%--- OTHERWISE IT UPDATES SCORE.Nw 6-P:$+@%&'@,,(6-%T( After scoring  on this word, yourt(total is now ***  ***.w(W22--- CHECK TO SEE IF THERE IS A LEVEL CHANGE.X'' +A &,$+A &,APbv6-P:&'@,6-%?( You are now at level .M-@)e2@)&@ i l(v APk22--- PRINT FINAL SCORE AND ASK TO PLAY AGAIN.lb A (/(Your final score is .2(I(Care to try againMb7<,4YA@u&&--- SET EVERYTHING BACK AND END.v9ARAf -(>:A%,6(BYE!9gg--- DATA STATEMENTS BEGIN HERE AND MORE CAN BE ADDED. CHANGE LINE 350 IF ANY MORE DATA IS ADDED.COCKROACH,Household pestCANDIDATE,ContestantBRAIN,Thinking capVISIBLE,EvidentCURTAINS,Window coverings$$GRASS,Always greener elsewhere!!AIRPLANE,Sky transportation##TELEVISION,Advertising mediumCLOTHES,Garments""SIDEWALK,Used by pedestriansMIRROR,Reflecting glassRHYTHM,Movement to beatPENCIL,Writing utensilSCHOOL,Learning center PLANET,Earth is oneEVERYTHING,All FEET,Walk on these*((COMPUTER,You're working on one now4FRIEND,Close aquaintance>&&WATER,Used to drink and bathe inH$$SCREWDRIVER,A tool and a drinkR##CATCHER,Who pitcher throws to\MICROWAVE,Heats food fastfSTORE,Place to shopp$$LOVE,Makes the world go 'roundz""DRESSER,Holds folded clothesCOUNTRY,U.S. is oneCHAIR,You sit in this''TYPEWRITER,Speeds measured in WPMMAGAZINE,ANTIC is one%%CLOSET,Contains hanging clothes!!SWIMMING,Mark Spitz's sport$$CONTINENT,North America is one..AUSTRALIA,Both a country and a continent))FIREPLACE,Provides warmth with logsTABLE,You eat off thisSTEREO,Music generator##ANTIQUE,Old and valuable itemDISKETTE,Program saver++PORTFOLIO,Artists and models have one%%BACKYARD,Located behind a houseAUTOMOBILE,Car$((FLASHLIGHT,Used to see in the dark.CLOCK,Morning waker8SHAMPOO,Cleans hairB""SUBMARINE,Patrols the depthsLALMONDS,California nutsVCANADA,Northern neighbor`MONEY,Currencyj''ATLANTIC,Ocean off the east coastD:WORDGUES.BAS