SP DISK # 12I53280,5:53281,15:(142)""; : GOTO170" " CAN YOU FLIP-FLOP #" (" BETTER THAN THE COMPUTER ( -" "9 2"";w 7"         " <"         " A"         " B1200:1200) FX12: D11000::"";N K"     "s P"     " U"     " Z1200:D1500::""; _21)"    " d21)"    "/ i21)"    ":1200K nD1500::"";p s21)"    " x21)"    " }21)"    ":1200 D1500::""; "     "! "     L "     ":1200:Xh D1500::""; "         " "         "( "         ":1200= D13000::NU0h 59468,12:A%(8,8),B%(8,8),RW(8),RS(8) Z215:T$(0)"":T$(1)" ":T80 I18:A$(I)(I64) J18 (IJ)1A%(I,J)1:205 A%(I,J)0 ::NU1215 755 ""15)"FLIP-FLOPF""27)"ך = PLAYER":27)" = COMPUTERxY$" ݠݠݠݠݠݠݠ":Z$""12)"1 2 3 4 5 6 7 811)"I17:10)A$(I)Y$:11)Z$:10)A$(I)Y$:11)"330:T$"Y"290?S(8(TI)1):W(8(TI)1):A%(W,S)0255H270R  535cUWVS26527)"MY TURN : "A$(W)((S),1):UW:VS370:465:XTXT1:330SP1CB1GE1: 510"390'A%(W,S)1"":290,UWVS"":2901UW:VS+6370:465:XTXT1:330E;SP1CB1GE0: 500N@265kE *** PRINT ROUTINE **J"TURN #"XTOI18:12);:W%(I)0:S%(I)0TJ18:Z6A%(I,J)209"";YZ6A%(I,J)215""; ^(Z6A%(I,J))"";:B%(I,J)A%(I,J):Lc FORJ=1TO8:PRINTCHR$(Z+6*A%(I,J))"";:B%(I,J)=A%(I,J):NEXTXh:::wm *** INVERS-ROUTINE ***rI18:A%(I,S)(A%(I,S))wA%(W,I)(A%(W,I)):|A%(W,S)(A%(W,S)): *** PLAYERS DRAW ***1200:"YOUR TURN "; 445'T$(65)T$(72)395;W(T$)64:T$;D445aT$(20)" ";:395|T$(49)T$(56)410T$;:S(T$):A%(W,S)1"":390UWVS"":39037)" ": *** INPUT (PLAYERS DRAW) ***1,0,0+T$:T$((X));:I1T::X(X):T$""450<A(T$):1:a *** CALCULATION OF SCOPE ***sI18:J18W%(I)W%(I)A%(I,J)S%(I)S%(I)A%(J,I):W%(I)8S%(I)8SP1W%(I)0S%(I)0CB1:" YOU WIN !!! PLAY AGAIN Y/N ";% 515X" I WIN !!! PLAY AGAIN Y/N ";lT$:T$"" 515T$"Y":" YES ":NU1:175 T$"N" 515"": *** CALCULATION OF DRAW ***I18:J18!ZW(I)ZW(I)B%(I,J)&ZS(I)ZS(I)B%(J,I),+::WG0:SG0A0Z70:Z10:I18W5ZW(I)7Z7Z71m:ZS(I)7Z7Z71?ZW(I)1Z1Z11:WGIDZS(I)1Z1Z11:SGIIZS(I)0:ZW(I)0N:Z70Z10 690SW(8(TI)1):S(8(TI)1):B%(W,S)0 595XI18:B%(I,S)(B%(I,S))6]B%(W,I)(B%(W,I)):MbB%(W,S)(B%(W,S))_gI18:J18wlZW(I)ZW(I)B%(I,J)qZS(I)ZS(I)B%(J,I)v:{Z70:Z10:I18ZW(I)7Z7Z71ZS(I)7Z7Z71ZW(I)1Z1Z11ZS(I)1Z1Z11ZS(I)0:ZW(I)0:<I18:B%(I,S)(B%(I,S))UB%(W,I)(B%(W,I)):lB%(W,S)(B%(W,S))|Z70 595270Z10 595WG0 725I18:B%(WG,I)1SGII18:IWG 720B%(I,SG)1WI:SSG:270I18:B%(I,SG)1WGI$:I18:ISG 745TB%(WG,I)1WWG:SI_:270w *** INSTRUCTIONS53280,15:""4)"3)" F L I P - F L O P 4)"55)"A TACTICAL GAME OF YOU AGAINSTW9)"THE COMMODORE COMPUTER.} 8)"DO YOU KNOW THE RULES Y/NT$:T$"Y"T$"N" 785 T$"N" 825 "YOU HAVE THE RED STONES (ט) "THE COMPUTER HAS THE YELLOW (ј)%"PRESS TO PLAY1*G$:G$"" 810 7/K4 RULES ^9""12)"RULES>"EACH PLAYER (YOU AND THE COMPUTER)C"TRIES TO CHANGE THE OPPONENTSH"STONES INTO HIS OWN COLOR.M"DURING THIS CHANGE, ALL STONES IN%R"HORIZONTAL AND VERTICAL DIRECTION OFOW"THIS CHANGED STONE WILL BE CHANGED_\"AS WELL.a" ( > AND > )f"PRESS TO CONTINUEk198,0:198,1p"EXAMPLE -u"THE CHANGED STONE (ARROW) AND ITS z"HORIZONTAL AND VERTICAL ROW BEFOREE"CHANGE (1); AFTER CHANGE (2)Y10)"4"25)"4"m10)""25)""10)""25)""10)""25)""10)""25)""6)"E"21)"E"9)""24)""8)" "23)" "6)"E4 "21)"E4 "+9)"(1)"24)"(2)O"PRESS TO CONTINUE.a198,0:198,1"A STONE JUST CHANGED BY THE OPPONENT"CANNOT BE CHANGED BACK RIGHT AFTER THAT."(THE COMPUTER WONT LET YOU DO IT)."THE WINNER IS THE PLAYER, WHOSE:"STONES FORM A STRAIGHT LINE FIRST._"(HORIZONTALLY OR VERTICALLY.)"PRESS TO PLAY.198,0:198,1 755 S54272:S24,15:S5,9:S1,20:S4,128D140::S4,129: