10REM TALK TO CHARLIE 20REM by Lorin Knight, Jan 1992 25REM revised Feb 19 1994 30ONERRORCHAIN"TALKtoC" 35*FX21,0 40*KEY10"OLD|MRUN|M" 50MODE7:*FX11,0 60DIMS%(51):FORN%=1TO51:S%(N%)=RND(50 ):NEXT:DIMA%(14):FORN%=1TO14:A%(N%)=N%:N EXT:N$="":BN$="":SN$="" 70oN$=N$:t%=0:PROCselect:PROCname:PRO Crun:PROCq("THANK YOU FOR TALKING TO ME, "+N$):PROCq("IS THERE ANYONE ELSE WHO W OULD LIKE TO TALK TO ME?"):PROCr:IFLEFT$ (A$,1)<>"N"GOTO70 80PROCq("CHEERIO, "+N$):*FX12,0 90END 100DEFPROCname:PRINT'':PROCq("HELLO. I AM CHARLIE"):PROCq("WHAT IS YOUR NAME? "):PROCr:N$=FNn(A$):IFLENN$>15 N$=FNa(7) :PROCq("I CAN'T SAY THAT"):PROCq("I WILL CALL YOU "+N$):ENDPROC 110IFN$=oN$PROCq("HELLO AGAIN, "+N$):E NDPROC 120IFN$=BN$PROCq("ARE YOU "+oN$+"'S BR OTHER?"):PROCh 130IFN$=SN$PROCq("ARE YOU "+oN$+"'S SI STER?"):PROCh 140R%=RND(5):IFR%=1PROCq("I HAVE A "+F Na(1)+" CALLED "+N$) 150IFR%=2PROCq("I'M VERY PLEASED TO ME ET YOU, "+N$) 160IFR%=3PROCq(N$+" IS A "+FNa(2)+" NA ME") 170IFR%=4PROCq("I THINK THIS IS THE FI RST TIME WE HAVE MET, "+N$) 180IFR%=5PROCq("I WOULD LIKE TO KNOW A LITTLE MORE ABOUT YOU, "+N$) 190BN$="":SN$="":ENDPROC 200DEFPROCy:INPUT" "Y$:IFLEFT$(Y$,1)= "Y"ORLEFT$(Y$,1)="O"Y%=1ELSEY%=0 210ENDPROC 220DEFPROCh:PROCy:IFY%=1PROCq(oN$+" TO LD ME ABOUT YOU")ELSEPROCq("THAT MUST BE ANOTHER "+N$) 230ENDPROC 240DEFPROCold:IFA%>49ANDRND(3)=1PROCq( "THAT IS VERY OLD"):ENDPROC 250IFA%<50ANDRND(3)=1PROCq("YOU ARE GE TTING RATHER OLD, "+N$):ENDPROC 260IFRND(2)=1PROCq("THAT'S THE SAME AG E AS MY "+FNa(5))ELSEPROCq("YOU ARE NEAR LY AS OLD AS MY "+FNa(5)) 270ENDPROC 280DEFPROChavnt:IFRND(2)=1PROCq(FNa(20 )):ENDPROC 290IFRND(2)=1PROCq("MY "+FNa(3+RND(2)) +" IS ALWAYS DOING IT"):PROCq(FNh+" IS " +FNa(14)):ENDPROC 300IFRND(2)=1PROCq("MY "+FNa(3+RND(2)) +" DID"):PROCq(FNh+" HAD TO GO TO HOSPIT AL")ELSEPROCq("YOU WON'T EVER DO IT IF Y OU HAVE ANY SENSE") 310ENDPROC 320DEFPROChave:IFRND(4)=1PROCq("THAT'S A VERY FUNNY THING TO DO") 330IFRND(4)=1PROCq("DID EVERYBODY LAUG H?"):PROCy 340PROCq("YOU MUST BE "+FNa(14)):ENDPR OC 350DEFPROCq(Z$):z$=RIGHT$(Z$,1):Z$=" " +Z$:PRINT:REPEATUNTILTIME>t%:REPEATT%=39 :REPEATT%=T%-1:X$=MID$(Z$,T%,1):UNTILX$= " "ORX$="":PRINTCHR$130;LEFT$(Z$,T%-1):Z $=MID$(Z$,T%):UNTILLENZ$=0:t%=TIME+150 360IFz$="?"SOUND1,-10,50,3 370ENDPROC 380DEFPROCr:INPUT" "A$:ENDPROC 390DEFPROCseason(A$):IFINSTR(A$,"MAR") >0ORINSTR(A$,"APR")>0ORINSTR(A$,"MAY")>0 PROCq("I THINK IT'S RATHER NICE TO HAVE YOUR BIRTHDAY IN THE SPRING"):ENDPROC 400IFINSTR(A$,"JUN")>0ORINSTR(A$,"JUL" )>0ORINSTR(A$,"AUG")>0PROCq("IT MUST BE LOVELY TO HAVE YOUR BIRTHDAY IN THE SUMM ER"):ENDPROC 410PROCq("THAT'S QUITE A NICE TIME TO HAVE A BIRTHDAY"):ENDPROC 420DEFPROCparty:PROCq("WILL YOU HAVE A BIRTHDAY PARTY?"):PROCy:IFY%=0GOTO490 430IFRND(6)=1PROCq("CAN I COME?"):GOTO 450 440IFRND(3)=1PROCq("WILL YOU SAVE ME A "+FNa(38)+", "+N$+"?")ELSEGOTO460 450PROCy:IFY%=1PROCq("THANK YOU VERY M UCH, "+N$)ELSEPROCq("A PITY"):ENDPROC 460PROCq("HOW MANY PEOPLE WILL YOU INV ITE"):INPUT" "A%:IFA%<4PROCq("SO IT WIL L ONLY BE A SMALL PARTY"):GOTO490 470IFA%>12PROCq(FNa(39)):ENDPROC 480PROCq(FNa(40)):ENDPROC 490IFRND(3)=1PROCq("A PITY. I WOULD HA VE LIKED TO COME"):ENDPROC 500PROCq("I LIKE TO GO TO "+FNa(41)+" ON MY BIRTHDAY"):ENDPROC 510DEFPROCselect:FORN%=1TO5:E%=RND(10- N%):D%=A%(E%):A%(E%)=A%(10-N%):A%(10-N%) =A%(15-N%):A%(15-N%)=D%:NEXT:ENDPROC 520DEFPROCrun:FORO%=10TO14:GOSUB(1900+ 100*A%(O%)):NEXT:ENDPROC 530PROCr:PROCq(FNa(22,9)):ENDPROC 540DEFPROCpet:PROCq("I HAVE A PET TIGE R"):PROCq("I CALL HIM TIMMY"):ENDPROC 550DEFFNa(J%):RESTORE(5000+J%):READK%: C%=(S%(J%)+RND(3))MODK%:S%(J%)=C%:FORN%= 0TOC%:READB$:NEXT:=B$ 560DEFFNh:IFC%MOD2=0="HE"ELSE="SHE" 570DEFFNc:IFRND(3)=1="A SORT OF "+FNa( 27)+" "+FNa(28)ELSE=FNa(28) 580DEFFNn(X$):I%=INSTR(X$," "):IFI%=0= X$ELSE=LEFT$(X$,I%-1) 590DEFFNb(A$):L%=LENA$:B$="":FORN%=1TO L%:D$=MID$(A$,N%,1):IFASC(D$)>47ANDASC(D $)<58 B$=B$+D$ 600NEXT:=VAL(B$) 2000PROCq("HOW OLD ARE YOU, "+N$+"?"):P ROCr:A%=FNb(A$):IFA%>99PROCq("DON'T BE S ILLY. YOU ARE NOT AS OLD AS THAT"):RETUR N 2010IFA%=0PROCq("THAT'S THE SAME AGE AS MY UNCLE'S ELEPHANT"):RETURN 2020IFA%>35PROCold:RETURN 2030IFA%<4PROCq("NOT MANY "+STR$(A%)+"- YEAR-OLDS CAN OPERATE A COMPUTER"):RETUR N 2040IFRND(4)=1PROCq("THAT'S A VERY NICE AGE TO BE"):RETURN 2050IFRND(2)=1PROCq("THAT'S THE SAME AG E AS MY "+FNa(4)):RETURN 2060PROCq("MY "+FNa(1)+" IS "+STR$(A%)+ " TOO"):RETURN 2100PROCq("WHEN IS YOUR BIRTHDAY, "+N$+ "?"):PROCr:IFINSTR(A$,"DEC")>0ANDINSTR(A $,"25")>0PROCq("OH, I DON'T THINK I WOUL D WANT MY BIRTHDAY TO BE ON CHRISTMAS DA Y"):GOTO2150 2110IFINSTR(A$,"DEC")>0ANDINSTR(A$,"26" )>0PROCq("OH, I DON'T THINK I WOULD WANT MY BIRTHDAY TO BE ON BOXING DAY"):GOTO2 150 2115IFINSTR(A$,"TODA")+INSTR(A$,"TOMO") >0PROCq("HAPPY BIRTHDAY, "+N$):PROCq("I HOPE YOU HAVE A VERY HAPPY DAY"):GOTO215 0 2120IFRND(3)=1PROCseason(A$):GOTO2150 2130IFRND(4)=1PROCq("THAT'S JUST AFTER MY "+FNa(1)+"'S BIRTHDAY"):GOTO2150 2140PROCq("THAT'S MY "+FNa(3+RND(2))+"' S BIRTHDAY TOO") 2150IFRND(3)=1PROCparty 2160RETURN 2200PROCq("DO YOU LIKE DOING SUMS?"):PR OCy:IFY%=1GOTO2240 2210IFRND(4)=1PROCq("THEN I WON'T GIVE YOU ANY"):RETURN 2220IFRND(2)=1PROCq("I EXPECT YOU WOULD RATHER PLAY "+FNa(19)):RETURN 2230PROCq("I LOVE THEM"):PROCq("I OFTEN DO "+STR$(10+RND(70))+" BEFORE BREAKFAS T"):RETURN 2240F%=2:G%=4:I%=0:FORN%=1TO4:F%=F%+RND (3):G%=2*N%+RND(3):PROCq("WHAT IS "+STR$ F%+" + "+STR$G%+"?"):INPUT" "H% 2250IFH%=F%+G%PROCq("CORRECT!"):I%=I%+1 :ELSEPROCq("SORRY! "+STR$F%+" + "+STR$G %+" = "+STR$(F%+G%)) 2260NEXT 2265IFI%>3PROCq("VERY GOOD, "+N$):PROCq ("YOU GOT EVERY ONE RIGHT"):RETURN 2270IFI%=0PROCq("OH DEAR, "+N$+". YOU G OT THEM ALL WRONG")ELSEPROCq("YOU GOT "+ STR$I%+" RIGHT OUT OF 4") 2280IFI%<3PROCq("PERHAPS THEY WERE TOO HARD FOR YOU") 2290RETURN 2300PROCq("CAN YOU "+FNa(49)+"?"):PROCy :IFY%=1ANDC%=4PROCq("C'EST TRES BON, "+N $):PROCq("JE PARLE FRANCAIS TRES BIEN"): PROCq("MON PERE EST FRANCAIS"):RETURN 2310IFY%=0GOTO2360 2320IFRND(2)=1PROCq("YOU ARE VERY CLEVE R")ELSEPROCq("I WISH I COULD") 2330IFRND(3)=1PROCq("I HAVE TRIED AND T RIED"):GOTO2350 2340IFRND(2)=1PROCq("MY "+FNa(3+RND(2)) +" TRIED TO TEACH ME")ELSEPROCq("MY "+FN a(3+RND(2))+" DOES IT ALL THE TIME") 2350PROCq("BUT I "+FNa(15)):RETURN 2360IFRND(2)=1PROCq("IT'S QUITE EASY")E LSEPROCq("I'M QUITE GOOD AT IT") 2370IFRND(3)=1PROCq("SOMETIMES I DO IT WHEN I GO TO SEE MY "+FNa(4)):GOTO2385 2380IFRND(2)=1PROCq("MY "+FNa(4)+" TAUG HT ME")ELSEPROCq("I LEARNT HOW TO DO IT WHEN I WENT TO "+FNa(9)) 2385IFRND(3)=1PROCq("BUT I DON'T DO IT VERY OFTEN"):PROCq(FNa(12)) 2390RETURN 2400PROCq("WHAT COLOUR IS YOUR HAIR?"): PROCr:IFLENA$>9PROCq("THAT'S RATHER UNUS UAL"):GOTO2420 2410IFRND(2)=1PROCq("IT MUST LOOK RATHE R "+FNa(42)):RETURN 2420PROCq("MY HAIR IS "+FNc):IFRND(3)=1 PROCq("WITH STREAKS OF "+FNa(28)) 2430RETURN 2500PROCq("DO YOU HAVE A BROTHER?"):PRO Cy:IFY%=1PROCq("WHAT IS HIS NAME?"):PROC r:BN$=FNn(A$):ELSEBN$="" 2510IFLENBN$>15PROCq("THAT'S A VERY UNU SUAL NAME"):BN$="HE" 2520IFBN$=""GOTO2540 2530PROCq("DOES "+BN$+" "+FNa(32)+"?"): PROCy:IFY%=1PROCq(FNa(36))ELSEPROCq(FNa( 35)) 2540PROCq("DO YOU HAVE A SISTER?"):PROC y:IFY%=1PROCq("WHAT IS HER NAME?"):PROCr :SN$=FNn(A$):ELSESN$="" 2550IFSN$=""GOTO2565 2555IFLENSN$>15PROCq("I'VE NEVER HEARD THAT NAME BEFORE"):SN$="SHE" 2560PROCq("DOES "+SN$+" "+FNa(32)+"?"): PROCy:IFY%=1PROCq(FNa(3))ELSEPROCq(FNa(3 7)) 2565IFBN$<>""ORSN$<>""RETURN 2570PROCq("DO YOU HAVE A DOG?"):PROCy:I FY%=1PROCpet:RETURN 2575PROCq("DO YOU HAVE A CAT?"):PROCy:I FY%=1PROCpet:RETURN 2580PROCq("DO YOU HAVE A BUDGIE?"):PROC y:IFY%=1PROCpet ELSEPROCq("YOUR HOUSE MU ST BE VERY QUIET") 2590RETURN 2600PROCq("WHERE DO YOU LIVE?"):PROCr:B $=LEFT$(A$,3):IFB$="IN "ORB$="ON "ORB$=" UP "PROCq("MY "+FNa(3+RND(2))+" LIVES "+ A$):PROCq(FNh+" KEEPS "+FNa(16)):RETURN 2605IFLENA$>30GOTO2650 2606IFLENA$>14ANDINSTR(A$," ")=0GOTO265 0 2610IFRND(4)=1PROCq("I LIVE QUITE NEAR THERE"):PROCq("NEXT TO THE "+FNa(17)):RE TURN 2615IFRND(2)=1GOTO2630 2620PROCq("YOU MUST LIVE SOMEWHERE NEAR MY "+FNa(3+RND(2))):PROCq(FNh+" LIVES B EHIND THE "+FNa(17)):IFRND(2)=1PROCq("AN D KEEPS "+FNa(16)) 2625RETURN 2630PROCq("DO YOU GET ANY "+FNa(13)+" I N YOUR GARDEN?"):PROCy:IFY%=1PROCq("SO D O I")ELSEPROCq("I DO") 2640PROCq(FNa(47)):RETURN 2650PROCq("I DON'T KNOW WHERE THAT IS") :PROCq("IS IT IN "+FNa(9)+"?"):PROCy 2660IFY%=1PROCq("I THOUGHT IT MUST BE") ELSEPROCq("WHERE IS IT THEN?"):PROCr:PRO Cq("I DIDN'T KNOW THAT") 2670RETURN 2700PROCq("DO YOU LIKE "+FNa(24)+", "+N $+"?"):PROCy:IFY%=0PROCq("I LOVE THEM"): PROCq(FNa(25)):RETURN 2710PROCq("I HATE THEM"):PROCq(FNa(26)) :IFRND(3)=1PROCq("MY "+FNa(4)+" ALWAYS H AS THEM FOR SUNDAY TEA") 2720RETURN 2800PROCq("WHAT IS YOUR FAVOURITE COLOU R?"):PROCr:IFLENA$<15GOTO2830 2810A$="THAT COLOUR":PROCq("I DON'T KNO W WHAT "+A$+" IS LIKE"):H%=0:REPEATH%=H% +1:PROCq("IS IT A SORT OF "+FNa(27)+" "+ FNa(28)+"?"):PROCy:UNTILY%=1ORH%=3 2820IFY%=0PROCq("IT MUST BE A VERY UNUS UAL COLOUR"):RETURN:ELSEPROCq("I DON'T T HINK I WOULD LIKE IT"):RETURN 2830IFRND(3)<3GOTO2841 2831PROCq("I DON'T LIKE "+A$+" VERY MUC H"):PROCq("I HAVE SOME "+A$+" "+FNa(31)) :IFRND(2)=1PROCq("BUT I NEVER WEAR THEM" )ELSEPROCq("AND I HATE THEM") 2838RETURN 2841IFRND(2)=1REPEATC$=FNa(28):UNTILC$< >A$:PROCq("THAT USED TO BE MY FAVOURITE COLOUR"):PROCq("BUT NOW IT'S "+C$):RETUR N 2850IFC%<15PROCq("DO YOU HAVE ANY "+A$+ " "+FNa(31)+"?")ELSEPROCq("DO YOU HAVE A NY "+FNa(31)+" THAT COLOUR?") 2860PROCy:IFY%=1PROCq(FNa(29))ELSEPROCq (FNa(30)) 2870RETURN 2900PROCq("DO YOU LIKE READING BOOKS?") :PROCy:IFY%=1GOTO2930 2910PROCq("I LOVE BOOKS"):IFRND(4)=1PRO Cq("SOMETIMES I READ "+STR$(3+RND(30))+" IN ONE DAY"):RETURN 2920PROCq("I LIKE READING "+FNa(8)):RET URN 2930PROCq("TELL ME THE NAME OF A BOOK Y OU LIKE"):PROCr:IFRND(3)=1PROCq("YES, I LIKE THAT ONE TOO"):PROCq(FNa(43)):RETUR N 2940H%=0:REPEATH%=H%+1:PROCq("IS IT THE ONE ABOUT THE "+FNa(44)+" AND THE "+FNa (45)+"?"):PROCy:UNTILY%=1ORH%=3:IFY%=0PR OCq("I DON'T THINK I HAVE READ IT"):RETU RN 2950PROCq(FNa(46)):RETURN 3000PROCq("DO YOU LIKE PLAYING "+FNa(19 )+", "+N$+"?"):PROCy:IFY%=1PROCq("SO DO I"):PROCq(FNa(21)):ELSEPROCq("NOR DO I") :PROCq(FNa(48)) 3010RETURN 3100PROCq("DO YOU LIKE WATCHING "+FNa(1 8)+" ON THE TELEVISION?"):PROCy:IFY%=1 P ROCq("WHAT ELSE DO YOU LIKE WATCHING?")E LSEPROCq("WHAT DO YOU LIKE WATCHING?") 3110PROCr:PROCq(FNa(22)):RETURN 3200IFRND(2)=1GOTO3230 3210PROCq("HAVE YOU EVER "+FNa(10)+"?") :PROCy:IFY%=1PROChave ELSEPROChavnt 3220RETURN 3230PROCq("HAVE YOU EVER BEEN TO "+FNa( 9)+"?"):PROCy:IFY%=1ANDRND(2)=1PROCq("DI D YOU LIKE IT THERE?"):PROCy 3235IFRND(2)=1GOTO3260 3240IFRND(2)=1PROCq("I WENT THERE FOR A HOLIDAY ONCE")ELSEPROCq("MY "+FNa(5)+" TOOK ME THERE LAST YEAR") 3250PROCq(FNa(6)):RETURN 3260IFRND(2)=1PROCq("I AM GOING THERE F OR A HOLIDAY NEXT YEAR")ELSEPROCq("I HOP E TO GO THERE ONE DAY") 3270PROCq("MY "+FNa(5)+" "+FNa(11)):RET URN 3300PROCq("WHAT COLOUR ARE YOUR EYES?") :PROCr:IFLENA$>9PROCq("NOT MANY PEOPLE H AVE EYES THAT COLOUR"):GOTO3350 3310IFA$="GREEN"ANDRND(3)=1PROCq("MY CA T HAS GREEN EYES"):PROCq("THEY SHINE IN THE DARK"):GOTO3330 3320IFRND(3)=1PROCq("MY "+FNa(3+RND(2)) +" HAS "+A$+" EYES"):GOTO3350 3330IFRND(2)=1PROCq("I THINK "+A$+" EYE S ARE VERY "+FNa(42)):GOTO3350 3340PROCq("DO YOU HAVE "+A$+" "+FNa(31) +" TO MATCH?"):PROCy:IFLEFT$(Y$,1)="Y"PR OCq("HOW LOVELY")ELSEPROCq("WHAT A PITY" ) 3350IFRND(4)=1PROCq("MY EYES ARE "+FNc) 3360RETURN 5001DATA8,DOG,CAT,HAMSTER,GOLDFISH,DUCK ,GOOSE,PET TIGER,PARROT 5002DATA7,FUNNY,VERY NICE,GOOD,JOLLY GO OD,LOVELY,RATHER SILLY,BEAUTIFUL 5003DATA5,SO DOES MY SISTER,SHE DOESN'T SEEM TO BE A VERY NICE GIRL,I EXPECT TH AT MAKES YOU CROSS,THAT'S NOT VERY NICE, I DON'T SUPPOSE YOU LIKE THAT 5004DATA8,FRIEND SPOTTY SMITH,GIRL FRIE ND,COUSIN MARMADUKE,COUSIN ALICE,COUSIN JACK,FRIEND SMELLY NELLY,FRIEND DICKY BI RD,COUSIN MARY JANE 5005DATA8,UNCLE TOM,GRANNY,UNCLE BOB,AU NTY BETTY,GRANDPA,AUNTY BESSIE,FRIEND MR BLOBBY,MUSIC TEACHER 5006DATA4,I DIDN'T LIKE THE FOOD,IT RAI NED ALL THE TIME,AND I CAUGHT CHICKENPOX ,AND I BROKE MY ARM 5007DATA6,BESSY,NODDY,JIMBO,FRED,SILLY- BILLY,WALLY 5008DATA6,IN THE BATH,WINNIE THE POOH,B OOKS WITH PICTURES,STORIES ABOUT DRAGONS ,GHOST STORIES,IN BED 5009DATA9,AMERICA,CHINA,AFRICA,FRANCE,I TALY,CANADA,HONG KONG,SPAIN,INDIA 5010DATA8,POKED A LION IN THE EAR,KNOCK ED A KETTLE OF HOT WATER OVER YOURSELF,J UMPED OFF THE ROOF,PUT ICE CREAM IN YOUR EARS,SAT ON A LIGHTED CANDLE,SWALLOWED A SPIDER,PUSHED A CHERRY UP YOUR NOSE,PU T YOUR HAND INSIDE A WASP NEST 5011DATA4,IS GOING TO TAKE ME,HAS A HOU SE BY THE SEA THERE,HAS A FRIEND WHO LIV ES THERE,LIVES THERE,GOES THERE EVERY YE AR FOR A HOLIDAY 5012DATA4,IT MAKES THE DOG BARK,PEOPLE LAUGH AT ME,IT MAKES ME VERY TIRED,THE L AST TIME WAS ON AUNTY NELLY'S BIRTHDAY 5013DATA6,SQUIRRELS,ROBINS,BLACKBIRDS,R ABBITS,HEDGEHOGS,DUCKS 5014DATA6,A BIT OF A WALLY,CRAZY,RATHER STUPID,A VERY SILLY PERSON,AS MAD AS A HATTER,POTTY 5015DATA3,AM HOPELESS,CAN'T DO IT,AM NO GOOD AT IT 5016DATA7,ELEPHANTS,CAMELS,DONKEYS,GIRA FFES,LIONS,LOTS OF GOATS,CROCODILES 5017DATA8,POST OFFICE,HOSPITAL,LIBRARY, SWIMMING POOL,BIG HOTEL,MARKET,FOOTBALL GROUND,PARK 5018DATA11,POSTMAN PAT,TOM AND JERRY,JA CKANORY,SUPERTED,PLAYDAYS,SESAME STREET, SCOOBY DOO,GARFIELD,THE MAGIC ROUNDABOUT ,BLUE PETER,THOMAS THE TANK ENGINE 5019DATA11,FOOTBALL,CRICKET,TIDDLY-WINK S,NETBALL,DOMINOES,SNAKES AND LADDERS,DO CTORS AND NURSES,LUDO,SNAP,THE PIANO,HID E AND SEEK 5020DATA4,I'M GLAD TO HEAR IT,GOOD FOR YOU,I'M PLEASED TO HEAR THAT YOU HAVE MO RE SENSE,NOR HAVE I - AND I DON'T WANT T O EITHER 5021DATA8,I'M A WORLD CHAMPION,IT'S GOO D FUN,I LIKE PLAYING IT UNDER WATER,ESPE CIALLY WHEN IT IS RAINING,BUT I DON'T PL AY IT MUCH,I LOVE IT,BUT I'M NOT VERY GO OD AT IT,I PLAY IT EVERY SUNDAY MORNING 5022DATA9,MY SISTER WATCHES IT BUT I TH INK IT'S SILLY,IT'S HORRID,I THINK THAT IS VERY FUNNY,MY BROTHER HATES IT. HE TU RNS THE TELEVISION OFF WHEN IT COMES ON, I DON'T LIKE THAT,I THINK IT'S STUPID,I WATCH THAT EVERY TIME ITS ON 5023DATAI HAVE NEVER SEEN THAT,THAT'S O NE OF MY FAVOURITES 5024DATA11,TOMATOES,BANANAS,GREEN PEPPE RS,STRAWBERRIES,POLO MINTS,MARS BARS,ONI ONS,FRIED SNAILS,FISH FINGERS,SEAWEED SA NDWICHES,FROG PIES 5025DATA8,I EAT THEM WITH CUSTARD,I HAV E THEM FOR SUNDAY DINNER,ESPECIALLY WITH TOMATO SAUCE,THEY ARE LOVELY WITH CHOCO LATE ICE CREAM,I CAN'T THINK WHY YOU DON 'T LIKE THEM,YUM YUM YUM,I PUT MARMALADE ON THEM,WE OFTEN HAVE THEM FOR SUPPER 5026DATA7,THEY MAKE ME SICK,THEY GIVE M E TUMMY ACHE,THEY ARE HORRIBLE,I DON'T L IKE THE SMELL OF THEM,THEY GIVE ME BAD D REAMS,THEY ARE REVOLTING,THEY MAKE ME SN EEZE 5027DATA7,SILVERY,CREAMY,FUNNY,DARK,DIR TY,PALE,YUCKY 5028DATA12,BROWN,PINK,GREEN,BLUE,YELLOW ,RED,ORANGE,SKY BLUE PINK,BLACK,GREY,WHI TE,VIOLET 5029DATA5,HOW HORRID,THEY MUST LOOK VER Y PRETTY,I EXPECT THEY FRIGHTEN THE CATS ,I SUPPOSE YOU KEEP THEM FOR SUNDAYS,HOW LOVELY 5030DATA4,WHAT A PITY - IT'S A NICE COL OUR,THAT'S A SHAME. YOU WOULD LOOK PRETT Y IN THEM,PERHAPS YOU WILL GET SOME FOR YOUR BIRTHDAY,PERHAPS SANTA CLAUS WILL B RING YOU SOME FOR CHRISTMAS 5031DATA8,SOCKS,SHOES,TEE SHIRTS,TROUSE RS,JUMPERS,GLOVES,JEANS,WELLIES 5032DATA10,TEASE YOU,HIT YOU,PLAY TRICK S ON YOU,PUT FROGS IN YOUR BED,PULL YOUR HAIR,BREAK YOUR TOYS,HIDE YOUR SOCKS,EA T ALL YOUR SMARTIES,PUT DEAD FLIES IN YO UR CORNFLAKES,BREAK YOUR PENCILS 5033DATATIE KNOTS IN YOUR SHOE LACES,PU T ICE CREAM DOWN YOUR BACK,FIGHT WITH YO U,PUT JAM IN YOUR SHOES,POUR CUSTARD OVE R YOUR HEAD,PLAY VERY LOAD MUSIC ALL DAY LONG 5034DATA4,HE MUST BE QUITE A KIND BOY,I THINK I WOULD LIKE HIM,I'M PLEASED TO H EAR THAT,HE SEEMS TO BE NICER THAN MY BR OTHER 5035DATA6,HE SEEMS TO BE QUITE A NICE B OY,I THINK I WOULD LIKE HIM,MY BROTHER I S ALWAYS DOING IT,HE SEEMS TO BE NICER T HAN MY BROTHER,I EXPECT YOU ARE PLEASED ABOUT THAT,I'M GLAD TO HEAR THAT 5036DATA5,SO DOES MY BROTHER,HE DOESN'T SEEM TO BE A VERY NICE BOY,I EXPECT THA T MAKES YOU CROSS,THAT'S NOT VERY NICE,H OW HORRID 5037DATA6,SHE SEEMS TO BE QUITE A NICE GIRL,I THINK I WOULD LIKE HER,MY SISTER IS ALWAYS DOING IT,SHE SEEMS TO BE NICER THAN MY SISTER,I EXPECT YOU ARE PLEASED ABOUT THAT,I'M GLAD TO HEAR THAT 5038DATA3,PIECE OF CAKE,BALLOON,SAUSAGE ROLL 5039DATA3,THAT'S QUITE A CROWD,I THINK YOUR HOUSE WILL BE FULL,WHAT A LOT! 5040DATA3,THAT WILL BE FUN,THAT'S A GOO D NUMBER FOR A PARTY,I SHALL HAVE 13 PEO PLE TO MINE 5041DATA5,THE ZOO,THE PARK,AUNTIE BETTY 'S,McDONALD'S,THE SWIMMING POOL 5042DATA4,BEAUTIFUL,LOVELY,PRETTY,ATTRA CTIVE 5043DATA5,ESPECIALLY THE PICTURES,IT'S AN EXCITING STORY,IT'S VERY FUNNY,EXCEPT FOR THE ENDING,BUT IT'S RATHER SAD 5044DATA17,BEAR,PRINCESS,WICKED WITCH,N AUGHTY PUPPY,WHITE RABBIT,KITTEN,GOOSE G IRL,PARROT,HORRID QUEEN,ICE CREAM MAN,MO USE,SNOWMAN,SCARECROW,FRIENDLY GIANT,CRO CODILE,LITTLE RED HEN,PIRATE 5045DATA17,FROG THAT TURNED INTO A PRIN CE,DRAGON,WOLF,BALLOON,SPACE SHIP,TURTLE S,UGLY SISTERS,FAIRY GODMOTHER,DWARFS,CA T WITH A WOODEN LEG,MAGIC CRICKET BAT,BU RIED TREASURE,LOST SHEEP,FIRE ENGINE,RED SHOES,THREE FOXES,CHRISTMAS PUDDING 5046DATA4,I LIKE THAT ONE,I THOUGHT IT WAS BORING,I DIDN'T LIKE THAT ONE,I THOU GHT IT HAD A FUNNY ENDING 5047DATA5,LOTS OF THEM,I GIVE THEM PIEC ES OF BREAD,TWO OF THEM COME EVERY MORNI NG,BUT THE DOG CHASES THEM AWAY,AND TWO BIG BLACK CATS 5048DATA7,IT'S RATHER BORING,I'M NO GOO D AT IT,IT MAKES MY FEET HURT,I NEVER PL AY IT,I HATE IT,I PREFER HORSE-RIDING,IT GIVES ME HEADACHES 5049DATA8,RIDE A BICYCLE,STAND ON YOUR HEAD,WALK ON YOUR HANDS,DO CARTWHEELS,SP EAK FRENCH,WIGGLE YOUR EARS,PLAY THE TRU MPET,PLAY THE VIOLIN