8L2C)pJJJJ IH(ȱH:=IH[H`@HcH  $ +   I/H`JLNGȄBȄF aK  haaFF  mJm# KKJ UJ )J ۈ) ;J3ȱJFȱJGJKaȄM  aaNNJFLGJL L? &PRODOS `DaElH$?EGvѶK+`L HHLy XP LM ŠϠĠӠS)*+,+`F)) (*=GJFjJJA QE'+ '== `@ STSP8QSS8 m P o R(8RPASSPORT ! !' &PRODOS"B$ $!/! %FSM.3*m*$ $ (DATA.LSTA.$ $ )README.V3Z$ $ README.V3.FIXEDh$ $ ,BASIC.SYSTEMj($ $! !8L L L Ӡֲ筱㮬{"{"C" )ߝ &h)h # )#M8 y% ) L"E# )L"K, )7(P0 ( @C p 8  # {": +"#0 k&#0 r%n# ),b0 6#{"'# ) r%ͭ)0I0hx H( , r%Щ ߭ #f )b   !"#$%&'(8#  )ɀ 4,- Ux xxJNxxT)  #L# ) {"` "L)Ei/ #3 ### # iL Xj 0 "0Ӡ`#b% F%]ZZZe-.ـ`!0SB}/BiBB}/ iF12m+ {#  L##  m# m# J LD Qר)ɨ] оȱ ̀𩠙 i ȶ O Ѽ G \ ɟU V@$ C ɛL e '8 Jm ʈ0 q 0堠خ YYZLYLY@뿭` 8#@8` r%MNЩUMߩ  L 5   8 0 8  `0 / X  &/ PV 8 )0`ʎ1i&… (nj&Dž (\%Tg&LP()8= (J 8'g&'h& ((ʎ1i&i&i&3223 t')Д (18i&"m11 2H22h2舌i&i&12H)M0 h1020I20h2 '`L%12 `_'#L  <8# ȱ)ɀ  )' ` (Xp< @' )m''.'' M'i  ``) i'(j21 g& h&!` (h&g&(i(h&(( CBDFGE ) ( ((( ((_&$ (,j&_& … (ŅL&JJJJ`Ϡ'8`_&  LDž )Ti(( (( ((_&/g&(,j&g&( ((_&0(П` (ɣ`HHHJ)  )hhh r%J(֭(Q(`11J  2LY) (8`rȱȱȱȱ0]cȱeem+ȱ+ȱ++ȱ++ȱ+ *+ * *L)`L4+ +La* * L) *La*8e` ,$`ee` `+ <++ X+` k+ <+ X+`hh8`8`+++`}+`e`H)hJJ+0JJ)` (< ( < *? ( < (? ( < (? ( <*? * **? *? *? ( < *? ( <x0HH1HH "A,Z(") \i ᘏi᫫8(`hhh8k-<ʆ>Q=?BC8 é&'112`آ <B*IBGF08Lé'+8H <,``h(`@ڍL3HEVhEhH)IWHPHHHAHHHLaVEWLӿ``LL`BL Lޣޣޣޣޣޣޣޣޣޣޣޣޣޣޣ(C)APPLE xLLM Mh@x8n,,(Lޭ 0J @,,L:$P׽8H  ): e: y8鰕:Jjjj<)yאi8i;i(*=>hPם8`;Zx3Q`_^]ba`0h)ύh0HHHH " ׍hhhhhddhh .hh8`JIMJAYKERRY&MIKEhB}_ݝ@JJJJq@)@wwȱ@Hȱ@Ah@@dw "Je ) LyL LyJiB J) xNhHHHHL(  ްƠx@BEOD X ް(`( C)CJJJlBJ,~@~@}J@` ߩ%S @ ~`E hhhߢ ߐ( ߐ ߐ ߐ  ޕϭߍLпllll Q)T 22') ɺihh8` )?  R   ސ `@Hȱ@IױHXATȱH ɯȩ׍̒5H)/@a)_ .0 :A[8@`,뎒׮Б` R L ` N@>T)I38 Nefם`K8`ȱ@Nȱ@O@ ;IiNȽבN)/ȩ/N`@[ WHJjjjhA 'KI؍0JHi  뎅`ةC8` ȱ@)0 ;-N0 H0 M⭬ih` ; 뮅ٝ٘ 0 W,0 .H hȑNWȮّNW8`ٍّNΪ0NN` `G8`F@ 0 LyK8`; <I8`FHGH ihGhF܌ բE۽ܕEܝ 밷;< =܅I m>IHHyHȘI 밎Lܝ @d@ l@Ю׍T)mיTʈ@rȱ@dȱ@npqgOyPzT)5TI0ܢܽ jQ'F* i7efFG (HI uLB܅IS mFIH` ur rN0QR \FTHOFPG 밳OP 밨H%܈E" T)Ia)܍S*܍F'ܮ( 4 \䭐 $H %HFFHGHG 됬`R8` )` ` FHT` b8܅IHHTTЍT  jg@`8 ` ͍% ΍Q8`܅I `Q܍RS &8D`F` eH)HFȍOHGP %܍&܍ܢ8* J8` [L ܝ? &ܝ:`G8iSFQGR`G܅IH3H ( y )ȱHΪ`Ύ8FeHI >QB;0N [謅ȹٝLٝJFOH &猬`8m0`,0H hi 0PȽΪhٍ0GF8yאFG  ^$0 01 E8`1ݼ00  0ʩ 谼 ^谷`12)1`0`Ȏi i ٝU`)8`Ϊ` J ;: 4 ܝʈ)٭0و+۝ٹHٹ)۝`H) 8ʈh` 0ٝ)i `8`Q 鍐{|ʎ BNمFمG < ΐ0 FGLV鮅0 ٭|٭{ٽ8`H8`  ,{ | 8` {| `ٽJJJJ`H͐hn) NjNjNjN. H͐ B;٭ S*Nۙ۰ڙک `Z8` # `| .| .| .|8۰*J{۩ ٰʊ{|`JJJJ:芙 B묅͚ Bٍ0 S  `H8` `ٍyٍiB0H0FGO h0`שFGBxEDʎ0C ް(`(8`ؑ@`M8`8@ؐʈI묆){8{{ L< LnةC8`؍)@ =i){8{wJ ] ؅F L2) P+%J(^ b FإGؐ,` b JHIH I%FHGI ԭJjHIH@=IؙJJ 9 4HIHI`JKJK`FHIG ( bȢ؝؈JL)eKM`)` J {J͟ 0 ΎJFJL8`JGJ إG`H إG`B F`,H hHB؅F  ؅GxDE؍00C ް(`(8` BLJ  ! BH  9ؙ` N@ TP8`K8`B8` M؈TJJJJحr) ) )Ю ЪGeF $ ᭔ع+ؠ H  h8` 䮅ٽ ٬ؠ@` ( M )8`)i п` H h)N$% LL L ; LV pJ덦 )@፥NJOK cKK΢΢ IJΦ H DФ̭JjHFIH8HIGxKE ް((H HhH h8`8@ȭ@L묆8NNO 8 ؍JL`R΢ʱLN1MOMEKP/MEK΢LL-M O,Gp莡eNNO(`JNKOL - P L8 < ؑJ`L@ȱ@ `@Nȱ@O`؝}{I{ؐ` ؽ؝{  ؝{؈` ` H h)N@ ; L  $ )dJ ' ) 7H h8` ) s )حJjI|HI{H؊ PLK΢ʱNLMO MІMEKݸP%MEK΢L O,G PeNNO (` C  7 2J{HI|HI؊ 7L  ` = H{ ؙؾ ح| ؙIHIhH 7 iع ` i عiعi` )؍0CGHFHBFGx ް(8hFhG`@4͔ L V@Ai ׭2` . #ع؍0 讅)`.@+ i 8` L )߹0 )p )@ = ) Pȩ ؝M0OP 방 [QROPFG \ S嬆؍g؍h؝i ؝d {T) {T u)حN͚ B`H@h`h``N8`  ) ⬆Ȣ؝@ݞ@ʈL KIJHȢݞ 2魞)Jn 8 ζ ؍ ؍ H8 ع)ꭳJJJJ b Ȣ؝I؈ h(8H h(8Hh(`ؑ@`@ȱ@ ` NB@8YT 2鮅ٍٍٍtHٍs8ghhTJJJJT)T@` N%I -r) 0@T)N8` @LLu `=@ ȹP8` i` ם0 B )( ȹ`8m8m@8` `G8`F R N TPr)@N8`T)@J טyרםTT)׍Tef 밑 LȹL@ȅH@IL],0` ND Tוֹ: 'H-r)N 0 efT)@kP8`   BHTHIH uh`yٙ٭yٙ٩`H BeFfG 3%&N   ܮ `J HH hh` 0@ tLlL '_̶Xܝ ݝ0̶ȩFG  b 0` d ܅F݅G ` 0 'ͬ d 밽܅F݅G ` 0) '$ L`L뮲HH hFhG܍ݍ 8 `FHGH hGhF`ݹܙ݊`@Bɼ>K@J5 ,9X(K ,XXK تKo`V8`no` on ,I9XX`) HJJJh`OeNeO࿰ ,9XБO`@ȭ@` ON NJKO`?>х=<<>=?ّ>ILB* DքEFpCJJJJ֍qQ(`)Cq p"*֭֬)/ )DI@+8`@Ae yUnvgIJK,-NOPQRSu' @   !"#$ Ԡͭ HB-9F 3"aɿ LLB Nϰ H  @h( L Lj  @`eLJCAB@=?<>=?<>CAB@?A` 1 L  <>`ڢF]PL8i m L   6< L  BLRAM' hLDL ֽ ְ& .Vӈ  JJJJH 8h Ei 8EX`'8`jӍWӥC)p> pӥCYӍY 轊( ( ӈBV ( ӭp0 \BkJ ՠ@iӦ> Ӑi'j:ZH i@ioZZH h ѐȭnWǥBJ Ӱ8XӦ>` Ր+>*L o % ԽYӍZӭoӝY 3Ѡ шNZ`rZLkӭZӍq8r7IZӐiZkӐk 8 ѹs ӭq ѹ| kн Z)*>>` @ $(,048<@DHLPTX\`dh 0ުlptx| 0($ p,&"op8`kkV꽌ɪɖxlӽ*kӽ-kәmMlӈ 꽌ɪ`8` ZԍsԍԍԍԥDEԌ8TԌ8WpԌqԠ 7I꽌ɪ꽌ɭ蠪:љVE:8`]ѾV]H)]ѾV]ҙ)]ѾT]ҙ)] >8hUD` ԝY`> Hh݌(`HCJJJJ)*h`8LխӅ:HhHh Ո թ թ ՘VYҪҦ>:Y)Ң`;R?AJ;<ȰY)Ң`Y?)Ң`ȐҰ ;HhHh=Ң`Hh `Hh`DEiȍ0֌18V%֌&8V֌֠)HV)hH)hHIhդD?DRIDQD)҅; ?JDQD]ՎՎՎ`MY pӭY)p  ӭp`C)`BFGV 8``\GQ H ?h8 S / ?8 V []bj \ ^e_f a  i  \ 2EL 0 8`0)H ""H"h8 ek)E/8`HZ; [:HZ"h+h`8h`/Ȁ򈘍` L   `H0H"hHHH HHH "hpHH"VHH; [*i)    +hhHH"""8h/ ʎ S` ?8 r 0 88`  Can't run next application.ProDOS Error = $ Please insert the disk: Accept: M Cancel: EscحX / Xߩϝyp)W0 ,((0JJJ Ocb L h"a""az %aco "%(kh dfeg?id0dJJJJ)u(((((%i(d)jjȰd %i(edde) ɍy Zff `),f~ 0Ý ~>f  XL eaafʈ   a}a0 L^hɕ7f Uc@bcJbciȅbcL|I*E`J Oɛ4iH !Фcb 0Lz `LX)_jffigfȱfjbgcLt0g)`J   ( ȅy x)iitȄa`a |R+ ,', ʂF2/) ޠn iй `)٠$ ʮ#Ю#κ ú¬נ(ӶıӮ ԭ :(4)"PR#3".D$(4):MM(1)1:FLAG0AA$(25),AB$(25),AC$(25),AD$(25),AE$(25),AF$(25),AG$(25),AH$(25),AI$(25),AJ$(25)BA(25),BB(25),BC(25),BD(25),BE(25),BF(25),BG(25),BH(25),BI(25),BJ(25) CA(25),CB(25),CC(25),CD(25),CE(25),CF(25),CG(25),CH(25),CI(25),CJ(25)d !DA(25),DB(25),DC(25),DD(25),DE(25),DF(25),DG(25),DH(25),DI(25),DJ(25) "EA(25),EB(25),EC(25),ED(25),EE(25),EF(25),EG(25),EH(25),EI(25),EJ(25) #GA$(25),GB$(25),GC$(25),GD$(25),GE$(25),GF$(25),GG$(25),GH$(25),GI$(25),GJ$(2)+,-./0123456789:;<=>?5)Y $FA$(25),FB$(25),FC$(25),FD$(25),FE$(25),FF$(25),FG$(25),FH$(25),FI$(25),FJ$(25)d (9000 -10000:"PLEASE WAIT--LOADING DATABASE...." 2D$"UNLOCK DATA.LST" <D$"OPEN DATA.LST" FD$"READ DATA.LST" PNAME$:ZZ:ZA:I1ZA:H(I):I UI1ZA:CN$(I):I" ZJ1ZA0 _I1H(J)W dA$:B:C:D:E:F$:G$:ZGJ:8050^ iIe nJ} xD$"CLOSE DATA.LST" }: :::1:"Food Storage Manager 3.0 Written by: Rob Allred " :4:10:"MAIN MENU:"' 12:"1. ADD/CHANGE CATAGORY NAME"Q 12:"2. ADD ITEM NUMBER TO DATABASE" 12:"3. DELETE ITEM NUMBER FROM DATABASE" 12:"4. MODIFY ITEM NUMBER" 12:"5. ADD FOOD TO DATABASE" 12:"6. SUBTRACT FOOD FROM DATABASE" 12:"7. PRINT REPORTS"/ 12:"8. SEARCH FOR ITEM NUMBER"J 12:"9. SAVE CHANGES"] 12:"0. QUIT" :"Please make a selection...";:SELECT SELECT1930,300,500,1100,700,900,1300,1200,270,210 END ROUTINE 1600 :  SAVE ROUTINE 1600:130,@6"Enter the data that is asked for."J91900:CO(CO$):IH(CO)1::CO;" - ";CN$(CO)::"ITEM NUMBER: ";I:;1500@:"Is this correct? (Y/N) ";:O$::EO$"N"O$"n"315GMM(1)I:H(CO)I:3000:ZGCO:8050#J:"Add more items? (Y/N) ";:O$AOO$"Y"O$"y"II1:300UTMM(1)I:H(CO)I^h130d"You may enter an item to delete."1900CO(CO$)1910I(OA$)I0130H(CO)500ZGCO:8060!:&A$ +"Quantity->";B0"Reorder->";C55"Shelf Life->";DF:"Price->";EN?:rD"Delete this item? (Y/N) ";OO$IOO$"N"OO$"n"130KIOONA$" ":B0:C0:D0:E0:MM(1)IS3000:ZGCO:8050X130:"Add food that has just been purchased.":1900&CO(CO$)01910=I(OA$)JI0130[IH(CO)700kZGCO:8060:CO;" - ";I;" ";A$"Quantity--> ";B:"Increase inventory by: ";INC:INCB"Correct? (Y/N) ";:O$:: O$"N"O$"n"720BBINC3MM(1)I:3000:ZGCO:8050<130g:"Subtract food that has been used."o:1900:CO(CO$)1910:I(OA$)I0130IH(CO)900ZGCO:8060:CO;" - ";I;" ";A$"Quantity--> ";B:"Decrease inventory by: ";DECB:BDEC0ĺ:"TOO MANY!":920MBDECm"Correct? (Y/N) ";:O$::O$"N"O$"n"700BBDECMM(1)I:3000:ZGCO:8050130L:"Modify/edit an entry."V::1900:CO(CO$)[1910]I(OA$):I0130 _IH(CO)11004`ZGCO:8060:A$hb:"This Item? (Y/N) ";:O$:O$"N"O$"n"1100}e"Quantity-> ";Bj"Reorder-> ";Co"Shelf Life-> ";Dt"Price-> $";Ey:~1500"Correct? (Y/N) ";:O$O$"N"O$"n"1100MM(1)I:3000:ZGCO:8050(130x:::"Please type the first letter of the item name: ";NM$:(NM$)112002000J1ZAI1H(J)ZGJ:8060NM$(A$,1)ĺF$:JJ1IJJJ0ĺ"No match found!":"PRESS ANY KEY...";:O$:JJ0:130<:JJ0:"Press any key...";:O$:130Bv"Print reports/forms about your food storage."~:#10:"Menu:"(12:"1. Inventory list"-12:"2. Shopping list"212:"3. Checkout list"712:"4. Description and item number only list"2<12:"5. Tally sheet"_A:"Please make a selection...";:SELECTFSELECT1360,1400,2100,2200,2300P1770Z2400_MAST$" Complete Inventory List"MOST$`" ":2000aN8dJ1ZAe"-------------------------------------------------------------------------------":(27)"!";:" ";J;" - ";CN$(J):(27);(34);:"-------------------------------------------------------------------------------":NN3fNN1hI1H(J)iNN1:ZGJ:8060:F$kN65İ2420nI:JDoJ1ZA:I1H(J):ZGJ:8060:TZTTZT(BE):I:Jsp"TOTAL AMOUNT IN FOOD STORAGE----> $";TZTqO$"2"1395r:"PRESS ANY KEY...";:O$s(9)"e":TZT0:130x1770}2400:MAST$" SHOPPING LIST"MOST$4000:N6J1ZA"-------------------------------------------------------------------------------":(27)"!";:" ";J;" - ";CN$(J):(27);(34);:"-------------------------------------------------------------------------------":NN3NN1 I1H(J):H(J)01448NN1:ZGJ:8060.BC1447=XXE(CB)EG$RXSXSXXbN65İ2420XS0ĺ"All items above reorder point! Good Job.":1460IJ"You need to spend $";XS;XX0:XS0(9)"e":"PRESS ANY KEY...";:O$::130("Description:";A$:A$""130>"Quantity :";BT"Reorder :";Cj"Shelf Life :";D"Price :$";E@:"PLEASE WAIT--SAVING NEW DATABASE...."BFLAG0ıCD$"DELETE DATA.LST"ED$"OPEN DATA.LST" JD$"WRITE DATA.LST"2ONAME$:H(CO):ZA:I1ZA:H(I):IIQI1ZA:CN$(I):IUTJ1ZAcVI1H(J)rWZGJ:8060YA$:B:C:D:E:F$:G$^I`JcD$"CLOSE DATA.LST"9000FLAG0:::"Please type the first letter of the item name: ";NM$:(NM$)11700$20003I1H(CO)CZGCO:8060]NM$(A$,1)ĺF$:JJ1dIJJ0ĺ"No match found!":"PRESS ANY KEY...";:O$:JJ0:130:JJ0:"ITEM NUMBER: ";OA$::"1-Screen":"2-Printer? ";:O$:O$"2"ĺD$"PR#1":(9)"80N"8::J1ZA:J;" - ";CN$(J):JY:"CATAGORY NUMBER: ";CO$:lZA0ĺ"NO CATAGORIES!"::"PRESS ANY KEY....";:O$:130n:"ENTER CATAGORY NUMBER (1-";ZA;") ";:CO$:CO$"HELP"CO$"help"İ1790q(CO$)0130K r(CO$)(ZA)ĺ:"NO CATAGORY WITH THAT NUMBER!"::"PRESS ANY KEY....";:O$:130Q s v"ENTER ITEM NUMBER (1-";H(CO);"): ";:OA$:OA$"HELP"OA$"help"İ1700:!x(OA$)H(CO)ĺ"NO ITEM WITH THAT NUMBER IN THIS CATAGORY!"::"PRESS ANY KEY....";:O$:130!{/!:"Add or modify a catagory name."^!:"(A)dd or (M)odify? ";:O$:O$"M"1935!ZAZA1:ZA10ĺ:"SORRY NO ROOM FOR MORE CATAGORIES!":"PRESS ANY KEY....";:O$:ZA10:130!COZA::"CATAGORY NUMBER ";ZA;":":1945!1900"CO(CO$)::CN$(CO)'":"NEW NAME-> ";CM$S":"Correct? ";:O$:O$"N"O$"n"1930h"CN$(CO)CM$:130""| ITEM # | DESCRIPTION | QTY | REORD | SHFLF | PRICE |"#"-------------------------------------------------------------------------------"#1770O#92400:MAST$" CHECKOUT FORM"MOST$#>"ITEM NUMBER DESCRIPTION # TAKEN NAME "#CI130#E" "$H"_____________ _____________________________________ ________ ______"$MIF$R(9)"e":"PRESS ANY KEY...";:O$::130P$1770|$2400:MAST$" ITEM NUMBER LIST"MOST$$J1ZA$I1H(J)$" ":ZGJ:8060$J;" - ";I;" ";A$$I:J$(9)"e":"PRESS ANY KEY...";:O$::130%1770)% 2400:MAST$" TALLY SHEET"MOST$5% J1ZAC% I1H(J)% ZGJ:8060:J;" - ";I;" ";A$;" ____________________________________________"% I:J% (9)"e":"PRESS ANY KEY...";:O$::130&` MAST$"Food Storage Manager 3.0 ":MOST$" For "NAME$ &e &t ::N8:2000:7& "Please wait...."C& IMM(1)N& FLAG1f& Q$(CO)" - "(I)& Q(Q$):Q7Q7QQ$"":3010& J17Q:QQ$QQ$" ":J& W(A$)& J137W:WW$WW$" ":J& R$(B)& R(R$)' J14R:RR$RR$" ":J ' T$(C)' T(T$)5' J16T:TT$TT$" ":JA' Y$(D)M' Y(Y$)i' J16Y:YY$YY$" ":J{' U$(E):5000' U(U$)' J16U:UU$UU$" ":J' I$(CB):S(I$):J16S:II$II$" ":J#( F$"| "Q$QQ$"| "A$WW$"| "R$RR$"| "T$TT$"| "Y$YY$"|"U$UU$"|"u( G$"| "Q$QQ$"| "A$WW$"| "R$RR$"| "T$TT$"| "I$II$"|"U$UU$"|"( QQ$"":WW$"":RR$"":TT$"":YY$"":UU$""( II$""( )"| ITEM # | DESCRIPTION | QTY | REORD | PURCH | PRICE |")5)(U$,1)"."UI$"$ "U$:5070G)(U$)15020c)UA$"$ "U$".00":5060u)(U$)25030)UA$"$"U$".00":5060)(U$)35040)UA$"$ "U$"0":5060)(U$)4UA$"$"U$:5060)(U$,2,1)"."UA$"$ "U$:5060*UA$"$"U$"0"+*U$UA$:UA$"":UI$""1*Q*(UI$)5UA$UI$"0":5060c*UA$UI$:5060*@ INPUT (SORTA PARTOF) ROUTINE*AAA$(I)A$:BA(I)B:CA(I)C:DA(I)D:EA(I)E:FA$(I)F$:GA$(I)G$:+BAB$(I)A$:BB(I)B:CB(I)C:DB(I)D:EB(I)E:FB$(I)F$:GB$(I)G$:T+CAC$(I)A$:BC(I)B:CC(I)C:DC(I)D:EC(I)E:FC$(I)F$:GC$(I)G$:+DAD$(I)A$:BD(I)B:CD(I)C:DD(I)D:ED(I)E:FD$(I)F$:GD$(I)G$:+EAE$(I)A$:BE(I)B:CE(I)C:DE(I)D:EE(I)E:FE$(I)F$:GE$(I)G$: ,FAF$(I)A$:BF(I)B:CF(I)C:DF(I)D:EF(I)E:FF$(I)F$:GF$(I)G$:d,GAG$(I)A$:BG(I)B:CG(I)C:DG(I)D:EG(I)E:FG$(I)F$:GG$(I)G$:,HAH$(I)A$:BH(I)B:CH(I)C:DH(I)D:EH(I)E:FH$(I)F$:GH$(I)G$:,IAI$(I)A$:BI(I)B:CI(I)C:DI(I)D:EI(I)E:FI$(I)F$:GI$(I)G$:0-JAJ$(I)A$:BJ(I)B:CJ(I)C:DJ(I)D:EJ(I)E:FJ$(I)F$:GJ$(I)G$:U-S INPUT (SORTA PARTOF) ROUTINE-UA$AA$(I):BBA(I):CCA(I):DDA(I):EEA(I):F$FA$(I):G$GA$(I):-VA$AB$(I):BBB(I):CCB(I):DDB(I):EEB(I):F$FB$(I):G$GB$(I):!.WA$AC$(I):BBC(I):CCC(I):DDC(I):EEC(I):F$FC$(I):G$GC$(I):e.XA$AD$(I):BBD(I):CCD(I):DDD(I):EED(I):F$FD$(I):G$GD$(I):.YA$AE$(I):BBE(I):CCE(I):DDE(I):EEE(I):F$FE$(I):G$GE$(I):.ZA$AF$(I):BBF(I):CCF(I):DDF(I):EEF(I):F$FF$(I):G$GF$(I):1/[A$AG$(I):BBG(I):CCG(I):DDG(I):EEG(I):F$FG$(I):G$GG$(I):u/\A$AH$(I):BBH(I):CCH(I):DDH(I):EEH(I):F$FH$(I):G$GH$(I):/]A$AI$(I):BBI(I):CCI(I):DDI(I):EEI(I):F$FI$(I):G$GI$(I):/^A$AJ$(I):BBJ(I):CCJ(I):DDJ(I):EEJ(I):F$FJ$(I):G$GJ$(I):70rZG8001,8002,8003,8004,8005,8006,8007,8008,8009,8010=0ww0|ZG8021,8022,8023,8024,8025,8026,8027,8028,8029,8030}00'#:0(#:Y(222):X(218)(219)2560-#Y6X5090200.#Y6X1603160500#Y254X80X85X10013012#:Y:X:1<#"Your name? ";NAME$1F#:"Your food storage database is empty so you will need to create new catagories, and then add items to the database. (menu options 1 and 2)"1H#"PRESS ANY KEY....";:O$1K#H(CO)0:1301': 2'12:28:"Food Storage Manager 3.0"H2':31:"Copyright (c) 1996":39:"by":35:"Rob Allred"Y2$'I11000:Ie28':::k2B'Rob Allred 8 5 8 21 22 3 8 FRUITS AND VEGETABLES GRAINS PROTIENS AND FATS DAIRY PRODUCTS SUGARS AND SWEETENERS CREAM CORN - 15 OZ 16 50 12 .55 | 1 - 1 | CREAM CORN - 15 OZ | 16 | 50 | 12 |$ .55 | | 1 - 1 | CREAM CORN - 15 OZ | 16 | 50 | 34 |$ .55 | GREEN BEANS - 15 OZ 0 100 12 .55 | 1 - 2 | GREEN BEANS - 15 OZ | 0 | 100 | 12 |$ .55 | | 1 - 2 | GREEN BEANS - 15 OZ | 0 | 100 | 100 |$ .55 | CORN - 15.25 OZ @BCDEFGHIJKLMNOPQRSTUVWX0 100 12 .33 | 1 - 3 | CORN - 15.25 OZ | 0 | 100 | 12 |$ .33 | | 1 - 3 | CORN - 15.25 OZ | 0 | 100 | 100 |$ .33 | MUSHROOMS - 6.5 OZ 3 25 12 .25 | 1 - 4 | MUSHROOMS - 6.5 OZ | 3 | 25 | 12 |$ .25 | | 1 - 4 | MUSHROOMS - 6.5 OZ | 3 | 25 | 22 |$ .25 | PINEAPPLE - 20 OZ 44 100 12 .5 | 1 - 5 | PINEAPPLE - 20 OZ | 44 | 100 | 12 |$ .50 | | 1 - 5 | PINEAPPLE - 20 OZ | 44 | 100 | 56 |$ .50 | PEAR HALVES - 16 OZ 48 100 12 .33 | 1 - 6 | PEAR HALVES - 16 OZ | 48 | 100 | 12 |$ .33 | | 1 - 6 | PEAR HALVES - 16 OZ | 48 | 100 | 52 |$ .33 | FRUIT COCKTAIL - 16 OZ 20 100 12 .33 | 1 - 7 | FRUIT COCKTAIL - 16 OZ | 20 | 100 | 12 |$ .33 | | 1 - 7 | FRUIT COCKTAIL - 16 OZ | 20 | 100 | 80 |$ .33 | SLICED PEACHES - 16 OZ 0 100 112 .58 | 1 - 8 | SLICED PEACHES - 16 OZ | 0 | 100 | 112 |$ .58 | | 1 - 8 | SLICED PEACHES - 16 OZ | 0 | 100 | 100 |$ .58 | GERMADE - BUCKET 1 5 999 5.67 | 2 - 1 | GERMADE - BUCKET | 1 | 5 | 999 |$ 5.67 | | 2 - 1 | GERMADE - BUCKET | 1 | 5 | 4 |$ 5.67 | MILLET - BUCKET 0 2 999 3.45 | 2 - 2 | MILLET - BUCKET | 0 | 2 | 999 |$ 3.45 | | 2 - 2 | MILLET - BUCKET | 0 | 2 | 2 |$ 3.45 | ROLLED WHEAT - BUCKET 2 5 999 5.68 | 2 - 3 | ROLLED WHEAT - BUCKET | 2 | 5 | 999 |$ 5.68 | | 2 - 3 | ROLLED WHEAT - BUCKET | 2 | 5 | 3 |$ 5.68 | PASTRY FLOUR - 50 LB 0 5 24 5 | 2 - 4 | PASTRY FLOUR - 50 LB | 0 | 5 | 24 |$ 5.00 | | 2 - 4 | PASTRY FLOUR - 50 LB | 0 | 5 | 5 |$ 5.00 | ROLLED OATS - 50 LB 0 5 24 5.69 | 2 - 5 | ROLLED OATS - 50 LB | 0 | 5 | 24 |$ 5.69 | | 2 - 5 | ROLLED OATS - 50 LB | 0 | 5 | 5 |$ 5.69 | CORNMEAL - BUCKET 1 5 999 4.75 | 2 - 6 | CORNMEAL - BUCKET | 1 | 5 | 999 |$ 4.75 | | 2 - 6 | CORNMEAL - BUCKET | 1 | 5 | 4 |$ 4.75 | SHELLS - 1 LB 3 25 24 1.69 | 2 - 7 | SHELLS - 1 LB | 3 | 25 | 24 |$ 1.69 | | 2 - 7 | SHELLS - 1 LB | 3 | 25 | 22 |$ 1.69 | SPAGHETTI - 3 LB 7 50 24 2.57 | 2 - 8 | SPAGHETTI - 3 LB | 7 | 50 | 24 |$ 2.57 | | 2 - 8 | SPAGHETTI - 3 LB | 7 | 50 | 43 |$ 2.57 | EGG NOODLES - 12 OZ 2 25 24 1.26 | 2 - 9 | EGG NOODLES - 12 OZ | 2 | 25 | 24 |$ 1.26 | | 2 - 9 | EGG NOODLES - 12 OZ | 2 | 25 | 23 |$ 1.26 | SALAD MACARONI - 22 OZ 2 25 24 2.35 | 2 - 10 | SALAD MACARONI - 22 OZ | 2 | 25 | 24 |$ 2.35 | | 2 - 10 | SALAD MACARONI - 22 OZ | 2 | 25 | 23 |$ 2.35 | TACO SHELLS 4 25 24 2.35 | 2 - 11 | TACO SHELLS | 4 | 25 | 24 |$ 2.35 | | 2 - 11 | TACO SHELLS | 4 | 25 | 21 |$ 2.35 | RIGATONI - 8 OZ 3 0 24 2.35 | 2 - 12 | RIGATONI - 8 OZ | 3 | 0 | 24 |$ 2.35 | | 2 - 12 | RIGATONI - 8 OZ | 3 | 0 | -3 |$ 2.35 | ABC MACARONI - 5 LB 3 10 24 2.56 | 2 - 13 | ABC MACARONI - 5 LB | 3 | 10 | 24 |$ 2.56 | | 2 - 13 | ABC MACARONI - 5 LB | 3 | 10 | 7 |$ 2.56 | SPIRALS - 16 OZ 7 50 24 1.56 | 2 - 14 | SPIRALS - 16 OZ | 7 | 50 | 24 |$ 1.56 | | 2 - 14 | SPIRALS - 16 OZ | 7 | 50 | 43 |$ 1.56 | BREAD FLOUR - 50 LB 1 5 24 5.78 | 2 - 15 | BREAD FLOUR - 50 LB | 1 | 5 | 24 |$ 5.78 | | 2 - 15 | BREAD FLOUR - 50 LB | 1 | 5 | 4 |$ 5.78 | HIGH GLUTEN FLOUR - 50 LB 0 5 24 5.67 | 2 - 16 | HIGH GLUTEN FLOUR - 50 LB | 0 | 5 | 24 |$ 5.67 | | 2 - 16 | HIGH GLUTEN FLOUR - 50 LB | 0 | 5 | 5 |$ 5.67 | RICE - 25 LB 5 10 24 2.45 | 2 - 17 | RICE - 25 LB | 5 | 10 | 24 |$ 2.45 | | 2 - 17 | RICE - 25 LB | 5 | 10 | 5 |$ 2.45 | WHEAT - BUCKET 2 100 999 7.89 | 2 - 18 | WHEAT - BUCKET | 2 | 100 | 999 |$ 7.89 | | 2 - 18 | WHEAT - BUCKET | 2 | 100 | 98 |$ 7.89 | RYE - 1 GAL 0 5 999 2.35 | 2 - 19 | RYE - 1 GAL | 0 | 5 | 999 |$ 2.35 | | 2 - 19 | RYE - 1 GAL | 0 | 5 | 5 |$ 2.35 | ALFALFA SEEDS - 1 LB 1 2 999 2.34 | 2 - 20 | ALFALFA SEEDS - 1 LB | 1 | 2 | 999 |$ 2.34 | | 2 - 20 | ALFALFA SEEDS - 1 LB | 1 | 2 | 1 |$ 2.34 | SUNFLOWER SEEDS - 1 LB 1 5 999 1.25 | 2 - 21 | SUNFLOWER SEEDS - 1 LB | 1 | 5 | 999 |$ 1.25 | | 2 - 21 | SUNFLOWER SEEDS - 1 LB | 1 | 5 | 4 |$ 1.25 | BUTTER SHORTENING - 3 LB 2 25 24 2.59 | 3 - 1 | BUTTER SHORTENING - 3 LB | 2 | 25 | 24 |$ 2.59 | | 3 - 1 | BUTTER SHORTENING - 3 LB | 2 | 25 | 23 |$ 2.59 | LENTILS - 38 LB 2 5 12 1.89 | 3 - 2 | LENTILS - 38 LB | 2 | 5 | 12 |$ 1.89 | | 3 - 2 | LENTILS - 38 LB | 2 | 5 | 3 |$ 1.89 | PINTO BEANS - BUCKET 3 10 24 5.45 | 3 - 3 | PINTO BEANS - BUCKET | 3 | 10 | 24 |$ 5.45 | | 3 - 3 | PINTO BEANS - BUCKET | 3 | 10 | 7 |$ 5.45 | BLACK BEANS - BUCKET 1 5 999 3.45 | 3 - 4 | BLACK BEANS - BUCKET | 1 | 5 | 999 |$ 3.45 | | 3 - 4 | BLACK BEANS - BUCKET | 1 | 5 | 4 |$ 3.45 | BUTTER POWDER - 2.75 LB 2 0 999 12 | 3 - 5 | BUTTER POWDER - 2.75 LB | 2 | 0 | 999 |$12.00 | | 3 - 5 | BUTTER POWDER - 2.75 LB | 2 | 0 | -2 |$12.00 | SHORTENING - 3 LB 12 25 24 5.89 | 3 - 6 | SHORTENING - 3 LB | 12 | 25 | 24 |$ 5.89 | | 3 - 6 | SHORTENING - 3 LB | 12 | 25 | 13 |$ 5.89 | MAYONNAISE - 32 OZ 1 10 999 1.58 | 3 - 7 | MAYONNAISE - 32 OZ | 1 | 10 | 999 |$ 1.58 | | 3 - 7 | MAYONNAISE - 32 OZ | 1 | 10 | 9 |$ 1.58 | KETCHUP 0 1 999 1.26 | 3 - 8 | KETCHUP | 0 | 1 | 999 |$ 1.26 | | 3 - 8 | KETCHUP | 0 | 1 | 1 |$ 1.26 | MUSTARD 0 2 999 1.35 | 3 - 9 | MUSTARD | 0 | 2 | 999 |$ 1.35 | | 3 - 9 | MUSTARD | 0 | 2 | 2 |$ 1.35 | COCONUT - 14 OZ 4 10 24 5.89 | 3 - 10 | COCONUT - 14 OZ | 4 | 10 | 24 |$ 5.89 | | 3 - 10 | COCONUT - 14 OZ | 4 | 10 | 6 |$ 5.89 | SALAD DRESSING 0 25 24 1.13 | 3 - 11 | SALAD DRESSING | 0 | 25 | 24 |$ 1.13 | | 3 - 11 | SALAD DRESSING | 0 | 25 | 25 |$ 1.13 | CORN OIL - 48 OZ 0 100 999 2.23 | 3 - 12 | CORN OIL - 48 OZ | 0 | 100 | 999 |$ 2.23 | | 3 - 12 | CORN OIL - 48 OZ | 0 | 100 | 100 |$ 2.23 | PEANUT BUTTER - 5 LB 1 10 24 5.16 | 3 - 13 | PEANUT BUTTER - 5 LB | 1 | 10 | 24 |$ 5.16 | | 3 - 13 | PEANUT BUTTER - 5 LB | 1 | 10 | 9 |$ 5.16 | TINY SHRIMP - 4.5 OZ 0 25 999 2.45 | 3 - 14 | TINY SHRIMP - 4.5 OZ | 0 | 25 | 999 |$ 2.45 | | 3 - 14 | TINY SHRIMP - 4.5 OZ | 0 | 25 | 25 |$ 2.45 | VEINNA SAUSAGE 3 25 999 1.12 | 3 - 15 | VEINNA SAUSAGE | 3 | 25 | 999 |$ 1.12 | | 3 - 15 | VEINNA SAUSAGE | 3 | 25 | 22 |$ 1.12 | MACARONI AND CHEESE - 7.25 OZ 6 50 12 1.36 | 3 - 16 | MACARONI AND CHEESE - 7.25 OZ | 6 | 50 | 12 |$ 1.36 | | 3 - 16 | MACARONI AND CHEESE - 7.25 OZ | 6 | 50 | 44 |$ 1.36 | PINTO BEANS - 25 LB 2 0 999 2.45 | 3 - 17 | PINTO BEANS - 25 LB | 2 | 0 | 999 |$ 2.45 | | 3 - 17 | PINTO BEANS - 25 LB | 2 | 0 | -2 |$ 2.45 | LENTILS - 15 LB 1 5 999 5.36 | 3 - 18 | LENTILS - 15 LB | 1 | 5 | 999 |$ 5.36 | | 3 - 18 | LENTILS - 15 LB | 1 | 5 | 4 |$ 5.36 | SLICED BACON - 16 OZ 12 100 999 1.5 | 3 - 19 | SLICED BACON - 16 OZ | 12 | 100 | 999 |$ 1.50 | | 3 - 19 | SLICED BACON - 16 OZ | 12 | 100 | 88 |$ 1.50 | PISTACHIOS - 12 OZ 1 10 24 2.33 | 3 - 20 | PISTACHIOS - 12 OZ | 1 | 10 | 24 |$ 2.33 | | 3 - 20 | PISTACHIOS - 12 OZ | 1 | 10 | 9 |$ 2.33 | PORK AND BEANS - 11 OZ 6 50 999 .89 | 3 - 21 | PORK AND BEANS - 11 OZ | 6 | 50 | 999 |$ .89 | | 3 - 21 | PORK AND BEANS - 11 OZ | 6 | 50 | 44 |$ .89 | CHILI - 15 OZ 0 50 999 1.25 | 3 - 22 | CHILI - 15 OZ | 0 | 50 | 999 |$ 1.25 | | 3 - 22 | CHILI - 15 OZ | 0 | 50 | 50 |$ 1.25 | EVAPORATED MILK - 12 OZ 7 25 999 .55 | 4 - 1 | EVAPORATED MILK - 12 OZ | 7 | 25 | 999 |$ .55 | | 4 - 1 | EVAPORATED MILK - 12 OZ | 7 | 25 | 18 |$ .55 | CONDENSED MILK - 14 OZ 3 50 999 .75 | 4 - 2 | CONDENSED MILK - 14 OZ | 3 | 50 | 999 |$ .75 | | 4 - 2 | CONDENSED MILK - 14 OZ | 3 | 50 | 47 |$ .75 | NONINSTANT MILK - BUCKET 2 5 999 5.69 | 4 - 3 | NONINSTANT MILK - BUCKET | 2 | 5 | 999 |$ 5.69 | | 4 - 3 | NONINSTANT MILK - BUCKET | 2 | 5 | 3 |$ 5.69 | POWDERED SUGAR - 2 LB 5 25 24 1.5 | 5 - 1 | POWDERED SUGAR - 2 LB | 5 | 25 | 24 |$ 1.50 | | 5 - 1 | POWDERED SUGAR - 2 LB | 5 | 25 | 20 |$ 1.50 | HONEY - 5 LB 2 50 999 2.33 | 5 - 2 | HONEY - 5 LB | 2 | 50 | 999 |$ 2.33 | | 5 - 2 | HONEY - 5 LB | 2 | 50 | 48 |$ 2.33 | BROWN SUGAR - 2 LB 15 25 24 1.25 | 5 - 3 | BROWN SUGAR - 2 LB | 15 | 25 | 24 |$ 1.25 | | 5 - 3 | BROWN SUGAR - 2 LB | 15 | 25 | 10 |$ 1.25 | JELLO - 3 OZ 17 50 999 .33 | 5 - 4 | JELLO - 3 OZ | 17 | 50 | 999 |$ .33 | | 5 - 4 | JELLO - 3 OZ | 17 | 50 | 33 |$ .33 | JELLO - 6 OZ 4 50 999 .35 | 5 - 5 | JELLO - 6 OZ | 4 | 50 | 999 |$ .35 | | 5 - 5 | JELLO - 6 OZ | 4 | 50 | 46 |$ .35 | JELLO (SUGAR FREE) - .35 OZ 18 25 999 .33 | 5 - 6 | JELLO (SUGAR FREE) - .35 OZ | 18 | 25 | 999 |$ .33 | | 5 - 6 | JELLO (SUGAR FREE) - .35 OZ | 18 | 25 | 7 |$ .33 | JELLO (SUGAR FREE) - .6 OZ 1 25 999 .35 | 5 - 7 | JELLO (SUGAR FREE) - .6 OZ | 1 | 25 | 999 |$ .35 | | 5 - 7 | JELLO (SUGAR FREE) - .6 OZ | 1 | 25 | 24 |$ .35 | SUGAR - 25 LB 1 50 999 1.25 | 5 - 8 | SUGAR - 25 LB | 1 | 50 | 999 |$ 1.25 | | 5 - 8 | SUGAR - 25 LB | 1 | 50 | 49 |$ 1.25 | 6/4/96 FSM 3.0 A Food Storage Manager for the Apple II Copyright (c) 1996 by Rob Allred [see the last page of this document for warranties and other notices.] THIS VERSION OF FSM IS NOT COMPATABLE WITH EARLIER VERSIONS. FSM 3.0 is shareware. Please copy FSM and give it to everyone you know. To use FSM 3.0 after a ten day trial period you must send $15.00 (U.S. fuY[\]^_`abcdefgnds) to the address below. This will entitle you to technical support, and you will be notified of future updates. Please send a description of your hardware, and tell me if you need 5.25" or 3.5" disks. Rob Allred 5596 W. 10400 North Highland, Utah 84003 PLEASE distribute FSM widley. Permission is given for FSM to be uploaded to BBS etc. It may be included in user group libraries as long as no fee is charged for any disk containing FSM, unless special arrangements are made with the author. Comments and suggestions are welcome and encouraged. Please send all comments, and suggestions to the above address. Feel free to send suggested modifications to me, BUT do NOT distribute modified versions of FSM! It is possible that your suggestions may be used in a future version of FSM. HARDWARE REQUIREMENTS-- Any Apple II with an 80-column card SHOULD be able to run FSM. The program was written on an unenhanced 128k Apple //e. I have no idea what kind of memory requirements there are. During development I did have to make changes because I was getting "OUT OF MEMORY" errors (this is what the ten day trial period is for.) You will need an 80-column card, at least one disk drive, and a printer. I have only tested FSM on the SMARTERM ][ and Apple cards. It does not work well with the first. The print codes I use are for the C.Itoh 8510 (or ImageWriter line) and the Grappler+ printer interface. If the forms don't seem quite right then you will need to change the print codes in the print routines. I wrote FSM under ProDOS 8, it should work under DOS 3.3 as well but I do not have a utility to copy from ProDOS to DOS 3.3 (and I do not want to mess with the tape drive) so I don't know yet--let me know anyone. Apple II Disk drive Printer 80-column card Note: There are older versions of FSM (v1.1b and v2.0) available if FSM 3.0 doesn't work on your computer. They are in the Freeware, but have not been released yet. (They use a different file format for the database than 3.0 so I never released them.) If you would like to see if one of the earlier versions will work on your computer send me a disk to the address above. (v1.1b and v2.0 use less memory -I think- and will be easier to modify to fit your computer.) Recommended Setup-- Format a new disk to ProDOS. Copy Prodos.System and Basic.System to the disk. Create a subdirectory /food.storage. Copy the files in this archive to /your.disk/food.storage. Go to basic. Type NEW. Enter the following program: 10 PRINT CHR$ (4) "PREFIX /YOUR.DISK/FOOD.STORAGE" 20 PRINT CHR$ (4) "-FSM.3" Type PREFIX /your.disk. Type SAVE STARTUP. Now all you need to do to start FSM is put the disk in the drive and boot it. Using FSM 3.0 FSM is very simple to use. The program is menu driven. Simple type the appropriate number to select the option you want to use. If you wish to return to the main menu at any time just press RETURN with out typing anything else. Whenever you are asked for a catagory number or item number you may type HELP or help to get some help with what the numbers represent. Although FSM recognises both uper and lower case responces the help routines are case sensitive. The print routines may be directed to the screen or to the printer. To use FSM follow the following steps. I.Using FSM. A. Take an inventory of your food storage. 1. Write down the name of the item. 2. Write down the size of the item. 3. Write down how many you have. 4. Write down an approximate shelf life (use 999 of indef). 5. Write down a reorder point for the item. 6. Write down an approximate price for the item. B. Put each item into one of ten catagories. 1. Create ten catagory names. 2. Write the name of each item under the name of the correct catagory. C. Enter the data. 1. Start FSM 3.0. 2. Enter your name. 3. Select option one. 4. Type 'A'. 5. Enter your a catagory name. 6. Type 'Y'. 7. Select option two. 8. Select correct catagory. 9. Enter correct data. 10. Enter the rest of the items in this catagory. 11. Repeat for the rest of the ten catagories. D. Begin using FSM. 1. Print out a checkout form. 2. Put form in food storage room (or handy place). 3. when you take something out fill out a line for it. 4. When the sheet is full subtract the used food from the datbase using menu option six. 5. Periodicaly print out a shopping list and go shopping. 6. On occasion print out an inventory list and make sure the database is correct. a. You may use the tally sheet to take inventory. 7. Use the Item number only list to print out labels for your shelves. Notes-- FSM is has a total capacity of 250 items (10 catagories 25 items in each catagory) if you try to add more than 25 item to the catagory the program may crash. (I will fix it in the next version--not now so be careful!) FSM 3.0 is written entirely in Basic 1.1 so it is very easy to modify, debug, etc. Just remember DO NOT distribute modified versions of FSM. The error handling routine handles most errors well. There are a few it doesn't handle at all. In this case the program ends and the error code and the line the error occured in are printed at the top of the screen. The data in memory is safe until you type RUN, LIST (I think?), a number (such as a line number), or RESET (again, I think?). If for some reason the program crashes you can get back in without losing any data (except maybe the last item number you entered) by typing GOTO 130. If the program crashes while trying to save (especially if it prints an error code of 9, 13, or 6) then set the prefix to another disk type GOTO 130 and try to save again. REMEMBER ALWAYS SAVE OFTEN AND CREATE BACKUPS OF ALL IMPORTANT DATA. The program SHOULDN'T crash. I have not had it crash since I began using it, but if any one encounters any problems let me know. WARRANTY-- The author warrants that FSM 3.0 may be useful to some people in some situations, but not neccesarily you. The author uses FSM 3.0 all the time and is reasonable sure that it won't do anything destructive to your data. BUT he DOES keep backups of all important data and recomends that you do to. ROB ALLRED SHALL HAVE NO LIABILITY OR RESPONCIBILITY TO THE PURCHASER OR ANY OTHER PERSON OR ENTITY WITH RESPECT TO ANY LIABILITY, LOSS OR DAMAGE CAUSED OR ALLEGED TO BE CAUSED DIRECTLY OR INDIRECTLY BY FSM. The FSM3.SHK file form the Usenet post had CRC errors preventing the extraction of the FSM.3 basic program. A working post is located at https://macgui.com/usenet/?group=105&id=2878 I recreated the Shrinkit archive with the folloiwng files I could extract from the corrupt archive DATA.LST README.V3 As the two posts were only a few days apart I am assuming the FSM.3 program is the same. -- Greg LG ASTARTUP$#   / XXύX?klmnÍoL) "6L'?"( L:0`6708" = ***)<JJH !h穖tp% ;"Z/݀>">"' 1" 7"5).莀/ ;" " 6" >" 1"6"$ "g"" !"""""IջLiklmnopqrstuvwxyz{|}YL 8!9 詍` "  4"/pӠàӠΠŠ۫ӠàԠŠH06172839h` z97L75v^e ?/( ze?L[LLɍ$?`?e ɍɥAH93827160hH46576879h`,C fL ɍ f ,S0 @ pLޭBDEF޾ p  ޾ p($ذ z (0 k( L?ԦʚLeةީe s  pL f,FLk,DL,C0$3 >@ Ɉ 3ɾꩈL(3ɾ;Ƀ kB94 l% fʽ  ՚,S` H $݅3`(l8L3LX>(Ƀ,`3,G0]ɾ g` H`پ_پ p _پ׾`>( p۾m׾) W)ʩ@`ɾ>(O puȾ ɾ-O ͱc־JjjjZ[ (`O>0O z POپھ p WH־Ǿh۰8L־JjjjZ[ɾ)Ⱦ8 AOLӜ ҤLLX>(F`־ؾپھ׾` fɄ KDEF zLp z pL[ fKɍKL?`  zLp@3 @LtJ)s@J f 򟰸 p`H? hth?,E30ɍФ3 E3HD F3 Ʉ%h3 fM E  pLthɍLL3`3,A0s0% Ipn HpnI:L ؅303Lm8n933LҞAAJL ةޘг uv $ 8LʞeЌ>?@`>?@`Ba8` K  LK ֟ ֟  KK`JJJJ8`轶K)` #hhLJپھ pHJh` H!h߻g޻tػٻpứ `޻ٻtػp߻8nٻniػtpiٻٻtụs໅o8ễpڻiۻniݻi>j?kܻڻ߻>ٻ׻pڻ׻Ii׻׻߻߻ڻ l 1ڻۻ `>i>?Ek?!>Q>>>ڻۻ `` `>ڻ ۻ `e>>?ܻ?ܻ>?Emn(>e>ܻȱ>e?>Q>ؠ> ie>>?`׻;ػ=:<ٻ:<=;`׻׻mػ;>:8o>oȑ>ppȑ>> :oݻp` HKpn͵ @p;=po:i>?Ek?>Q>> L>ܻ `/ e>>?ܻ?ޱ>ȥj>>m⻑>` !im8i仍nj廍ki滥lj绥oS ST$I2 U)VJ :T)`l8`a HbIJhjǾȾɾ p٭b=a<I/q)im@^ʈ0 L/S 51-m@ʈ0 L٨/` E չ5TLG-T VV H$ZA@Lĩ8 `߹-U -W b WW)JJ HT$K j0IDK H H5K 0.)K H  XK`LGLl  HK m Y ܩ8jK` X,, ( 5 ` X,  `  X, `)a)_`0:8 `)H " H 媢h} I hm   8`0 :AG8 `) 媰 ` . . `SI-SRR¸)RʈS UT`RSSS8L `yGLɳ 8`H b kXklmno YhjWVL58 L tֻʆt "ֻtl e DޭVJ P eօ L s򩣍eS3 zLG # e $L? b 4 kimljn`  pg׾mȾXhؾmɾYtѮȾɾ YX`8g Ie f`8` P־ǾҾ,G0C ж=W)_`ZV"׾پӾؾھ pD`Y׾ؾOW)Ⱦɾʾ pD`8`W)CB) 5W) )W)@! pZ}ȾȾ󰹩 p` ־ǾҾ,G 8`׾ؾ ж p ධۥs׾tؾE` ( о(־Ǿ,G 8`_`W)H־JjjjhZ[ p̭ зLKǾ  . .8   ۭ (8 mȾȾmɾɾʾiʾ` Lpl8l:/0sНsƬƀ#(ZZV4G_0=( A P FjL\5p-e9ABSAVERIFYBLOADELETEBYECATALOGOPENWRITEXECREATEFRESTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPEND Hѫ5 FڬB :hQ|Q@@ -!S    !C- !ABELSDFRV@@ !$(19@EӱüϠž(+@ABCDEFGHIKLMNPSV     T[fouu~ՠٯ* PWN*]ĿNTz @n6VC/+A>@I5gN Oz @n[Dz @nd0,~z @`$仫@v$⩔,C[B?I>孓`仫6VtCicQĿUKqtVt Nʮq$6,⨁ K6, VtI=v!gNVt Vt  lg~Tһ   LiLMTRLLLLL[^)o `\o8` ԠŬLL