ZXTape!Bonjour! @@aB 1  44500ԭ "achetons" "" "" }achetons @og0 l0ag?`0 c0afa||a`0 `x<1??` ~0a`0 c0af  3 a|`>8x> y ǀ<~>?1 1??` ~0a??`` ~0a<a?0c88308 `0 1`0` ``0af??`` ~0a 3 o0 `0c3~  3 0< `~> `0` ``0afa||3~><<3 0y<x>`? ``?f?xg? ?g `  fo? 0`0` 0?p00><>x|>x >`|<>gl100c0>0 3f`xx<ff3f301~`?x1>1?8 ` `?gf>3 ffg0 01`0`1c` ` `0 1f8`010000c101`0`  3 fc0100<0cx~<|`8> ?0>|< `>0o0?0`>08`0?`ppx||<0``f` f00p` 00`a`af1 x00`<>ǀ0 ax0~>0```a`af31`0?? 0`~c11 |~?`0c0````>31``͌030 0`c1   101~cfa`x`x````>8<10x|~1|p>0`x`x< xl`ln`n  ))))))))))))))))))))))))))))))))&courses jUխlUU`0 U`?U`0χ UUa3UU`0Uo|???3|`0 ~137||`???~`0χ ?|0~af3>|~>~>>>c>?>>>c>c~>ca0~>>>c>?>>>Ua 1s`0 Ucaln676`?U`3a 0`0χ Ua`00a3Uaf`0 6 0af3Uaf`  ?0ϏcUcccc`ccc ``cscwccsa0Ucc``ccc ```` ?`0 ߀`3`a??0`3g  03 f ?0Ϗcc`?c` ??ccc?0c ~?c` ??~?U`1l 3030 U`c1ll6v`3U`3 a10U``0 0aaf3 Uaf` p 6 03 U`f`  af0 U`cfccccc cccgcccccg?0c U`c`cccc cc`c`o|?13|0 `a0l667||`33?~0`0|af3 `0~0`> |af0 `>c>>c>>?>>>c>cc~>c`c>c>>?>>>U0 U`3UU0 UU`?f UU?`0χ `?Uccc`oo `UU~ `~ `UU`a`aUU``aUo>?~ccc`cgc `?|~c~`?>?c>>~``c cc`f `a0>a?7`a`aa????8s?``a>?~>c`>c> ?Ualc10ccc`cgc `U`1 60s~>?>>~?Uc`` c `c``cc`````c cc`f `Uafa` 3 9|U`ala66̀0``a`aUsf`afc03 U88s8s88s8s8s``aUa ~>c`>c> ?o`?0~>>cc>?~0?~>?>>~?~` o ~c?~~`~~`c?>>c?a`>|?a?߀a7~|1of`0?8s???8s?71accc`csc `Ualc30630~>>cc>?U`1 6`gcc ```c `Uf`` c `cc`cf`````c?>>c?Uaf1a`  0`0a`0aUca aff`|1Uaf`ac03 6`6`0aU88s8s88s8s871Ua 0ccc`csc `1>10~`?3~ccc ```c `c?>?>>ccf?`  0`0a`0a>07a`ag3`6`0a88q??8s>?~~cc`c{` ~UUcc >>~c ~UU0a0aUU`70aUUcc`o ~ ??~ ~aa`aUaf0 Uy U?c U~0|<<~``f0ffff|?00~af0 c?Ϙ`~>y 1g~?c |~`0`c`cc`f0ffff`Ua  1l0af0 Uwa` 6`y Uaa6a`?c Ua c0`310~>~>>`0`c`cc`f0ffff``? 00l0af0 `?m 0aߘaa~?10~>~>>`0>||>`c><?0ccUal3 1l0af Uca ` 8lcm 0Ua06a`U`1 `010c<<<`ccc`<<<|<|f<`0>||>`c><?0cc?1?~af ca 8~>m 00Ç~```0c<<<`ccc`<<<|<|f<?0ccUaf Um 0UUc0f``>cc`~f0ff8fff?0ccy?c 0~||?`~f0ff8ff~1111111111111111111111111111111111111111::::::::::::::::::::99999999999999999999  ********************888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888880@8@080x @@ ??@@@?@@@? ?@@?@@?0` ?@@?@@?@p@?@ @?@@?@@?@@??@@? @@ ? @@ ?`?@@?@@@@@?@@@@? ?@@?@p@? @@ ?0?@@? @@@?@@@@?@@?@?@>@@?@?@<@@?@?@@?@?@0 @@?@?@@?@?? @?@@?@@?9888889988888888888888888888888?9888888888888888888888888888888898888888888888888888888888888888988888888888888888888888888888889888888888888888888888888888888898888888??8888888888888888888888988888??8888888888888888888888889888???8888888888888888888888888988??8888888888888888888888888889???88888888888888888888888888889?888888888888888888888888888888999:::::::::::::::::::::::::999998::::::::::::::::::::::::::8888888::::::::::::::::::::8::::8888888:888888888:8:8::88888888:8888888:888888888:8:8::88888888:8888888:888888888:8::::88888888:8888888::88888888:::88:88888888::888888::::::::::::::::::::::::::888888:::::::::::::::::::::::::::::888::::::::::::::::::::::::::::8888888888888888888888888888:88888888888888888888888888888888888888888888888888888888888888888888aa0a 0 a0a3 1 6aa030a0a >1~8?88?`??aa030a0a c1l08?8p?88 8p8p~??aa a030a0a {1???p??8` ??88ppaa a0a3 6o1l08p?p8888 `l888pppaa a0a3 6>3~8p??8À? |< ??p?p?aa0a 0 a0a3 1 6 aa0a 0 a0a3 1 6??88?1 0``>``8s8p|<8s9{|{|`3 0```axx>`3 0``a0`x` `x``<|<<<<<<||<<<<<`a? `0`?~ff|>0~f~ff>80~~>||~f~f8À8`c8s98m0m `3 0``ac03`3 0{`a1 3 ` ` `0 ` cff|f0`f`f|f0`f fff~fs?p`? ??mm~3 `c?x~0c?  p8` c8>f<`|>0><>f`><0>> >||f< ~~|~ 00<3` c`>70a cc<0 6 a`x07 c?37a c1   3000` c03 6p8a ?1 1 6 ``` 0~03 6c3 0a~| p> |~`~1x>))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))8888888888888888888888888888::::::::::::::::::::::::::::::::::::::::::::::::::::::::99999999999999999999999999999999000000000000000000000000008888888888888888888888888888888888888888888888888888888888888888!@~#@!~#!@~#@!~#խ!@~#@!խ~#>>BB<DHpHDB@@@@@~BfZBBBBbRJFB/`:Ψҩ./x/(g}<0S_ -8z<({ZW͎!\~ #5+ 6}!\ !\(.!\('~ ~_w#6#: \w#NV3w2\#6#5: \w#~B{' x!~7{:8/ O(4 4iSHOPPING /7/7:0: *  /11 ,8;1;"PLEASE STOP TAPE" d+23658j\,8:236099\,502 n(200:0:7:0: u"PLEASE TYPE IN A NUMBER:"'"1 IF YOU ARE MALE"'"2 IF YOU ARE A MARRIED WOMAN"'"3 IF YOU ARE AN UNMARRIED WOMAN"'S$ %S$"1"S$"2"S$"3"150 S=S$ KS$=("MONSIEUR"S=1)+("MADAME"S=2)+("MADEMOISELLE"S=3) 8,0;"IN THIS PROGRAM WE ARE DOING OURSHOPPING IN A FRENCH VILLAGE....STAND BY FOR A BRIEF EXPLANATIONOF WHAT THE SHOPS SELL.........." "300,:65261:0 ,Q$(502,14):Q(502):H(502):G(502):D$(64@):M$(5,29):L$(10 ,15):A$(502,15):A(502):P$(502,14):P(502):B(502):C$(502,17) 1 SC=0 6>320@:K=1502:G(K),A$(K),A(K),P$(K),P(K):K @V1,"BAGUETTE",2,"TROIS",3,1,"FICELLE",2,"TROIS",3 AZ1,"CROISSANTS",6,"SEPT",7,1,"PETITS PAINS",6,"SIX",6 BT1,"BRIOCHES",6,"HUIT",8,1,"ECLAIRS",6,"DIX",10 C]1,"RELIGIEUSES",6,"NEUF",9 ,1,"TARTELETTES",6,"DOUZE",12 D_1,"BARQUETTES",6,"TREIZE",13 ,1,"PALMIERS",6,"QUATORZE",14 Ef2,"CASSEROLE",2,"TRENTE-CINQ",35#,2,"TOURNEVIS",1,"VINGT-SEPT",27 FM2,"CLOUS",6,"DEUX",2,2,"VIS",6,"CINQ",5 Gb2,"PEINTURE",4,"TRENTE-SIX",36$,2,"MARTEAU",1,"VINGT-HUIT",28 Hh2,"SCIE",2,"TRENTE ET UN",31,2,"PAPIER PEINT",3,"TRENTE-QUATRE",34" Id2,"POELE",2,"VINGT-NEUF",29,2,"BOUILLOIRE",2,"TRENTE ET UN",31 JR3,"SUCRE",3,"SEIZE",16,3,"SEL",3,"TREIZE",13 KY3,"POIVRE",3,"QUATORZE",14,3,"MOUTARDE",4,"ONZE",11 LU3,"CONFITURE",4,"NEUF",9 ,3,"FROMAGE",3,"DIX",10 MZ3,"BEURRE",3,"DIX-SEPT",17,3,"OEUFS",6,"DIX-NEUF",19 NR3,"LAIT",3,"TREIZE",13 ,3,"CAFE",3,"VINGT",20 O`4,"POULET",3,"VINGT-SIX",26,4,"BOEUF",3,"QUARANTE-DEUX",42* Pf4,"PORC",3,"TRENTE-HUIT",38&,4,"COTELETTES",6,"CINQUANTE-NEUF",59; Qc4,"LAPIN",3,"TRENTE ET UN",31,4,"GIGOT",1,"QUARANTE-TROIS",43+ RW4,"SAUCISSON",3,"NEUF",9 ,4,"JAMBON",3,"QUINZE",15 SV4,"PATE",3,"DOUZE",12 ,4,"SAUCISSES",6,"SEIZE",16 TQ5,"POMMES",6,"SEPT",7,5,"POIRES",6,"HUIT",8 UR5,"MELON",1,"CINQ",5,5,"PECHES",6,"DOUZE",12 VX5,"PRUNES",6,"ONZE",11 ,5,"BANANES",6,"QUATORZE",14 WZ5,"HARICOTS",6,"QUATRE",4,5,"PETITS POIS",6,"NEUF",9 XV5,"CAROTTES",6,"TROIS",3,5,"POIREAUX",6,"HUIT",8 MAIN LOOP  K=110  2T=(*502)+1:B(T)=1420 B(T)=1  L$(K)=A$(T)  H(K)=G(T)  Q(K)=P(T)  Q$(K)=P$(T) !A(T)=1C$(K)="UN "+A$(T) "A(T)=2C$(K)="UNE "+A$(T) !A(T)=3C$(K)="DU "+A$(T) $A(T)=4C$(K)="DE LA "+A$(T) "A(T)=6C$(K)="DES "+A$(T) K USER INPUT ;:11 ,7;1;6;"OUR SHOPPING LIST"  75K 6::65303  502 ^K=110 :.05|L,10 :1;1;K,L$(K);31;" ":30:K (521 :L=15:M$(L):L  " BOULANGERIE-PATISSERIE","QUINCAILLERIE-DROGUERIE"," EPICERIE-CREMERIE "," BOUCHERIE-CHARCUTERIE "," FRUITS-PRIMEURS "  X=1  X>51000 XK=130:.02{# =,30:.02{# =,40(:K:12 ,4;M$(X) 20,0;D$:K=110 :.05|L,K:K:"ON ENTRE ICI? (OUI/NON) ";Z$:Z$="AU SECOURS"3000 :510 0Z$"OUI"Z$"NON".5,5:530 "Z$="NON"X=X+1:525  !2y=x+20:.2~L,y:.1}L,y:.5,y &B"QUEL NUMERO (0-10)? ";N$:N$<480ůN$>579550& 'N$=0525  +N$>10 550& 0N=N$ :X$(1,C$(N)) X0;6;20,5;1;"BONJOUR ";S$;0,;5;1;;"VOUS DESIREZ?";:K=1̱S$-5:1;" ";:K:0 b"JE VOUDRAIS ";X$(1) lX$(1)C$(N).1}L,0:.3,5:0;6;20,0;D$;20,5;1;"PARDON, ";S$;",";:K=112 -S$:1;" ";:K:0;6;5;1;"VOULEZ-VOUS REPETER? ":610b v XH(N).5,0:0;6;20,0;D$;20,5;1;"AH NON,";S$;",";:K=114-S$:1;" ";:K:0;6;21,5;1;"CA NE SE VEND PAS ICI.":200:20,0;D$:550&  SUCCESS  R$=Q$(N) -R$(R$)=" "R$=R$(̱R$-1):652 .2~L,15:.5,15:1:0;6;20,0;D$;20,0;"VOICI, ";S$;","'"CA FAIT ";R$;" FRANCS.":0 IK=110 :.01z# =,K:K:"HOW MANY FRANCS IN FIGURES? "; F$ 8F$(1)<491ůF$(1)>579670 yF$Q(N)1,-10 :0;6;20,0;1;"NON, NON........................":670 .4L,20:.1}L,20:.5,20:20,0;D$;20,0;1;1;"BRAVO, RAYONS CELA DE LA LISTE!":502 <K=031:1;N-1,K;" ":10 :K (SC=SC+1:SC=10 2000 K=110 :.1}L,K:K:0;6;20,0;D$;20,5;1;"AUTRE CHOSE, ";S$;"?";21,5;1;"(OUI/NON)":Z$:Z$"OUI"Z$"NON"694 "Z$="NON"X=X+1:525   550& !20,0;D$:520 :F=1502:.05|L,60<-F:F:1;11 ,0;"PITY. YOU DIDN'T QUITE FINISH YOUR SHOPPING. WOULD YOU LIKE ANOTHER TRY (Y/N)?":Z$:Z$="Y"300,  z:0;11 ,0;"SUPERBE!! VOUS AVEZ FAIT TOUS VOS ACHATS..VOULEZ-VOUS ESSAYER UNE AUTRE LISTE?(OUI/NON)" Z.2~L,0:.4L,0:.2~L,0:.8L,5:.8L,5 Y.8L,7:.8L,7:1,12 :.2~L,9 :1,5 Z$:Z$="OUI"300,  65345A:0: s txSMONSIEUR2ONZE NEUF NEUF DIX DIX TRENTE ET UN DIX-SEPT CINQUANTE-NEUFQUATORZE DIX-NEUF 2 ;22C@ ͖ BOULANGERIE-PATISSERIEQUINCAILLERIE-DROGUERIE EPICERIE-CREMERIE  BOUCHERIE-CHARCUTERIE  FRUITS-PRIMEURS ̛ MOUTARDE SAUCISSON CONFITURE ECLAIRS FROMAGE BOUILLOIRE BEURRE COTELETTES POIVRE OEUFS 2BAGUETTE FICELLE CROISSANTS PETITS PAINS BRIOCHES ECLAIRS RELIGIEUSES TARTELETTES BARQUETTES PALMIERS CASSEROLE TOURNEVIS CLOUS VIS PEINTURE MARTEAU SCIE PAPIER PEINT POELE BOUILLOIRE SUCRE SEL POIVRE MOUTARDE CONFITURE FROMAGE BEURRE OEUFS LAIT CAFE POULET BOEUF PORC COTELETTES LAPIN GIGOT SAUCISSON JAMBON PATE SAUCISSES POMMES POIRES MELON PECHES PRUNES BANANES HARICOTS PETITS POIS CAROTTES POIREAUX 22TROIS TROIS SEPT SIX HUIT DIX NEUF DOUZE TREIZE QUATORZE TRENTE-CINQ VINGT-SEPT DEUX CINQ TRENTE-SIX VINGT-HUIT TRENTE ET UN TRENTE-QUATRE VINGT-NEUF TRENTE ET UN SEIZE TREIZE QUATORZE ONZE NEUF DIX DIX-SEPT DIX-NEUF TREIZE VINGT VINGT-SIX QUARANTE-DEUX TRENTE-HUIT CINQUANTE-NEUFTRENTE ET UN QUARANTE-TROISNEUF QUINZE DOUZE SEIZE SEPT HUIT CINQ DOUZE ONZE QUATORZE QUATRE NEUF TROIS HUIT 2 #$"   *&;+    2W2DE LA MOUTARDE DU SAUCISSON DE LA CONFITURE DES ECLAIRS DU FROMAGE UNE BOUILLOIRE DU BEURRE DES COTELETTES DU POIVRE DES OEUFS ynZOUIN4DES ECLAIRS RDIXF10