1 PROCvdu7:MODE7:PROCtitle:PRINT"†3-A-LINE�IS A GAME WHICH NEEDS "'"�BETWEEN 2-4 PLAYERS.THE OBJECTIVE OF "'"�THE GAME IS TO FIT 3 SQUARES IN A "'"�HORIZONTAL,VERTICAL OR DIAGONAL LINE."'"�IF YOU DO..YOU�GAIN POINTS."
   40 PRINT'"‚THIS INVOLVES CLEVER THINKING & "'"‚BRAINPOWER TO GAIN MORE POINTS THAN "'"‚THE OTHER PLAYERS." 
   50 PRINT'"ƒALSO NOTE THAT IF THREE SQUARES ARE"'"ƒIN LINE AND THIS FORMATION IS NOT "'"ƒBROKEN (IE THE THREE SQUARES ARE NEXT"'"ƒTO EACH OTHER) THEN POINTS ARE AWARDED"'"ƒEVERY TIMEƒANY PLAYER HAS FINISHED HIS"'"ƒ/HER GO."::VDU23,65,112,8,68,126,66,66,66,0 
   60 PRINT'"‚ALSO...THERE IS A COLOUR SEQUENCE.."'"‚WHICH MUST BE FOLLOWED.IT IS SHOWN ON"'"‚THE TOP OF THE SCREEN IN THE GAME." 
   61 PRINT"”,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,":GT$=GET$
   70 VDU23,66,126,66,66,124,66,66,126,0:VDU23,67,126,66,64,64,66,66,126,0:VDU23,68,112,8,68,66,66,66,124,0:VDU23,69,126,0,64,124,64,64,126,0:VDU23,70,126,0,64,124,64,64,64,0:VDU23,71,126,2,64,78,66,66,126,0:VDU23,72,66,66,66,126,66,66,66,0:VDU23,73,62,8,8,8,8,8,62,0
  150 VDU23,74,126,8,8,8,72,72,120,0:VDU23,75,68,72,80,96,80,72,68,0:VDU23,76,64,64,64,64,66,66,126,0:VDU23,77,127,73,73,73,73,65,65,0:VDU23,78,112,8,68,66,66,66,66,0:VDU23,79,126,2,66,66,66,66,126,0:VDU23,80,126,2,126,64,64,64,64,0:VDU23,81,126,2,66,66,74,76,118,2
  230 VDU23,82,126,2,126,72,68,66,66,0:VDU23,83,126,66,64,126,2,66,126,0:VDU23,84,127,8,8,8,8,8,8,0:VDU23,85,66,66,66,66,66,66,126,0:VDU23,86,66,66,66,66,68,72,112,0:VDU23,87,65,65,73,73,73,73,127,0:VDU23,88,66,66,36,24,36,66,66,0:VDU23,89,65,65,127,8,8,8,8,0
  310 VDU23,90,126,66,4,8,16,34,126,0:VDU23,64,60,66,153,161,161,153,66,60:VDU23,94,8,24,8,8,8,8,28,0:VDU23,91,126,66,2,2,2,2,2,0:VDU23,95,126,66,66,126,2,2,126,0:VDU 19,1,3,0,0,0:VDU28,0,24,39,3 :CHAIN"SQU":END
  400 DEFPROCtitle:PRINTTAB(5);:VDU132,157,141:PRINT"‡3-a-line�byƒa.s.shakoor†'91":PRINTTAB(5);:VDU132,157,141:PRINT"‡3-A-liNe�byƒA.S.ShAkOOr†'91":PRINT"”,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,":ENDPROC
  500 DEFPROCvdu7:ENVELOPE 3,1,0,0,0,0,0,0,-126,-2,0,-1,126,80:ENVELOPE 1,1,0,0,0,0,0,0,-126,-2,0,-1,126,80:ENVELOPE2,1,0,0,0,0,0,0,-126,-2,0,-1,126,80:OSCLI("FX211,1"):OSCLI("FX212,0"):OSCLI("FX213,180"):OSCLI("FX214,1"):ENDPROC