" 0,2,5: 4,1,3:(14):""- 2000O" *** UPER IND ***":n(25);:I1NC:" ";:: -25);:"";:I1NC21:"=";::""2J19<25)" ";:I1NC1:" ";:I:""A25)"";:I1NC21:"=";::"":JF25)" ";:I1NC1:" ";:I:""DK25)"";:I1NC21:"=";::""_P"TART UESSING!"kZP110u_G$""dI1NCnGU$:GU$"" 110xJ1(C$):GU$(C$,J,1)140}GU$(20)200(GU$)271000J: 110 HERE WE GO- 3976I2ZZ80,(GU$): 2952I2ZZ80,0;G$G$GU$AHIY END OF ROWqPP$:PP$(20)200PP$(13)GU$"14":500: EVALUATE 166ZZZZ1 P END OF GUESSES 1000K1NC: 2952K2ZZ80,11:3976K2ZZ80,32::GU$"-3":950 CHECK THE GUESS!JC1$"":G1$"":X0:Y0VI1NC{(G$,I,1)(B$,I,1)XX1: 530 C1$C1$(B$,I,1):G1$G1$(G$,I,1)IXNC800: ALL CORRECT!&I1(C1$)+L1(C1$)0(G1$,I,1)(C1$,L,1)YY1: 5665L36C1$(C1$,L1)(C1$,L1)::IG;X0573}<I1X: 3962I2ZZ80,122: 2938I2ZZ80,0:I=Y0600>J1Y: 3962X2J2ZZ80,24:2938X2J2ZZ80,0:JX VERDICT TIME COMING UP] 169+ "OU GUESSED IT ! "::" HE CORRECT ANSWER IS ="1%<* 1010z"ORRY, YOU DIDN'T "::" GET IT. HE ANSWER IS ="I1500:I1NC3072104I2,((B$,I,1)):2048104I2,0" RESS ANY KEY FOR ":" ANOTHER GAME."" R PRESS 'X' TO QUIT."2$Z$:Z$"" 1060W&Z$"X""BYE ...":(142):b. 2200k3ZZ0t8 30"ELCOME TO UPER IND,AN IMPLEMENTATIONOF THE POPULAR BOARD GAME ":"Ē FOR THE OMMODORE 16.">:"N THIS GAME, YOU'LL HAVE TO GUESS A COMBINATION OF 4,5 OR 6 PIECES.":"HE COMPUTER WILL SET UP A RANDOM SET OFCHARACTERS FOR YOU TO GUESS.":"HIS WILL CONSIST OF THE NUMBERS ONE TO SIX. :"OU CAN CHOOSE HOW MANY PIECES TO HAVE (4 TO 6), AND WHETHER ";8 "OR NOT NUMBERS ARE REPEATED.":30004"NTER YOUR GUESS BY PRESSING THE APPROP-RIATE KEY ON THE TOP ROW ";>"OF THE KEYBOARD"H"OR EXAMPLE, PRESS '1' IF YOU THINK THE NEXT NUMBER IS ONE, '3'"; R" YOU THINK IT'S THREE, AND SO ON."P\:"UST PRESS 'NST/EL' IF YOU WANT TO CHANGE YOUR MIND."}a:"RESS 'ETURN' TO ENTER YOUR GUESS."f:"HE COMPUTER WILL THEN MARK YOUR GUESS, BY DISPLAYING :="p:"IGHT UMBER IGHT UMBERz"IGHT LACE RONG LACE X"/ 3072614,122:2048614,0p:"ND NOTHING AT ALL IF IT'S THE WRONG NUMBER.": 3000"OULD YOU LIKE 4, 5 OR 6 PIECES (PRESS 4, 5 OR 6) ?"CO$:CO$"" 2210CO$"4" NC4: 2255CO$"5" NC5: 2255CO$"6" NC6: 2255 2210."";NC;""t:"ND WOULD YOU LIKE NUMBERS REPEATED OR NOT (PRESS OR ) ?" CR$:CR$"" 2270CR$"Y" CR1:"UMBERS TO BE REPEATED.": 2300CR$"N" CR0:"UMBERS NOT REPEATED.": 2300 2270G:"ND REMEMBER, IF YOU WANT TO GIVE UP, JUST PRESS THE KEY.] C$"123456":B$""i I1NC| A((.5)61) CR2340 A$(C$,A,1) J1(B$):A$(B$,J,1)2315 J" B$B$A$:I:3000:$ B$B$(C$,A,1)::3000: :"RESS TO CONTINUE."6 SP$:SP$" " 3010<