MATCH ? ?yA  √:я""к х:▐0:█0 їм21,0;:я"" 1PICTURE @А┤   <        А<А             ААА             А А<                          |B<■<■B|~■~        └~└         └└└           └ └~           ■          ■  ?BBDDbBBb@BBBB@@fBBBB@№         р р???         ?ррр? ?          р р            № ?         №  BBBBR@BR<BBB|@|ZB@BB|°         Ё Ё         ЁЁЁ           Ё Ё            °          °  |~BBJNBJ||BB@@B|@B|@Ё         ° °         °°°           ° °            Ё          Ё  @BDDFBBFB@DBB@@B@BBD@р  ?       № №?         №№№ ??          № №            р          р?  @Bxx>B<<> MACBRIDE 1983 << (K╫1,0:їм21,0;" PLEASE STOP THE TAPE AND WAIT " 2ёSW=0:х:э4000а 7Cїм21,0;" Press any key to start. ":Є0 <┘0:ч6:┌5:√ F@їм1,12 ;"MATCH":їм2,12 ;"ГГГГГ" PЛїм3,2;"In this program you must try";м5,2;"to find the right jigsaw";м7,2;"piece to fit in the block." Z|їм14,2;"Paddington has borrowed a";м16,2;"trolley to help him move";м18,2;"the pieces." d:ёsw=0:ёl=8:ёtl=8:ёc=1:э2000╨ xSюм0,0;" Please  ENTER  your name ";╩n$:·n$=""╦ь120x y+·пn$>90Z╦ёn$(1)=┬(пn$-32 ) z ·▒n$>12 ╦ёn$=n$(╠12 ) }ёm$="Hello "+n$ В ыn=1╠25:э1900l М<·c>6╞c<7+▒m$╦їм10 ,c-1;m$(c-6) Ц╫.5   ,0:єn а ёs=0 кыE=1╠10 ┤\╫1,0:їм21,0;" Press  ENTER  to go on. ":Є0 ╡$·e>1╞(ж="E"┼ж="e")╦ь610b ╢·пж╔13 ╦ь180┤ ╛ч4:┌7:√ ├ёZ=║(е*8)+1 ╚$ёgo=0:ёX=║(е*5)+1 ═ёIN=(║(е*5)+1) ╬┘in ╥-ыL=2╠8:їмL,24;"ППППППП":єL ▄HыN=1╠3:їм8+N,24;▌1;" ";P$(Z,X,N);" ":єN ц/ыL=12 ╠18:їмL,24;"ППППППП":єL ·ДыN=0╠4:ыT=1╠3:їмN*4+T,10 ;P$(Z,N+1,T):єT:їм2+N*4,8;┘0;N+1:єN  ┘0 .ёSW=0:ёL=8:ёC=1:э2000╨ ?їм21,6-▒n$/2;" Which piece fits,";n$;"?" "&ю"Please ENTER the number ";╩a$ ,·a$=""╦ь290" 68·пa$(1)<491┼пa$(1)>535╦ь290" Eёgo=go+1 Jёa=░a$(1) T<їм21,1;" Let's try number ";a;" " ^ёTL=(A-1)*4 h э1900l m/ёBT=.4L╠╠╠+(.1}L╠╠╠╞SW=0):╫BT,0 r#·C=7╦ёTL=7:ёSW=1 |·C=18╦ь400Р Ж ь360h Р╫1,20 ХKїм9 ,21;" ";м10 ,21;" ";м11 ,21;" " ЪR·a=x╦ыN=1╠3:їм8+N,26;┌IN;┘6;P$(Z,A,N):єN:ь500Ї дK▐1:ыN=1╠3:їм8+N,26;┘IN;P$(Z,A,N):єN:▐0 о'╫.4L╠╠╠,-10 :╫1,-17 │·go>1╦ь470╓ ╕5їм19,1;"That didn't fit.Try another" ┬Kїм21,0;" Press  ENTER  to go on. ":Є0 ├·пж╔13 ╦ь450┬ ╠ √:ь206╬ ╓9їм19,2;" It was number ";x;" " █\╫1,30:ыn=1╠3:їм(x-1)*4+n,10 ;█1;p$(z,x,n):єn рBыn=1╠3:їм8+n,26;┌in;┘0;p$(z,x,n):єn ъ ь540 ЇKїм19,8-▒n$/2;" Well done ";n$;" ":╫1,5 ■ ёs=s+1 ·e=10 ╦ь600X &=їм20,0;" Press  E  to End the program ":єE XKїм21,0;" Press  ENTER  to go on. ":Є0 b ч2:√ gёm$="Well done, " l'·s>e*.8АL╠╠╠╦ёm$="Very good indeed, " v*·s6╞C<12 ╦ь1990╞ ╕!·C>8╞L=8╦ь1990╞ ╝#ёL=L+(2╞TL>L)-(2╞TL·C/2=║(C/2)╦їмL+4,C;"ШЩЪЫЬ":ь2060  їмL+4,C;"ЮШЪЫЬ"  ·SW=0╦■ ыN=1╠3 їмL+N,C+3;┘IN;P$(Z,A,N)  єN 4■ аыN=1╠21:уG$ кыR=0╠7:уB ┤ Ї└G$+R,B ╛єR:єN ╚ъф"A",0,0,0,7,63?,255 ,255 ,127,"B",0,0,0,32 ,144Р,144Р,208╨,208╨,"C",127,127,127,127,63?,62>,96`,159Я ╥·ф"D",224р,224р,240Ё,140М,12 ,24,480,192└,"E",127,255 ,255 ,255 ,255 ,127,127,127,"F",224р,224р,224р,255 ,255 ,255 ,255 ,255  ▄їф"G",15,15,15,255 ,31,31,255 ,15,"H",127,127,127,127,127,127,127,127,"I",120x,120x,120x,120x,126~,127,127,0 ц9ф"J",248°,120x,120x,127,63?,63?,62>,0,"K",15,15,15,15,6,6,3,0,"L",255 ,255 ,255 ,255 ,96`,96`,192└,0,"M",255 ,255 ,255 ,255 ,102f,102f,60<,0 Ёвф"N",248°,248°,248°,248°,248°,248°,248°,248°,"O",31,63?,62>,124|,126~,63?,31,0 Є?ф"P",1,3,7,15,31,63?,127,255 ,"Q",128А,192└,224р,240Ё,248°,252№,254■,255 ,"R",255 ,254■,252№,248°,240Ё,224р,192└,128А,"S",255 ,127,63?,31,15,7,3,1 Їдф"T",60<,126~,255 ,255 ,126~,60<,60<,126~,"u",12 ,158Ю,255 ,255 ,255 ,255 ,158Ю,12 %щP$(8,5,3,3)  ыA=1╠8 &ыB=1╠5:ыC=1╠3  уP$(A,B,C) " єC:єB:єA ,ф" ПА","ППП","АПА" 6ф" ПА","ППП","АПП" @ф"ППА","АПА","АПП" Jф"ППП","ААП","ППП" Tф"ААП","ППП","АП " ^%ф"ППА","ПАА","ППП","ППП","ПАА","ППА" h%ф"ПАП","ППП","ПАП","ПАП","ППП","ППП" r%ф"ППП","ПАП","ПАП","ЕГВ","ЕГА","ЕМИ" |%ф"ЕГВ","ЕГА","ЕАА","ЛГВ","КДИ","ОМК" Ж%ф"ЛГВ","КАА","ОМИ","ЛГИ","КАК","ОМК" Р%ф"АДА","ДПО","АЕА","АНО","ДПЛ","ЙВА" Ъ%ф"АЕА","АПК","ЕВЗ","БЛА","ЗПН","ПЗБ" дф"ДПИ","ППП","БПВ" о%ф"ПКП","ППП","ППМ","ПЕП","ППМ","ППП" ╕7ф"ППЕ","ГПП","ППП","ПЕП","ППП","КПП","ГПП","ППП","ППЕ" ┬%ф"ЯПа","ППП","АПб","АПА","ППП","вПб" ╠7ф"ААа","ППП","вПб","АПа","ППП","вПА","ЯПа","ППП","вПб" ╓%ф"Яа ","вПа","Авб","ААЯ","АЯП","ЯПП" р7ф"ППб","Пб ","ППП","АЯа","ЯПб","вб ","аАА","ПаА","ППа" ъ[ф" г ","ППд"," П "," г ","ППП","ППП","ППд","ПП ","ППд","г г","ППП","ППП"," г ","ППд"," П " Ф■ ИMї(╛23730▓\+256*╛23731│\)-(╛23653e\+256*╛23654f\) │ўюаЄктс  уьц┤ьNFredsх кzзяxйюЇ·вЇL╠╠╠MWell done, FredAnoGu╨q ПАПППАПА ПАПППАППППААПААПППППААППППААППППАП ППАПААПППППППААППАПАПППППАППАПППППППППППАППАПЕГВЕГАЕМИЕГВЕГАЕААЛГВКДИОМКЛГВКААОМИЛГИКАКОМКАДАДПОАЕААНОДПЛЙВААЕААПКЕВЗБЛАЗПНПЗБДПИПППБПВПКППППППМПЕПППМПППППЕГППППППЕППППКППГПППППППЕЯПаПППАПбАПАПППвПбААаПППвПбАПаПППвПАЯПаПППвПбЯа вПаАвбААЯАЯПЯППППбПб ПППАЯаЯПбвб аААПаАППа г ППд П г ППППППППдПП ППдг гПППППП г ППд П ╗WORDS ? ?wA  √:я""к х:▐0:█0 їм21,0;:я"" 1PICTURE @А┤   <        А<А             ААА             А А<                          |B<■<■B|~■~        └~└         └└└           └ └~           ■          ■  ?BBDDbBBb@BBBB@@fBBBB@№         р р???         ?ррр? ?          р р            № ?         №  BBBBR@BR<BBB|@|ZB@BB|°         Ё Ё         ЁЁЁ           Ё Ё            °          °  |~BBJNBJ||BB@@B|@B|@Ё         ° °         °°°           ° °            Ё          Ё  @BDDFBBFB@DBB@@B@BBD@р  ?       № №?         №№№ ??          № №            р          р?  @Bxx>B<<>  MACBRIDE 1983 << (Y╫1,0:їм21,0;" PLEASE STOP THE TAPE AND WAIT ":э4000а -W╫2,10 :їм21,0;" Press any key to start ":Є0 2)ёwn=0:ч6:┌7:┘0:√ <5їм1,11 ;"WORDS";м2,11 ;"ГГГГГ" F2їм4,1;"This is a word guessing game." P0їм6,1;"I have three sets of words." ZЛїм10 ,2;"SET 1: Shape and Colour.";м12 ,2;"SET 2: Paddington's Pick.";м14,2;"SET 3: Spectrum Specials. " d%ю"Please ENTER SET number";╩a$ x·a$<"1"┼a$>"3"╦ь100d Вёa=░a$(1) З·wn╦ь170к М)їм18,2;"Who is playing me ?" Ц$ю"Please ENTER your name";╩n$ а·n$=""╦ь160а б+·пN$>90Z╦ёN$(1)=┬(пN$-32 ) в ·▒N$>12 ╦ёN$=N$(╠12 ) кoїм19,10 -▒N$/2;" Hello ";n$;" ";м20,2;"Press any key when ready":Є0 ┤ ёwn=0 ╚ёwn=wn+1:ч5:√ ═1ёpa=║(е*3)+4:ёJ=║(е*3)+1 ╥M┌pa:їм1,1;" РС ";м2,1;"ТУФХ";м3,1;"ЦЧШЩ" ▄yїм1,7;"Guess the word that ";м2,7;"I am thinking before";м3,7;"I finish my mosaic. " ц"┌7:ёx=║(е*15)+1 Ё ·w$(a,x,1)=" "╦ь230ц ·Hёl=10 :ыn=1╠10 :·w$(a,x,n)=" "╦ёl=n-1:ёn=10 єn  ёq$=w$(a,x) 4ыp=1╠l:їм19,14-l+p*2;"Г":єp ёg=0:ёm=0 "ю("Guess a letter ";N$;" ");╩l$ "·l$=""╦ь280 ,ёl$=l$(1) 6'·пl$<65A┼пl$>122z╦ь280 @"·пl$<97a╦ёl$=┬(пl$+32 ) Eёsw=0:ёg=g+1 F6їм21,0;" " JGыn=1╠l:·пl$=пw$(a,x,n)+(32 ╞пw$(a,x,n)<97a)╦э500Ї Tєn Y·sw=1╦ь360h ^Xёm=m+1:їм21,11 -▒N$/2;"Bad guess ";n$;" ":╫1,-10 c2їм14,5+m*2;┌2;┘7;l$ hэ900Д+100d*g r7ёf=0:ыn=1╠l:·w$(a,x,n)╔" "╦ёf=1:ёn=l wєn |·f=0╦э2500─ Ж8·g=12 ╦э2600( :ёf=0:ёW$(A,X,1)=" " Р·F=1╦ь280 Х·wn=15╦ь420д Ш:їм20,0;" Press  E  to End this section. " ЪGїм21,0;" Press  ENTER  for next word. ":Є0 Ь·ж="e"┼ж="E"╦ь430о Ю·пж=13 ╦ь200╚ а ь410Ъ д:їм20,0;"Sorry ! I have run out of words." о;юм0,0;"Another set?ENTER Yes or No.";╩a$ │·a$=""╦ь430о ╕-·a$(1)="y"┼a$(1)="Y"╦√:ь90Z ┬ёm$=" Goodbye "+n$:э26102 ╠Iюм0,0;" Any one else for a game ?";╩a$:·a$=""╦ь460╠ ╤C·a$(1)="y"┼a$(1)="Y"╦х4090·:э4090·:ь45- ╓,·a$(1)="n"┼a$(1)="N"╦ь470╓ █ ь460╠ Ї*їм18,14-l+n*2;w$(a,x,n) ■)ыt=1╠3:╫.2~L╠╠╠,10 :єt ёw$(a,x,n)=" " ёsw=1:■ шїм12 ,8;" Ъ":■ Lїм12 ,6;" Ъ":■ ░їм12 ,4;" Ъ":■ 7їм10 ,8;┘J;"ПП";м11 ,8;┘J;"ПП":■ x7їм10 ,6;┘J;"ПП";м11 ,6;┘J;"ПП":■ ▄7їм10 ,4;┘J;"ПП";м11 ,4;┘J;"ПП":■ @їм9 ,9 ;"Е":■ д4їм8,4;┘J;"ГЗ";м9 ,5;┘J;"Е":■ їм9 ,7;"ДИ":■ lїм12 ,2;"Ъ":■ ╨їм12 ,0;"Ъ":■ 49їм10 ,0;┘J;"ППП";м11 ,0;┘J;"ППП":■ ─(ыn=g╠12 :э900Д+100d*n:єn (ёm$=" It was "+q$+" " -·f=0╦ёm$="Well done "+n$ 2 ·▒m$>18╦ёm$=m$(╠18) 7·▒m$<19╦э2900T <'ёr$="ЛГЗГЗГЗГЗГЗГЗГЗГЗГЗГЗАААААЫЗАААА" F'ёs$="КаЕаЕаЕаЕаЕаЕаЕаЕаЕаЕАААААЬЮАДИЕ" Pёt$="П"+m$+"ПАППППЯППППП" Z'ёu$="ПППППППППППППППППППППППППППППППП" d'ёv$="Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ" Мыs=23╠1═-1 С┘J Ц!їм8,0;r$(s╠32 ) а!їм9 ,0;s$(s╠32 ) к"їм10 ,0;t$(s╠32 ) ┤"їм11 ,0;u$(s╠32 ) ╣ ┘0 ╛"їм12 ,0;v$(s╠32 ) ├M·S/2=║(S/2)╦ыX=1╠3:╫.1}L╠╠╠,15:єX:ь2770╥ ╚)ыX=1╠3:╫.1}L╠╠╠,-9 :єX ╥єS T%ёm$=m$+" ":·▒m$<19╦ь2900T ^■ Ят а$х4000а:ыn=1╠16:уg$ кыr=0╠7:уb ┤ Ї└g$+r,b ╛єr:єn ╚эф"a",127,255 ,255 ,255 ,120x,103g,95_,95_,"b",252№,255 ,255 ,254■,6,251√,253¤,255 ,"c",0,0,0,0,0,3,206╬,120x ╥єф"d",223▀,191┐,255 ,252№,232ш,129Б,129Б,128А,"e",255 ,255 ,255 ,31,19,129Б,129Б,1,"f",0,128А,128А,192└,224р,568,12 ,7 ▄яф"g",0,0,0,3,15,63?,127,127,"h",66B,33!,248°,255 ,255 ,255 ,255 ,255 ,"i",66B,134Ж,31,255 ,255 ,223▀,223▀,223▀ цгф"j",0,0,128А,224р,252№,254■,255 ,255 ,"k",60<,126~,231ч,195├,195├,231ч,126~,60< ЁЇф"L",255 ,255 ,255 ,255 ,0,121y,126~,126~,"M",126~,127,255 ,62>,60<,127,127,126~,"O",15,143П,15,15,15,239я,239я,15 їзф"P",126~,126~,126~,126~,126~,102f,119w,119w,"Q",568,124|,126~,124|,568,124|,254■,255  ·щw$(3,15,10 )  ыt=1╠3  ыn=1╠15:уw$(t,n):єn  єt Гф"rectangle","diamond","oval","red","blue","magenta","green","cyan","yellow","white","black","circle","triangle","square","oblong" Шф"Paddington","Jonathan","Judy","suitcase","marmalade","scrapbook","basket","boots","hat","cocoa","buns","Portobello","elevenses","accounts","sandwich" "sф"LIST","LET","BORDER","PAUSE","RETURN","DRAW","INPUT","PRINT","RUN","DELETE","SPACE","ENTER","LOAD","PAPER","INK" h■ ИMї(╛23730▓\+256*╛23731│\)-(╛23653e\+256*╛23654f\) юЄкb Ї ╖юa░сj°╚ lЁgm│ўfє   М A3NJimR ЛГЗГЗГЗГЗГЗГЗГЗГЗГЗГЗАААААЫЗААААS КаЕаЕаЕаЕаЕаЕаЕаЕаЕаЕАААААЬЮАДИЕT ПWell done Jim ПАППППЯПППППU ППППППППППППППППППППППППППППППППV Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ Ъ ЪMWell done Jim Q BORDER LqGQ╫╔ rectangle diamond oval red blue magenta green cyan yellow white black circle triangle square oblong PaddingtonJonathan Judy suitcase marmalade scrapbook basket boots hat cocoa buns Portobelloelevenses accounts sandwich LIST LET BORDER PAUSE RETURN DRAW INPUT PRINT RUN DELETE SPACE ENTER LOAD PAPER INK ╘COLOURS ? ?qA  √:я""к х:▐0:█0 їм21,0;:я"" 1PICTURE @А┤   <        А<А             ААА             А А<                          |B<■<■B|~■~        └~└         └└└           └ └~           ■          ■  ?BBDDbBBb@BBBB@@fBBBB@№         р р???         ?ррр? ?          р р            № ?         №  BBBBR@BR<BBB|@|ZB@BB|°         Ё Ё         ЁЁЁ           Ё Ё            °          °  |~BBJNBJ||BB@@B|@B|@Ё         ° °         °°°           ° °            Ё          Ё  @BDDFBBFB@DBB@@B@BBD@р  ?       № №?         №№№ ??          № №            р          р?  @Bxx>B<<>  MACBRIDE 1983 << (L╫1,20:їм21,0;" PLEASE STOP THE TAPE AND WAIT " -*э4000а:╫1,10 :э3605 23ёl=6:ёc=1:ч4:┌7:┘0:√ <Чїм2,5;┘2;"ЛГГГГГГГГГГГГГГГГГГГГЗ";м3,5;"К COLOURS AND SHAPES Е";м4,5;┘2;"ОММММММММММММММММММММН" A!Ї23658j\,0:э1000ш F6ю"Please ENTER your name ";╩n$:·n$=""╦ь70F H+·пn$>90Z╦ёn$(1)=┬(пn$-32 ) J ·▒n$>12 ╦ёn$=n$(╠12 ) P&їм6,5;"Hello ";n$;" " Z э900Д nHїм14,4;" 1  COLOURS";м16,4;" 2  SHAPES" xю"Please ENTER 1 or 2";╩a$ В·a$<"1"┼a$>"2"╦ь120x С*їм6,5;"Thank you ";n$;" " Т,ыn=1╠▒n$:╫.2~L╠╠╠,пn$(n)-80P:єn Ц,ёSO=(A$(1)="1"):ёCO=(A$(1)="2") Ы9їм10 ,2;┌6;"How much help do you need?" аИ┌6:їм14,4;" None at all 1 ";м16,4;" Just a little 2 ";м18,4;" Lots please ! 3 " к*┌7:ю"Please ENTER 1,2 or 3";╩a$ ┤·a$<"1"┼a$>"3"╦ь170к ═ёh=░a$(1) ▄)э3605:┘0:ч4:┌7:√ ц·h>1╦э2000╨ "·h=1╦э2300№ ,K┌5:їм16,0;w$(╠11 );м16,19;w$(╠19) 1"їм17,0;w$;w$;w$;w$;w$ 2%Ў568,64@:№0,40( 6]Ў88X,40(:№64@,0:№0,480:№-64@,0:№0,-480 @╞Ў110n,45-:№34",0:№3,3,2:№0,34":№-3,3,2:№-34",0:№-3,-3,2:№0,-34":№3,-3,2 J4ыY=502╠77M═9 :╪96`,Y,1:єY O,ёsc=0:ыg=1╠10 :э3500м R,┌8:ёl=13 :ёc=4:э1000ш TО┌7-(RC=8):┘RC-1:·RS>4╦ыn=1╠4:їм11 +n,14;┌9 ;" ":єn:э2500─ +RS*100d:ь360h ^5ыN=1╠4:їм11 +N,14;P$(RS,N):єN h┌7:┘0 rUїм18,3;"This is a ";:ыn=1╠cl:ї".";:єn:ї" ";:ыn=1╠sl:ї".";:єn |.·co=1╦їм18,13 ;c$:ь450┬ Ж&·so=1╦їм18,14+cl;s$ Рю"What colour is it ?";╩q$ Ъ·q$=""╦ь400Р д·q$=c$╦э700╝:ь500Ї о ь490ъ ╠ю"What shape is it ?";╩q$ ╓·q$=""╦ь460╠ р·q$=s$╦э700╝:ь500Ї ъ э710╞ Їєg:ь800  ╝.ёsc=sc+1:ёm$="Well done "+n$:ь720╨ ╞ёm$="It is a "+c$+" "+s$ ╨Oэ1020№:Ў568,64@:№0,-8:їм9 ,3;┌5;m$ ┌B·m$(1)="I"╦╫1,-10 :╫1,-17:ь750ю ф4х750ю:ыn=1╠8:уt,p:╫t,p+10 :єn юЙф.6АЩЩЩ,0,.2~L╠╠╠,0,.2~L╠╠╠,0,.2~L╠╠╠,0,.3ЩЩЩ,2,.3ЩЩЩ,0,.3ЩЩЩ,2,.6АЩЩЩ,4 Ё э3600 ё·sw=1╦ь800  ЇI┌5:їм18,0;w$;м20,0;w$;м21,0;w$ °p┌8:э1000ш:┌7:їм9 ,0;w$;м14,7;" "::Ў568,96`:№0,8:■  ·g>10 ╦ёg=10 *5┌6:┘0:√:їм6,2;n$;"'s score:" 4"їм8,5;sc;" out of ";g 9ёm$="Goodbye "+n$ >#·sc/g>.6АЩЩЩ╦ёm$="Well done "+n$ H9ёl=15:ёc=2:э1000ш:їм16,6;m$ R4їм17,3;" Press  R  to run again " \D·ж="R"┼ж="r"╦їм20,6;" ONE MOMENT PLEASE ":ь45- f ь860\ ДBыn=1╠5:э1020№:Є15:э1000ш:Є15:єn О■ шaїмL,C;"РС";мL+1,C;┘1;;"ТУФ";мL+2,C;┘1;"ЦП ";мL+3,C;┘2;"ЧШЩ" э╫.05|L╠╠╠,20 Є■ №їмL+1,C;┘1;"ТУХ" ╫.05|L╠╠╠,8 ■  ь1000ш ╨·so=0╦ь21004 ┌·h=2╦ь2050 ф╫їм1,1;"       ";м2,1;"               ";м3,1;"       " ю▓їм5,1;"     ";м6,1;"           ";м7,1;"     " °_Ў199╟,128А:№42*,0:№0,-10 :№-42*,0:№0,10 ¤_Ў195├,136И:№502,0:№0,-24:№-502,0:№0,24 gїм2,2;"black";м2,10 ;"blue";м2,17;"red";м2,23;"magenta"  hїм6,2;"green";м6,10 ;"cyan";м6,17;"yellow";м6,25;"white" їм8,0;┌1;w$ *■ 4#э2300№:·h=2╦ь2150f >]Ў8,167з:№16,0:№0,-16:№-16,0:№0,16 CMЎ86V,151Ч:№16,16:№0,-16:№-16,0 H╪181╡,158Ю,10 M[Ў6,131Г:№8,8:№8,-8:№-8,-8:№-8,8 RАЎ84T,133Е:№16,0,-2:№0,-6,-1:№-16,0,-2:№0,6,-1 \]Ў146Т,135З:№16,0:№0,-8:№-16,0:№0,8 fSїм1,4;"square";м1,13 ;"triangle";м1,24;"circle" pSїм5,3;"diamond";м5,13 ;"oval";м5,21;"rectangle" z■ №.ыN=0╠8:їмN,0;┌6;w$:єN ■ ╕/ыR=1╠12 :╪128А,63?,R:єR:■ Qёr=4:ыx=118v╠134Ж:╪x,63?,r:ёr=r+.5   -(x>128А):єx:■ мёrc=║(е*8)+1 ╢ёrs=║(е*6)+1 └Fёcl=7:ыn=1╠7:·k$(rc,n)=" "╦ёcl=n-1:ёn=7 ╩єn:ёc$=k$(rc,1╠cl) ╘Fёsl=9 :ыn=1╠9 :·z$(rs,n)=" "╦ёsl=n-1:ёn=9 ▐єn:ёs$=z$(rs,1╠sl) ш■ <їм20,0;" Press  S  to STOP " Kїм21,0;" Press  ENTER  to go on. ":Є0 ( ёsw=0:·ж="s"┼ж="S"╦ёsw=1:■ $·пж=13 ╦■ . ь3610 а2щw$(32 ):х4000а:ыN=1╠17:уG$ кыR=0╠7:уB ┤ Ї└G$+R,B ╛єR:єN ╚▌ф"A",3,7,7,3,3,1,7,8,"B",240Ё,250·,238ю,220▄,186║,113q,226т,252№,"C",1,3,7,7,7,7,3,3 ╥ёф"D",252№,254■,255 ,255 ,255 ,255 ,255 ,255 ,"E",3,29,255 ,252№,240Ё,192└,0,0,"F",0,0,128А,192└,255 ,253¤,255 ,60< ▄!ф"G",3,3,3,3,3,3,3,3,"H",1,3,3,7,7,1,0,0,"I",206╬,206╬,142О,207╧,239я,239я,0,0,"J",0,0,0,0,192└,192└,0,0 цуф"K",1,1,1,1,1,1,0,0,"L",199╟,199╟,195├,227у,241ё,241ё,0,0,"M",0,128А,208╨,240Ё,240Ё,192└,0,0 Ё?ф"N",255 ,254■,252№,248°,240Ё,224р,192└,128А,"O",1,3,7,15,31,63?,127,255 ,"P",128А,192└,224р,240Ё,248°,252№,254■,255 ,"Q",255 ,127,63?,31,15,7,3,1 щK$(8,7) ыN=1╠8:уK$(N):єN @ф"black","blue","red","magenta","green","cyan","yellow","white" "щz$(6,9 ) ,ыN=1╠6:уZ$(N):єN 6;ф"diamond","square","triangle","rectangle","circle","oval" hRщP$(4,4,4):ыN=1╠4:ыT=1╠4:уP$(N,T):єT:єN rUф" ЮЯ ","ЮППЯ","аППЭ"," аЭ ","ДММИ","ЕППК","ЕППК","БГГВ","Я ","ПЯ ","ППЯ ","ПППЯ" |ф" ","ЕППК","ЕППК"," " Ж■ юhЄкbЇh│ўl c│ягяh∙VM J│уч O▓у▓єгь│ьp°ЗЖ NFredA3CcyanSdiamondQbollockMIt is a cyan diamond╫# GQ╦=black blue red magentagreen cyan yellow white ┌; diamond square triangle rectanglecircle oval ╨G ЮЯ ЮППЯаППЭ аЭ ДММИЕППКЕППКБГГВЯ ПЯ ППЯ ПППЯ ЕППКЕППК TSORTING ? ?pA  √:я""к х:▐0:█0 їм21,0;:я"" 1PICTURE @А┤   <        А<А             ААА             А А<                          |B<■<■B|~■~        └~└         └└└           └ └~           ■          ■  ?BBDDbBBb@BBBB@@fBBBB@№         р р???         ?ррр? ?          р р            № ?         №  BBBBR@BR<BBB|@|ZB@BB|°         Ё Ё         ЁЁЁ           Ё Ё            °          °  |~BBJNBJ||BB@@B|@B|@Ё         ° °         °°°           ° °            Ё          Ё  @BDDFBBFB@DBB@@B@BBD@р  ?       № №?         №№№ ??          № №            р          р?  @Bxx>B<<>  MACBRIDE 1983 << (X╫1,10 :їм21,0;" PLEASE STOP THE TAPE AND WAIT ":э4000а 2 ╫1,20:э3200А :∙ 7ч2:┌6:┘0:√ 12 ╦ёn$=n$(╠12 ) Z+·пn$>96`╦ёn$(1)=┬(пn$-32 ) [gїм16,11 -▒n$/2;" Hello ";n$;" ";м18,1;"Will you help me sort these ?" _ э3200А d┌7:┘0:√ n|їм1,10 ;┘2;┌6;"ЛГГГГГГГЗ";м2,10 ;"КSORTINGЕ";м3,10 ;┘2;"ОМММММММН" x}їм5,2;"Here is how you can help";м7,2;"Paddington to sort his box";м9 ,2;"of mosaics,";n$ ВДїм12 ,2;"He will hold up a shape and";м14,2;"you must tell him the box";м16,2;"that it goes in." М6їм19,0;"You can sort by SHAPE or COLOUR." Цo╫.5   ,25:юм1,4;"  ENTER  1 for SHAPES   2 for COLOUR ";╩t$ к-·t$<"1"┼t$>"2"╦╫1,-12 :ь150Ц ┤ёt=░t$(1) ╛ э3200А ╚М√:їм10 ,2;"Paddington has got 30 tiles.";м12 ,2;"How many of those can you";м14,2;"help him with,";n$;"?" ▄<╫.5   ,25:ю" Please  ENTER  how many.";╩a$ ц·a$=""╦ь220▄ ЁNыz=1╠▒a$:·пa$(z)<480┼пa$(z)>579╦╫1,-12 :ь220▄ ёєz ·K·░a$>30╦їм21,0;" Too many ";n$;". Again....?":ь220▄  ·a$="0"╦ь220▄ ёno=░a$ #щe(5,3):щs(no,2)  э3200А Д<х900Д:ыN=1╠5:уE(N,1),E(N,2):єN ОWф6,3,16,3,16,13 ,16,27,6,27 Шч5:┌7:┘0:√ ▐ёsc=0:х1000ш шыN=1╠5:уL,C Є┌N-((N-6)╞T=1) №DїмL,C;" ";мL+6,C;" ";мL+8,C;" " N·t=1╦їмl+7,c+2;┌7;┬(143П+n);" ";┬(143П+n) 5ыX=1╠7:їмL+X,C;" ";мL+X,C+8;" ":єX  !їмL+7,C+4;┌7;N  єN:┌7 Wф1,1,11 ,1,11 ,11 ,11 ,21,1,21 $8їм3,14;"ХЦ";м4,14;┘1;"ЧШ" LыN=1╠no Q<їм5,13 ;┌6;" Щ ";м6,13 ;" " V#ёS(N,1)=║(е*5)+1 [*э3100 :·ez╦ёno=n-1:ь1370Z `#ёS(N,2)=║(е*5)+1 jHїм4,12 ;┘S(N,2);┬(143П+S(N,1));┘1;"Ъ" oїм20,0;┌7;u$ t9їм21,0;" Which box does this go in ? " ~(ю" Please  ENTER  box number";╩g$ И.·g$<"1"┼g$>"5"╦╫1,-12 :ь1150~ Тёg=░g$(1) Ь%·g=s(n,t)╦ёsc=sc+1:ь1195л ж0ёsu=0:э3000╕ :·su=1╦ь1150~ л э2000╨ ░'ыz=1╠16:їмl,c;┌8;" " ║'ёl=l+(le(g,1)) ─'ёc=c+(ce(g,2)) ╬7їмl,c;┌8;┘s(n,2);┬(143П+s(n,1)) ╪+·l=e(g,1)╞c=e(g,2)╦ёz=16 ▌╫.2~L╠╠╠,30-2*Z тєz ь#ёe(g,3)=e(g,3)+1 ЎCёex=2-(6╞e(g,3)/3=║(e(g,3)/3)) 5ёe(g,2)=e(g,2)+ex-(2*ex╞g>3)  Rёe(g,1)=e(g,1)-(2╞e(g,3)/3=║(e(g,3)/3)) єn F э3200А Z0√:їм8,4;"Score - ";sc;" out of ";no dю("Another game ";n$);╩a$ n·a$=""╦ь1380d xэ3300ф :·az╦ь100d ▄Rїм12 ,2;"Goodbye ";n$;".";м14,2;"Thank you for your help." ц'ю" Anyone else want to help ?";╩a$ Ёэ3300ф :·az╦√:ь60< @aїм16,2;" Please come again next time ";м18,2;" I need help,";n$;"! " д ь1700д ╨[їм4,12 ;┘1;" а";м3,13 ;┘S(N,2);┬(143П+S(N,1)) ╒╫.2~L╠╠╠,10 ┌^їм3,13 ;" ";м4,12 ;┘S(N,2);┬(143П+S(N,1));┘1;"Ъ" 4-┌8:ёL=4:ёC=12 :·G=1╦■ > Є10 Ш7їм4,12 ;┘1;" Ы";м5,13 ;"Ь" в;їм6,12 ;┘S(N,2);┬(143П+S(N,1)) м$ёL=6:ёC=12 :·G=2╦■ ╢ Є10 №7їм4,13 ;" ";м5,13 ;┘1;" Э" @їм6,12 ;" ";┘S(N,2);┬(143П+S(N,1)) ёC=14:·G=3╦■  Є10 ` їм5,14;┘1;"Ю" j?їм6,14;" ";┘S(N,2);┬(143П+S(N,1)) tёC=15:·G=4╦■ ~ Є10 ─Hїм5,14;┘1;"Я";┘S(N,2);┬(143П+S(N,1)) ╬їм6,15;" " ╪ёL=5:ёC=15:■ ╕їм21,0;u$ ┬#╫1,12 :╫1,0 ╠3юм0,0;(" Are you sure ?";n$;" ");╩a$ ╓·a$=""╦ь3010┬ █ э3300ф р_·az╦╫1,-24:їм21,0;" If you say so ";n$;u$(╠12 -▒n$);"":■ ъёsu=1:■ >їм20,0;" Press  E  to end the game " 0їм4,13 ;" " АU╫1,0:їм21,0;"  Press  ENTER  to go on. " Е'ёez=0:·ж="e"┼ж="E"╦ёez=1:■ К"Є0:·пж╔13 ╦ь3200А Ф╫.5   ,25:■ ф;ёaz=0:·a$(1)="y"┼a$(1)="Y"╦ёaz=1:■ ю#·a$(1)="n"┼a$(1)="N"╦■ °Bю"Please  ENTER  yes or no ";╩a$:·a$=""╦ь3320°  ь3300ф Ят а$х4000а:ыN=1╠17:уG$ кыR=0╠7:уB ┤Ї└G$+R,B:єR:єN ╛ьф"A",255 ,255 ,255 ,255 ,255 ,255 ,255 ,255 ,"B",0,0,255 ,255 ,255 ,255 ,0,0,"C",1,3,7,15,31,63?,127,255  ╚Эф"D",60<,126~,255 ,255 ,255 ,255 ,126~,60<,"E",0,8,28,62>,127,62>,28,8 ╥Ёф"F",31,31,12 ,11 ,15,20,491,232ш,"G",192└,224р,96`,160а,224р,80P,24,39',"H",28,63?,127,255 ,255 ,255 ,255 ,223▀ ▄ъф"I",112p,248°,252№,126~,127,231ч,255 ,223▀,"J",112p,80P,112p,0,0,0,0,0,"K",0,0,248°,190╛,255 ,63?,15,3 цщф"L",0,0,0,0,1,3,7,15,"M",15,31,30,60<,124|,120x,184╕,224р,"N",240Ё,240Ё,240Ё,240Ё,240Ё,240Ё,80P,112p Ёыф"O",240Ё,248°,120x,124|,62>,30,29,7,"P",240Ё,240Ё,248°,255 ,125},63?,28,0,"Q",28,20,60<,60<,63?,31,15,3 ·╬R(A,B)=║(е*A)+B ■ ИMї(╛23730▓\+256*╛23731│\)-(╛23653e\+256*╛23654f\) е·ь<юаc·░гяtоя│у°gе°б·Єкb│ї╒# NFredT1ЕP УAnoGQ╧MOSAICS ? ?cA  √:я""к х:▐0:█0 їм21,0;:я"" 1PICTURE @А┤   <        А<А             ААА             А А<                          |B<■<■B|~■~        └~└         └└└           └ └~           ■          ■  ?BBDDbBBb@BBBB@@fBBBB@№         р р???         ?ррр? ?          р р            № ?         №  BBBBR@BR<BBB|@|ZB@BB|°         Ё Ё         ЁЁЁ           Ё Ё            °          °  |~BBJNBJ||BB@@B|@B|@Ё         ° °         °°°           ° °            Ё          Ё  @BDDFBBFB@DBB@@B@BBD@р  ?       № №?         №№№ ??          № №            р          р?  @Bxx>B<<>  MACBRIDE 1983 << ( э5000И 2 э2000╨ <ч4:√:э4000а P їм1,18;"COLOUR DIP" dC▄1:ыN=1╠10 :їмN*2,1;┬(143П+N):єN nB▄0:ыP=0╠6:їм1,4+2*P;┘P;"П":єP x ┌8 В"·SW=1╦э3000╕ :ь60< ╚5╫.5   ,10 :ёPC=0:ёL=3:ёC=3 ╥0╫.01z#╫ =,10 :їмL,C;┘9 ;█1;"Й" ▄ Є0 ц їмL,C;" " ы·пж=13 ╦ь700╝ Ё э1000ш ··л(L,C)>64@╦ь300,  ь210╥ ,ёX=L/2+143П /3·L=1╞л(L,C)>568╦ёPC=(C-4)/2 17╫.01z#╫ =,20:їмL,C;┘PC;┬X;▐1;┬8;"Ы" 6 Є0 8·ж="P"┼ж="p"╦ь400Р :·пж=13 ╦ь700╝ ; їмL,C;" " @ э1000ш Ж ь303/ Рїмl,c;┘PC;┬x:ь100d ╝]їм19,4;" ";м21,6;" " ┴#ю"Do you want to do another ?";╩a$ ╞·a$=""╦ь700╝ ╨,·a$(1)="y"┼a$(1)="Y"╦ь740ф ┌,·a$(1)╔"n"╞a$(1)╔"N"╦ь700╝ ▀:їм21,3;"Goodbye.Hope you had fun.":ь735▀ фю"Same paper colour ?";╩a$ ю·a$=""╦ь740ф °,·a$(1)="n"┼a$(1)="N"╦ь780  ,·a$(1)╔"y"╞a$(1)╔"Y"╦ь740ф  ь60<  э21004:ь502 шёL=L+(ж="6")-(ж="7") ЄёL=L+(L<0)-(L>20) №ёC=C+(ж="8")-(ж="5") ёC=C+(C<0)-(C>30) ■ ╨ч6:┌7:√ ┌Gїм1,8;"MOSAIC PICTURES";м2,8;"ГГГГГГГГГГГГГГГ" ▀ э2200Ш ф\їм17,2;"Make your own mosaics with";м19,2;"the magic mosaic mover." ю/їм21,2;"Do you need instructions?" °%ю"Please ENTER yes or no.";╩a$ ¤·A$=""╦ь2040° Eёsw=0:·a$(1)="y"┼a$(1)="Y"╦ёSW=1:ь2070  -·A$(1)╔"N"╞A$(1)╔"n"╦ь2040° ?╫.5   ,20:їм10 ,22;"Thank you.":Є100d 44їм17,1;"What colour paper do you want?" >.їм19,1;"Press the colour number." H[┘9 :їм21,0;"  0   1   2   3   4   5   6  7 " R.Є0:·пж<480┼пж>557╦ь2130R \ёi=░ж fZ╫.5   ,20:їм18,0;" ";┌i;"Thank you";┌7;" " p Є150Ц z■ Шъїм4,12 ;┘2;"СРТ СРТ";м5,12 ;"РРРРРРРТ";м6,12 ;"РРРРРРРР";м7,12 ;"РРРРРРРР";м8,12 ;"РРРРРРРР";м9 ,12 ;┘2;"РРРРРРРП";м10 ,11 ;"СУ ФТ" в4їм11 ,11 ;┘2;"Р Х Х Р" м-їм12 ,10 ;"СУ ЩШ ФТ" ╢.їм13 ,9 ;"СУ ФППППППУ ФТ" └Кїм14,13 ;┘6;"ФППППУ";м15,10 ;┘1;"СППФРТСРУРРТ";м16,9 ;"СРРРРФУФУРРРРТ" ╩■ ╕Yїм3,4;"Ж Here is the tile mover";м5,6;"Move it like this." ┬й┘9 :їм6,14;" 7 ";┌I;м7,15;"Э";м9 ,9 ;" 5 ";┌I;" Ь Й Ю  8 ";м11 ,15;┌I;"Я";м12 ,14;" 6 " ╠Vїм13 ,5;"Pick up a tile,dip it";м14,5;"put it where you want." ╤їм15,5;"Move the Ж over a tile";м16,5;"to rub it out.";м17,5;"Press any key and watch" ╓ёj=i:ёi=6 р!ёsw=0:Є0:э4000а ъ4ёi=j:їм16,8;" Key pressed   " Ї┌8:х3300ф ■/ёT=0:ыZ=1╠6:┘0:ёa$="Ж" !э3200А :єZ:╫1,20 yыt=0╠7:їм6,t;" Ъ";м16,22;█1;8:╫1,10 :єt:їм16,22;8 ╫1,20 9ыt=1╠12 :┘0+(2╞t>5):ёa$="Ъ" э3200А :єT  їм5,10 ;┘2;"Т" ! ┘0 "*їм16,8;┌i;" " &|їм8,5;"You can use any tile ";м9 ,5;"as often as you like";м10 ,5;"to make your picture." (1щC$(4,11 ):ёC$(1)=" ХТ " *ёC$(2)=" РРРРРРРРРТ" ,ёC$(3)=" ФРЦЧРРЦЧРР" .ёC$(4)=" ЩШ ЩШ " 0}ыL=1╠4:ыC=1╠11 :їм11 +L,9 +C;┘1-(C$(L,C)>"Ф");C$(L,C):·C$(L,C)>" "╦╫.4L╠╠╠,10 5єC:єL V Є250· b_┘1:ёE=11 :ыC=10 ╠27:ыN=1╠4:їм11 +N,C;C$(N,1╠E):єN g·C>16╦ёE=E-1 j╫.2~L╠╠╠,-30 lєC q ┘0 v5їм17,6;"Press any key to play.":Є0 {■ АЮуl,c,k:їмl,c;█(A$="Ж");a$;м16,22;█1;┬k:╫1,10 :їм16,22;┬K:·Z=4┼t=6┼T=9 ┼T=11 ╦╫1,20 К їмl,c;" ":■ фЧф3,4,546,4,4,546,5,4,546,6,4,546,6,3,535,6,2,535 ю/ф6,8,557,5,8,557,4,8,557,3,8,557,2,8,557,1,8,557,2,8,546,3,8,546,4,8,546,4,9 ,568,4,10 ,568,5,10 ,80P аAыl=3╠18:їмl,4;┌i;" ":єl кl·sw=0╦їм19,4;"Press P to put tiles down.";м21,6;"Press ENTER to end." ┤■ И$х5000И:ыN=1╠16:уG$ ТыR=0╠7:уB ЬЇ└G$+R,B:єR:єN жFф"A",255 ,255 ,255 ,255 ,255 ,255 ,255 ,255 ,"B",1,3,7,15,31,63?,127,255 ,"C",128А,192└,224р,240Ё,248°,252№,254■,255 ,"F",60<,126~,255 ,255 ,255 ,255 ,126~,60< лаф"D",255 ,254■,252№,248°,240Ё,224р,192└,128А,"E",255 ,127,63?,31,15,7,3,1 ░Gф"G",3,15,63?,63?,127,127,255 ,255 ,"H",192└,240Ё,252№,252№,254■,254■,255 ,255 ,"I",255 ,255 ,254■,254■,252№,252№,240Ё,192└,"J",255 ,255 ,127,127,63?,63?,15,3 ╡Uф"k",128А,206╬,238ю,254■,136И,140М,142О,255  ║ъф"L",0,14,14,14,112p,112p,112p,0,"M",0,16,480,127,255 ,127,480,16,"N",16,568,124|,254■,568,568,568,568 ─Щф"O",8,12 ,254■,255 ,254■,12 ,8,0,"P",28,28,28,28,127,62>,28,8 ╬■ pMї(╛23730▓\+256*╛23731│\)-(╛23653e\+256*╛23654f\) юИЄТb│ўiьаЁnjЇ  ·■ уb kP├1 ХТ РРРРРРРРРТ ФРЦЧРРЦЧРР ЩШ ЩШ e░уxИGPAyes*