Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape05a_acorn_eu_1989_november.wav » SHOP
SHOP
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape05a_acorn_eu_1989_november.wav |
Filename: | SHOP |
Read OK: | ✔ |
File size: | 2CAF bytes |
Load address: | 2000 |
Exec address: | 1900 |
Duplicates
There are 2 duplicate copies of this file in the archive:
- AEW website » database » database_5_25_discs_Electron-User-7-02_D-E702.ssd » SHOP
- AEW website » database » database_tapes_Electron-User-7-02_EU7-2_E.uef » SHOP
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape05a_acorn_eu_1989_november.wav » SHOP
File contents
10 REM Shopping Spree 20 REM By Peter & Deborah Wood 30 REM (c) Electron User 40 VDU 23,255,0,24,36,66,126,126,126,126 50 MODE 6 60 VDU 19,1,2,0,0,0: 70 CLS 80 PRINT TAB(11,1)"SHOPPING SPREE" 90 PRINT TAB(0,2);"By Peter & -------------- Deborah Wood" 100 PRINT TAB(0,3); 110 FOR A=0 TO 39 120 VDU 255;:NEXT 130 PROCINST 140 END 150 DEFPROCINST 160 FOR x=0 TO 38:PRINT TAB(x,24);CHR$(255); 170 NEXT 180 VDU 28,0,23,39,4: 190 PRINT TAB(12,0)"INSTRUCTIONS" 200 PRINT 210 PRINT "It is very near to Christmas and it is now time to go on your yearly shopping spree, buying gifts for your family." 220 PRINT "You have `15 to spend in all the shops visited. Sounds easy, but, your family are very difficult to buy for and are certainly not afraid of speaking their minds when it comes to Christmas presents." 240 PRINT 250 PRINT "THE BRIEF SUMMARY GIVEN OF EACH PERSON WILL HELP YOU DECIDE WHAT TO BUY." 260 PRINT"YOU ARE ALSO TIMED, STARTING WHEN YOU PRESS SPACE" 270 PRINT TAB(10,18);"HAPPY SHOPPING!!..." 280 PRINT TAB(12,19)"PRESS <SPACE>"; 290 REPEAT 300 KEY$=INKEY$(1) 310 UNTIL INKEY(-99) 320 PROC1 330 ENDPROC 340 DEFPROC1 350 CLS 360 M=0 370 TIME=0 380 MONEY%=1500 390 CASE%=0 400 EAR%=0 410 MUG%=0 420 M=0 430 B=0 440 S=0 450 X=0 460 R=0 470 BONE%=0 480 PRINT:PRINT" ************":PRINT 490 PRINT "You are standing in the square, and you can see two shops,NEXT and WHSMITHS. NEXT has a large sale sign in the windowbut you spot a particularly lovely pencil case in the window of WHSMITHS, in beautifully"; 500 PRINT "complimentary fluresent pink and green." 510 PRINT:INPUT "DO YOU GO INTO SMITHS OR NEXT?(S/N)"A1$ 520 IF A1$="S" PROC2 530 IF A1$="N" PROC3 ELSE PRINT: PRINT "INPUT-NOT ACCEPTABLE......":GOTO 510 540 ENDPROC 550 DEFPROC2 560 PRINT:PRINT" ************":PRINT 570 PRINT 580 PRINT "You enter SMITHS and inquire about the cost of the pencil case, and find it is particularly expensive-`5.50-can you afford it? Remember you still have threepresents to buy." 590 PRINT:INPUT "DO YOU BUY THE PENCIL CASE(Y/N)?"A2$ 600 PRICE%=550 610 IF A2$="Y" PROCBUY 620 IF A2$="Y" AND R=1 PROC4 630 IF A2$="N" OR A2$="Y" AND R=0 PROC5 ELSE PRINT'"INPUT-NOT ACCEPTABLE......":GOTO 590 640 ENDPROC 650 DEFPROC3 660 PRINT:PRINT" ************":PRINT 670 PRINT "You've seen it, the bargain of the century, but it's over at the other sideof the shop! You see several people moving towards the earings (`4.50) whichyou know will suit your sister." 680 PRINT:INPUT "DO YOU MAKE AN EXHIBITION OF YOURSELF BYRUNNING ACROSS THE SHOP(Y/N)?"A3$ 690 IF A3$="Y" PROC8 700 IF A3$="N" PROC10 710 ENDPROC 720 DEFPROC4 730PRINT:PRINT" ************":PRINT 740 CASE%=1 750 PRINT"'You are our millionth customer in our new store' says the cashier.You can havea `2.50 gift voucher. You feel a little hungry." 760 PRINT:INPUT "DO YOU BUY A BOX OF SWEETS TO EAT-THOSE CREAM FILLED ONES YOU REALLY ADORE(Y/N)?"A4$ 770 IF A4$="Y" PROC6 780 IF A4$="N" PROC7 ELSE PRINT: PRINT "INPUT-NOT ACCEPTABLE......":GOTO 760 790 ENDPROC 800 DEFPROC5 810PRINT:PRINT" ************":PRINT 820 PRINT "Where next?-Eexactly NEXT. You have LOADSA MONEY left, but lots of presents to buy. But, as you come out of the store, a rather distressed looking female is asking if anyone can lend"; 830 PRINT " her `1 to make a phone-call as she has forgotten her purse and must be back to work in five minutes." 840 PRINT:INPUT "THIS SEEMS A LOT OF MONEY FOR A PHONE CALL, BUT DO YOU GIVE IT TO HER(Y/N)?"A5$ 850 IF A5$="Y" M=1 ELSE M=0 860 PRINT 870 PRINT"YOU NOW GO TO NEXT":PROC3 880 ENDPROC 890 DEFPROC6 900PRINT:PRINT" ************":PRINT 910 PRINT "You buy and eat the sweets, and feel much better.":PROC5 920 ENDPROC 930 DEFPROC7 940PRINT:PRINT" ************":PRINT 950 PRINT "You feel very hungry, and begin to feel dizzy. The next thing you remember is a large crowd peering down at you, and your head hurts. Your cheeks are a rather reddish colour and you decide" 960 PRINT "your best option is to return home as quickly as possible.":PROCEND 970 ENDPROC 980 DEFPROC8 990PRINT:PRINT" ************":PRINT 1000 PRICE%=450 1010 PRINT "A hand comes down on your shoulder, it is the store detective.'Who do you thinkyou are, running like that." 1020 IF M=1 PRINT "But it's the lady you helped earlier and says it is Ok, and goes and gets theear-rings for you to buy and returns thepound she borrowed earlier." 1030 IF M=1 EAR%=1 ELSE EAR%=0 1040 PROCBUY 1050 IF M=0 PRINT "You are in deep trouble, 'Out of this shop immediately,' she says." 1060 PRINT:PRINT"ANOTHER SHOP NOW.....":PROC10 1070 ENDPROC 1080 DEFPROC9 1090PRINT:PRINT" ************":PRINT 1100 PRINT "You just make it to see someone else lift the ear-rings off the shelf-hard luck, Pal." 1110PRINT:PRINT"ANOTHER SHOP NOW.....":PROC10 1120 ENDPROC 1130 DEFPROC10 1140PRINT:PRINT" ************":PRINT 1150 PRINT "You go out into the precinct, and consider BOOTS as your next choice-you enter the shop." 1160 PRINT:INPUT "WHICH DEPARTMENT DO YOU GO TO-RECORDS, HOUSEHOLD OR PET ITEMS(R/H/P)?"A10$ 1170 IF A10$="R" PROC11 1180IF A10$="H" PROC12 1190IF A10$="P" PROC13 ELSE PRINT :PRINT "INPUT- NOT ACCEPTABLE.......":GOTO 1160 1200 ENDPROC 1210 DEF PROC11 1220PRINT:PRINT" ************":PRINT 1230 PRINT "As you make your way to the record counter, you notice a sign which says 'Buy any 2 singles get one free.' Just at this moment a small boy rushes past" 1240 PRINT"and snatches your carrier bag, which contains your money." 1250 PRINT:INPUT "DO YOU RUN AFTER HIM(Y/N)?"A11$ 1260 IF A11$="Y" PROC14 1270 IF A11$="N" PROC15 ELSE PRINT :PRINT "INPUT- NOT ACCEPTABLE.......":GOTO 1250 1280 ENDPROC 1290 DEF PROC12 1300PRINT:PRINT" ************":PRINT 1310 PRINT "In the household section, you find a setof mugs which are `4.50. They are beautifully designed, but can you affordthem?" 1320 PRINT:INPUT "DO YOU BUY THE MUGS(Y/N)?"A12$ 1330 PRICE%=450: 1340 IF A12$="Y" PROCBUY 1350 IF A12$="Y" AND R=1 PROC16 1360 IF A12$="N" OR A12$="Y" AND R=0 PROC17 ELSE PRINT :PRINT "INPUT- NOT ACCEPTABLE.......":GOTO 1320 1370 ENDPROC 1380 DEF PROCBUY 1390 R=1 1400 CHANGE%=MONEY%-PRICE% 1410 IF CHANGE% < 0 PROCNO ELSE MONEY%=CHANGE% 1420 ENDPROC 1430 DEF PROCNO 1440 R=0 1450 PRINT "YOU DO NOT HAVE SUFFICIENT MONEY... SORRY ABOUT THAT." 1460 ENDPROC 1470 DEF PROC13 1480PRINT:PRINT" ************":PRINT 1490 PRINT "At the pet section you see a rather nicebone for 50p, but are apprehensive over whether it it enough for your beloved dog." 1500 PRINT:INPUT "DO YOU BUY THE BONE(Y/N)?"A13$ 1510 PRICE%=50 1520 IF A13$="Y" PROCBUY 1530 IF A13$="Y" AND R=1 PROC18 1540 IF A13$="N" OR A13$="Y" AND R=0 PROC19 ELSE PRINT :PRINT "INPUT- NOT ACCEPTABLE.......":GOTO 1500 1550 ENDPROC 1560 DEFPROC14 1570PRINT:PRINT" ************":PRINT 1580 PRINT"You run after him shouting THIEF, and just manage to catch his jacket as he isabout to leave the shop, and retrieve your money." 1590 PRINT"An elderly lady cannot thank you enough,as the boy had also stolen her handbag! She gives you `2 to say thankyou." 1600 MONEY%=MONEY%+200 1610 PRINT:INPUT"WHERE NOW, THE HOUSEHOLD OR PET SECTION (H/P)?"A14$ 1620 IF A14$="H" PROC12 1630 IF A14$="P" PROC13 ELSE PRINT :PRINT "INPUT- NOT ACCEPTABLE.......":GOTO 1610 1640 ENDPROC 1650 DEFPROC15 1660PRINT:PRINT" ************":PRINT 1670 PRINT "There is nothing for it but to return home with what you have. On your way outof the shop, you notice a comotion, and see the small boy has been caught, and your money is returned." 1680 PRINT:INPUT"WHERE NOW, THE HOUSEHOLD OR PET SECTION (H/P)?"A14$ 1690 IF A14$="H" PROC12 1700 IF A14$="P" PROC13 ELSE PRINT :PRINT "INPUT- NOT ACCEPTABLE.......":GOTO 1680 1710 ENDPROC 1720 DEF PROC16 1730PRINT:PRINT" ************":PRINT 1740 MUG%=1 1750 PRINT "You buy the mugs and continue onto the pet section." 1760 PROC13 1770 ENDPROC 1780 DEF PROC17 1790PRINT:PRINT" ************":PRINT 1800 MUG%=0 1810 PRINT "You do not buy the mugs but continue on to the pet section." 1820 PROC13:ENDPROC 1830 DEFPROC18 1840 BONE%=1 1850PRINT:PRINT" ************":PRINT 1860 PRINT "You buy the bone, and it is gift wrappedWHAT NEXT? It is 5:00pm so it is quite late." 1870 PRINT:INPUT"DO YOU RETURN HOME, OR GOTO ANOTHER SHOP(H/S)?"A18$ 1880 IF A18$="H" PROCEND 1890 IF A18$="S" PROC20 ELSE PRINT: PRINT "INPUT-NOT ACCEPTABLE......":GOTO 1870 1900 ENDPROC 1910 DEF PROC19 1920 BONE%=0 1930PRINT:PRINT" ************":PRINT 1940 PRINT "You do not buy the bone. There is a nicepet store next door, so you go on to there. Here is a lovely box of dog biscuits-`2.50" 1950 PRINT:INPUT "DO YOU BUY THE BISCUITS(Y/N)?"A19$ 1960 PRICE%=250 1970 IF A19$="Y" PROCBUY 1980 IF A19$="Y" AND R=1 THENPROC21 1990 IF A19$="N" OR A19$="Y" AND R=0 PROC22 ELSE PRINT: PRINT "INPUT-NOT ACCEPTABLE......":GOTO 1950 2000 ENDPROC 2010 DEFPROC20 2020PRINT:PRINT" ************":PRINT 2030 PRINT"You now make your way to the sweet shop.Here is a lovely box of chocolates only `4.50" 2040 PRICE%=450 2050 PRINT:INPUT "DO YOU BUY THE CHOCOLATES(Y/N)?"A20$ 2060 IF A20$="Y" PROCBUY 2070 IF A20$="Y" AND R=1 PROC23 2080 IF A20$="N" OR A20$="Y" AND R=0 PROC24 ELSE PRINT: PRINT "INPUT-NOT ACCEPTABLE......":GOTO 2050 2090 ENDPROC 2100DEF PROC21 2110 PRINT:PRINT" ************":PRINT 2120 B=1 2130 PRINT"You buy the biscuits and make your way to the sweet shop.":PROC20 2140 ENDPROC 2150 DEFPROC22 2160 B=0 2170PRINT:PRINT" ************":PRINT 2180 PRINT"You don't buy the biscuits and make yourway to the sweetshop." 2190 PROC20:ENDPROC 2200 DEFPROC23 2210PRINT:PRINT" ************":PRINT 2220 PRINT"As you lift the box of chocolates of theshelf, the whole pile comes tumbling to the ground!" 2230 PRINT:INPUT"DO YOU HANG AROUND(Y/N)?"A23$ 2240 IF A23$="Y" PROC25 2250 IF A23$="N" PROC26 ELSE PRINT'"INPUT-NOT ACCEPTABLE......":GOTO 2230 2260 ENDPROC 2270 DEF PROC24 2280 PRINT " ************":PRINT 2290PRINT:PRINT" ************":PRINT 2300 PRINT "You decide not to buy the sweets, and make your way home, hoping you have something nice for everyone." 2310 PROCEND 2320 ENDPROC 2330 DEF PROC25 2340PRINT:PRINT" ************":PRINT 2350 S=1 2360 PRINT "The shop assistant helps you to restack to shelves, and you buy the chocolates. It is late now and you must go home." 2370 PROCEND 2380 ENDPROC 2390 DEFPROC26 2400PRINT:PRINT" ************":PRINT 2410 MONEY%=MONEY%+450 2420 PRINT "Just as you attempt to make a quick get away, the lady in the shop stops you. You have to restack all the sweets single handedly." 2430 PRINT "You eventually leave the shop, and make your way home. Then you realise you haveleft your presents in the sweet shop, you return to find it closed."; 2440 PRINT "You have no time to buy anymore presentsand MUST return home." 2450 S=0:MUG%=0:EAR%=0:PENCIL%= 0:B=0:BONE%= 0:S=0 2460 PROCEND 2470 ENDPROC 2480 DEF PROCEND 2490 PRINT:PRINT " PRESS<SPACE>":REPEAT:LET KEY$=INKEY$(1):UNTIL INKEY(-99) 2500 CLS 2510 FOR A=1 TO 19 2530 PRINT "IT'S CHRISTMAS DAY, IT'S CHRISTMAS DAY." 2540 NEXT 2550 FOR C=0 TO 200:VDU 19,1,RND(7),0,0,0:NEXT 2560 CLS:VDU 19,1,2,0,0,0 2570 PRINT :PRINT "Please use these key-words...." 2580 PRINT "EARRINGS; PCASE; DBISCUITS; CHOCOLATES; BONE; MUGS." 2590 PRINT'"It is now time to give out the presents.The presents you have are..." 2600PRINT 2610IF CASE%=1 PRINT " PCASE"; 2620IF EAR%=1 PRINT " EARRINGS"; 2630IF MUG%=1 PRINT " MUGS"; 2640IF B=1 PRINT " DBISCUITS"; 2650IF S=1 PRINT " CHOCOLATES"; 2660IF BONE%=1 PRINT " BONE"; 2670IF S=0 AND CASE%=0 AND EAR%=0 AND MUG%=0 AND B=0 AND BONE%=0 PRINT "NOTHING..."; 2680 PRINT 2690 PRINT "IF YOU HAVE NOTHING FOR THAT PERSON PRESS <RETURN>" 2700 PRINT:PRINT "IF YOU ATTEMPT TO GIVE THEM SOMETHING YOU DO NOT HAVE YOUR FAMILY WILL NOT BE PLEASED..." 2710 PRINT 2720 INPUT "WHAT HAVE YOU BROUGHT FOR YOUR SISTER..."G$ 2730 IF G$="EARRINGS" AND EAR%=1 PRINT "YOUR SISTER IS VERY PLEASED...AND ALLOWSYOU TO USE HER BEETHOVEN RECORDS" 2740 IF G$="EARRINGS" AND EAR%=1 X=X+25 ELSE PRINT "YOUR SISTER IS DISGUSTED" 2750 INPUT'"WHAT HAVE YOU BROUGHT FOR YOUR FATHER..."F$ 2760 IF F$="PCASE" AND CASE%=1 PRINT "YOU ARE GIVEN A RISE IN POCKET MONEY." 2770 IF F$="PCASE" AND CASE%=1 X=X + 25 ELSE PRINT "YOUR FATHER GROUNDS YOU FOR ONE MONTH." 2780 INPUT'"WHAT HAVE YOU BROUGHT FOR YOUR MOTHER..."M$ 2790 IF M$="CHOCOLATES" AND S=1 PRINT "THANKYOU, LOVE. WHAT A NICE THOUGHT." 2800 IF M$="CHOCOLATES" AND S=1THEN X=X + 25 ELSE PRINT "YOU CAN DO YOUR OWN COOKING AND IRONING IN FUTURE." 2810 INPUT'"WHAT HAVE YOU BROUGHT FOR YOUR DOG..."D$ 2820 IF D$="DBISCUITS" AND B=1 PRINT "HE LICKS YOU ALL OVER YOUR FACE." 2830 IF D$="DBISCUITS" AND B=1 X=X + 25 ELSE PRINT "YOUR DOG BITES YOU." 2840 PRINT'"YOUR SCORE IS ";X;"%"; 2850 PRINT'"YOUR TIME IS ";TIME DIV 100;" secs" 2860 PROCGO 2870 ENDPROC 2880 DEFPROCGO 2890 PRINT'"WOULD YOU LIKE ANOTHER GO(Y/N)?" 2900 REPEAT 2910 KEY$=INKEY$(1) 2920 UNTIL INKEY(-69) OR INKEY(-86) 2930 IF INKEY(-69) CLS:GOTO 180 ELSE GOTO 2940 2940 PRINT "BYE-BYE":END 2950 ENDPROC
� Shopping Spree � By Peter & Deborah Wood � (c) Electron User (( � 23,255,0,24,36,66,126,126,126,126 2 � 6 < � 19,1,2,0,0,0: F � P � �11,1)"SHOPPING SPREE" Z5 � �0,2);"By Peter & -------------- Deborah Wood" d � �0,3); n � A=0 � 39 x � 255;:� � �INST � � � ��INST � � x=0 � 38:� �x,24);�(255); � � � � 28,0,23,39,4: � � �12,0)"INSTRUCTIONS" � � �} � "It is very near to Christmas and it is now time to go on your yearly shopping spree, buying gifts for your family." �� � "You have `15 to spend in all the shops visited. Sounds easy, but, your family are very difficult to buy for and are certainly not afraid of speaking their minds when it comes to Christmas presents." � � �R � "THE BRIEF SUMMARY GIVEN OF EACH PERSON WILL HELP YOU DECIDE WHAT TO BUY." ; �"YOU ARE ALSO TIMED, STARTING WHEN YOU PRESS SPACE" $ � �10,18);"HAPPY SHOPPING!!..." � �12,19)"PRESS <SPACE>"; " � , KEY$=�(1) 6 � �(-99) @ �1 J � T ��1 ^ � h M=0 r �=0 | MONEY%=1500 � CASE%=0 � EAR%=0 � MUG%=0 � M=0 � B=0 � S=0 � X=0 � R=0 � BONE%=0 �% �:�" ************":� �� � "You are standing in the square, and you can see two shops,NEXT and WHSMITHS. NEXT has a large sale sign in the windowbut you spot a particularly lovely pencil case in the window of WHSMITHS, in beautifully"; �0 � "complimentary fluresent pink and green." �1 �:� "DO YOU GO INTO SMITHS OR NEXT?(S/N)"A1$ � A1$="S" �2 < � A1$="N" �3 � �: � "INPUT-NOT ACCEPTABLE......":� �d~A � & ��2 0% �:�" ************":� : � D� � "You enter SMITHS and inquire about the cost of the pencil case, and find it is particularly expensive-`5.50-can you afford it? Remember you still have threepresents to buy." N. �:� "DO YOU BUY THE PENCIL CASE(Y/N)?"A2$ X PRICE%=550 b � A2$="Y" �BUY l � A2$="Y" � R=1 �4 vI � A2$="N" � A2$="Y" � R=0 �5 � �'"INPUT-NOT ACCEPTABLE......":� �DNB � � � ��3 �% �:�" ************":� �� � "You've seen it, the bargain of the century, but it's over at the other sideof the shop! You see several people moving towards the earings (`4.50) whichyou know will suit your sister." �S �:� "DO YOU MAKE AN EXHIBITION OF YOURSELF BYRUNNING ACROSS THE SHOP(Y/N)?"A3$ � � A3$="Y" �8 � � A3$="N" �10 � � � ��4 �$�:�" ************":� � CASE%=1 � �"'You are our millionth customer in our new store' says the cashier.You can havea `2.50 gift voucher. You feel a little hungry." �^ �:� "DO YOU BUY A BOX OF SWEETS TO EAT-THOSE CREAM FILLED ONES YOU REALLY ADORE(Y/N)?"A4$ � A4$="Y" �6 < � A4$="N" �7 � �: � "INPUT-NOT ACCEPTABLE......":� �dxB � ��5 *$�:�" ************":� 4� � "Where next?-Eexactly NEXT. You have LOADSA MONEY left, but lots of presents to buy. But, as you come out of the store, a rather distressed looking female is asking if anyone can lend"; >s � " her `1 to make a phone-call as she has forgotten her purse and must be back to work in five minutes." H[ �:� "THIS SEEMS A LOT OF MONEY FOR A PHONE CALL, BUT DO YOU GIVE IT TO HER(Y/N)?"A5$ R � A5$="Y" M=1 � M=0 \ � f �"YOU NOW GO TO NEXT":�3 p � z ��6 �$�:�" ************":� �@ � "You buy and eat the sweets, and feel much better.":�5 � � � ��7 �$�:�" ************":� �� � "You feel very hungry, and begin to feel dizzy. The next thing you remember is a large crowd peering down at you, and your head hurts. Your cheeks are a rather reddish colour and you decide" �H � "your best option is to return home as quickly as possible.":�END � � � ��8 �$�:�" ************":� � PRICE%=450 �t � "A hand comes down on your shoulder, it is the store detective.'Who do you thinkyou are, running like that." �� � M=1 � "But it's the lady you helped earlier and says it is Ok, and goes and gets theear-rings for you to buy and returns thepound she borrowed earlier." � M=1 EAR%=1 � EAR%=0 �BUY S � M=0 � "You are in deep trouble, 'Out of this shop immediately,' she says." $# �:�"ANOTHER SHOP NOW.....":�10 . � 8 ��9 B$�:�" ************":� Lc � "You just make it to see someone else lift the ear-rings off the shelf-hard luck, Pal." V"�:�"ANOTHER SHOP NOW.....":�10 ` � j ��10 t$�:�" ************":� ~h � "You go out into the precinct, and consider BOOTS as your next choice-you enter the shop." �U �:� "WHICH DEPARTMENT DO YOU GO TO-RECORDS, HOUSEHOLD OR PET ITEMS(R/H/P)?"A10$ � � A10$="R" �11 �� A10$="H" �12 �?� A10$="P" �13 � � :� "INPUT- NOT ACCEPTABLE.......":� �tHD � � � � �11 �$�:�" ************":� Χ � "As you make your way to the record counter, you notice a sign which says 'Buy any 2 singles get one free.' Just at this moment a small boy rushes past" �D �"and snatches your carrier bag, which contains your money." �) �:� "DO YOU RUN AFTER HIM(Y/N)?"A11$ � � A11$="Y" �14 �@ � A11$="N" �15 � � :� "INPUT- NOT ACCEPTABLE.......":� �dbD � � �12 $�:�" ************":� � � "In the household section, you find a setof mugs which are `4.50. They are beautifully designed, but can you affordthem?" (( �:� "DO YOU BUY THE MUGS(Y/N)?"A12$ 2 PRICE%=450: < � A12$="Y" �BUY F � A12$="Y" � R=1 �16 PQ � A12$="N" � A12$="Y" � R=0 �17 � � :� "INPUT- NOT ACCEPTABLE.......":� �ThE Z � d � �BUY n R=1 x CHANGE%=MONEY%-PRICE% �' � CHANGE% < 0 �NO � MONEY%=CHANGE% � � � � �NO � R=0 �B � "YOU DO NOT HAVE SUFFICIENT MONEY... SORRY ABOUT THAT." � � � � �13 �$�:�" ************":� ҅ � "At the pet section you see a rather nicebone for 50p, but are apprehensive over whether it it enough for your beloved dog." �( �:� "DO YOU BUY THE BONE(Y/N)?"A13$ � PRICE%=50 � � A13$="Y" �BUY � � A13$="Y" � R=1 �18 Q � A13$="N" � A13$="Y" � R=0 �19 � � :� "INPUT- NOT ACCEPTABLE.......":� �d\E � ��14 "$�:�" ************":� ,� �"You run after him shouting THIEF, and just manage to catch his jacket as he isabout to leave the shop, and retrieve your money." 6y �"An elderly lady cannot thank you enough,as the boy had also stolen her handbag! She gives you `2 to say thankyou." @ MONEY%=MONEY%+200 J< �:�"WHERE NOW, THE HOUSEHOLD OR PET SECTION (H/P)?"A14$ T � A14$="H" �12 ^@ � A14$="P" �13 � � :� "INPUT- NOT ACCEPTABLE.......":� �DJF h � r ��15 |$�:�" ************":� �� � "There is nothing for it but to return home with what you have. On your way outof the shop, you notice a comotion, and see the small boy has been caught, and your money is returned." �< �:�"WHERE NOW, THE HOUSEHOLD OR PET SECTION (H/P)?"A14$ � � A14$="H" �12 �@ � A14$="P" �13 � � :� "INPUT- NOT ACCEPTABLE.......":� �tPF � � � � �16 �$�:�" ************":� � MUG%=1 �= � "You buy the mugs and continue onto the pet section." � �13 � � � � �17 �$�:�" ************":� MUG%=0 D � "You do not buy the mugs but continue on to the pet section." �13:� & ��18 0 BONE%=1 :$�:�" ************":� D^ � "You buy the bone, and it is gift wrappedWHAT NEXT? It is 5:00pm so it is quite late." N< �:�"DO YOU RETURN HOME, OR GOTO ANOTHER SHOP(H/S)?"A18$ X � A18$="H" �END b> � A18$="S" �20 � �: � "INPUT-NOT ACCEPTABLE......":� �DNG l � v � �19 � BONE%=0 �$�:�" ************":� �� � "You do not buy the bone. There is a nicepet store next door, so you go on to there. Here is a lovely box of dog biscuits-`2.50" �, �:� "DO YOU BUY THE BISCUITS(Y/N)?"A19$ � PRICE%=250 � � A19$="Y" �BUY � � A19$="Y" � R=1 ��21 �O � A19$="N" � A19$="Y" � R=0 �22 � �: � "INPUT-NOT ACCEPTABLE......":� �t^G � � � ��20 �$�:�" ************":� �] �"You now make your way to the sweet shop.Here is a lovely box of chocolates only `4.50" � PRICE%=450 . �:� "DO YOU BUY THE CHOCOLATES(Y/N)?"A20$ � A20$="Y" �BUY � A20$="Y" � R=1 �23 O � A20$="N" � A20$="Y" � R=0 �24 � �: � "INPUT-NOT ACCEPTABLE......":� �TBH * � 4 � �21 >% �:�" ************":� H B=1 RF �"You buy the biscuits and make your way to the sweet shop.":�20 \ � f ��22 p B=0 z$�:�" ************":� �E �"You don't buy the biscuits and make yourway to the sweetshop." � �20:� � ��23 �$�:�" ************":� �c �"As you lift the box of chocolates of theshelf, the whole pile comes tumbling to the ground!" �& �:�"DO YOU HANG AROUND(Y/N)?"A23$ � � A23$="Y" �25 �; � A23$="N" �26 � �'"INPUT-NOT ACCEPTABLE......":� �tvH � � � � �24 �$ � " ************":� �$�:�" ************":� �u � "You decide not to buy the sweets, and make your way home, hoping you have something nice for everyone." �END � � �25 $$�:�" ************":� . S=1 8} � "The shop assistant helps you to restack to shelves, and you buy the chocolates. It is late now and you must go home." B �END L � V ��26 `$�:�" ************":� j MONEY%=MONEY%+450 t� � "Just as you attempt to make a quick get away, the lady in the shop stops you. You have to restack all the sweets single handedly." ~� � "You eventually leave the shop, and make your way home. Then you realise you haveleft your presents in the sweet shop, you return to find it closed."; �F � "You have no time to buy anymore presentsand MUST return home." �2 S=0:MUG%=0:EAR%=0:PENCIL%= 0:B=0:BONE%= 0:S=0 � �END � � � � �END �9 �:� " PRESS<SPACE>":�:� KEY$=�(1):� �(-99) � � � � A=1 � 19 �0 � "IT'S CHRISTMAS DAY, IT'S CHRISTMAS DAY." � � �$ � C=0 � 200:� 19,1,�(7),0,0,0:� �:� 19,1,2,0,0,0 * � :� "Please use these key-words...." > � "EARRINGS; PCASE; DBISCUITS; CHOCOLATES; BONE; MUGS." M �'"It is now time to give out the presents.The presents you have are..." (� 2� CASE%=1 � " PCASE"; <� EAR%=1 � " EARRINGS"; F� MUG%=1 � " MUGS"; P� B=1 � " DBISCUITS"; Z� S=1 � " CHOCOLATES"; d� BONE%=1 � " BONE"; nE� S=0 � CASE%=0 � EAR%=0 � MUG%=0 � B=0 � BONE%=0 � "NOTHING..."; x � �? � "IF YOU HAVE NOTHING FOR THAT PERSON PRESS <RETURN>" �e �:� "IF YOU ATTEMPT TO GIVE THEM SOMETHING YOU DO NOT HAVE YOUR FAMILY WILL NOT BE PLEASED..." � � �3 � "WHAT HAVE YOU BROUGHT FOR YOUR SISTER..."G$ �j � G$="EARRINGS" � EAR%=1 � "YOUR SISTER IS VERY PLEASED...AND ALLOWSYOU TO USE HER BEETHOVEN RECORDS" �C � G$="EARRINGS" � EAR%=1 X=X+25 � � "YOUR SISTER IS DISGUSTED" �3 �'"WHAT HAVE YOU BROUGHT FOR YOUR FATHER..."F$ �E � F$="PCASE" � CASE%=1 � "YOU ARE GIVEN A RISE IN POCKET MONEY." �Q � F$="PCASE" � CASE%=1 X=X + 25 � � "YOUR FATHER GROUNDS YOU FOR ONE MONTH." �3 �'"WHAT HAVE YOU BROUGHT FOR YOUR MOTHER..."M$ �E � M$="CHOCOLATES" � S=1 � "THANKYOU, LOVE. WHAT A NICE THOUGHT." �_ � M$="CHOCOLATES" � S=1� X=X + 25 � � "YOU CAN DO YOUR OWN COOKING AND IRONING IN FUTURE." �0 �'"WHAT HAVE YOU BROUGHT FOR YOUR DOG..."D$ @ � D$="DBISCUITS" � B=1 � "HE LICKS YOU ALL OVER YOUR FACE." > � D$="DBISCUITS" � B=1 X=X + 25 � � "YOUR DOG BITES YOU." �'"YOUR SCORE IS ";X;"%"; "& �'"YOUR TIME IS ";� � 100;" secs" , �GO 6 � @ ��GO J( �'"WOULD YOU LIKE ANOTHER GO(Y/N)?" T � ^ KEY$=�(1) h � �(-69) � �(-86) r � �(-69) �:� �tt@ � � �D|K | � "BYE-BYE":� � � �
00000000 0d 00 0a 15 20 f4 20 53 68 6f 70 70 69 6e 67 20 |.... . Shopping | 00000010 53 70 72 65 65 0d 00 14 1e 20 f4 20 42 79 20 50 |Spree.... . By P| 00000020 65 74 65 72 20 26 20 44 65 62 6f 72 61 68 20 57 |eter & Deborah W| 00000030 6f 6f 64 0d 00 1e 18 20 f4 20 28 63 29 20 45 6c |ood.... . (c) El| 00000040 65 63 74 72 6f 6e 20 55 73 65 72 0d 00 28 28 20 |ectron User..(( | 00000050 ef 20 32 33 2c 32 35 35 2c 30 2c 32 34 2c 33 36 |. 23,255,0,24,36| 00000060 2c 36 36 2c 31 32 36 2c 31 32 36 2c 31 32 36 2c |,66,126,126,126,| 00000070 31 32 36 0d 00 32 08 20 eb 20 36 0d 00 3c 14 20 |126..2. . 6..<. | 00000080 ef 20 31 39 2c 31 2c 32 2c 30 2c 30 2c 30 3a 0d |. 19,1,2,0,0,0:.| 00000090 00 46 06 20 db 0d 00 50 1d 20 f1 20 8a 31 31 2c |.F. ...P. . .11,| 000000a0 31 29 22 53 48 4f 50 50 49 4e 47 20 53 50 52 45 |1)"SHOPPING SPRE| 000000b0 45 22 0d 00 5a 35 20 f1 20 8a 30 2c 32 29 3b 22 |E"..Z5 . .0,2);"| 000000c0 42 79 20 50 65 74 65 72 20 26 20 2d 2d 2d 2d 2d |By Peter & -----| 000000d0 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 44 65 62 6f 72 61 |--------- Debora| 000000e0 68 20 57 6f 6f 64 22 0d 00 64 0d 20 f1 20 8a 30 |h Wood"..d. . .0| 000000f0 2c 33 29 3b 0d 00 6e 0f 20 e3 20 41 3d 30 20 b8 |,3);..n. . A=0 .| 00000100 20 33 39 0d 00 78 0d 20 ef 20 32 35 35 3b 3a ed | 39..x. . 255;:.| 00000110 0d 00 82 0a 20 f2 49 4e 53 54 0d 00 8c 06 20 e0 |.... .INST.... .| 00000120 0d 00 96 0b 20 dd f2 49 4e 53 54 0d 00 a0 20 20 |.... ..INST... | 00000130 e3 20 78 3d 30 20 b8 20 33 38 3a f1 20 8a 78 2c |. x=0 . 38:. .x,| 00000140 32 34 29 3b bd 28 32 35 35 29 3b 0d 00 aa 06 20 |24);.(255);.... | 00000150 ed 0d 00 b4 14 20 ef 20 32 38 2c 30 2c 32 33 2c |..... . 28,0,23,| 00000160 33 39 2c 34 3a 0d 00 be 1b 20 f1 20 8a 31 32 2c |39,4:.... . .12,| 00000170 30 29 22 49 4e 53 54 52 55 43 54 49 4f 4e 53 22 |0)"INSTRUCTIONS"| 00000180 0d 00 c8 06 20 f1 0d 00 d2 7d 20 f1 20 22 49 74 |.... ....} . "It| 00000190 20 69 73 20 76 65 72 79 20 6e 65 61 72 20 74 6f | is very near to| 000001a0 20 43 68 72 69 73 74 6d 61 73 20 61 6e 64 20 69 | Christmas and i| 000001b0 74 20 69 73 20 20 6e 6f 77 20 74 69 6d 65 20 74 |t is now time t| 000001c0 6f 20 67 6f 20 6f 6e 20 79 6f 75 72 20 79 65 61 |o go on your yea| 000001d0 72 6c 79 20 73 68 6f 70 70 69 6e 67 20 20 73 70 |rly shopping sp| 000001e0 72 65 65 2c 20 62 75 79 69 6e 67 20 67 69 66 74 |ree, buying gift| 000001f0 73 20 66 6f 72 20 79 6f 75 72 20 66 61 6d 69 6c |s for your famil| 00000200 79 2e 22 0d 00 dc da 20 f1 20 22 59 6f 75 20 68 |y.".... . "You h| 00000210 61 76 65 20 60 31 35 20 74 6f 20 73 70 65 6e 64 |ave `15 to spend| 00000220 20 69 6e 20 61 6c 6c 20 74 68 65 20 73 68 6f 70 | in all the shop| 00000230 73 20 20 76 69 73 69 74 65 64 2e 20 53 6f 75 6e |s visited. Soun| 00000240 64 73 20 65 61 73 79 2c 20 62 75 74 2c 20 79 6f |ds easy, but, yo| 00000250 75 72 20 66 61 6d 69 6c 79 20 20 61 72 65 20 76 |ur family are v| 00000260 65 72 79 20 64 69 66 66 69 63 75 6c 74 20 74 6f |ery difficult to| 00000270 20 62 75 79 20 66 6f 72 20 61 6e 64 20 61 72 65 | buy for and are| 00000280 20 20 20 63 65 72 74 61 69 6e 6c 79 20 6e 6f 74 | certainly not| 00000290 20 61 66 72 61 69 64 20 6f 66 20 73 70 65 61 6b | afraid of speak| 000002a0 69 6e 67 20 74 68 65 69 72 20 20 6d 69 6e 64 73 |ing their minds| 000002b0 20 77 68 65 6e 20 69 74 20 63 6f 6d 65 73 20 74 | when it comes t| 000002c0 6f 20 43 68 72 69 73 74 6d 61 73 20 20 20 20 20 |o Christmas | 000002d0 20 20 20 70 72 65 73 65 6e 74 73 2e 22 0d 00 f0 | presents."...| 000002e0 06 20 f1 0d 00 fa 52 20 f1 20 22 54 48 45 20 42 |. ....R . "THE B| 000002f0 52 49 45 46 20 53 55 4d 4d 41 52 59 20 47 49 56 |RIEF SUMMARY GIV| 00000300 45 4e 20 4f 46 20 45 41 43 48 20 50 45 52 53 4f |EN OF EACH PERSO| 00000310 4e 20 20 57 49 4c 4c 20 48 45 4c 50 20 59 4f 55 |N WILL HELP YOU| 00000320 20 44 45 43 49 44 45 20 57 48 41 54 20 54 4f 20 | DECIDE WHAT TO | 00000330 42 55 59 2e 22 0d 01 04 3b 20 f1 22 59 4f 55 20 |BUY."...; ."YOU | 00000340 41 52 45 20 41 4c 53 4f 20 54 49 4d 45 44 2c 20 |ARE ALSO TIMED, | 00000350 53 54 41 52 54 49 4e 47 20 57 48 45 4e 20 59 4f |STARTING WHEN YO| 00000360 55 20 20 20 50 52 45 53 53 20 53 50 41 43 45 22 |U PRESS SPACE"| 00000370 0d 01 0e 24 20 f1 20 8a 31 30 2c 31 38 29 3b 22 |...$ . .10,18);"| 00000380 48 41 50 50 59 20 53 48 4f 50 50 49 4e 47 21 21 |HAPPY SHOPPING!!| 00000390 2e 2e 2e 22 0d 01 18 1e 20 f1 20 8a 31 32 2c 31 |...".... . .12,1| 000003a0 39 29 22 50 52 45 53 53 20 3c 53 50 41 43 45 3e |9)"PRESS <SPACE>| 000003b0 22 3b 0d 01 22 06 20 f5 0d 01 2c 0e 20 4b 45 59 |";..". ...,. KEY| 000003c0 24 3d bf 28 31 29 0d 01 36 0d 20 fd 20 a6 28 2d |$=.(1)..6. . .(-| 000003d0 39 39 29 0d 01 40 07 20 f2 31 0d 01 4a 06 20 e1 |99)..@. .1..J. .| 000003e0 0d 01 54 08 20 dd f2 31 0d 01 5e 06 20 db 0d 01 |..T. ..1..^. ...| 000003f0 68 08 20 4d 3d 30 0d 01 72 08 20 d1 3d 30 0d 01 |h. M=0..r. .=0..| 00000400 7c 10 20 4d 4f 4e 45 59 25 3d 31 35 30 30 0d 01 ||. MONEY%=1500..| 00000410 86 0c 20 43 41 53 45 25 3d 30 0d 01 90 0b 20 45 |.. CASE%=0.... E| 00000420 41 52 25 3d 30 0d 01 9a 0b 20 4d 55 47 25 3d 30 |AR%=0.... MUG%=0| 00000430 0d 01 a4 08 20 4d 3d 30 0d 01 ae 08 20 42 3d 30 |.... M=0.... B=0| 00000440 0d 01 b8 08 20 53 3d 30 0d 01 c2 08 20 58 3d 30 |.... S=0.... X=0| 00000450 0d 01 cc 08 20 52 3d 30 0d 01 d6 0c 20 42 4f 4e |.... R=0.... BON| 00000460 45 25 3d 30 0d 01 e0 25 20 f1 3a f1 22 20 20 20 |E%=0...% .:." | 00000470 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a | ******| 00000480 2a 2a 2a 2a 2a 2a 22 3a f1 0d 01 ea e0 20 f1 20 |******":..... . | 00000490 22 59 6f 75 20 61 72 65 20 73 74 61 6e 64 69 6e |"You are standin| 000004a0 67 20 69 6e 20 74 68 65 20 73 71 75 61 72 65 2c |g in the square,| 000004b0 20 61 6e 64 20 79 6f 75 20 63 61 6e 20 73 65 65 | and you can see| 000004c0 20 74 77 6f 20 73 68 6f 70 73 2c 4e 45 58 54 20 | two shops,NEXT | 000004d0 61 6e 64 20 57 48 53 4d 49 54 48 53 2e 20 20 20 |and WHSMITHS. | 000004e0 20 4e 45 58 54 20 68 61 73 20 61 20 6c 61 72 67 | NEXT has a larg| 000004f0 65 20 73 61 6c 65 20 73 69 67 6e 20 69 6e 20 74 |e sale sign in t| 00000500 68 65 20 77 69 6e 64 6f 77 62 75 74 20 79 6f 75 |he windowbut you| 00000510 20 73 70 6f 74 20 61 20 70 61 72 74 69 63 75 6c | spot a particul| 00000520 61 72 6c 79 20 6c 6f 76 65 6c 79 20 20 20 20 20 |arly lovely | 00000530 20 70 65 6e 63 69 6c 20 63 61 73 65 20 69 6e 20 | pencil case in | 00000540 74 68 65 20 77 69 6e 64 6f 77 20 6f 66 20 57 48 |the window of WH| 00000550 53 4d 49 54 48 53 2c 20 20 69 6e 20 62 65 61 75 |SMITHS, in beau| 00000560 74 69 66 75 6c 6c 79 22 3b 0d 01 f4 30 20 f1 20 |tifully";...0 . | 00000570 22 63 6f 6d 70 6c 69 6d 65 6e 74 61 72 79 20 66 |"complimentary f| 00000580 6c 75 72 65 73 65 6e 74 20 70 69 6e 6b 20 61 6e |luresent pink an| 00000590 64 20 67 72 65 65 6e 2e 22 0d 01 fe 31 20 f1 3a |d green."...1 .:| 000005a0 e8 20 22 44 4f 20 59 4f 55 20 47 4f 20 49 4e 54 |. "DO YOU GO INT| 000005b0 4f 20 53 4d 49 54 48 53 20 4f 52 20 4e 45 58 54 |O SMITHS OR NEXT| 000005c0 3f 28 53 2f 4e 29 22 41 31 24 0d 02 08 11 20 e7 |?(S/N)"A1$.... .| 000005d0 20 41 31 24 3d 22 53 22 20 f2 32 0d 02 12 3c 20 | A1$="S" .2...< | 000005e0 e7 20 41 31 24 3d 22 4e 22 20 f2 33 20 8b 20 f1 |. A1$="N" .3 . .| 000005f0 3a 20 f1 20 22 49 4e 50 55 54 2d 4e 4f 54 20 41 |: . "INPUT-NOT A| 00000600 43 43 45 50 54 41 42 4c 45 2e 2e 2e 2e 2e 2e 22 |CCEPTABLE......"| 00000610 3a e5 20 8d 64 7e 41 0d 02 1c 06 20 e1 0d 02 26 |:. .d~A.... ...&| 00000620 08 20 dd f2 32 0d 02 30 25 20 f1 3a f1 22 20 20 |. ..2..0% .:." | 00000630 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a | *****| 00000640 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 02 3a 06 20 f1 |*******":...:. .| 00000650 0d 02 44 b9 20 f1 20 22 59 6f 75 20 65 6e 74 65 |..D. . "You ente| 00000660 72 20 53 4d 49 54 48 53 20 61 6e 64 20 69 6e 71 |r SMITHS and inq| 00000670 75 69 72 65 20 61 62 6f 75 74 20 74 68 65 20 20 |uire about the | 00000680 63 6f 73 74 20 6f 66 20 74 68 65 20 70 65 6e 63 |cost of the penc| 00000690 69 6c 20 63 61 73 65 2c 20 61 6e 64 20 66 69 6e |il case, and fin| 000006a0 64 20 69 74 20 69 73 20 70 61 72 74 69 63 75 6c |d it is particul| 000006b0 61 72 6c 79 20 65 78 70 65 6e 73 69 76 65 2d 60 |arly expensive-`| 000006c0 35 2e 35 30 2d 63 61 6e 20 79 6f 75 20 20 20 20 |5.50-can you | 000006d0 61 66 66 6f 72 64 20 69 74 3f 20 52 65 6d 65 6d |afford it? Remem| 000006e0 62 65 72 20 79 6f 75 20 73 74 69 6c 6c 20 68 61 |ber you still ha| 000006f0 76 65 20 74 68 72 65 65 70 72 65 73 65 6e 74 73 |ve threepresents| 00000700 20 74 6f 20 62 75 79 2e 22 0d 02 4e 2e 20 f1 3a | to buy."..N. .:| 00000710 e8 20 22 44 4f 20 59 4f 55 20 42 55 59 20 54 48 |. "DO YOU BUY TH| 00000720 45 20 50 45 4e 43 49 4c 20 43 41 53 45 28 59 2f |E PENCIL CASE(Y/| 00000730 4e 29 3f 22 41 32 24 0d 02 58 0f 20 50 52 49 43 |N)?"A2$..X. PRIC| 00000740 45 25 3d 35 35 30 0d 02 62 13 20 e7 20 41 32 24 |E%=550..b. . A2$| 00000750 3d 22 59 22 20 f2 42 55 59 0d 02 6c 17 20 e7 20 |="Y" .BUY..l. . | 00000760 41 32 24 3d 22 59 22 20 80 20 52 3d 31 20 f2 34 |A2$="Y" . R=1 .4| 00000770 0d 02 76 49 20 e7 20 41 32 24 3d 22 4e 22 20 84 |..vI . A2$="N" .| 00000780 20 41 32 24 3d 22 59 22 20 80 20 52 3d 30 20 f2 | A2$="Y" . R=0 .| 00000790 35 20 8b 20 f1 27 22 49 4e 50 55 54 2d 4e 4f 54 |5 . .'"INPUT-NOT| 000007a0 20 41 43 43 45 50 54 41 42 4c 45 2e 2e 2e 2e 2e | ACCEPTABLE.....| 000007b0 2e 22 3a e5 20 8d 44 4e 42 0d 02 80 06 20 e1 0d |.":. .DNB.... ..| 000007c0 02 8a 08 20 dd f2 33 0d 02 94 25 20 f1 3a f1 22 |... ..3...% .:."| 000007d0 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a | ***| 000007e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 02 9e c8 |*********":.....| 000007f0 20 f1 20 22 59 6f 75 27 76 65 20 73 65 65 6e 20 | . "You've seen | 00000800 69 74 2c 20 74 68 65 20 62 61 72 67 61 69 6e 20 |it, the bargain | 00000810 6f 66 20 74 68 65 20 20 20 20 20 20 63 65 6e 74 |of the cent| 00000820 75 72 79 2c 20 62 75 74 20 69 74 27 73 20 6f 76 |ury, but it's ov| 00000830 65 72 20 61 74 20 74 68 65 20 6f 74 68 65 72 20 |er at the other | 00000840 73 69 64 65 6f 66 20 74 68 65 20 73 68 6f 70 21 |sideof the shop!| 00000850 20 59 6f 75 20 73 65 65 20 73 65 76 65 72 61 6c | You see several| 00000860 20 70 65 6f 70 6c 65 20 20 20 20 20 6d 6f 76 69 | people movi| 00000870 6e 67 20 74 6f 77 61 72 64 73 20 74 68 65 20 65 |ng towards the e| 00000880 61 72 69 6e 67 73 20 28 60 34 2e 35 30 29 20 77 |arings (`4.50) w| 00000890 68 69 63 68 79 6f 75 20 6b 6e 6f 77 20 77 69 6c |hichyou know wil| 000008a0 6c 20 73 75 69 74 20 79 6f 75 72 20 73 69 73 74 |l suit your sist| 000008b0 65 72 2e 22 0d 02 a8 53 20 f1 3a e8 20 22 44 4f |er."...S .:. "DO| 000008c0 20 59 4f 55 20 4d 41 4b 45 20 41 4e 20 45 58 48 | YOU MAKE AN EXH| 000008d0 49 42 49 54 49 4f 4e 20 4f 46 20 59 4f 55 52 53 |IBITION OF YOURS| 000008e0 45 4c 46 20 42 59 52 55 4e 4e 49 4e 47 20 41 43 |ELF BYRUNNING AC| 000008f0 52 4f 53 53 20 54 48 45 20 53 48 4f 50 28 59 2f |ROSS THE SHOP(Y/| 00000900 4e 29 3f 22 41 33 24 0d 02 b2 11 20 e7 20 41 33 |N)?"A3$.... . A3| 00000910 24 3d 22 59 22 20 f2 38 0d 02 bc 12 20 e7 20 41 |$="Y" .8.... . A| 00000920 33 24 3d 22 4e 22 20 f2 31 30 0d 02 c6 06 20 e1 |3$="N" .10.... .| 00000930 0d 02 d0 08 20 dd f2 34 0d 02 da 24 f1 3a f1 22 |.... ..4...$.:."| 00000940 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a | ***| 00000950 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 02 e4 0c |*********":.....| 00000960 20 43 41 53 45 25 3d 31 0d 02 ee 87 20 f1 22 27 | CASE%=1.... ."'| 00000970 59 6f 75 20 61 72 65 20 6f 75 72 20 6d 69 6c 6c |You are our mill| 00000980 69 6f 6e 74 68 20 63 75 73 74 6f 6d 65 72 20 69 |ionth customer i| 00000990 6e 20 6f 75 72 20 20 6e 65 77 20 73 74 6f 72 65 |n our new store| 000009a0 27 20 73 61 79 73 20 74 68 65 20 63 61 73 68 69 |' says the cashi| 000009b0 65 72 2e 59 6f 75 20 63 61 6e 20 68 61 76 65 61 |er.You can havea| 000009c0 20 60 32 2e 35 30 20 67 69 66 74 20 76 6f 75 63 | `2.50 gift vouc| 000009d0 68 65 72 2e 20 59 6f 75 20 66 65 65 6c 20 61 20 |her. You feel a | 000009e0 6c 69 74 74 6c 65 20 68 75 6e 67 72 79 2e 22 0d |little hungry.".| 000009f0 02 f8 5e 20 f1 3a e8 20 22 44 4f 20 59 4f 55 20 |..^ .:. "DO YOU | 00000a00 42 55 59 20 41 20 42 4f 58 20 4f 46 20 53 57 45 |BUY A BOX OF SWE| 00000a10 45 54 53 20 54 4f 20 45 41 54 2d 54 48 4f 53 45 |ETS TO EAT-THOSE| 00000a20 20 43 52 45 41 4d 20 46 49 4c 4c 45 44 20 4f 4e | CREAM FILLED ON| 00000a30 45 53 20 59 4f 55 20 52 45 41 4c 4c 59 20 41 44 |ES YOU REALLY AD| 00000a40 4f 52 45 28 59 2f 4e 29 3f 22 41 34 24 0d 03 02 |ORE(Y/N)?"A4$...| 00000a50 11 20 e7 20 41 34 24 3d 22 59 22 20 f2 36 0d 03 |. . A4$="Y" .6..| 00000a60 0c 3c 20 e7 20 41 34 24 3d 22 4e 22 20 f2 37 20 |.< . A4$="N" .7 | 00000a70 8b 20 f1 3a 20 f1 20 22 49 4e 50 55 54 2d 4e 4f |. .: . "INPUT-NO| 00000a80 54 20 41 43 43 45 50 54 41 42 4c 45 2e 2e 2e 2e |T ACCEPTABLE....| 00000a90 2e 2e 22 3a e5 20 8d 64 78 42 0d 03 16 06 20 e1 |..":. .dxB.... .| 00000aa0 0d 03 20 08 20 dd f2 35 0d 03 2a 24 f1 3a f1 22 |.. . ..5..*$.:."| 00000ab0 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a | ***| 00000ac0 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 03 34 cd |*********":...4.| 00000ad0 20 f1 20 22 57 68 65 72 65 20 6e 65 78 74 3f 2d | . "Where next?-| 00000ae0 45 65 78 61 63 74 6c 79 20 4e 45 58 54 2e 20 59 |Eexactly NEXT. Y| 00000af0 6f 75 20 68 61 76 65 20 20 20 20 20 4c 4f 41 44 |ou have LOAD| 00000b00 53 41 20 4d 4f 4e 45 59 20 6c 65 66 74 2c 20 62 |SA MONEY left, b| 00000b10 75 74 20 6c 6f 74 73 20 6f 66 20 70 72 65 73 65 |ut lots of prese| 00000b20 6e 74 73 20 74 6f 20 62 75 79 2e 20 42 75 74 2c |nts to buy. But,| 00000b30 20 61 73 20 79 6f 75 20 63 6f 6d 65 20 6f 75 74 | as you come out| 00000b40 20 6f 66 20 74 68 65 20 20 20 20 20 73 74 6f 72 | of the stor| 00000b50 65 2c 20 61 20 72 61 74 68 65 72 20 64 69 73 74 |e, a rather dist| 00000b60 72 65 73 73 65 64 20 6c 6f 6f 6b 69 6e 67 20 20 |ressed looking | 00000b70 20 20 20 20 66 65 6d 61 6c 65 20 69 73 20 61 73 | female is as| 00000b80 6b 69 6e 67 20 69 66 20 61 6e 79 6f 6e 65 20 63 |king if anyone c| 00000b90 61 6e 20 6c 65 6e 64 22 3b 0d 03 3e 73 20 f1 20 |an lend";..>s . | 00000ba0 22 20 68 65 72 20 60 31 20 74 6f 20 6d 61 6b 65 |" her `1 to make| 00000bb0 20 61 20 70 68 6f 6e 65 2d 63 61 6c 6c 20 61 73 | a phone-call as| 00000bc0 20 73 68 65 20 68 61 73 20 20 20 20 20 20 66 6f | she has fo| 00000bd0 72 67 6f 74 74 65 6e 20 68 65 72 20 70 75 72 73 |rgotten her purs| 00000be0 65 20 61 6e 64 20 6d 75 73 74 20 62 65 20 62 61 |e and must be ba| 00000bf0 63 6b 20 74 6f 20 77 6f 72 6b 20 69 6e 20 66 69 |ck to work in fi| 00000c00 76 65 20 6d 69 6e 75 74 65 73 2e 22 0d 03 48 5b |ve minutes."..H[| 00000c10 20 f1 3a e8 20 22 54 48 49 53 20 53 45 45 4d 53 | .:. "THIS SEEMS| 00000c20 20 41 20 4c 4f 54 20 4f 46 20 4d 4f 4e 45 59 20 | A LOT OF MONEY | 00000c30 46 4f 52 20 41 20 50 48 4f 4e 45 20 20 20 43 41 |FOR A PHONE CA| 00000c40 4c 4c 2c 20 42 55 54 20 44 4f 20 59 4f 55 20 47 |LL, BUT DO YOU G| 00000c50 49 56 45 20 49 54 20 54 4f 20 48 45 52 28 59 2f |IVE IT TO HER(Y/| 00000c60 4e 29 3f 22 41 35 24 0d 03 52 18 20 e7 20 41 35 |N)?"A5$..R. . A5| 00000c70 24 3d 22 59 22 20 4d 3d 31 20 8b 20 4d 3d 30 0d |$="Y" M=1 . M=0.| 00000c80 03 5c 06 20 f1 0d 03 66 1d 20 f1 22 59 4f 55 20 |.\. ...f. ."YOU | 00000c90 4e 4f 57 20 47 4f 20 54 4f 20 4e 45 58 54 22 3a |NOW GO TO NEXT":| 00000ca0 f2 33 0d 03 70 06 20 e1 0d 03 7a 08 20 dd f2 36 |.3..p. ...z. ..6| 00000cb0 0d 03 84 24 f1 3a f1 22 20 20 20 20 20 20 20 20 |...$.:." | 00000cc0 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | ***********| 00000cd0 2a 22 3a f1 0d 03 8e 40 20 f1 20 22 59 6f 75 20 |*":....@ . "You | 00000ce0 62 75 79 20 61 6e 64 20 65 61 74 20 74 68 65 20 |buy and eat the | 00000cf0 73 77 65 65 74 73 2c 20 61 6e 64 20 66 65 65 6c |sweets, and feel| 00000d00 20 20 20 20 6d 75 63 68 20 62 65 74 74 65 72 2e | much better.| 00000d10 22 3a f2 35 0d 03 98 06 20 e1 0d 03 a2 08 20 dd |":.5.... ..... .| 00000d20 f2 37 0d 03 ac 24 f1 3a f1 22 20 20 20 20 20 20 |.7...$.:." | 00000d30 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a | *********| 00000d40 2a 2a 2a 22 3a f1 0d 03 b6 cd 20 f1 20 22 59 6f |***":..... . "Yo| 00000d50 75 20 66 65 65 6c 20 76 65 72 79 20 68 75 6e 67 |u feel very hung| 00000d60 72 79 2c 20 61 6e 64 20 62 65 67 69 6e 20 74 6f |ry, and begin to| 00000d70 20 66 65 65 6c 20 64 69 7a 7a 79 2e 20 54 68 65 | feel dizzy. The| 00000d80 20 6e 65 78 74 20 74 68 69 6e 67 20 79 6f 75 20 | next thing you | 00000d90 72 65 6d 65 6d 62 65 72 20 69 73 20 61 20 6c 61 |remember is a la| 00000da0 72 67 65 20 63 72 6f 77 64 20 70 65 65 72 69 6e |rge crowd peerin| 00000db0 67 20 64 6f 77 6e 20 61 74 20 79 6f 75 2c 20 61 |g down at you, a| 00000dc0 6e 64 20 20 20 20 79 6f 75 72 20 68 65 61 64 20 |nd your head | 00000dd0 68 75 72 74 73 2e 20 59 6f 75 72 20 63 68 65 65 |hurts. Your chee| 00000de0 6b 73 20 61 72 65 20 61 20 20 20 20 20 20 72 61 |ks are a ra| 00000df0 74 68 65 72 20 72 65 64 64 69 73 68 20 63 6f 6c |ther reddish col| 00000e00 6f 75 72 20 61 6e 64 20 79 6f 75 20 64 65 63 69 |our and you deci| 00000e10 64 65 22 0d 03 c0 48 20 f1 20 22 79 6f 75 72 20 |de"...H . "your | 00000e20 62 65 73 74 20 6f 70 74 69 6f 6e 20 69 73 20 74 |best option is t| 00000e30 6f 20 72 65 74 75 72 6e 20 68 6f 6d 65 20 61 73 |o return home as| 00000e40 20 71 75 69 63 6b 6c 79 20 61 73 20 70 6f 73 73 | quickly as poss| 00000e50 69 62 6c 65 2e 22 3a f2 45 4e 44 0d 03 ca 06 20 |ible.":.END.... | 00000e60 e1 0d 03 d4 08 20 dd f2 38 0d 03 de 24 f1 3a f1 |..... ..8...$.:.| 00000e70 22 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a |" **| 00000e80 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 03 e8 |**********":....| 00000e90 0f 20 50 52 49 43 45 25 3d 34 35 30 0d 03 f2 74 |. PRICE%=450...t| 00000ea0 20 f1 20 22 41 20 68 61 6e 64 20 63 6f 6d 65 73 | . "A hand comes| 00000eb0 20 64 6f 77 6e 20 6f 6e 20 79 6f 75 72 20 73 68 | down on your sh| 00000ec0 6f 75 6c 64 65 72 2c 20 69 74 20 20 69 73 20 74 |oulder, it is t| 00000ed0 68 65 20 73 74 6f 72 65 20 64 65 74 65 63 74 69 |he store detecti| 00000ee0 76 65 2e 27 57 68 6f 20 64 6f 20 79 6f 75 20 74 |ve.'Who do you t| 00000ef0 68 69 6e 6b 79 6f 75 20 61 72 65 2c 20 72 75 6e |hinkyou are, run| 00000f00 6e 69 6e 67 20 6c 69 6b 65 20 74 68 61 74 2e 22 |ning like that."| 00000f10 0d 03 fc a2 20 e7 20 4d 3d 31 20 f1 20 22 42 75 |.... . M=1 . "Bu| 00000f20 74 20 69 74 27 73 20 74 68 65 20 6c 61 64 79 20 |t it's the lady | 00000f30 79 6f 75 20 68 65 6c 70 65 64 20 65 61 72 6c 69 |you helped earli| 00000f40 65 72 20 20 20 20 61 6e 64 20 73 61 79 73 20 69 |er and says i| 00000f50 74 20 69 73 20 4f 6b 2c 20 61 6e 64 20 67 6f 65 |t is Ok, and goe| 00000f60 73 20 61 6e 64 20 67 65 74 73 20 74 68 65 65 61 |s and gets theea| 00000f70 72 2d 72 69 6e 67 73 20 66 6f 72 20 79 6f 75 20 |r-rings for you | 00000f80 74 6f 20 62 75 79 20 61 6e 64 20 72 65 74 75 72 |to buy and retur| 00000f90 6e 73 20 74 68 65 70 6f 75 6e 64 20 73 68 65 20 |ns thepound she | 00000fa0 62 6f 72 72 6f 77 65 64 20 65 61 72 6c 69 65 72 |borrowed earlier| 00000fb0 2e 22 0d 04 06 1a 20 e7 20 4d 3d 31 20 45 41 52 |.".... . M=1 EAR| 00000fc0 25 3d 31 20 8b 20 45 41 52 25 3d 30 0d 04 10 09 |%=1 . EAR%=0....| 00000fd0 20 f2 42 55 59 0d 04 1a 53 20 e7 20 4d 3d 30 20 | .BUY...S . M=0 | 00000fe0 f1 20 22 59 6f 75 20 61 72 65 20 69 6e 20 64 65 |. "You are in de| 00000ff0 65 70 20 74 72 6f 75 62 6c 65 2c 20 27 4f 75 74 |ep trouble, 'Out| 00001000 20 6f 66 20 74 68 69 73 20 20 20 73 68 6f 70 20 | of this shop | 00001010 69 6d 6d 65 64 69 61 74 65 6c 79 2c 27 20 73 68 |immediately,' sh| 00001020 65 20 73 61 79 73 2e 22 0d 04 24 23 20 f1 3a f1 |e says."..$# .:.| 00001030 22 41 4e 4f 54 48 45 52 20 53 48 4f 50 20 4e 4f |"ANOTHER SHOP NO| 00001040 57 2e 2e 2e 2e 2e 22 3a f2 31 30 0d 04 2e 06 20 |W.....":.10.... | 00001050 e1 0d 04 38 08 20 dd f2 39 0d 04 42 24 f1 3a f1 |...8. ..9..B$.:.| 00001060 22 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a |" **| 00001070 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 04 4c |**********":...L| 00001080 63 20 f1 20 22 59 6f 75 20 6a 75 73 74 20 6d 61 |c . "You just ma| 00001090 6b 65 20 69 74 20 74 6f 20 73 65 65 20 73 6f 6d |ke it to see som| 000010a0 65 6f 6e 65 20 65 6c 73 65 20 20 20 20 6c 69 66 |eone else lif| 000010b0 74 20 74 68 65 20 65 61 72 2d 72 69 6e 67 73 20 |t the ear-rings | 000010c0 6f 66 66 20 74 68 65 20 73 68 65 6c 66 2d 68 61 |off the shelf-ha| 000010d0 72 64 20 20 20 6c 75 63 6b 2c 20 50 61 6c 2e 22 |rd luck, Pal."| 000010e0 0d 04 56 22 f1 3a f1 22 41 4e 4f 54 48 45 52 20 |..V".:."ANOTHER | 000010f0 53 48 4f 50 20 4e 4f 57 2e 2e 2e 2e 2e 22 3a f2 |SHOP NOW.....":.| 00001100 31 30 0d 04 60 06 20 e1 0d 04 6a 09 20 dd f2 31 |10..`. ...j. ..1| 00001110 30 0d 04 74 24 f1 3a f1 22 20 20 20 20 20 20 20 |0..t$.:." | 00001120 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | **********| 00001130 2a 2a 22 3a f1 0d 04 7e 68 20 f1 20 22 59 6f 75 |**":...~h . "You| 00001140 20 67 6f 20 6f 75 74 20 69 6e 74 6f 20 74 68 65 | go out into the| 00001150 20 70 72 65 63 69 6e 63 74 2c 20 61 6e 64 20 20 | precinct, and | 00001160 20 20 20 20 20 63 6f 6e 73 69 64 65 72 20 42 4f | consider BO| 00001170 4f 54 53 20 61 73 20 79 6f 75 72 20 6e 65 78 74 |OTS as your next| 00001180 20 63 68 6f 69 63 65 2d 79 6f 75 20 20 65 6e 74 | choice-you ent| 00001190 65 72 20 74 68 65 20 73 68 6f 70 2e 22 0d 04 88 |er the shop."...| 000011a0 55 20 f1 3a e8 20 22 57 48 49 43 48 20 44 45 50 |U .:. "WHICH DEP| 000011b0 41 52 54 4d 45 4e 54 20 44 4f 20 59 4f 55 20 47 |ARTMENT DO YOU G| 000011c0 4f 20 54 4f 2d 52 45 43 4f 52 44 53 2c 20 20 48 |O TO-RECORDS, H| 000011d0 4f 55 53 45 48 4f 4c 44 20 4f 52 20 50 45 54 20 |OUSEHOLD OR PET | 000011e0 49 54 45 4d 53 28 52 2f 48 2f 50 29 3f 22 41 31 |ITEMS(R/H/P)?"A1| 000011f0 30 24 0d 04 92 13 20 e7 20 41 31 30 24 3d 22 52 |0$.... . A10$="R| 00001200 22 20 f2 31 31 0d 04 9c 12 e7 20 41 31 30 24 3d |" .11..... A10$=| 00001210 22 48 22 20 f2 31 32 0d 04 a6 3f e7 20 41 31 30 |"H" .12...?. A10| 00001220 24 3d 22 50 22 20 f2 31 33 20 8b 20 f1 20 3a f1 |$="P" .13 . . :.| 00001230 20 22 49 4e 50 55 54 2d 20 4e 4f 54 20 41 43 43 | "INPUT- NOT ACC| 00001240 45 50 54 41 42 4c 45 2e 2e 2e 2e 2e 2e 2e 22 3a |EPTABLE.......":| 00001250 e5 20 8d 74 48 44 0d 04 b0 06 20 e1 0d 04 ba 0a |. .tHD.... .....| 00001260 20 dd 20 f2 31 31 0d 04 c4 24 f1 3a f1 22 20 20 | . .11...$.:." | 00001270 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a | *****| 00001280 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 04 ce a7 20 f1 |*******":..... .| 00001290 20 22 41 73 20 79 6f 75 20 6d 61 6b 65 20 79 6f | "As you make yo| 000012a0 75 72 20 77 61 79 20 74 6f 20 74 68 65 20 72 65 |ur way to the re| 000012b0 63 6f 72 64 20 20 20 20 20 20 63 6f 75 6e 74 65 |cord counte| 000012c0 72 2c 20 79 6f 75 20 6e 6f 74 69 63 65 20 61 20 |r, you notice a | 000012d0 73 69 67 6e 20 77 68 69 63 68 20 73 61 79 73 20 |sign which says | 000012e0 20 20 27 42 75 79 20 61 6e 79 20 32 20 73 69 6e | 'Buy any 2 sin| 000012f0 67 6c 65 73 20 67 65 74 20 6f 6e 65 20 66 72 65 |gles get one fre| 00001300 65 2e 27 20 4a 75 73 74 20 20 61 74 20 74 68 69 |e.' Just at thi| 00001310 73 20 6d 6f 6d 65 6e 74 20 61 20 73 6d 61 6c 6c |s moment a small| 00001320 20 62 6f 79 20 72 75 73 68 65 73 20 70 61 73 74 | boy rushes past| 00001330 22 0d 04 d8 44 20 f1 22 61 6e 64 20 73 6e 61 74 |"...D ."and snat| 00001340 63 68 65 73 20 79 6f 75 72 20 63 61 72 72 69 65 |ches your carrie| 00001350 72 20 62 61 67 2c 20 77 68 69 63 68 20 20 20 20 |r bag, which | 00001360 63 6f 6e 74 61 69 6e 73 20 79 6f 75 72 20 6d 6f |contains your mo| 00001370 6e 65 79 2e 22 0d 04 e2 29 20 f1 3a e8 20 22 44 |ney."...) .:. "D| 00001380 4f 20 59 4f 55 20 52 55 4e 20 41 46 54 45 52 20 |O YOU RUN AFTER | 00001390 48 49 4d 28 59 2f 4e 29 3f 22 41 31 31 24 0d 04 |HIM(Y/N)?"A11$..| 000013a0 ec 13 20 e7 20 41 31 31 24 3d 22 59 22 20 f2 31 |.. . A11$="Y" .1| 000013b0 34 0d 04 f6 40 20 e7 20 41 31 31 24 3d 22 4e 22 |4...@ . A11$="N"| 000013c0 20 f2 31 35 20 8b 20 f1 20 3a f1 20 22 49 4e 50 | .15 . . :. "INP| 000013d0 55 54 2d 20 4e 4f 54 20 41 43 43 45 50 54 41 42 |UT- NOT ACCEPTAB| 000013e0 4c 45 2e 2e 2e 2e 2e 2e 2e 22 3a e5 20 8d 64 62 |LE.......":. .db| 000013f0 44 0d 05 00 06 20 e1 0d 05 0a 0a 20 dd 20 f2 31 |D.... ..... . .1| 00001400 32 0d 05 14 24 f1 3a f1 22 20 20 20 20 20 20 20 |2...$.:." | 00001410 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | **********| 00001420 2a 2a 22 3a f1 0d 05 1e 86 20 f1 20 22 49 6e 20 |**":..... . "In | 00001430 74 68 65 20 68 6f 75 73 65 68 6f 6c 64 20 73 65 |the household se| 00001440 63 74 69 6f 6e 2c 20 79 6f 75 20 66 69 6e 64 20 |ction, you find | 00001450 61 20 73 65 74 6f 66 20 6d 75 67 73 20 77 68 69 |a setof mugs whi| 00001460 63 68 20 61 72 65 20 60 34 2e 35 30 2e 20 54 68 |ch are `4.50. Th| 00001470 65 79 20 61 72 65 20 20 20 20 20 20 20 62 65 61 |ey are bea| 00001480 75 74 69 66 75 6c 6c 79 20 64 65 73 69 67 6e 65 |utifully designe| 00001490 64 2c 20 62 75 74 20 63 61 6e 20 79 6f 75 20 61 |d, but can you a| 000014a0 66 66 6f 72 64 74 68 65 6d 3f 22 0d 05 28 28 20 |ffordthem?"..(( | 000014b0 f1 3a e8 20 22 44 4f 20 59 4f 55 20 42 55 59 20 |.:. "DO YOU BUY | 000014c0 54 48 45 20 4d 55 47 53 28 59 2f 4e 29 3f 22 41 |THE MUGS(Y/N)?"A| 000014d0 31 32 24 0d 05 32 10 20 50 52 49 43 45 25 3d 34 |12$..2. PRICE%=4| 000014e0 35 30 3a 0d 05 3c 14 20 e7 20 41 31 32 24 3d 22 |50:..<. . A12$="| 000014f0 59 22 20 f2 42 55 59 0d 05 46 19 20 e7 20 41 31 |Y" .BUY..F. . A1| 00001500 32 24 3d 22 59 22 20 80 20 52 3d 31 20 f2 31 36 |2$="Y" . R=1 .16| 00001510 0d 05 50 51 20 e7 20 41 31 32 24 3d 22 4e 22 20 |..PQ . A12$="N" | 00001520 84 20 41 31 32 24 3d 22 59 22 20 80 20 52 3d 30 |. A12$="Y" . R=0| 00001530 20 f2 31 37 20 8b 20 f1 20 3a f1 20 22 49 4e 50 | .17 . . :. "INP| 00001540 55 54 2d 20 4e 4f 54 20 41 43 43 45 50 54 41 42 |UT- NOT ACCEPTAB| 00001550 4c 45 2e 2e 2e 2e 2e 2e 2e 22 3a e5 20 8d 54 68 |LE.......":. .Th| 00001560 45 0d 05 5a 06 20 e1 0d 05 64 0b 20 dd 20 f2 42 |E..Z. ...d. . .B| 00001570 55 59 0d 05 6e 08 20 52 3d 31 0d 05 78 1a 20 43 |UY..n. R=1..x. C| 00001580 48 41 4e 47 45 25 3d 4d 4f 4e 45 59 25 2d 50 52 |HANGE%=MONEY%-PR| 00001590 49 43 45 25 0d 05 82 27 20 e7 20 43 48 41 4e 47 |ICE%...' . CHANG| 000015a0 45 25 20 3c 20 30 20 f2 4e 4f 20 8b 20 4d 4f 4e |E% < 0 .NO . MON| 000015b0 45 59 25 3d 43 48 41 4e 47 45 25 0d 05 8c 06 20 |EY%=CHANGE%.... | 000015c0 e1 0d 05 96 0a 20 dd 20 f2 4e 4f 0d 05 a0 08 20 |..... . .NO.... | 000015d0 52 3d 30 0d 05 aa 42 20 f1 20 22 59 4f 55 20 44 |R=0...B . "YOU D| 000015e0 4f 20 4e 4f 54 20 48 41 56 45 20 53 55 46 46 49 |O NOT HAVE SUFFI| 000015f0 43 49 45 4e 54 20 4d 4f 4e 45 59 2e 2e 2e 20 20 |CIENT MONEY... | 00001600 20 20 20 53 4f 52 52 59 20 41 42 4f 55 54 20 54 | SORRY ABOUT T| 00001610 48 41 54 2e 22 0d 05 b4 06 20 e1 0d 05 be 0a 20 |HAT.".... ..... | 00001620 dd 20 f2 31 33 0d 05 c8 24 f1 3a f1 22 20 20 20 |. .13...$.:." | 00001630 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a | ******| 00001640 2a 2a 2a 2a 2a 2a 22 3a f1 0d 05 d2 85 20 f1 20 |******":..... . | 00001650 22 41 74 20 74 68 65 20 70 65 74 20 73 65 63 74 |"At the pet sect| 00001660 69 6f 6e 20 79 6f 75 20 73 65 65 20 61 20 72 61 |ion you see a ra| 00001670 74 68 65 72 20 6e 69 63 65 62 6f 6e 65 20 66 6f |ther nicebone fo| 00001680 72 20 35 30 70 2c 20 62 75 74 20 61 72 65 20 61 |r 50p, but are a| 00001690 70 70 72 65 68 65 6e 73 69 76 65 20 6f 76 65 72 |pprehensive over| 000016a0 20 77 68 65 74 68 65 72 20 69 74 20 69 74 20 65 | whether it it e| 000016b0 6e 6f 75 67 68 20 66 6f 72 20 79 6f 75 72 20 62 |nough for your b| 000016c0 65 6c 6f 76 65 64 20 20 20 64 6f 67 2e 22 0d 05 |eloved dog."..| 000016d0 dc 28 20 f1 3a e8 20 22 44 4f 20 59 4f 55 20 42 |.( .:. "DO YOU B| 000016e0 55 59 20 54 48 45 20 42 4f 4e 45 28 59 2f 4e 29 |UY THE BONE(Y/N)| 000016f0 3f 22 41 31 33 24 0d 05 e6 0e 20 50 52 49 43 45 |?"A13$.... PRICE| 00001700 25 3d 35 30 0d 05 f0 14 20 e7 20 41 31 33 24 3d |%=50.... . A13$=| 00001710 22 59 22 20 f2 42 55 59 0d 05 fa 19 20 e7 20 41 |"Y" .BUY.... . A| 00001720 31 33 24 3d 22 59 22 20 80 20 52 3d 31 20 f2 31 |13$="Y" . R=1 .1| 00001730 38 0d 06 04 51 20 e7 20 41 31 33 24 3d 22 4e 22 |8...Q . A13$="N"| 00001740 20 84 20 41 31 33 24 3d 22 59 22 20 80 20 52 3d | . A13$="Y" . R=| 00001750 30 20 f2 31 39 20 8b 20 f1 20 3a f1 20 22 49 4e |0 .19 . . :. "IN| 00001760 50 55 54 2d 20 4e 4f 54 20 41 43 43 45 50 54 41 |PUT- NOT ACCEPTA| 00001770 42 4c 45 2e 2e 2e 2e 2e 2e 2e 22 3a e5 20 8d 64 |BLE.......":. .d| 00001780 5c 45 0d 06 0e 06 20 e1 0d 06 18 09 20 dd f2 31 |\E.... ..... ..1| 00001790 34 0d 06 22 24 f1 3a f1 22 20 20 20 20 20 20 20 |4.."$.:." | 000017a0 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | **********| 000017b0 2a 2a 22 3a f1 0d 06 2c 8b 20 f1 22 59 6f 75 20 |**":...,. ."You | 000017c0 72 75 6e 20 61 66 74 65 72 20 68 69 6d 20 73 68 |run after him sh| 000017d0 6f 75 74 69 6e 67 20 54 48 49 45 46 2c 20 61 6e |outing THIEF, an| 000017e0 64 20 20 20 6a 75 73 74 20 6d 61 6e 61 67 65 20 |d just manage | 000017f0 74 6f 20 63 61 74 63 68 20 68 69 73 20 6a 61 63 |to catch his jac| 00001800 6b 65 74 20 61 73 20 68 65 20 69 73 61 62 6f 75 |ket as he isabou| 00001810 74 20 74 6f 20 6c 65 61 76 65 20 74 68 65 20 73 |t to leave the s| 00001820 68 6f 70 2c 20 61 6e 64 20 72 65 74 72 69 65 76 |hop, and retriev| 00001830 65 20 20 20 79 6f 75 72 20 6d 6f 6e 65 79 2e 22 |e your money."| 00001840 0d 06 36 79 20 f1 22 41 6e 20 65 6c 64 65 72 6c |..6y ."An elderl| 00001850 79 20 6c 61 64 79 20 63 61 6e 6e 6f 74 20 74 68 |y lady cannot th| 00001860 61 6e 6b 20 79 6f 75 20 65 6e 6f 75 67 68 2c 61 |ank you enough,a| 00001870 73 20 74 68 65 20 62 6f 79 20 68 61 64 20 61 6c |s the boy had al| 00001880 73 6f 20 73 74 6f 6c 65 6e 20 68 65 72 20 68 61 |so stolen her ha| 00001890 6e 64 62 61 67 21 20 53 68 65 20 67 69 76 65 73 |ndbag! She gives| 000018a0 20 79 6f 75 20 60 32 20 74 6f 20 73 61 79 20 74 | you `2 to say t| 000018b0 68 61 6e 6b 79 6f 75 2e 22 0d 06 40 16 20 4d 4f |hankyou."..@. MO| 000018c0 4e 45 59 25 3d 4d 4f 4e 45 59 25 2b 32 30 30 0d |NEY%=MONEY%+200.| 000018d0 06 4a 3c 20 f1 3a e8 22 57 48 45 52 45 20 4e 4f |.J< .:."WHERE NO| 000018e0 57 2c 20 54 48 45 20 48 4f 55 53 45 48 4f 4c 44 |W, THE HOUSEHOLD| 000018f0 20 4f 52 20 50 45 54 20 53 45 43 54 49 4f 4e 20 | OR PET SECTION | 00001900 28 48 2f 50 29 3f 22 41 31 34 24 0d 06 54 13 20 |(H/P)?"A14$..T. | 00001910 e7 20 41 31 34 24 3d 22 48 22 20 f2 31 32 0d 06 |. A14$="H" .12..| 00001920 5e 40 20 e7 20 41 31 34 24 3d 22 50 22 20 f2 31 |^@ . A14$="P" .1| 00001930 33 20 8b 20 f1 20 3a f1 20 22 49 4e 50 55 54 2d |3 . . :. "INPUT-| 00001940 20 4e 4f 54 20 41 43 43 45 50 54 41 42 4c 45 2e | NOT ACCEPTABLE.| 00001950 2e 2e 2e 2e 2e 2e 22 3a e5 20 8d 44 4a 46 0d 06 |......":. .DJF..| 00001960 68 06 20 e1 0d 06 72 09 20 dd f2 31 35 0d 06 7c |h. ...r. ..15..|| 00001970 24 f1 3a f1 22 20 20 20 20 20 20 20 20 20 20 20 |$.:." | 00001980 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a | ************":| 00001990 f1 0d 06 86 c0 20 f1 20 22 54 68 65 72 65 20 69 |..... . "There i| 000019a0 73 20 6e 6f 74 68 69 6e 67 20 66 6f 72 20 69 74 |s nothing for it| 000019b0 20 62 75 74 20 74 6f 20 72 65 74 75 72 6e 20 20 | but to return | 000019c0 20 68 6f 6d 65 20 77 69 74 68 20 77 68 61 74 20 | home with what | 000019d0 79 6f 75 20 68 61 76 65 2e 20 4f 6e 20 79 6f 75 |you have. On you| 000019e0 72 20 77 61 79 20 6f 75 74 6f 66 20 74 68 65 20 |r way outof the | 000019f0 73 68 6f 70 2c 20 79 6f 75 20 6e 6f 74 69 63 65 |shop, you notice| 00001a00 20 61 20 63 6f 6d 6f 74 69 6f 6e 2c 20 61 6e 64 | a comotion, and| 00001a10 20 73 65 65 20 74 68 65 20 73 6d 61 6c 6c 20 62 | see the small b| 00001a20 6f 79 20 68 61 73 20 62 65 65 6e 20 63 61 75 67 |oy has been caug| 00001a30 68 74 2c 20 61 6e 64 20 20 79 6f 75 72 20 6d 6f |ht, and your mo| 00001a40 6e 65 79 20 69 73 20 72 65 74 75 72 6e 65 64 2e |ney is returned.| 00001a50 22 0d 06 90 3c 20 f1 3a e8 22 57 48 45 52 45 20 |"...< .:."WHERE | 00001a60 4e 4f 57 2c 20 54 48 45 20 48 4f 55 53 45 48 4f |NOW, THE HOUSEHO| 00001a70 4c 44 20 4f 52 20 50 45 54 20 53 45 43 54 49 4f |LD OR PET SECTIO| 00001a80 4e 20 28 48 2f 50 29 3f 22 41 31 34 24 0d 06 9a |N (H/P)?"A14$...| 00001a90 13 20 e7 20 41 31 34 24 3d 22 48 22 20 f2 31 32 |. . A14$="H" .12| 00001aa0 0d 06 a4 40 20 e7 20 41 31 34 24 3d 22 50 22 20 |...@ . A14$="P" | 00001ab0 f2 31 33 20 8b 20 f1 20 3a f1 20 22 49 4e 50 55 |.13 . . :. "INPU| 00001ac0 54 2d 20 4e 4f 54 20 41 43 43 45 50 54 41 42 4c |T- NOT ACCEPTABL| 00001ad0 45 2e 2e 2e 2e 2e 2e 2e 22 3a e5 20 8d 74 50 46 |E.......":. .tPF| 00001ae0 0d 06 ae 06 20 e1 0d 06 b8 0a 20 dd 20 f2 31 36 |.... ..... . .16| 00001af0 0d 06 c2 24 f1 3a f1 22 20 20 20 20 20 20 20 20 |...$.:." | 00001b00 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | ***********| 00001b10 2a 22 3a f1 0d 06 cc 0b 20 4d 55 47 25 3d 31 0d |*":..... MUG%=1.| 00001b20 06 d6 3d 20 f1 20 22 59 6f 75 20 62 75 79 20 74 |..= . "You buy t| 00001b30 68 65 20 6d 75 67 73 20 61 6e 64 20 63 6f 6e 74 |he mugs and cont| 00001b40 69 6e 75 65 20 6f 6e 74 6f 20 74 68 65 20 20 70 |inue onto the p| 00001b50 65 74 20 73 65 63 74 69 6f 6e 2e 22 0d 06 e0 08 |et section."....| 00001b60 20 f2 31 33 0d 06 ea 06 20 e1 0d 06 f4 0a 20 dd | .13.... ..... .| 00001b70 20 f2 31 37 0d 06 fe 24 f1 3a f1 22 20 20 20 20 | .17...$.:." | 00001b80 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a | *******| 00001b90 2a 2a 2a 2a 2a 22 3a f1 0d 07 08 0b 20 4d 55 47 |*****":..... MUG| 00001ba0 25 3d 30 0d 07 12 44 20 f1 20 22 59 6f 75 20 64 |%=0...D . "You d| 00001bb0 6f 20 6e 6f 74 20 62 75 79 20 74 68 65 20 6d 75 |o not buy the mu| 00001bc0 67 73 20 62 75 74 20 63 6f 6e 74 69 6e 75 65 20 |gs but continue | 00001bd0 6f 6e 20 74 6f 20 74 68 65 20 70 65 74 20 73 65 |on to the pet se| 00001be0 63 74 69 6f 6e 2e 22 0d 07 1c 0a 20 f2 31 33 3a |ction.".... .13:| 00001bf0 e1 0d 07 26 09 20 dd f2 31 38 0d 07 30 0c 20 42 |...&. ..18..0. B| 00001c00 4f 4e 45 25 3d 31 0d 07 3a 24 f1 3a f1 22 20 20 |ONE%=1..:$.:." | 00001c10 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a | *****| 00001c20 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 07 44 5e 20 f1 |*******":...D^ .| 00001c30 20 22 59 6f 75 20 62 75 79 20 74 68 65 20 62 6f | "You buy the bo| 00001c40 6e 65 2c 20 61 6e 64 20 69 74 20 69 73 20 67 69 |ne, and it is gi| 00001c50 66 74 20 77 72 61 70 70 65 64 57 48 41 54 20 4e |ft wrappedWHAT N| 00001c60 45 58 54 3f 20 49 74 20 69 73 20 35 3a 30 30 70 |EXT? It is 5:00p| 00001c70 6d 20 73 6f 20 69 74 20 69 73 20 71 75 69 74 65 |m so it is quite| 00001c80 20 20 6c 61 74 65 2e 22 0d 07 4e 3c 20 f1 3a e8 | late."..N< .:.| 00001c90 22 44 4f 20 59 4f 55 20 52 45 54 55 52 4e 20 48 |"DO YOU RETURN H| 00001ca0 4f 4d 45 2c 20 4f 52 20 47 4f 54 4f 20 41 4e 4f |OME, OR GOTO ANO| 00001cb0 54 48 45 52 20 53 48 4f 50 28 48 2f 53 29 3f 22 |THER SHOP(H/S)?"| 00001cc0 41 31 38 24 0d 07 58 14 20 e7 20 41 31 38 24 3d |A18$..X. . A18$=| 00001cd0 22 48 22 20 f2 45 4e 44 0d 07 62 3e 20 e7 20 41 |"H" .END..b> . A| 00001ce0 31 38 24 3d 22 53 22 20 f2 32 30 20 8b 20 f1 3a |18$="S" .20 . .:| 00001cf0 20 f1 20 22 49 4e 50 55 54 2d 4e 4f 54 20 41 43 | . "INPUT-NOT AC| 00001d00 43 45 50 54 41 42 4c 45 2e 2e 2e 2e 2e 2e 22 3a |CEPTABLE......":| 00001d10 e5 20 8d 44 4e 47 0d 07 6c 06 20 e1 0d 07 76 0a |. .DNG..l. ...v.| 00001d20 20 dd 20 f2 31 39 0d 07 80 0c 20 42 4f 4e 45 25 | . .19.... BONE%| 00001d30 3d 30 0d 07 8a 24 f1 3a f1 22 20 20 20 20 20 20 |=0...$.:." | 00001d40 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a | *********| 00001d50 2a 2a 2a 22 3a f1 0d 07 94 8f 20 f1 20 22 59 6f |***":..... . "Yo| 00001d60 75 20 64 6f 20 6e 6f 74 20 62 75 79 20 74 68 65 |u do not buy the| 00001d70 20 62 6f 6e 65 2e 20 54 68 65 72 65 20 69 73 20 | bone. There is | 00001d80 61 20 6e 69 63 65 70 65 74 20 73 74 6f 72 65 20 |a nicepet store | 00001d90 6e 65 78 74 20 64 6f 6f 72 2c 20 73 6f 20 79 6f |next door, so yo| 00001da0 75 20 67 6f 20 6f 6e 20 74 6f 20 20 20 20 74 68 |u go on to th| 00001db0 65 72 65 2e 20 48 65 72 65 20 69 73 20 61 20 6c |ere. Here is a l| 00001dc0 6f 76 65 6c 79 20 62 6f 78 20 6f 66 20 64 6f 67 |ovely box of dog| 00001dd0 20 20 20 20 20 20 62 69 73 63 75 69 74 73 2d 60 | biscuits-`| 00001de0 32 2e 35 30 22 0d 07 9e 2c 20 f1 3a e8 20 22 44 |2.50"..., .:. "D| 00001df0 4f 20 59 4f 55 20 42 55 59 20 54 48 45 20 42 49 |O YOU BUY THE BI| 00001e00 53 43 55 49 54 53 28 59 2f 4e 29 3f 22 41 31 39 |SCUITS(Y/N)?"A19| 00001e10 24 0d 07 a8 0f 20 50 52 49 43 45 25 3d 32 35 30 |$.... PRICE%=250| 00001e20 0d 07 b2 14 20 e7 20 41 31 39 24 3d 22 59 22 20 |.... . A19$="Y" | 00001e30 f2 42 55 59 0d 07 bc 1a 20 e7 20 41 31 39 24 3d |.BUY.... . A19$=| 00001e40 22 59 22 20 80 20 52 3d 31 20 8c f2 32 31 0d 07 |"Y" . R=1 ..21..| 00001e50 c6 4f 20 e7 20 41 31 39 24 3d 22 4e 22 20 84 20 |.O . A19$="N" . | 00001e60 41 31 39 24 3d 22 59 22 20 80 20 52 3d 30 20 f2 |A19$="Y" . R=0 .| 00001e70 32 32 20 8b 20 f1 3a 20 f1 20 22 49 4e 50 55 54 |22 . .: . "INPUT| 00001e80 2d 4e 4f 54 20 41 43 43 45 50 54 41 42 4c 45 2e |-NOT ACCEPTABLE.| 00001e90 2e 2e 2e 2e 2e 22 3a e5 20 8d 74 5e 47 0d 07 d0 |.....":. .t^G...| 00001ea0 06 20 e1 0d 07 da 09 20 dd f2 32 30 0d 07 e4 24 |. ..... ..20...$| 00001eb0 f1 3a f1 22 20 20 20 20 20 20 20 20 20 20 20 20 |.:." | 00001ec0 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 | ************":.| 00001ed0 0d 07 ee 5d 20 f1 22 59 6f 75 20 6e 6f 77 20 6d |...] ."You now m| 00001ee0 61 6b 65 20 79 6f 75 72 20 77 61 79 20 74 6f 20 |ake your way to | 00001ef0 74 68 65 20 73 77 65 65 74 20 73 68 6f 70 2e 48 |the sweet shop.H| 00001f00 65 72 65 20 69 73 20 61 20 6c 6f 76 65 6c 79 20 |ere is a lovely | 00001f10 62 6f 78 20 6f 66 20 63 68 6f 63 6f 6c 61 74 65 |box of chocolate| 00001f20 73 20 6f 6e 6c 79 20 60 34 2e 35 30 22 0d 07 f8 |s only `4.50"...| 00001f30 0f 20 50 52 49 43 45 25 3d 34 35 30 0d 08 02 2e |. PRICE%=450....| 00001f40 20 f1 3a e8 20 22 44 4f 20 59 4f 55 20 42 55 59 | .:. "DO YOU BUY| 00001f50 20 54 48 45 20 43 48 4f 43 4f 4c 41 54 45 53 28 | THE CHOCOLATES(| 00001f60 59 2f 4e 29 3f 22 41 32 30 24 0d 08 0c 14 20 e7 |Y/N)?"A20$.... .| 00001f70 20 41 32 30 24 3d 22 59 22 20 f2 42 55 59 0d 08 | A20$="Y" .BUY..| 00001f80 16 19 20 e7 20 41 32 30 24 3d 22 59 22 20 80 20 |.. . A20$="Y" . | 00001f90 52 3d 31 20 f2 32 33 0d 08 20 4f 20 e7 20 41 32 |R=1 .23.. O . A2| 00001fa0 30 24 3d 22 4e 22 20 84 20 41 32 30 24 3d 22 59 |0$="N" . A20$="Y| 00001fb0 22 20 80 20 52 3d 30 20 f2 32 34 20 8b 20 f1 3a |" . R=0 .24 . .:| 00001fc0 20 f1 20 22 49 4e 50 55 54 2d 4e 4f 54 20 41 43 | . "INPUT-NOT AC| 00001fd0 43 45 50 54 41 42 4c 45 2e 2e 2e 2e 2e 2e 22 3a |CEPTABLE......":| 00001fe0 e5 20 8d 54 42 48 0d 08 2a 06 20 e1 0d 08 34 09 |. .TBH..*. ...4.| 00001ff0 dd 20 f2 32 31 0d 08 3e 25 20 f1 3a f1 22 20 20 |. .21..>% .:." | 00002000 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a | *****| 00002010 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 08 48 08 20 42 |*******":...H. B| 00002020 3d 31 0d 08 52 46 20 f1 22 59 6f 75 20 62 75 79 |=1..RF ."You buy| 00002030 20 74 68 65 20 62 69 73 63 75 69 74 73 20 61 6e | the biscuits an| 00002040 64 20 6d 61 6b 65 20 79 6f 75 72 20 77 61 79 20 |d make your way | 00002050 20 74 6f 20 74 68 65 20 73 77 65 65 74 20 73 68 | to the sweet sh| 00002060 6f 70 2e 22 3a f2 32 30 0d 08 5c 06 20 e1 0d 08 |op.":.20..\. ...| 00002070 66 09 20 dd f2 32 32 0d 08 70 08 20 42 3d 30 0d |f. ..22..p. B=0.| 00002080 08 7a 24 f1 3a f1 22 20 20 20 20 20 20 20 20 20 |.z$.:." | 00002090 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a | ************| 000020a0 22 3a f1 0d 08 84 45 20 f1 22 59 6f 75 20 64 6f |":....E ."You do| 000020b0 6e 27 74 20 62 75 79 20 74 68 65 20 62 69 73 63 |n't buy the bisc| 000020c0 75 69 74 73 20 61 6e 64 20 6d 61 6b 65 20 79 6f |uits and make yo| 000020d0 75 72 77 61 79 20 74 6f 20 74 68 65 20 73 77 65 |urway to the swe| 000020e0 65 74 73 68 6f 70 2e 22 0d 08 8e 0a 20 f2 32 30 |etshop.".... .20| 000020f0 3a e1 0d 08 98 09 20 dd f2 32 33 0d 08 a2 24 f1 |:..... ..23...$.| 00002100 3a f1 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |:." | 00002110 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d |************":..| 00002120 08 ac 63 20 f1 22 41 73 20 79 6f 75 20 6c 69 66 |..c ."As you lif| 00002130 74 20 74 68 65 20 62 6f 78 20 6f 66 20 63 68 6f |t the box of cho| 00002140 63 6f 6c 61 74 65 73 20 6f 66 20 74 68 65 73 68 |colates of thesh| 00002150 65 6c 66 2c 20 74 68 65 20 77 68 6f 6c 65 20 70 |elf, the whole p| 00002160 69 6c 65 20 63 6f 6d 65 73 20 74 75 6d 62 6c 69 |ile comes tumbli| 00002170 6e 67 20 74 6f 20 74 68 65 20 67 72 6f 75 6e 64 |ng to the ground| 00002180 21 22 0d 08 b6 26 20 f1 3a e8 22 44 4f 20 59 4f |!"...& .:."DO YO| 00002190 55 20 48 41 4e 47 20 41 52 4f 55 4e 44 28 59 2f |U HANG AROUND(Y/| 000021a0 4e 29 3f 22 41 32 33 24 0d 08 c0 13 20 e7 20 41 |N)?"A23$.... . A| 000021b0 32 33 24 3d 22 59 22 20 f2 32 35 0d 08 ca 3b 20 |23$="Y" .25...; | 000021c0 e7 20 41 32 33 24 3d 22 4e 22 20 f2 32 36 20 8b |. A23$="N" .26 .| 000021d0 20 f1 27 22 49 4e 50 55 54 2d 4e 4f 54 20 41 43 | .'"INPUT-NOT AC| 000021e0 43 45 50 54 41 42 4c 45 2e 2e 2e 2e 2e 2e 22 3a |CEPTABLE......":| 000021f0 e5 20 8d 74 76 48 0d 08 d4 06 20 e1 0d 08 de 0a |. .tvH.... .....| 00002200 20 dd 20 f2 32 34 0d 08 e8 24 20 f1 20 22 20 20 | . .24...$ . " | 00002210 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a | *****| 00002220 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 08 f2 24 f1 3a |*******":....$.:| 00002230 f1 22 20 20 20 20 20 20 20 20 20 20 20 20 20 2a |." *| 00002240 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 0d 08 |***********":...| 00002250 fc 75 20 f1 20 22 59 6f 75 20 64 65 63 69 64 65 |.u . "You decide| 00002260 20 6e 6f 74 20 74 6f 20 62 75 79 20 74 68 65 20 | not to buy the | 00002270 73 77 65 65 74 73 2c 20 61 6e 64 20 20 20 6d 61 |sweets, and ma| 00002280 6b 65 20 79 6f 75 72 20 77 61 79 20 68 6f 6d 65 |ke your way home| 00002290 2c 20 68 6f 70 69 6e 67 20 79 6f 75 20 68 61 76 |, hoping you hav| 000022a0 65 20 20 20 20 20 73 6f 6d 65 74 68 69 6e 67 20 |e something | 000022b0 6e 69 63 65 20 66 6f 72 20 65 76 65 72 79 6f 6e |nice for everyon| 000022c0 65 2e 22 0d 09 06 09 20 f2 45 4e 44 0d 09 10 06 |e.".... .END....| 000022d0 20 e1 0d 09 1a 0a 20 dd 20 f2 32 35 0d 09 24 24 | ..... . .25..$$| 000022e0 f1 3a f1 22 20 20 20 20 20 20 20 20 20 20 20 20 |.:." | 000022f0 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a f1 | ************":.| 00002300 0d 09 2e 08 20 53 3d 31 0d 09 38 7d 20 f1 20 22 |.... S=1..8} . "| 00002310 54 68 65 20 73 68 6f 70 20 61 73 73 69 73 74 61 |The shop assista| 00002320 6e 74 20 68 65 6c 70 73 20 79 6f 75 20 74 6f 20 |nt helps you to | 00002330 72 65 73 74 61 63 6b 20 74 6f 20 73 68 65 6c 76 |restack to shelv| 00002340 65 73 2c 20 61 6e 64 20 79 6f 75 20 62 75 79 20 |es, and you buy | 00002350 74 68 65 20 63 68 6f 63 6f 6c 61 74 65 73 2e 20 |the chocolates. | 00002360 49 74 20 69 73 20 6c 61 74 65 20 6e 6f 77 20 61 |It is late now a| 00002370 6e 64 20 79 6f 75 20 6d 75 73 74 20 67 6f 20 68 |nd you must go h| 00002380 6f 6d 65 2e 22 0d 09 42 09 20 f2 45 4e 44 0d 09 |ome."..B. .END..| 00002390 4c 06 20 e1 0d 09 56 09 20 dd f2 32 36 0d 09 60 |L. ...V. ..26..`| 000023a0 24 f1 3a f1 22 20 20 20 20 20 20 20 20 20 20 20 |$.:." | 000023b0 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 22 3a | ************":| 000023c0 f1 0d 09 6a 16 20 4d 4f 4e 45 59 25 3d 4d 4f 4e |...j. MONEY%=MON| 000023d0 45 59 25 2b 34 35 30 0d 09 74 91 20 f1 20 22 4a |EY%+450..t. . "J| 000023e0 75 73 74 20 61 73 20 79 6f 75 20 61 74 74 65 6d |ust as you attem| 000023f0 70 74 20 74 6f 20 6d 61 6b 65 20 61 20 71 75 69 |pt to make a qui| 00002400 63 6b 20 67 65 74 20 61 77 61 79 2c 20 74 68 65 |ck get away, the| 00002410 20 6c 61 64 79 20 69 6e 20 74 68 65 20 73 68 6f | lady in the sho| 00002420 70 20 73 74 6f 70 73 20 79 6f 75 2e 20 20 20 59 |p stops you. Y| 00002430 6f 75 20 68 61 76 65 20 74 6f 20 72 65 73 74 61 |ou have to resta| 00002440 63 6b 20 61 6c 6c 20 74 68 65 20 73 77 65 65 74 |ck all the sweet| 00002450 73 20 20 20 20 20 20 73 69 6e 67 6c 65 20 68 61 |s single ha| 00002460 6e 64 65 64 6c 79 2e 22 0d 09 7e 9f 20 f1 20 22 |ndedly."..~. . "| 00002470 59 6f 75 20 65 76 65 6e 74 75 61 6c 6c 79 20 6c |You eventually l| 00002480 65 61 76 65 20 74 68 65 20 73 68 6f 70 2c 20 61 |eave the shop, a| 00002490 6e 64 20 6d 61 6b 65 20 79 6f 75 72 20 77 61 79 |nd make your way| 000024a0 20 68 6f 6d 65 2e 20 54 68 65 6e 20 79 6f 75 20 | home. Then you | 000024b0 72 65 61 6c 69 73 65 20 79 6f 75 20 68 61 76 65 |realise you have| 000024c0 6c 65 66 74 20 79 6f 75 72 20 70 72 65 73 65 6e |left your presen| 000024d0 74 73 20 69 6e 20 74 68 65 20 73 77 65 65 74 20 |ts in the sweet | 000024e0 73 68 6f 70 2c 20 20 20 79 6f 75 20 72 65 74 75 |shop, you retu| 000024f0 72 6e 20 74 6f 20 66 69 6e 64 20 69 74 20 63 6c |rn to find it cl| 00002500 6f 73 65 64 2e 22 3b 0d 09 88 46 20 f1 20 22 59 |osed.";...F . "Y| 00002510 6f 75 20 68 61 76 65 20 6e 6f 20 74 69 6d 65 20 |ou have no time | 00002520 74 6f 20 62 75 79 20 61 6e 79 6d 6f 72 65 20 70 |to buy anymore p| 00002530 72 65 73 65 6e 74 73 61 6e 64 20 4d 55 53 54 20 |resentsand MUST | 00002540 72 65 74 75 72 6e 20 68 6f 6d 65 2e 22 0d 09 92 |return home."...| 00002550 32 20 53 3d 30 3a 4d 55 47 25 3d 30 3a 45 41 52 |2 S=0:MUG%=0:EAR| 00002560 25 3d 30 3a 50 45 4e 43 49 4c 25 3d 20 30 3a 42 |%=0:PENCIL%= 0:B| 00002570 3d 30 3a 42 4f 4e 45 25 3d 20 30 3a 53 3d 30 0d |=0:BONE%= 0:S=0.| 00002580 09 9c 09 20 f2 45 4e 44 0d 09 a6 06 20 e1 0d 09 |... .END.... ...| 00002590 b0 0b 20 dd 20 f2 45 4e 44 0d 09 ba 39 20 f1 3a |.. . .END...9 .:| 000025a0 f1 20 22 20 20 20 20 20 20 20 20 20 20 20 50 52 |. " PR| 000025b0 45 53 53 3c 53 50 41 43 45 3e 22 3a f5 3a e9 20 |ESS<SPACE>":.:. | 000025c0 4b 45 59 24 3d bf 28 31 29 3a fd 20 a6 28 2d 39 |KEY$=.(1):. .(-9| 000025d0 39 29 0d 09 c4 06 20 db 0d 09 ce 0f 20 e3 20 41 |9).... ..... . A| 000025e0 3d 31 20 b8 20 31 39 0d 09 e2 30 20 f1 20 22 49 |=1 . 19...0 . "I| 000025f0 54 27 53 20 43 48 52 49 53 54 4d 41 53 20 44 41 |T'S CHRISTMAS DA| 00002600 59 2c 20 49 54 27 53 20 43 48 52 49 53 54 4d 41 |Y, IT'S CHRISTMA| 00002610 53 20 44 41 59 2e 22 0d 09 ec 06 20 ed 0d 09 f6 |S DAY.".... ....| 00002620 24 20 e3 20 43 3d 30 20 b8 20 32 30 30 3a ef 20 |$ . C=0 . 200:. | 00002630 31 39 2c 31 2c b3 28 37 29 2c 30 2c 30 2c 30 3a |19,1,.(7),0,0,0:| 00002640 ed 0d 0a 00 15 20 db 3a ef 20 31 39 2c 31 2c 32 |..... .:. 19,1,2| 00002650 2c 30 2c 30 2c 30 0d 0a 0a 2a 20 f1 20 3a f1 20 |,0,0,0...* . :. | 00002660 22 50 6c 65 61 73 65 20 75 73 65 20 74 68 65 73 |"Please use thes| 00002670 65 20 6b 65 79 2d 77 6f 72 64 73 2e 2e 2e 2e 22 |e key-words...."| 00002680 0d 0a 14 3e 20 f1 20 22 45 41 52 52 49 4e 47 53 |...> . "EARRINGS| 00002690 3b 20 50 43 41 53 45 3b 20 44 42 49 53 43 55 49 |; PCASE; DBISCUI| 000026a0 54 53 3b 20 43 48 4f 43 4f 4c 41 54 45 53 3b 20 |TS; CHOCOLATES; | 000026b0 42 4f 4e 45 3b 20 20 20 4d 55 47 53 2e 22 0d 0a |BONE; MUGS."..| 000026c0 1e 4d 20 f1 27 22 49 74 20 69 73 20 6e 6f 77 20 |.M .'"It is now | 000026d0 74 69 6d 65 20 74 6f 20 67 69 76 65 20 6f 75 74 |time to give out| 000026e0 20 74 68 65 20 70 72 65 73 65 6e 74 73 2e 54 68 | the presents.Th| 000026f0 65 20 70 72 65 73 65 6e 74 73 20 79 6f 75 20 68 |e presents you h| 00002700 61 76 65 20 61 72 65 2e 2e 2e 22 0d 0a 28 05 f1 |ave are..."..(..| 00002710 0d 0a 32 19 e7 20 43 41 53 45 25 3d 31 20 f1 20 |..2.. CASE%=1 . | 00002720 22 20 50 43 41 53 45 22 3b 0d 0a 3c 1b e7 20 45 |" PCASE";..<.. E| 00002730 41 52 25 3d 31 20 f1 20 22 20 45 41 52 52 49 4e |AR%=1 . " EARRIN| 00002740 47 53 22 3b 0d 0a 46 17 e7 20 4d 55 47 25 3d 31 |GS";..F.. MUG%=1| 00002750 20 f1 20 22 20 4d 55 47 53 22 3b 0d 0a 50 19 e7 | . " MUGS";..P..| 00002760 20 42 3d 31 20 f1 20 22 20 44 42 49 53 43 55 49 | B=1 . " DBISCUI| 00002770 54 53 22 3b 0d 0a 5a 1a e7 20 53 3d 31 20 f1 20 |TS";..Z.. S=1 . | 00002780 22 20 43 48 4f 43 4f 4c 41 54 45 53 22 3b 0d 0a |" CHOCOLATES";..| 00002790 64 18 e7 20 42 4f 4e 45 25 3d 31 20 f1 20 22 20 |d.. BONE%=1 . " | 000027a0 42 4f 4e 45 22 3b 0d 0a 6e 45 e7 20 53 3d 30 20 |BONE";..nE. S=0 | 000027b0 80 20 43 41 53 45 25 3d 30 20 80 20 45 41 52 25 |. CASE%=0 . EAR%| 000027c0 3d 30 20 80 20 4d 55 47 25 3d 30 20 80 20 42 3d |=0 . MUG%=0 . B=| 000027d0 30 20 80 20 42 4f 4e 45 25 3d 30 20 f1 20 22 4e |0 . BONE%=0 . "N| 000027e0 4f 54 48 49 4e 47 2e 2e 2e 22 3b 0d 0a 78 06 20 |OTHING...";..x. | 000027f0 f1 0d 0a 82 3f 20 f1 20 22 49 46 20 59 4f 55 20 |....? . "IF YOU | 00002800 48 41 56 45 20 4e 4f 54 48 49 4e 47 20 46 4f 52 |HAVE NOTHING FOR| 00002810 20 54 48 41 54 20 50 45 52 53 4f 4e 20 20 20 20 | THAT PERSON | 00002820 20 50 52 45 53 53 20 3c 52 45 54 55 52 4e 3e 22 | PRESS <RETURN>"| 00002830 0d 0a 8c 65 20 f1 3a f1 20 22 49 46 20 59 4f 55 |...e .:. "IF YOU| 00002840 20 41 54 54 45 4d 50 54 20 54 4f 20 47 49 56 45 | ATTEMPT TO GIVE| 00002850 20 54 48 45 4d 20 53 4f 4d 45 54 48 49 4e 47 20 | THEM SOMETHING | 00002860 20 20 59 4f 55 20 44 4f 20 4e 4f 54 20 48 41 56 | YOU DO NOT HAV| 00002870 45 20 59 4f 55 52 20 46 41 4d 49 4c 59 20 57 49 |E YOUR FAMILY WI| 00002880 4c 4c 20 4e 4f 54 20 42 45 20 50 4c 45 41 53 45 |LL NOT BE PLEASE| 00002890 44 2e 2e 2e 22 0d 0a 96 06 20 f1 0d 0a a0 33 20 |D...".... ....3 | 000028a0 e8 20 22 57 48 41 54 20 48 41 56 45 20 59 4f 55 |. "WHAT HAVE YOU| 000028b0 20 42 52 4f 55 47 48 54 20 46 4f 52 20 59 4f 55 | BROUGHT FOR YOU| 000028c0 52 20 53 49 53 54 45 52 2e 2e 2e 22 47 24 0d 0a |R SISTER..."G$..| 000028d0 aa 6a 20 e7 20 47 24 3d 22 45 41 52 52 49 4e 47 |.j . G$="EARRING| 000028e0 53 22 20 80 20 45 41 52 25 3d 31 20 f1 20 22 59 |S" . EAR%=1 . "Y| 000028f0 4f 55 52 20 53 49 53 54 45 52 20 49 53 20 56 45 |OUR SISTER IS VE| 00002900 52 59 20 50 4c 45 41 53 45 44 2e 2e 2e 41 4e 44 |RY PLEASED...AND| 00002910 20 41 4c 4c 4f 57 53 59 4f 55 20 54 4f 20 55 53 | ALLOWSYOU TO US| 00002920 45 20 48 45 52 20 42 45 45 54 48 4f 56 45 4e 20 |E HER BEETHOVEN | 00002930 52 45 43 4f 52 44 53 22 0d 0a b4 43 20 e7 20 47 |RECORDS"...C . G| 00002940 24 3d 22 45 41 52 52 49 4e 47 53 22 20 80 20 45 |$="EARRINGS" . E| 00002950 41 52 25 3d 31 20 58 3d 58 2b 32 35 20 8b 20 f1 |AR%=1 X=X+25 . .| 00002960 20 22 59 4f 55 52 20 53 49 53 54 45 52 20 49 53 | "YOUR SISTER IS| 00002970 20 44 49 53 47 55 53 54 45 44 22 0d 0a be 33 20 | DISGUSTED"...3 | 00002980 e8 27 22 57 48 41 54 20 48 41 56 45 20 59 4f 55 |.'"WHAT HAVE YOU| 00002990 20 42 52 4f 55 47 48 54 20 46 4f 52 20 59 4f 55 | BROUGHT FOR YOU| 000029a0 52 20 46 41 54 48 45 52 2e 2e 2e 22 46 24 0d 0a |R FATHER..."F$..| 000029b0 c8 45 20 e7 20 46 24 3d 22 50 43 41 53 45 22 20 |.E . F$="PCASE" | 000029c0 80 20 43 41 53 45 25 3d 31 20 f1 20 22 59 4f 55 |. CASE%=1 . "YOU| 000029d0 20 41 52 45 20 47 49 56 45 4e 20 41 20 52 49 53 | ARE GIVEN A RIS| 000029e0 45 20 49 4e 20 50 4f 43 4b 45 54 20 4d 4f 4e 45 |E IN POCKET MONE| 000029f0 59 2e 22 0d 0a d2 51 20 e7 20 46 24 3d 22 50 43 |Y."...Q . F$="PC| 00002a00 41 53 45 22 20 80 20 43 41 53 45 25 3d 31 20 58 |ASE" . CASE%=1 X| 00002a10 3d 58 20 2b 20 32 35 20 8b 20 f1 20 22 59 4f 55 |=X + 25 . . "YOU| 00002a20 52 20 46 41 54 48 45 52 20 47 52 4f 55 4e 44 53 |R FATHER GROUNDS| 00002a30 20 59 4f 55 20 46 4f 52 20 4f 4e 45 20 4d 4f 4e | YOU FOR ONE MON| 00002a40 54 48 2e 22 0d 0a dc 33 20 e8 27 22 57 48 41 54 |TH."...3 .'"WHAT| 00002a50 20 48 41 56 45 20 59 4f 55 20 42 52 4f 55 47 48 | HAVE YOU BROUGH| 00002a60 54 20 46 4f 52 20 59 4f 55 52 20 4d 4f 54 48 45 |T FOR YOUR MOTHE| 00002a70 52 2e 2e 2e 22 4d 24 0d 0a e6 45 20 e7 20 4d 24 |R..."M$...E . M$| 00002a80 3d 22 43 48 4f 43 4f 4c 41 54 45 53 22 20 80 20 |="CHOCOLATES" . | 00002a90 53 3d 31 20 f1 20 22 54 48 41 4e 4b 59 4f 55 2c |S=1 . "THANKYOU,| 00002aa0 20 4c 4f 56 45 2e 20 57 48 41 54 20 41 20 4e 49 | LOVE. WHAT A NI| 00002ab0 43 45 20 54 48 4f 55 47 48 54 2e 22 0d 0a f0 5f |CE THOUGHT."..._| 00002ac0 20 e7 20 4d 24 3d 22 43 48 4f 43 4f 4c 41 54 45 | . M$="CHOCOLATE| 00002ad0 53 22 20 80 20 53 3d 31 8c 20 58 3d 58 20 2b 20 |S" . S=1. X=X + | 00002ae0 32 35 20 8b 20 f1 20 22 59 4f 55 20 43 41 4e 20 |25 . . "YOU CAN | 00002af0 44 4f 20 59 4f 55 52 20 4f 57 4e 20 43 4f 4f 4b |DO YOUR OWN COOK| 00002b00 49 4e 47 20 41 4e 44 20 49 52 4f 4e 49 4e 47 20 |ING AND IRONING | 00002b10 49 4e 20 46 55 54 55 52 45 2e 22 0d 0a fa 30 20 |IN FUTURE."...0 | 00002b20 e8 27 22 57 48 41 54 20 48 41 56 45 20 59 4f 55 |.'"WHAT HAVE YOU| 00002b30 20 42 52 4f 55 47 48 54 20 46 4f 52 20 59 4f 55 | BROUGHT FOR YOU| 00002b40 52 20 44 4f 47 2e 2e 2e 22 44 24 0d 0b 04 40 20 |R DOG..."D$...@ | 00002b50 e7 20 44 24 3d 22 44 42 49 53 43 55 49 54 53 22 |. D$="DBISCUITS"| 00002b60 20 80 20 42 3d 31 20 f1 20 22 48 45 20 4c 49 43 | . B=1 . "HE LIC| 00002b70 4b 53 20 59 4f 55 20 41 4c 4c 20 4f 56 45 52 20 |KS YOU ALL OVER | 00002b80 59 4f 55 52 20 46 41 43 45 2e 22 0d 0b 0e 3e 20 |YOUR FACE."...> | 00002b90 e7 20 44 24 3d 22 44 42 49 53 43 55 49 54 53 22 |. D$="DBISCUITS"| 00002ba0 20 80 20 42 3d 31 20 58 3d 58 20 2b 20 32 35 20 | . B=1 X=X + 25 | 00002bb0 8b 20 f1 20 22 59 4f 55 52 20 44 4f 47 20 42 49 |. . "YOUR DOG BI| 00002bc0 54 45 53 20 59 4f 55 2e 22 0d 0b 18 1e 20 f1 27 |TES YOU.".... .'| 00002bd0 22 59 4f 55 52 20 53 43 4f 52 45 20 49 53 20 22 |"YOUR SCORE IS "| 00002be0 3b 58 3b 22 25 22 3b 0d 0b 22 26 20 f1 27 22 59 |;X;"%";.."& .'"Y| 00002bf0 4f 55 52 20 54 49 4d 45 20 49 53 20 22 3b 91 20 |OUR TIME IS ";. | 00002c00 81 20 31 30 30 3b 22 20 73 65 63 73 22 0d 0b 2c |. 100;" secs"..,| 00002c10 08 20 f2 47 4f 0d 0b 36 06 20 e1 0d 0b 40 09 20 |. .GO..6. ...@. | 00002c20 dd f2 47 4f 0d 0b 4a 28 20 f1 27 22 57 4f 55 4c |..GO..J( .'"WOUL| 00002c30 44 20 59 4f 55 20 4c 49 4b 45 20 41 4e 4f 54 48 |D YOU LIKE ANOTH| 00002c40 45 52 20 47 4f 28 59 2f 4e 29 3f 22 0d 0b 54 06 |ER GO(Y/N)?"..T.| 00002c50 20 f5 0d 0b 5e 0e 20 4b 45 59 24 3d bf 28 31 29 | ...^. KEY$=.(1)| 00002c60 0d 0b 68 16 20 fd 20 a6 28 2d 36 39 29 20 84 20 |..h. . .(-69) . | 00002c70 a6 28 2d 38 36 29 0d 0b 72 1f 20 e7 20 a6 28 2d |.(-86)..r. . .(-| 00002c80 36 39 29 20 db 3a e5 20 8d 74 74 40 20 8b 20 e5 |69) .:. .tt@ . .| 00002c90 20 8d 44 7c 4b 0d 0b 7c 12 20 f1 20 22 42 59 45 | .D|K..|. . "BYE| 00002ca0 2d 42 59 45 22 3a e0 0d 0b 86 06 20 e1 0d ff |-BYE":..... ...| 00002caf