M ::::: ::::: 30 ::::: ::::: ::::: ::::: ::::: :::::} " """""""""""""""""""""""""" " """""""""""""""""""""""""" " """" THIS IS AN OLD COMMODORE """" " """" """"= " """" EDUCATIONAL PROGRAM THAT """"l " """" """" " """" WAS MADE TO RUN ON MANY """" " """" """" " """" TYPES OF COMMODORE """", " """" """"] " """" COMPUTERS. EVERYTHING """" " """" """" " """" NOT NEEDED WAS REMOVED """" " """" """" " """" AND IMPROVEMENTS MADE. """"L " """" """"{ " """""""""""""""""""""""""" " """""""""""""""""""""""""". "";:53280,10:53281,10:53265,11 #T15:"Ϸ";:A ("";r -"     " 2"     " 7"     љל". <"     "| A"  м   м       м "; F"      "; K"        ";+P"             "fUT15:"Ϸ";:Z"":53265,27:S54272_D11E3::E4: 695:D11E3:: 695dD12E3::SC53281:BO53280*i"":BO,15:SC,15:" M E N U"Vn" --------------------------------"s" 1. BEGIN RHYME CONCENTRATION"x" 2. INSTRUCTIONS"}" 3. QUIT"" --------------------------------"" PRESS A NUMBER KEY (1-3)":E3: 6955G$:G$"1"G$"3"140[E1: 695:(G$)250,160,155:105az"":SC,6:BO,14:"":BO,15:SC,15" HYME ONCENTRATION - NSTRUCTIONS""""" HEN THE COMPUTER ASKS YOU TO CHOOSE A"R" SQUARE, ENTER THE NUMBER OF THE SQUARE"" YOU WISH TO BE REVEALED. RY TO MATCH"" THE SOUND OF THE FIRST WORD THAT IS "" REVEALED WITH ANOTHER WORD UNDER"" ANOTHER SQUARE."!" F YOU DON'T MATCH THEN DON'T FORGET"S" WHERE THAT WORD WAS BECAUSE YOU'LL ";}" HAVE ANOTHER TURN.":220:::240198,0:"";:T020::" RESS <> TO CONTINUE "G$:G$" "230 UU1:" HYME ONCENTRATION"37)(U)D" --------------------------------------":"":z"";::BO,15:SC,15: 710:W$(20):V1:Y$(20)A8:B$"YYYYYYYYYYYYYYYY":"""ATCH HE HYMING ORD":"": N1(((1)122)1)2:Y$::N116:X((1)16)1(B$,X,1)"Y"2851XX1:X17270>X1:270eB$(B$,X1)"N"(B$,16X):W$(X)"N1N5N9N13" ";'"   "N" ";:N9305," ";1"";:N4(N4)3156"";:"":B$"YYYYYYYYYYYYYYYY":D(1)0D@P12:"":N116:::S(1)S(2)0nE" "P$(P)": ":N12J"":C118:"";:O" HOOSE A SQUARE (1-16) ";T515:E1: 695:S(N)Y:S(N)(17S(N))0350Y330^(B$,S(N),1)"Y"360Ic" HAT ONE IS OUT OF PLAY. ":I11500::330{h525:N::"";:N121:"";::" ";:N0mM$:NN1:M$W$(S(1))365rN2(N2)380wNN2|:C1N1:M$::M$W$(S(2))DD1:410"O MATCH.": 705:I1500::520:N12JY$(S(N))W$(S(N)):W$(S(N))" "(S(N))" "ZS(N)9405tW$(S(N))W$(S(N))" """;:525:W$(S(N))Y$(S(N))::"":455D3D1D1"HAT'S A !!"D2"ERY WELL DONE !!" D3"ICE WORK !!"CE2: 695:AA1:D(P)D(P)1:I1500::520:N12kB$(B$,S(N)1)"N"(B$,16S(N)):W$(S(1))P$(1):W$(S(2))P$(1):"";:P1450W$(S(1))P$(2):W$(S(2))P$(2):"";N12:525:A0470"";:N118:::N15:" "C:"":N115::::::P:320Y"";:N117::N16:" ":"";:"HAT'S THE GAME"P1:D(1)D(2)500P2:D(1)D(2)500" OU BOTH HAVE 4 MATCHES, YOU'VE TIED.":510L" "P$(P)" WINS WITH"D(P)"MATCHES."t" ELL PLAYED, "P$(P)"."220:Z$"":631,150:198,1:"";Z$:Y0:Y(Z$):"":"":N120:"";:: XS(N)(S(N)4)4:X0535X4'X(X1)8:L(W$(S(N))):"";:X0545AC1X(X8):"";:p!Y((S(N)1)4):YY41:C1Y:"";::F0&" ";:L5560+F((7L)2):C1F:" ";:0W$(S(N));:FL75705C17LF:" ";::" ";:E?SIGN,STEIN,WAIT,FREIGHT,THOUGHT,CAUGHT,KILLER,DILLER,DENNIS,MENACEDREIGN,STAIN,DAWN,GONE,THOUGH,KNOW,ROSEY,POSEY,SCOOBY,DOOBY,STUFF,PUFFISTAID,WEIGHED,CHAFE,WAIF,LONER,BONER,FLOPPY,MOPPY,ROCKY,JOCKEYNGLOAT,ROTE,PEAK,SNEAK,LIAR,CRYER,SPLURG,DIRGE,FLOP,PLOP,RULE,POOLeSFIGHT,HEIGHT,GAUGE,RAGE,LEAN,MEAN,FILE,WHILE,ERROR,TERROR,QUITE,RIOTXMOUSE,HOUSE,TREET,CLEAT,UPPER,TUPPER,SUPER,DUPER,WHAT,KNOT,PEEK,SEEK]BEGIN,RESCEND,QUIT,KNIT,SWITCH,TWITCH,HELP,KELP,LINE,NINE,CAPS,RAPSAbENTER,CENTER,PORT,SPORT,MOVE,GROOVE,DUDE,PRUDE,FLED,DEAD,THIS,BLISSgREND,SEND,BEST,CREST,WELL,TELL,CHILL,THRILL,CHANGE,RANGE,JAGGY,MAGGIElCOUNT,MOUNT,NODE,TOAD,REACHED,BEACHED,MAP,SLAP,JUNE,MOON,MARCH,STARCHqSPOON,CROON,SCREEN,SPLEEN,ERASE,DEFACE,COVER,SMOTHER,UNDER,BLUNDERivNERD,BIRD,TIED,SPIED,SLURP,BURP,CHARGE,LARGE,LINE,MINE,BUBBLE,RUBBLE{TRACE,LACE,MOON,JUNE,STERN,DURN,POWER,SOUR,CRACKS,STACKS,TODAY,WEIGHDOUBLE,TROUBLE,SECTOR,VECTOR,MATH,BATH,CLAN,PLAN,COLLECT,REJECTC POO,MOO,STOOP,TROOP,CROW,BLOW,LABEL,STABLE,SPRITE,MIGHT,ERASER,CHASER LIST,MISSED,CHECK,SPECK,CURSOR,NURSER,DAIRY,MERRY,BOTTOM,SHOTUM FAMOUS,AMOS,CHROME,DOME,MARK,SPARK,PARTY,MARTY,BATHER,SHAVER,MOP,TOP!CHER,SCARE,MAUDE,CLAUDE,TWINKLE,TINKLE,JAZZ,RAZZ,LASSIE,CLASSY,PO,JOf!SISKEL,FISCAL,GAME,SHAME,SPIDER,RIDER,BUNNY,FUNNY,BUGS,DRUGS,PIG,RIG!MAGIC,TRAGIC,CAROL,BARREL,WHITE,UPTIGHT,AFFAIR,DECLARE,ROOTS,BOOTS!DREAMER,STEAMER,RANGER,DANGER,BEACH,REACH,KNIGHT,SPITE,FORT,COURT@"HUNT,BUNT,STAR,AFAR,HIDDEN,RIDDEN,EDDIE,BETTY,WING,DING,STRETCH,CATCH"RIGHT,MIGHT,HANDY,DANDY,BARRY,LARRY,KNIFE,WIFE,ARSENIO,TALLYHO,SO,MO"::"S24,15:T1E:S5,1:S6,248:S1,25:S,244:S4,17"D1130::S4,16::TSS23:T,0::#T3001:S24,T:S24,0::G#P$(1)"URDHED":P$(2)"NOOKUM":240u#K1" O MORE THAN 7 LETTERS.#631,150:198,1:"HAT IS THE NAME OF PLAYER 1 ";P$(1)#(P$(1))7K1:U0:250$"ICE TO MEET YOU "P$(1)".": 695>$631,150:198,1:"HAT IS THE NAME OF PLAYER 2 ";P$(2)[$(P$(2))7K1:U0:250$"ICE TO MEET YOU ALSO, "P$(2)".": 695:220: