P724 CEEFA( 724 Mon 3 Nov 21:16/29 |B220120A|b14Ploy|j24BBBC332k|m40000|p÷e ÷Xd÷p÷L ******************÷e÷Xn÷p÷L * *÷e÷Xx÷p÷L * PLOY *÷e÷X—*÷p÷L * *÷e÷X—4÷p÷ L * R.Nixon 1986 *÷e÷X—>÷p÷L * (c) Mic ro User *÷e÷X—H÷p÷L * *÷e ÷X—R÷p÷L ******************÷e÷X—\÷]÷L÷e÷ X—f÷d*FX229,1÷e÷X—p÷k*KEY10O.||MRUN||M÷e ÷X÷*÷gCW%=0:HW%=0÷e÷X÷4|—÷C7:÷G23;8202;0 ;0;0;:PNT*=0:XX*=0:J1%=0:K1%=0:CP%=0:HL% =0:VL%=0:SD%=1:÷6A%(8,8),B%(8,2),C%(8,2) ÷e÷X÷>O÷Jread#data:÷Jbackground:÷J"anner :÷;ZZ%=1—|—220—017:÷,1,-15,ZZ%,1:÷,1,-15 ,ZZ%+39,1:÷E÷e÷X÷HF÷Jinit#title:÷;JJ%=1— |—5:÷KJJ1),COL*:÷Jtext(COL%):÷;ZZ1%=1—|— TJ1%:÷KA$:÷IA$:÷E÷e÷X÷R=÷G26:÷Jtitle:÷E: ÷G28,8,22T30,7:÷3:÷G26:÷Jboard:÷F —[(2) ÷=—uSDA,—5TvA÷e÷Y÷\O÷Jploy:÷G31,5,2,130, 157,132,141:÷I—15"Your move...";—15;:÷G3 1,5,3,130,157,132,141÷e÷Y÷f4÷I—15"Your m ove...";—15;:÷Jselect#row:÷Jleft#or#sigh t÷e÷Y÷p÷eMV%=MV%+1÷e÷Y"÷l÷G31,6+XX%*3,5, 32÷e÷Y,)÷Jcheck#play:÷?CW*=1 —, HW%=|c
P724 CEEFAX 724 Mon 3 Nov 21:1?/10 |B220220A|b14Ploy|i24BBBC332k|m402E6|p1 ÷Jgame#over÷e÷Y6÷p÷Jploy:÷Jcomputer#play ÷e÷Y@ ÷G31,6+X**3,5:÷?E%=1 ÷G68 —3 ÷G85÷ e÷YJ÷bXX%=X*÷e÷YT÷c*FX15,1÷e÷Y^÷eMV%=MV% +1÷e÷Yh)÷Jcheck#play:÷?CW%=1 —, HW%=1 ÷J g!me#over÷e÷Yr÷a÷=—5TDA÷e÷Y||I÷5÷Jploy:÷ G31,5,2,130,157,132,141,135:÷I—14—l3,—e9 Q)—e132"PLOY"—e135—l3,—e93)—16;÷e÷Y—.R÷G 31,5,3,Q30,157,Q32,141,135:÷I—14—l3,—e91 *—e132"PLOY"—e135—l3,—e93)—16;:÷;V%=1—|— 10000:÷E:÷9÷e÷Y—8+÷5÷J"ackground:÷;J%=0— |—24:÷?J%=6 ÷G31,7,6,135÷e÷Y—Bk÷G31,0,J% ,129,157,31,39,J%,156:÷?J%>6 —( J%<24 ÷G 31,3,J*,91,91,91,132,157,31,32,J%,129,15 7,129,93,93,93:÷E:÷9÷e÷Y—L÷#÷E:÷9÷e÷Y—VS ÷5÷Ttext(TC*):÷;ZZ%=6—|—18:CL%=TC%:÷?JJ% =k —( ZZ%=Q2 CL%=130 —3 ÷?JJ%=5 —( ZZ%=1 4 CL%=129÷e÷Y—|—%÷G31,8,ZZ%,CL*:÷E:÷G28, 9,19,30,7:÷3:÷9÷e÷Y—j÷l÷5÷J"anner:÷;J%=0 —|—5÷e÷Y—t—W÷G31,0,J*,129,157,31,39,J%,1 56:÷J*>0 —( J*<5 ÷G31,3,J%,Q33,157,31,3 5,J*,129-157:÷J%>1 —( J%<4 ÷G31,5,J%,13 0,Q57,132,141,135:÷I—14—l3,—e91)—e13|c
P724 CEEFAX 724 Mon 3 Nov 21:17/27 |B220320A|b14Ploy|j24BBBC332k|m405CA|p2" PLOY"—e135—l3,—e93)—16;:÷G31,33,J%,Q33,1 57÷e÷Y÷.÷#÷E:÷9÷e÷Y÷84÷Jcheck#directions :F%(X1%)=AM%:X%=X*+1:÷?X%=9 (%=1÷e÷Y÷B÷g ÷5÷Jread#data÷e÷Y÷L'÷;J%=1—|—8:÷;K%=1—|— 8:÷KA%(K%,J%):÷EK%,J*:÷9÷e÷Y÷V÷m÷4 7,1,7 ,0,1,7,0,7÷e÷Z÷|—÷m÷4 1,7,1,0,1,0,7,0÷e÷ Z÷j÷m÷4 7,1,0,0,1,1,0,7÷e÷Z÷t÷m÷4 0,0,0, 7,7,1,1,1÷e÷Z&÷m÷4 1,1,1,7,7,0,0,0÷e÷Z0÷ m÷4 7,0,1,1,0,0,1,7÷e÷Z:÷m÷4 0,7,0,1,0,1 ,7,1÷e÷ZD÷m÷4 7,0,7,1,0,7,1,7÷e÷ZN÷c÷5÷J board÷e÷ZX÷k÷;J%=1—|—8:÷;K%=1—|—8÷e÷ZbS÷ G31,J**3+k]K%*2+u-145+A%(J*,K%),25u,—<(1 -A)(J%,K%))+14u,31,J**3+6,K%*2+6,255,132 ÷e÷Zl÷d÷EK%,J%:÷9÷e÷Zv÷u÷5÷Jselect#row:÷ ,1,-15,150,1÷e÷Z—(÷rY%=0:÷M÷G31,7,Y%*2+7 ,Q56÷e÷Z—2÷s÷Jadval:÷G31,7,Y%*2+7,157÷e÷ Z—<÷nZ%=Y%+1:÷?Y%=8 Y%=0÷e÷Z—F/÷TAD%=2:÷ M÷U(—>(0)—(3)=0 —( —N(-99)=0 —( —N(-74)= 0:÷9÷e÷Z—P ÷5÷Jleft#or#right:÷,1,-15,150 ,1÷e÷Z—Z÷tZ%=0:÷MZ%=Z%+1:÷?U%=3 Z%=1÷e÷Z —d÷f÷?Y%=0 Y%=8÷e÷Z—n÷k÷F Z% ÷=—5dPB,—5d ZB÷e÷Z÷(÷v÷G31,1,Y%*2+5,156,135:÷=—5|c
P724 CJEFA( 724 Mon 3 Nov 21:17/25 |B220420A|b14Ploy|i24BBBC332k|m40896|phd B÷e÷Z÷2÷w÷G31,33,Y%*2+5,156,135:÷=—5ddB÷ e÷Z÷<;÷Jadval:÷G31,1,Y%*2+5,157,129,31,3 3,Y%*2+5,157,129:÷TAD%=2÷e÷Z÷F"÷?Z%=1 ÷J move#lift —3 ÷Jmove#right÷e÷Z÷P(÷M÷U(—>( 0)—(3)=0 —( —N(-99)=0 —( —N(-74)=0:÷9÷e÷ [÷Z÷i÷5÷Jadval:QT%=0÷e÷[÷d÷m÷?—N(-82)=-1 ÷Jsound÷e÷[÷nHAD%=—>(0)—(3:SP%=—N(-99): RT*=—N(-74):÷?AD%=0 —( SP%=0 —( RT%=0 PN TJ=0:÷=—5TLC÷e÷[ ÷p÷?QNT%=0 PNT%=1:÷=—5D HC÷e÷[*QQTJ=0:Z1%=0:÷MZ1%=Z1%+1:÷?(—>(0) —(3)=0 —( —N(-99)=0 —( —N(-74)=0 PNT%=0: Z1%=200:QT*=1÷e÷[4÷d÷UZ1%=200÷e÷[>÷h÷?QT %=1 ÷=—5TVC÷e÷[H÷s÷?SP% AD%=1 —3 ÷?RT% A D%=2÷e÷[R*÷?AD%=1 ÷,1,-15,150,1 —3 ÷,1,- 15,60,1÷e÷[\÷]÷9÷e÷[f÷s÷5÷Jmove#left:÷,Q ,-15,30,2÷e÷[pPP%=&7C08+40*(Y%*2+6):÷;K% =Q—|—3:Q*=?P%:÷;J%=P%—|—P%+23:?J%=?(J%+1 ):÷E:?(P%+23)=Q%:÷E÷e÷[z=Q%=A%(1,Y%):÷;J %=1—|—7:A%(J%,Y%)=A%(J%+1,Y%):÷E:A%(8,Y% )=Q%:÷9÷e÷[—,÷t÷5÷Jmove#right:÷,1,-15,30 ,2÷e÷[—6SP%=&7C08+40*(Y%*2+6):÷;K%=1—|—3 :Q*=?(P%+23):÷;J*=P%+23—|—P%—0-1:?J%|c
P724 CEEFA( 724 Mon 3 Nov 21:18/50 |B220520A|a14Ploy|i24BBBC332k|m40B79|p=? (J*-1):÷E:?P%=Q%:÷E÷e÷[—@@Q%=A%(8,Y%):÷; J*=8—|—2—0-1:A%(J%,Y%)=A%(J%-1,Y%):÷E:A% (1,Y%)=Q%:÷9÷e÷[—J'÷5÷Jmovj#down:÷?CP%÷= —utvC —3 ÷-1,-15,30,2÷e÷ —T]P%=&7D1D+X%* 3:÷;K%=1—|—2:÷;KK%=1—|—200:÷E:Q*=?IP%+60 0):÷;J%=P%+560—|—P%—0-40:?(J%+40)=?J%:÷E :?P%=Q%:÷E÷e÷[—^@Q%=A%(X%,8):÷;J%=8—|—2— 0-1:A%(X%,J*)=A%(X%,J*-1):÷E:A%(X*,1)=Q% :÷9÷e÷[—h&÷5÷Jmovj#up:÷?CP% ÷=—5dTC —3 ÷ ,1,-15,30,2÷e÷[—r\P%=&7D45+X%*3:÷;K%=1—| —2:÷;KK%=1—|—200:÷E:Q*=?P%:÷;J%=P%—|—P%+ 560—040:?J%=?(J%+40):÷E:?(P%+600)=Q%:÷E÷ e÷[÷,=Q*=A%(X*,1):÷;J*=1—|—7:A%(X*,J%)=A %(X*,J%+1):÷E:A%(X%,8)=Q%:÷9÷e÷[÷6c÷5÷Jt ime#init:÷G31,9,2,130,157,Q32,141:÷I"Mz move...";—17:÷G31,9,3,Q30,157,132,141:÷I "My move...";—17:÷9÷e÷[÷@[÷5÷Jtime:÷?CP% =0 ÷9 —3 TME%=(—9 —) 100)—+60:÷G51,23,2, 133,141:÷I;TME%;:÷G31,23,3,133,141:÷I;TM E%;:÷9÷e÷[÷J(÷5÷Jcomputer#play:CP%=1:÷Jt ime#init:÷)=0÷e÷[÷T÷i÷BA%,B%,C%÷e÷\÷^÷c÷ ;A%=1—|—2÷e÷\÷h÷c÷;B%=1—|—8÷e÷\÷r÷k÷F|c
P724 CEEFAX 724 Mon 3 Nov 21:14/43 |B220620A|a14Ploy|i24BBBC332k|m40E5D|p A % ÷=—5TdD,—5TnD÷e÷\$÷rX*=B%:÷Jmovj#down: ÷=—5TxD÷e÷\.÷jX*=B%:÷Jmovj#up÷e÷\8÷g÷Jch eco#play÷e÷\B÷iC%(B%,A%)=SP%÷e÷\L÷k÷F A% ÷=—5EVD,—5D|—D÷e÷\V÷pX*=B%:÷Jmove#up:÷= —5EjD÷e÷\|—÷lX*=B%:÷Jmove#down÷e÷\j÷]÷E÷ e÷\t÷]÷E÷e÷\|÷÷iBM%=-9999÷e÷\—0÷c÷;A%=1— |—2÷e÷\—:÷c÷;B%=1—|—8÷e÷\—D ÷?C%(B%,A%)> BM% BM%=C%(B%,A%)÷e÷\—N÷]÷E÷e÷\—X÷]÷E÷e÷ \—b÷jABC%=0:÷;A%=1—|—2÷e÷\—l÷c÷;B%=1—|—8 ÷e÷\—v:÷?C%(B%,A%)=BM% ABC%=ABC%+1:B%(AB C%,1)=B%:B%(ABC%,2)=A%÷e÷\÷0÷]÷E÷e÷\÷:÷] ÷E÷e÷\÷D÷qY%=—[(ABC%):÷?Y%=0 Y%=1÷e÷\÷N7 X*=B%(Y%,1):C*=B%(Y%,2):D%=C%:CP%=0:÷F C ) ÷=—5T@E,—5TJE÷e÷]÷X÷h÷Jmovj#down:÷9÷e÷ ]÷b÷f÷Jmove#up:÷9÷e÷]÷l÷]÷9÷e÷]÷v÷n÷5÷Jc heck#play:SP%=0÷k÷](÷h÷BA%,B%,C%,D%÷e÷]2 ÷i÷;A%=1—|—8:÷Jtime÷e÷]<÷aC%=-1÷e÷]F÷aLC %=0÷e÷]P÷c÷;B%=1—|—8÷e÷]Z÷hD%=A%(A%,B%)÷ e÷]d÷v÷?D%=1 DC%=1 —3 ÷?D%=0 DC%=-1÷e÷]n 4÷?C*=D%:LC*=LC%+1:SP%=SP%+DC%*2^LC% —3 C*=D%:LC%=0÷e÷]x÷g÷?C%=7 C%=-1÷e÷]—*÷p÷? LC*<4 —, CP%=1 ÷=—5tVE÷e÷]—4÷o÷?D%=1|c
P724 CEEFAX 724 Mon 3 Nov 21:25/28 |B220720A|a14Ploy|i24BBBC332k|m41107|p C W*=1 —3 HW%=1÷e÷]—>÷]÷E÷e÷]—H÷]÷E÷e÷]—R÷ i÷;A%=1—|—8:÷Jtimj÷e÷]—\÷aC%=-1÷e÷]—f÷aL C%=0÷e÷]—p÷c÷;B%=1—|—8÷e÷]÷*÷hD%=A%(B%,A %)÷e÷]÷4÷v÷?D%=1 DC%=1 —3 ÷?D%=0 DC%=-1÷ j÷]÷>4÷?C*=D%:LC%=LC*+1:SP%=SP%+DC**2^LC * —3 C%=D%:LC%=0÷e÷]÷H÷g÷?C%=7 C*=-1÷i÷] ÷R÷p÷?LC%<4 —, CP%=1 ÷=—5TNF÷e÷^÷\÷o÷?D% =1 CW%=1 —3 HW*=1÷e÷^÷f÷]÷E÷e÷^÷p÷#÷E:÷9 ÷e÷^"÷m÷5÷Jsound:SD%=SD%+1÷e÷^,÷l÷F SD% ÷=—5TvF,—5DJF÷e÷^6÷d*FX210,0÷e÷^@÷a÷=—5D ^F÷e÷^J÷d*FX210,1÷e÷^T÷aSH%=0÷e÷^^÷g÷M÷U —T—N(-82):÷9÷e÷^h—T÷5÷Jk!me#over:÷G31,5, 2,130,157,129,141:÷I—16"GAME OVER";—l5," ");:÷G31,5,3,130,157,129,141:÷I—16"GAME OVER";—l5," ");:÷;KK%=1—|—3:÷;ZZ%=1—|—2 20—017:÷,1,-15,ZZ%,1:÷,1,-15,ZZ%+39,1:÷E ZZ%,KK%÷e÷^r&÷G31,6+X%*3,5,32,28,8,22,30 ,7:÷3:÷G26÷e÷^||]÷?HW*=1 —( CW%=1 ÷G31,Q 5,8,131,136:÷I"Good!"—e132:÷G31,10,10,12 9:÷I"Wj drew this game"—e132:÷=—5tZF÷e÷^ —.T÷?HW%=1 ÷G31,11,8,131,136:÷I"Well Plo yid!!!"—e132:÷G31,15,10,129:÷I"You w|c
P724 CEEFAX 724 Mon 3 Nov 21:25/22 |B220820A|a14Ploy|j24BBBC332k|m413D1|pin "—e132:÷=—5tZF÷e÷^—8R÷?CW*=1 ÷G31,9,8,Q3 1,136:÷I"Tough luck Hume!!!"—e132:÷G31,1 5,10,129:÷I"You lose"—e132÷e÷^—Bl÷G31,12 ,12,135:÷I"After";—e129;MV%;—e135"moves" :÷Tploy:÷Jinit#title:÷Jtitle:÷G31,0,24:÷ ;(*=1—|—25:÷;Y%=1—|—200:÷E:÷I:÷E:÷Q÷e÷^— LZ÷5÷Jinit#title:CT%=0:PL2$=—e135:PL$=—l 2," ")+—e135+—l3,—e91)+—e132+"PLOY"+—e13 5+—l3,—e93)+—l7," ")÷e÷^—VpPL$=PL$+—e132 +"by"+—l2," ")+—e129+"R.Nixon"+—l6," ")+ —e135+"(c)"+—e32+—e129+"Micro User"+—e13 3+"1986"+—e129+—l7," "):÷9÷e÷^—|—#÷5÷Jti tli:÷G31,8,20,134,141:÷I"Push a key or s witch";:÷G31,8,21,134,141:÷I"Push a key or switch";÷e÷^—jU÷MPL1$=PL2$+—hPL$,21): ÷G31,5,2,130,157,141,132:÷IPL1$;:÷G31,5, 3,130,157,141,132:÷IPL1$;÷i÷^—t;PL$=—jPL $,—Q(PL$)-1)+—hPL$,1):÷?—?(—hPL$,1))>127 PL2$=—hPL$,1)÷e÷^÷.aCT*=CT%+1:÷?CT%=20 —, CT*=43 —, CT*=70 —4 ÷)=0:÷M÷U—9=200 ,(—>(0)—(3)>0 —, —N(-74) —, —N(-99):÷?CT %=70 CT*=0÷e÷^÷8R÷U(—>(0)—(3)>0 —, —N|c
P724 CJEFA( 724 Mon 3 Nov 21:26/00 |B220920A|b14Ploy|j24BBBC332k|m416C9|p(- 74) —, —N(-99):÷M÷U(—>(0)—(3)=0 —( —N(-7 4)=0 —( —N(-99)=0:÷,1,-15,30,1:÷9÷e÷^÷B÷ d÷4 11,130÷e÷^÷L÷p÷4 The object of this÷ e÷^÷V÷s÷4 game is to get a line÷e÷#÷|—÷n ÷4 of 5 counters in÷e÷#÷j÷q÷4 either a h orizontal÷e÷#÷t÷s÷4 or vertical directio n÷e÷#&÷o÷4 by moving rows of÷e÷#0÷n÷4 co unters left or÷k÷#:÷t÷4 right by one pot ition.÷e÷#D÷s÷4 I can move columns of÷e÷ #N÷q÷4 counters up or down÷e÷#X÷n÷4 by o ne position.÷e÷#b÷d÷4 10,134÷e÷#l÷s÷4 Af tet each go mz last÷e÷#v÷r÷4 move is rho wn at the÷e÷#—(÷q÷4 top of the column I÷ e÷#—2÷d÷4 moved.÷e÷#—<÷]÷4÷i÷#—F÷p÷4 A ' U' shows that I÷e÷#—P÷s÷4 moved that col umn up.÷e÷#—Z÷]÷4÷e÷#—d÷p÷4 A 'D' shows that I÷e÷#—n÷l÷4 moved it down.÷e÷#÷(÷c÷ 4 8,129÷i÷#÷2÷s÷4 To select a row press÷ e÷#÷<÷l÷4 the SPACE bar.÷e÷#÷F÷]÷4÷e÷#÷P ÷q÷4 (A black line shows÷e÷|—÷Z÷n÷4 the current row)÷e÷|—÷d÷]÷4÷e÷|—÷n÷r÷4 When you have chosen÷e÷|— ÷q÷4 a row pres|c
P724 CEEFAX 724 Mon 3 Nov 21:13/18 |B220A20A|a14Ploy|j24BBBC332k|m41990|ps RETURN.÷e÷|—*÷c÷4 7,Q31÷e÷|—4÷o÷4 To chg osj between÷e÷|—>÷q÷4 moving the row lef t÷e÷|—H÷p÷4 or right you press÷e÷|—R÷l÷4 the SPACE bar.÷e÷|—\÷]÷4÷e÷|—f÷o÷4 And to enter your÷e÷|—p÷r÷4 ko you press TET URN.÷e÷|—z÷d÷4 10,134÷e÷|——,÷o÷4 Pressin g 'S' will÷e÷|——6÷o÷4 alternate between÷ e÷|——@÷r÷4 turning the sound on÷e÷|——J÷f ÷4 and off.÷e÷|——T÷]÷4÷e÷|——^÷t÷4 My cor nters are green.÷e÷|——h÷l÷4 Yours are re d.÷e÷|——r÷]÷4÷e÷|—÷,÷]÷4÷e÷|—÷6÷i÷4 GOOD LUCK!!÷k÷W|c