Yd z A¤AISLE¤TOPIC¤ÉÊÃÁDATLI΀€€ Q&€;@@,;@@,‚;@@,1@Q@@K:% +%(Shopper Mini-Editor'('(Put shopper DISK in drive #1( (and press [RETURN]  €2> @p(((#(GOTO 220,(>Ad@< D:STORE.DAT A FOAdAU.(}No STORE data file.K(Create a new one (Y/N) O€P€0Y@ ZA A@A@@ D:STORE.DATdƒ-A€A„@@ n(@ƒ DATA ENDx ƒ‚??(@.8990 REM Weekly Essentials List by Line NumberŒ(@9000 DATA 8001–??(@.9500 REM Aisle Print Sequence topic lines list #6„-A€#ƒ-A•A•#ª)(@ƒ DATA „)6„-„%@ ´ ƒ¾(@ 9524 DATA -1È`@1(Dummy STORE.DAT file complete.R(Press [RETURN] to continue V€` @ ÒH@)( FILE ERROR F:A•,E(DURING STORE.DAT WRITE.HÜP +4("Letter of AISLE to edit (Z exits):> A`PAR@æ+6…-A“+ƒ-A€A„@@ ð7#ƒ "‚(>:…,º ‚(6…-…%@4ƒ A„@7(ú ƒ-SA@d'A”4)@†G†"@:Z,ASDONE IF Z›/6†-†&@e/† )†!@#A`6†-A€%†$@ " #†+†( "‚,ƒ-@@6)"€)6‡-F:Aƒ,%AV$F:A„,@!‡†%@ 6…-ƒ! ApJ †%ƒƒ @(T ƒ^ (CONT&h A r„-…@|(†%„ DATA † „ APš + (SAVE DATA NOW:¤(Get SHOPPER disk ready.®(Press [RETURN] to write¸(STORE.DAT file €Â- A- D:STORE.DATA€A™™Ì""(}Store data file complete.Ö99( Next, LOAD >:@4, D:SHOPPER.BAS>:@4,à77( Then ENTER >:@4, D:STORE.DAT>:@4,ê<<(And then SAVE >:@4, D:SHOPPER.BAS>:@4,ô%%(To complete the STORE update.þ'('(The Home Shopper, By Mat*Rat++(#Brought to you by ANALOG Computing. B€D:SHOPEDIT.BAS