}~~w'Œ'SHOP¨INSTR¤AISLE¤ITEM¤BL¤ÉCONSOÌCÈSTARÔSELECÔOPTIOÎUPSEÌBAKOPÔÁSLIÎCOLÒLIÓITEÍCOUNÔÙÂBROWSÅAISLÅLINÅMAØSHÐDATLIÎESLIÎ×ILIÎÊSË@€€€€  ''The Home Shopper - By M. Ratcliff›!!a customizable, easy to use›%%weekly/monthly grocery shopping›(44guide. Up to 23 Isles, 19 Items per Isle max.›2<<€9A`,;A ,‚;@@,ƒ;@@,„;@@,<, +,(The Home Shopper, Setup...Fe67@,.€%67A ,.€467@,.E6„7@,. V6„7@@,. e6„7@,.„P*…-@A`&6€8…,-* …Z.@.@@K:dI6†-B2y6‡-Ad-@‚?@ƒ@9IMARGINS›n?6ˆ-@6‰-@'6Š-@36‹-@?6Œ-@ x #A P6…-A6‚" APŒ! …6…-…%@! A0–@ AP q+@@ D:SHOPLISTB6-?:A6<,N6Ž-@Z6-ADd APn A 0q(ª*(*(ÛÓÅÌÅÃÔÝ-Load Old Shopping List´&(&(ÛÓÔÁÒÔÝ -Work On a new List¾ A`È "ˆ6- APÒ‰AÜE AP-@@9( .... Loading ....E6-@æ1@‘’‘!'6€8‘,-’1 A0ðj…-@G$@ƒO67…$@@%@<…$@@%@@,.ƒf6-?:A6<@,j …ú A LEGGO›MAIN MENU HERE›:@6Ž-@&6-@0 AP: A 0 ( Fire=[START]hh( Joystick: >:@',>:@', = select >:@',>:@',  = option"N-(% ÛÓÅÌÅÃÔÝ-Menu Function ÛÓÔÁÒÔÝ-GO?@‚@B(N6“-@,##(Make Complete Shopping List6""(Just Browse through Aisles@!!(Include Weekly EssentialsJ(Print Shopping ListT(Save Shopping List^(Quit the Home Shopperh@‚(r -“ 6-?:A6<“,| A`"ˆA`†6”-?:A6<“, "‹6“-“&@š“ @6“-@¤/ "‰6“-“%@#“!@/6“-@® A ¸F:†,@A0 ApÌ]6…-“&@6•-)6–-@]…A€A€A@APA AÖ A€à%6-AD6Ž-% APê//('ÛÓÅÌÅÃÔÝ-Aisle ÛÓÔÁÒÔÝ-GO ÛÏÐÔÉÏÎÝ-MENUô…-@)þ6—-A€%@ $… #— "‚ ‚4END6˜-… A`( ‚& …0 6“-–6-?:A6<“,: A`D"ŠAPNˆAXW6•-@6–-“56—-A€%@ $+–&@,M6™-+–&@,$@W Ab(Apl6”-?:A6<“,v) "‹6“-“&@#“ @)6“-˜€) "‰6“-“%@“!˜)6“-@Š6-?:A6<“,” A ž Ap¨36–-@6—-A€36™-+–&@,$@²%6Ž-@6-@% AP¼MINI MENU›Æ//('ÛÓÅÌÅÃÔÝ-Next Item ÛÓÔÁÒÔÝ-UN/Mark ItemÐ--(%ÛÏÐÔÉÏÎÝ-Next AisleÛÒÅÔÕÒÎÝ-Make NoteÚ--(%Û±­¹ËåùÝ-Set Qty. ÛÅÓÃÁÐÅÝ-Main Menuä&#— "‚‚4END Ap&EXIT›î<(Aisle: ‚(6-?:A6<@,<…-@@ø)"ƒ)6š-F:Aƒ,%AV$F:A„,)š—%@ 6˜-…&@) A b-…%@"( ƒ-6”-€8™%…,9”!@G6”-”&@[-@6…%@b(CN”-@4…%@ (”2-5(N6-?:A6<…%@,  …6˜-@*B-@#B(' 'C' = coupon marker 4D6“-@!-@2€8™%“&@,:(½½¾D A@> (==>H2-“ €8™%“&@,((½½¾2 A`R (==>\ A`fF:‡,AUA€pˆA 0z<6-?:A6<“,'6€8™%“&@,-3-@4“<( „*-@4“(±  *6-%@Ž.(6-&@" .6-˜ Ap¢ŠA `¬•A€¶A6–-–%@6—-—%@ 76™-+–&@,$@A AÀŒAÊ•A€Ô76–-–&@6—-—&@ 76™-+–&@,$@Þ— A€A Pè Aò‰*‹Apü<-“( (€8™%“&@,4-“<(   1 "‰6“-“%@%“!˜%@16“-@1 "‹6“-“&@#“ @16“-˜%@2-“ €8™%“&@,((½½¾2 Ap$ (==>. A 8F:‡,"AUA@BPROCESS KEYS›L$)@$AUAV6Ž-@6-% AP:( *NOTE*V(Type your special note.m6-?:A6<,AR`O(This AISLE is: (‚8(Type and press [RETURN].O6-?:A6<@,j:(Two lines allowed.:6-@€$+–&@,%@t-7<,0€(ÎÏÔűº-(7<%@9,~E 7%@@<%@@,0€+(ÎÏÔŲºE(7%@@<%@y,ˆ8!([RETURN] only = no change.(NOTE1: 8 A€’26-%@@(NOTE2: ( A€2 Aœƒƒ4$¦67<%@9,.„°67<%B:ƒ,&@,.ƒ$º"@'ApÄ!! @I)!@WApÎ&(€8™%“&@,&6”-?:A6<“,Øb)6”-P:€8™%“&@,'@,$@F6€8™%“&@,-&@H%”bSET QTY, KEEP COUPON FLAG›âJ-@4“(>:%A(,8€8™%“&@,!@@( ÃJ A@ìT…-@@F(>:@2%A($+€8™%“&@,!,,J …T A@ö@gApU(€8™%“&@,.6€8™%“&@,-@?6-?:A6<“,K6-@IU AP U6-€8™%“&@,"!@=6€8™%“&@,-&@K6-%@8U AP66€8™%“&@,-%@,6-%@H6 AP!!Automatically Mark Items in›(((in weekly essentials list starting›2at line 9000.›<J #A-@@">(** Marking Weekly Items **J6-@F&6-?:A6<“,&SHOW WE'RE BUSY›P"›Z*6-›&A€*6–-P:'@ ,$@d/6‘-&@ $P:'@ ,/6€8–%‘,-@n%%6š-F:Aƒ,%AV$F:A„,xš!A”™A0‚@ œ-@6@<2A @œ@ œŒ/%2/ AP–16-?:A6<“, "16-?:A6<“, >-@@"4( > A€ªA€´G-@@"+(** NO ÌÉÓÔ YET **5 A G-@@"¾- A`#( - A€È%6Ž-@6-A%% APÒ?(( ** Shopping List Printout **?6-?:A6<,Ü0(0(%Be sure PRINTER is ready and [RETURN]æ<(((Press 'A' & [RETURN] to abort),ƒ<ƒ4AApð3 A-@@3(....Working....ú>#@@P:/6—-A•>Store Layout›#— " A€"# "‚"6”-?:A6<@,‚4ENDA€"26•-26–-@%P:+&A€,'@ ,,ž-@@6$ 6-€8@$+–&@,%ž,$"ƒ@(APJ+(•6•-@+(@Aisle: ‚T;!@#(@ *C*16-&@; A@^(@ h$$(@ ___ Qty.  > ƒrN ž'6-@€$+–&@,%@47<,0€N(@7<%@9,|B 7%@@<%@@,0€B(@7%@@<%@y,†%6—-—%@%— A•$A@$(@(@$(@š@ Ap¤.(.(*** PRINTER ERROR *** # F:A•,®2$(Press [RETURN] to continue (ƒ2 A¸T6Ž-@6-@˜% AP/ A 02(N(Save Shopping List ....Q(T(Â+(Are You Sure (Y/N) ? +)@Ì>:,0Y ApÖ!(!(Be sure DISK is ready,à,,($and press [RETURN] key to continue ?ê)@(ô)-@@ )(....Working....þ ApB@6@@ D:SHOPLISTB6•-…-@A`€8…,"A@&<(@…,€8…,%6•-@<6”-?:A6<@ ,0 …(@-1,-1:(•"((*** NO LIST HERE ***Dw…-@G%6-@@$…G(@7%@<%@@,^6-?:A6<@ ,b …m@w ApN BX''(** DISK ERROR ** # F:A•,b5('(Press [RETURN] to continue +ƒ5 A`l%6Ž-@6-Ax% APv$ A 0$6-?:A6<,€((Quit Now (Y/N) ? Š#)@#>:,0YAp”% +@‚@"(%žk + 6-?:A <Ž<,2A@fDAR@VA@dhA”k$¨( 6-F:†,%@)F:‡,AU($²e6Ÿ-R:,e6-‰$+Ÿ"@,%‹$+Ÿ"@,%ˆ$+T:,",%Š$+Ÿ"@,%Œ$+Ÿ"@,¼"A`Æ$Ðe œ-@6@<2A€@œ@ œb2e$Ú…‡AU,œ-@6@H2@E@œL œn2…F:†,@A ä$î,)(! * The Home Shopper,By Mat*Rat *,$øML USR ROUTINE DATA›104,240,10,201,1› 240,7,170,104,104›202,208,251,96,165› 88,133,214,165,89›*133,215,104,104,240›415,168,24,169,40›>101,214,144,2,230›H215,133,214,136,208›R242,160,0,177,214›\48,6,169,1,133›f212,208,4,169,0›p133,212,132,213,132›z77,160,39,177,214›„73,128,145,214,136›Ž16,247,165,16,16›˜7,41,127,133,16›¢141,14,210,96,104›¬240,10,201,2,240›¶7,170,104,104,202›À208,251,96,104,104›Ê168,104,104,141,175›Ô6,162,23,169,2›Þ157,182,6,202,16›è250,169,128,153,182›ò6,165,20,197,20›ü240,252,169,163,141› 0,2,169,6,141› 1,2,169,192,141› 14,212,165,88,141›$ 180,6,165,89,141›. 181,6,169,176,141›8 48,2,169,6,141›B 49,2,96,72,173›L 175,6,141,10,212›V 141,24,208,104,64›` 0,112,112,112,66›j 0,0,2,2,2›t 2,2,2,2,2›~ 2,2,2,2,2›ˆ 2,2,2,2,2›’ 2,2,2,2,2›œ 2,65,176,6,-1›€ D:SHOPPER.BAS