@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED411 FREE SECTORS COPYING---D2:DIET2.DOCl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 165ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u05  15 2 2151^116115ύ011$r2ԭ5 3)5)5ԭx GT}@@L00)+& 2 L0=ɛ -L!1LV1L1 /3 3ȹ441L-4 v3 25 2H 2h͔5U}L3L3 2 k3U hh`DOC`QL3P1Lk0S1H /3h0B k3@ VL0LU!#$53 1181118V}1111Ε5 1Lk0552 1Ȍ1i111i11115Lk0pppB4f5&&&&&&&&^6f^6&&&&&W}&&A1@BJ D2ELVK@BHILV^Щ6 2BD2EJ VBD5EHI0 V0%5X}5 2iХiL[2 25 25`D:*.*` i@`8 ``@i `8@`0 BLV525<4Y}5`HH i ԍΗ552 ԍhh@ Lح1Э1Ѣ 24.4 24Z}4`D4E` 2BJ k3LVRH` 2BD4EhK)I JLV333 BASIC languag i}e OBJ > MACHINE language DOC > DOCumentation PIC|MIC|FNT|MVM > Graphics AMS|MUS|MBD > Music LST j} > BASIC LISTing -Some MACHINE language programs can only be run by booting the disk MENU "without" BASIC! -For s k}ome programs, XL/XE models may require a "TRANSLATOR" program to be booted first! [Also available from BELLCOM] - l}Most programs are relatively self-explanatory; however, some have separate DOCumentation files available. Some BASIC m} programs may contain instructions in their program listings. -To use this great MENU program on your own disks, n}simply copy the file "AUTORUN.SYS" onto your disk. * MENU written by DAVID CASTELL * program on your own disks, ^ IMPORTANT _________________________________ p} PLEASE READ THE DOCUMENTATION FILES ON SIDE 1 OF THIS DISKETTE BEFORE YOU ACCESS ANY OF THESE q} PROGRAM FILES! DETAILED INSTRUCTIONS ARE GIVEN IN ORDER TO r}PREPARE 2 WORK DISKS. _________________________________ IONS ARE GIVEN IN ORDER TO ^EiͩkΩ͙kCop j`j {j`Hi͝Νh`t}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`AOPITEMSSBB@@+@%@'-@H(@v}----NOW LOADING----S(@^(@i(@t(@(@(@(@(@ w} CALORIE(@ ANDe#(@ NUTRITION GUIDE.(@9(@D(@O(@Z(@x}e(@*(@ (C) 1983*(@(@ V & L!!(@ ENTERPRISES %y} D:CNG.SAVD:TITLE (C) 1983*(@(@ V & L!!(@ ENTERPRISES %NOQSbSSERCALFPRCARATHRIBCSOCAPOTPHOIRNIWXFOODNUTRIENTTCATTPTCATTTTRITTSTCTPOTPHTITN{}UPUCUPHUIUUTURIUNUITENOTSESCASSCASXSTXTSRIXRISXSSSCXCSPOSPHXPHSIXISNXNSPXPSSBBDAYMO|}NTHDAYNUMBERNAMELASOPITEMITEMOPEZIBLKKLKAGHEIGHWEIGHSEXVPREGYPH0CAJDN }} ~} !"}#$%&'()*+,-./01}23456789:;<=>?@A}BCDEFGH@I@JKLMNOPQ}RSTUVWXY[\]^_`a}acdefgh m6-6-C9A<,9A<@,c}@@K:m AP] +6-F:@,(!A'66-&A(B@NB7t]( }hh;@,;@,;@,;@,;@,;@,;@,;@,;@,~~;@},;@,;@,;@,;@,;@,;@,;@,;@ ,;@,;@,d&;@},;@,;@8,@0@@ @Z0@@ @d Apy A6-@E%6-A}16-A=6-@I6-APU6-@Pa6-@pm6-@ y6-@`@,($ } @"@p%"@E@%@(%"@#@%@A70@@ @}70@@ @FU (}U(GTo exit your current option, enter 0 for the item number or selection.PQ( } 7( OPTIONSQ( Za( SINGLE ITEMS:( MULTIPLE ITEMS AND SERVINGS}a(" MULTIPLE ITEMS, SINGLE SERVINGS_5( NUTRIENT VALUES*( NEW USER5( ENDbX A0( Enter o}ption number: BA@dTAXq!!!@) @Ar"@Aps A}u4*("ENTRY MUST BE A NUMBER, 1 THRU 6.4 @vj B"@+6-F:@,7 A(E6-%A(Q@}]B7tg+jxN(&( Hard copy? (Y/N): 8A@dJANV37@}<@,0Y*7@<@,0NL(MUST ENTER Y OR N.V A $$7@<@,0YAp!!"@)"}@AP ApT( ( Enter name: $'(Q(% Enter day, month, day number:T( }5 (}5AAAA`Apg0@@@70@@@K( }g(} OPTION 1N A6($Enter item number and press RETURN. :N A A6)}(!ENTRY MUST BE A POSITIVE NUMBER.,(6 A! AU B! A I A(1( Enter next it}em. 5I A A7*("ENTRY MUST BE A POSITIVE NUMBER.-(7 A A` B}"@ >A4@8<,8<@,> A5 A@<2@}< A((@8<,8<@,22@Z (}}(ITEM  6( SERVING SIZE  9(Z7@<@,0YA> A3#3ITEM  >3 S}ERVING SIZE  3>:@',>:@(,#6-@ A# A%$$7@<@,4NA& }A' A A(y!(MAKE SURE PRINTER IS ON.5-@Au9 C BN@Y@d@}o@y A,]0@@@70@@@](! /5}"@+(} OPTION 25 A0(} OPTION 31N A6($Enter item number and press R}ETURN. :N A2 A36)(!ENTRY MUST BE A POSITIVE NUMBER.,(6 A4 AU(}5$$7}@<@,0YA6, A33,3   76363+ SERVING CALORI}E8 A9y!(MAKE SURE PRINTER IS ON.5-@Au9 C BN@Y@d@o@}y A:?-(% SERVING CALORIE5(#? A@E, A'(#, A'F A}0G3)(!ENTRY MUST BE A POSITIVE NUMBER.3 A%J A` BK@ (~~(L+@}*@'(~~~+(M#A( ~~~~#(T"A@V>A4@8<,}8<@,> AFX APZ<2@< Au^((@8<,}8<@,r22@w@A| ( 6-@ A }( ( HOW MANY% A% A A=)(!ENTRY MUST BE A POSITIVE NUMBER.3 B=} A(  A( $$7@<@,0YA%X 3#X3 >:@,} >:@',>:@, OE3% >:@',>:@,}O A%B 6.=:,6.=:,6.=:,'6.=:,06.=:,96.=:,B6.=:,C 6.=:,6.=:,6.=:,'6.=:,06.=:,}96.=:,C A $$7@<@,4NAE A*( (*( PRESS ANY KEY'A}@d'A F:Ad,"AUAG F:Ad,"@`AG F:Ad,"@9AG})@ @  /6-$A:,/6-P:@$%?P,'@$6-$A:,6-%'4-A(6-$A:,}6-%0 0-6-$A:,6-%4? 0-6-$A:,6-%?6-P:$A%?P,'A54-A$646}-'$A46-P:@$%?P,'@8 0-6-$A:,6-%94-A(:46-'$A46-P:@}$%?P,'@< 0-6-$A:,6-%=4-A@>46-'$A46-P:@$%?P,'@H} 0-6-$A:,6-%I4-ARJ46-'$A46-P:@$%?P,'@T 0-6-$A:,6-}%X 0-6-$A:,6-%Y4-A`Z46-'$A46-P:@$%?P,'@\ 0-6-$A:},6-%` 0-6-$A:,6-%a4-Ahb46-'$A46-P:@$%?P,'@d 0-6}-$A:,6-%e4-Arf46-'$A46-P:@$%?P,'@h 0-6-$A:,6-%i4}-Aj46-'$A46-P:@$%?P,'@p 0-6-$A:,6-%q4-Ar46-'$A}46-P:@$%?P,'@$6,($ TOTAL %RDA %SBI6 A 2 (}2($ } TOTAL %RDA %SBI))(! ++(#  (( CAL}ORIES ""@"(WATER  %(FAT  gr(CARBOHYDRATE  gr(SODIUM  mg(} POTASSIUM  mg9(!( PROTEIN  gr-!A96-AEE(P:+'8A<,,$A$@}%?P,'@6( CALCIUM  mg*!A66-AEE(P:+'8A<,,$A$@}%?P,'@9!( PHOSPHORUS  mg-!A96-AEE(P:+'8A<,,$A$@}%?P,'@3(IRON  mg'!A36-AEE(P:+'8A<,,$A$@%}?P,'@O ( VITAMIN A  iu768A<,-C!AO6-A( A((8A}<,6( THIAMIN  mg*!A66-AEE(P:+'8A<,,$A$@%?P,'}@9!( RIBOFLAVIN  mg-!A96-AEE(P:+'8A<,,$A$@%?P,}'@5(NIACIN  mg)!A56-AEE(P:+'8A<,,$A$@%?P,'@}8 ( VITAMIN C  mg,!A86-AEE(P:+'8A<,,$A$@%?P,'@}$J?3?34 TOTAL %RDA %SBIKH06.& H6}. LB383CALORIES>:@,>:@',>:@,B AEMM"@C3WATER>:@,}>:@',>:@, %M AEN@63FAT>:@,>:@',>:@, gr@ AEOI?3 CARBOHYDRATE>}:@,>:@',>:@, grI AEPC93SODIUM>:@,>:@',>:@, mgC AEQI<3} POTASSIUM>:@,>:@',>:@, mg?3I AERG=3PROTEIN>:@,>:@',>:@, }grG AESQQ3>:@',>:@,P:+'8A<,,$A%?P,'@TQ AEG3CALCIUM>:@},>:@',>:@, mgQ AEUQQ3>:@',>:@,P:+'8A<,,$A%?P,'@}VT AEJ3 PHOSPHORUS>:@,>:@',>:@, mgT AEWQQ3>:@',>:@,P:+}'8A<,,$A%?P,'@XN AED3IRON>:@,>:@',>:@, mgN AEY}QQ3>:@',>:@,P:+'8A<,,$A%?P,'@ZS AEI3 VITAMIN A>:@,>:@'},>:@, iuS AE[223>:@',>:@,8A<,\Q AEG3THIAMIN>:@,}>:@',>:@, mgQ AE]QQ3>:@',>:@,P:+'8A<,,$A%?P,'@}^T AEJ3 RIBOFLAVIN>:@,>:@',>:@, mgT AE_QQ3>:@',>:@,P:+'8A}<,,$A%?P,'@`P AEF3NIACIN>:@,>:@',>:@, mgP AEaQQ3}>:@',>:@,P:+'8A<,,$A%?P,'@bS AEI3 VITAMIN C>:@,>:@'},>:@, mgS AEcQQ3>:@',>:@,P:+'8A<,,$A%?P,'@d"@}Ae AEy2F:Ad,"@'()@2 @ ~$70@@@70@@}@K)(!} ,(H( OPTION 4K(e( FAT$( CARBOHYDRATE3(} SODIUME( POTASSIUMU( PROTEINe( CALCIUMg( PHOSPHORUS#( IRON5( VITAMIN AE( T}HIAMINX( RIBOFLAVINg( NIACIN( VITAMIN CT A(<(&Enter nutrient number & press RETURN. @}T A!! @)!@A AK7(/ENTRY MUST BE A POSITIVE NUMBER, 1 THRU 13.A }BK AQ A9(&Enter comparison value & press RETURN.=Q A A=)(!ENTRY }MUST BE A POSITIVE NUMBER.3 B= AW7@<@,0Y=(Scroll or block data? (S/B):AW0S*0B}A A((MUST ENTER S OR B.(( A"@6.FAT (gr)'"@'6.CARBOHYDRATE} (gr)!"@!6. SODIUM (mg)$"@$6.POTASSIUM (mg)""@"6. PROTEIN (gr)""@"}6. CALCIUM (mg)%"@%6.PHOSPHORUS (mg)"@6. IRON (mg)$"@ $6.VITAMIN A (iu)"}"@"6. THIAMIN (mg)%"@%6.RIBOFLAVIN (mg)!"@!6. NIACIN (mg)$"@$6.VIT}AMIN C (mg)"(}  Compared to "(67@<@,4Y& A3)3,36 A4 A7y!(MAKE} SURE PRINTER IS ON.5-@A%9 C BN@Y@d@o@y AbTT3 >:@}, Comparison value is >:@,>:@',>:@(,%6-6-% AU16-%@}0S'6-%@1 AB ACj"@(2( PRESS ANY KEY>6-K)@g(} } Compared to j( A` AE6-%@ A`UAU@.7@<@,4Y1(8(}UF:Ad,"@ApH A@A>@8<,8<@,H AH AR<2}@< A`2 A@2@8<,8<@,22@}-AU@)-@@- ooAAAAAA}AAAA A$A(A2: 0-(A:,0( : A A}DV7@<@,4Y,3  L3>:@',>:@,V AD A@: 0-(A:},0( : A  AD V7@<@,4Y,3  L3>:@',>:@,}V AD  A@ : 0-(A:,0( : A  ADV7@<@,4Y,3}  L3>:@',>:@,V AD A@: 0-(A:,0( : A} ADV7@<@,4Y,3  L3>:@',>:@,V AD A@: 0-}(A:,0( : A ADV7@<@,4Y,3  L3>:@',>:}@,V AD A@: 0-(A:,0( : A ADV7@<@},4Y,3  L3>:@',>:@,V AD A@: 0-(A:,0( }: A ADV7@<@,4Y,3  L3>:@',>:@,V AD A@ }: 0-(A:,0( : A! AD"V7@<@,4Y,3  L3>:}@',>:@,V AD# A@$: 0-(A:,0( : A% AD&V7@}<@,4Y,3  L3>:@',>:@,V AD' A@(: 0-(A:,0(} : A") AD*V7@<@,4Y,3  L3>:@',>:@,V AD+ } A@,: 0-(A:,0( : A&- AD.V7@<@,4Y,3  L}3>:@',>:@,V AD/ A@0: 0-(A:,0( : A01 AD}2V7@<@,4Y,3  L3>:@',>:@,V AD3 A@4: 0-(A:,}0( : A45 AD6V7@<@,4Y,3  L3>:@',>:@,V A}D7 A@<%"@E@%@=%"@#@%@>< B6-(<(} Enter 0 for menu.?##( Enter -1 to stay.@P AG-( Make selection. 1P")}"6@APC6)(! ENTRY MUST BE 0 OR -1.,(6 ADF! B!"@ H AbV-}@@ D:DATAFILE.1V@@ D:POINTER.1-@A AP @})68<,-%68<@,-) #@@# BV-@@ D:DATAFILE.2}V@@ D:POINTER.2-AA AP@@)68<,-%68<@},-) #@@# BV-@@ D:DATAFILE.3V@@ D:POINT}ER.3-AA APe@)68<,-%68<@,-) #@@# }B$|xA9@@ D:DATAFILE.2b@@ D:POINTER.2n6-@Ex }AU b-@@ D:DATAFILE.1V@@ D:POINTER.1b6-@#$p!!A}*AA` u!!A* AA` z!! A* AA`0!! A*AA`0}"@EA`U#@@# A`P"@#A`U@@b-@@} D:DATAFILE.1V@@ D:POINTER.1b6-@# A`Ub-@@ D:DATAF}ILE.2V@@ D:POINTER.2b6-@E 6-$X)@ @ ]^ ApP(/(WHAT }IS YOUR AGE IN YEARS3J68A<,-^ ApPgb ApT(3(WHAT IS YOUR WEIGHT IN POUNDS7N}68A<,-b ApTk((8A<, @Al&("(WHAT IS YOUR SEX (M/F)&nU3}7@<@,0M*7@<@,0FK(MUST ENTER M OR F.U Ap o$$7@<@,4MAp&("(}ARE YOU PREGNANT (Y/N)&rU37@<@,0Y*7@<@,0NK(MUST ENTER Y OR N.U Ap$s%(!(A}RE YOU NURSING (Y/N)%tU37@<@,0Y*7@<@,0NK(MUST ENTER Y OR N.U Ap'v A}=)(!ENTRY MUST BE A POSITIVE NUMBER.3 B= Ap=)(!ENTRY MUST BE A POSITIVE NUMBER.3 B= Ap@,  }8A<, ?P,6-AEG;8A<,?P*8A<, @G6-AJG;8A }<,@*8A<, @G6-AOG;8A<,@*8A<, @G6-A }TG;8A<,@*8A<, @G6-AY AQ;8A<,@*8A }<, @G6-AQ A A, 8A<, @e,6-A, 8A<,! }AV,6-AQ;8A<,@*8A<, @G6-AQ A A, 8A}<, @,6-A, 8A<,!Aw,6-AG;8A<,@*8A<}, @#G6-AG;8A<,@#*8A<, @QG6-A, 8A<,@Q},6-A A Q;8A<,@*8A<, @G6-AQ A A , }8A<, @a,6-A , 8A<,!AS,6-A Q;8A<,@*8A<}, @G6-AQ A A , 8A<, @,6-A , 8A<,!A`},6-A G;8A<,@*8A<, @#G6-A G;8A<,@#*8A}<, @QG6-A , 8A<,@Q,6-A(#b6-9@@ D:DATA}FILE.3b@@ D:POINTER.3-#((@8<,8<@,2#B @.6-}%@B"@A`A#68A<,-A:,768A<,-A:,Q68A<,-A:,k68A<},-A:,68A <,-A:,F#k68A<,-A:,768A<,-A:,Q68A<,-A:,k68A}<,-A:,G#P 8A<, ?PP68A<,-8A<,$@ H#k;8A<,?}P*8A<, @k68A<,-8A<,$@I#((8A<, @AJ#$$}7@<@,4MAK#I37@<@,4Y*7@<@,4Y?6-AI AP#27@<@},4Y(6-A2 AU#27@<@,4Y(6-A2 AZ# Ad#]068A<,-8A}<,%A:,]68A<,-8A<,%A:,i#]068A<,-8A<,%A:,]68A<},-8A<,%A:,l#0068A <,-8A <,%A:,n#]068A<,-8A<,%A:,}]68A<,-8A<,%A:,s#]068A<,-8A<,%A:,]68A<,-8A<},%A:,#@@# @ #{6-6-'6-36-?6-K6- }W6-c6-o6-{6-#36-6-'6-36-#r6-6-!}'6-36-?6-K6-W6-c6-o6-r$T${6-'@)6-$?0%$?"}x68A<,-P:+'8A <,,$A$@%?P,'@{$ D:CNG.SAV)6-$?0%$?h1 ? "}"5 DIM FOOD$(20),SER$(3),X$(4),CAL$(5),W$(5),F$(7),CAR$(7),SO$(7),POT$(7),PR$(7),CA$(7),PHO$(7)6 DIM TH$(7),RIB$(7),N!$}I$(7),C$(7),IR$(7),A$(7),SS(292,0),BB(292,1)10 TRAP 80:OPEN #2,8,0,"D:DATAFILE.1"20 OPEN #3,8,0,"D:POINTER.1"30 FOR N=1 TO!%} 29233 READ FOOD$,SER$,X$,CAL$,W$,F$,CAR$,SO$,POT$,PR$,CA$,PHO$,IR$,A$,TH$,RIB$,NI$,C$:NOTE #2,S,B35 PRINT #3;S;",";B36 PR!&}INT #2;FOOD$37 PRINT #2;SER$38 PRINT #2;X$39 PRINT #2;CAL$40 PRINT #2;W$41 PRINT #2;F$42 PRINT #2;CAR$43 PRINT #2;SO$!'}44 PRINT #2;POT$45 PRINT #2;PR$46 PRINT #2;CA$47 PRINT #2;PHO$48 PRINT #2;IR$49 PRINT #2;A$50 PRINT #2;TH$51 PRINT #2;!(}RIB$52 PRINT #2;NI$53 PRINT #2;C$75 NEXT N78 GOTO 10080 ? "CAN'T WRITE FILE TO DISKETTE."81 ? "CHECK DISK DRIVE OR DATA!)} STATEMENT."83 ? "MAKE CORRECTIONS AND RUN PROGRAM AGAIN"100 END 2001 DATA APRICOT NECTAR,.5,cp,71.5,84.6,.15,18.3,.001,18!*}9.5,.4,11.5,15,.25,1190,.015,.015,.25,42002 DATA CRANBERRY JUICE,.5,cp,82,83.2,.15,20.85,1.5,12.5,.15,6.5,4,.4,.001,.015,.01!+}5,.05,202003 DATA GRAPE DRINK,.5,cp,67.5,86,.001,17.25,1.5,44,.15,4,5,.15,-,.015,.015,.15,202004 DATA LEMONADE,.5,cp,53.5,8!,}8.5,.001,14.15,.5,20,.05,1,1.5,.05,5,.005,.01,.1,8.52005 DATA ORANGE-APRICOT JUICE,.5,cp,62.5,86.7,.1,15.8,.001,117,.35,6,10!-},.1,720,.025,.01,.25,-2006 DATA PEACH NECTAR,.5,cp,60,87.2,.001,15.45,1,97,.25,5,13.5,.25,535,.01,.025,.5,.0012007 DATA PEA!.}R NECTAR,.5,cp,65,86.2,.25,16.5,1.5,49,.4,4,6.5,.15,.001,.001,.025,.001,.0012008 DATA PINEAPPLE-GRAPEFRUIT,.5,cp,67.5,86,.05!/},17,.001,77.5,.25,6.5,6.5,.25,15,.025,.015,.15,-2009 DATA PINEAPPLE-ORANGE,.5,cp,67.5,86,.15,16.9,.001,87.5,.25,6.5,7.5,.25,!0}65,.025,.015,.15,-2010 DATA COLA,8,oz,96,90,0,24.8,-,-,0,-,-,-,0,0,0,0,02011 DATA COLA,12,oz,144,90,0,36.9,-,-,0,-,-,-,0,0,!1}0,0,02012 DATA FRUIT FLAVORED DRINK,8,oz,112,88,0,29.6,-,-,0,-,-,-,0,0,0,0,02013 DATA FRUIT FLAVORED DRINK,12,oz,171,88,0,4!2}4.6,-,-,0,-,-,-,0,0,0,0,02014 DATA GINGER ALE,8,oz,72,92,0,19.2,-,-,0,-,-,-,0,0,0,0,02015 DATA GINGER ALE,12,oz,113,92,0,29!3}.3,-,-,0,-,-,-,0,0,0,0,02016 DATA ROOT BEER,8,oz,104,89.5,0,25.6,-,-,0,-,-,-,0,0,0,0,02017 DATA ROOT BEER,12,oz,152,89.5,0,!4}38.9,-,-,0,-,-,-,0,0,0,0,02018 DATA BEER,8,oz,101,92.1,0,9.1,17,60,.7,12,72,.001,-,.01,.07,1.4,-2019 DATA BEER,12,oz,151,92!5}.1,0,13.7,25,90,1.1,18,108,.001,-,.01,.11,2.2,-2020 DATA LIQUOR 80 PROOF,1.5,oz,97,66.6,-,.001,.001,1,-,-,-,-,-,-,-,-,-202!6}1 DATA LIQUOR 86 PROOF,1.5,oz,105,64,-,.001,.001,1,-,-,-,-,-,-,-,-,-2022 DATA LIQUOR 90 PROOF,1.5,oz,110,62.1,-,.001,.001,!7}1,-,-,-,-,-,-,-,-,-2023 DATA LIQUOR 100 PROOF,1.5,oz,124,57.5,-,.001,.001,1,-,-,-,-,-,-,-,-,-2024 DATA TABLE WINE,3.5,oz,8!8}7,85.6,0,4.3,5,94,.1,9,10,.4,-,.001,.01,.1,-2025 DATA DESSERT WINE,3.5,oz,141,76.7,0,7.9,4,77,.1,8,-,-,-,.01,.02,.2,-2026 D!9}ATA CRACKED WHEAT BREAD,1,sl,66,34.9,.6,13,132,34,2.2,22,32,.3,.001,.03,.02,.3,.0012027 DATA RAISIN BREAD,1,sl,66,35.3,.7,13!:}.4,91,58,1.7,18,22,.3,.001,.01,.02,.2,.0012028 DATA AMERICAN RYE BREAD,1,sl,61,35.5,.3,13,139,36,2.3,19,37,.4,0,.05,.02,.4,0!;}2029 DATA WHITE BREAD-REG SL,1,sl,68,35.6,.8,12.6,127,26,2.2,21,24,.6,.001,.06,.05,.6,.0012030 DATA WHITE BREAD-THIN SL,1,s!<}l,54,35.6,.6,10.1,101,21,1.7,17,19,.5,.001,.05,.04,.5,.0012031 DATA WHITE BREAD-FIRM,1,sl,63,35,.9,11.5,114,28,2.1,22,23,.6,!=}.001,.06,.05,.6,.0012032 DATA WHOLE WHEAT BRD-SOFT,1,sl,67,36.4,.7,13.8,148,72,2.6,24,71,.8,.001,.09,.03,.8,.0012033 DATA W!>}HOLE WHEAT BRD-FIRM,1,sl,61,36.4,.8,11.9,132,68,2.6,25,57,.8,.001,.06,.03,.7,.0012034 DATA BISCUIT-HR,1,ea,103,27.4,4.8,12.8!?},175,33,2.1,34,49,.4,.001,.06,.06,.5,.0012035 DATA BISCUIT-MIX,1,ea,91,28.5,2.6,14.6,272,32,2,19,65,.6,.001,.08,.07,.6,.001!@}2036 DATA PLAIN MUFFIN,1,ea,118,38,4,16.9,176,50,3.1,42,60,.6,40,.07,.09,.6,.0012037 DATA BLUEBERRY MUFFIN,1,ea,112,39,3.7,1!A}6.8,253,46,2.9,34,53,.6,90,.06,.08,.5,.0012038 DATA BRAN MUFFIN,1,ea,104,35.1,3.9,17.2,179,172,3.1,57,162,1.5,90,.06,.1,1.6,!B}.0012039 DATA CORN MUFFIN,1,ea,126,32.7,4,19.2,192,54,2.8,42,68,.7,120,.08,.09,.6,.0012040 DATA ROLL-HAMBURGER FFURT,1,ea,1!C}19,31.4,2.2,21.2,202,38,3.3,30,34,.8,.001,.11,.07,.9,.0012041 DATA HARD ROLL,1,ea,156,25.4,1.6,29.8,313,49,4.9,24,46,1.2,.00!D}1,.13,.12,1.4,.0012042 DATA PLAIN ROLL-PAN,1,ea,83,31.4,1.6,14.8,142,27,2.3,21,24,.5,.001,.08,.05,.6,.0012043 DATA SWEET RO!E}LL,1,ea,130,-,3.8,20.3,160.5,51.1,3.5,35.1,44.1,.33,29.1,.028,.061,.35,02044 DATA BUTTER CRACKER,1,ea,15,4.6,.6,2.2,36,3.7,.!F}23,4.9,8.6,.02,7,0,.001,.03,02045 DATA CHEESE CRACKER,1,ea,16,3.9,.73,2.1,35.7,3.7,.39,11.6,10.6,.03,12,0,.003,.03,02046 DA!G}TA GRAHAM CRACKER,2,ea,55,6.4,1.3,10.4,95,55,1.1,6,21,.2,0,.01,.03,.2,02047 DATA MATZO CRACKER,1,ea,80,-,-,-,-,-,-,-,-,-,-,-!H},-,-,-2048 DATA OYSTER CRACKER,10,ea,33,4,1,5.3,83,9,.7,2,7,.1,0,.001,.001,.1,02049 DATA PILOT CRACKER,1,ea,75,-,-,-,-,-,-,!I}-,-,-,-,-,-,-,-2050 DATA RYE CRACKER,2,ea,45,6,.2,9.92,114.6,78,1.7,6.8,50.4,.5,0,.042,.032,.16,02051 DATA SALTINE CRACKER,!J}4,ea,49,4.3,1.4,8.1,124.8,13.6,1,2.4,10.4,.12,0,0,.004,.12,02052 DATA CORNBREAD-HR,1,ea,161,53.9,5.6,22.7,490,122,5.8,94,165!K},.9,120,.1,.15,.5,12053 DATA CORNBREAD-MIX,1,ea,178,30.4,5.8,27.5,263,61,3.8,133,209,.8,130,.1,.1,.8,.0012054 DATA DANISH P!L}ASTRY-PLAIN,1,ea,274,22,15.3,29.6,238,73,4.8,33,71,.6,200,.04,.1,.5,.0012055 DATA PLAIN PANCAKE-MIX,1,ea,61,50.6,2,8.7,152,4!M}2,1.9,58,70,.3,70,.04,.06,.2,.0012056 DATA BUCKWHEAT PANCAKE-MX,1,ea,54,57.9,2.5,6.4,125,66,1.8,59,91,.4,60,.03,.04,.2,.001!N}2057 DATA PLAIN PANCAKE-HR,1,ea,62,50.1,1.9,9.2,115,33,1.9,27,38,.4,30,.05,.06,.4,.0012058 DATA BREADCRUMBS-GRATED,.5,cp,196!O},6.5,2.3,36.7,368,76,6.3,61,70.5,1.8,0,.11,.15,1.75,02059 DATA VIENNA BREAD STICK,1,ea,106,25,1.1,20.3,548,33,3.3,16,31,.3,.!P}001,.02,.03,.3,.0012060 DATA SPOONBREAD,.5,cp,234,63,13.7,20.3,578.5,158.5,8,115,197,1.2,350,.11,.21,.5,.52061 DATA WAFFLE,!Q}1,ea,206,41.7,8,27.2,515,146,6.6,179,257,1,170,.11,.17,.7,.0012062 DATA BRAN FLAKES,.8,cp,85,3,.48,22.6,165.6,109.6,2.9,15.2!R},100,9.9,1320,.328,.392,3.3,9.62063 DATA RAISIN BRAN,.67,cp,86,7.3,.42,23.8,127.2,92.4,2.5,16.8,87.6,10.6,1410,.348,.426,3.4!S}8,10.82064 DATA PUFFED CORN,1,cp,114,5,.1,26.9,90,23,1.2,3,8,.8,1410,.35,.42,3.5,112065 DATA SHREDDED CORN,1.2,cp,113,3,.12!T},25.3,313.8,-,2.1,1.2,11.7,.7,0,.128,.058,.583,02066 DATA CORN FLAKES-PLAIN,1.2,cp,113,3.8,.12,24.8,292.8,35,2.3,3,10.5,.7,1!U}376.7,.338,.408,3.4,10.52067 DATA CORN FLAKES-SWEET,.67,cp,103,2.2,.07,24.3,178,18,1.2,.67,6.7,.67,1253.3,.307,.373,3.1,9.3!V}2068 DATA COOKED FARINA,.75,cp,79,89,.15,16.3,349.5,18.7,2.4,110.2,121.5,6.5,0,.09,.052,.75,02069 DATA PUFFED OATS-PLAIN,1.2!W},cp,115,3.4,1.63,21.9,369.8,-,3.5,51.3,119,3.4,1376.7,.338,.408,3.4,10.52070 DATA PUFFED OATS-SWEET,.8,cp,111,1.9,.96,24,164!X}.8,-,1.8,50.4,115.2,2,1320,.328,.392,3.3,9.62071 DATA OATMEAL-ROLLED OATS,.75,cp,99,86.5,1.8,17.5,392.2,109.5,3.6,16.5,102.7!Y},1,0,.142,.037,.15,02072 DATA RICE FLAKES,1,cp,111,-,.09,24.9,279.8,51,1.7,8.25,37.4,.46,0,.1,.01,1.5,02073 DATA PUFFED RIC!Z}E,2,cp,120,3.7,.2,26.8,.002,30,1.8,6,28,.6,0,.14,.02,1.4,02074 DATA RICE-SWEETENED,.67,cp,93,2.4,.93,20.2,98.7,22,1.1,4.7,19![}.3,.8,1100,.273,.327,2.7,82075 DATA SHREDDED RICE,1.12,cp,110,3,.11,25,257.6,-,1.5,4.5,27,.562,0,.112,.022,2,02076 DATA PUF!\}FED WHEAT-PLAIN ,1.87,cp,101,3.4,.37,22.1,1.9,95.6,4.3,7.5,90,1.1,0,.15,.056,2.2,02077 DATA PUFFED WHEAT-SWEET,.8,cp,106,2.!]}8,.56,24.7,44.8,48.8,1.7,5.6,42.4,.96,1320,.328,.392,3.3,9.62078 DATA ROLLED WHEAT-COOKED,.75,cp,135,79.7,.75,30.4,531,151.5!^},4,14.2,136.5,1.3,0,.127,.052,1.6,02079 DATA SHREDDED WHEAT-PLAIN,1,oz,89,6.6,.5,20,1,87,2.5,11,97,.9,0,.06,.03,1.1,02080 D!_}ATA WHEAT FLAKES,1,cp,106,3.5,.5,24.2,310,81,3.1,12,83,2.3,1410,.35,.42,3.5,112081 DATA CORN GRITS-DEGERMED,.75,cp,94,87.1,.!`}15,20.25,376.5,20.25,2.17,1.5,18.75,.525,112.5,.075,.052,.75,02082 DATA PLAIN MACARONI-COOK,.75,cp,116,73,.45,24.15,.75,63.7!a}5,3.6,8.25,52.5,.975,0,.15,.082,1.125,02083 DATA MACARONI & CHEESE-HR,.5,cp,215,58.2,11.1,20.1,543,120,8.4,181,161,.9,430,.1!b},.2,.9,02084 DATA MACARONI & CHEESE-CN,.5,cp,114,80.2,4.8,12.85,365,69.5,4.7,99.5,91,.5,130,.06,.12,.5,02085 DATA COOKED NO!c}ODLES,.75,cp,150,70.8,1.8,27.97,2.25,52.5,4.95,12,70.5,1.05,82.5,.165,.097,1.425,02086 DATA COOKED RICE-INSTANT,.75,cp,135,7!d}2.9,0,29.92,337.5,-,2.7,3.75,23.25,.975,0,.157,-,1.275,02087 DATA PLAIN SPAGHETTI-COOK,.75,cp,116,73,.45,24.15,.75,63.75,3.6!e},8.25,52.5,.975,0,.15,.082,1.125,02088 DATA COOKED SPAGHETTI-HR,.75,cp,195,77,6.6,27.75,716.25,306,6.6,60,101.25,1.725,810,.!f}187,.135,1.725,9.752089 DATA COOKED SPAGHETTI-CN,.75,CP,142,80.1,1.125,28.87,716.25,227.2,4.125,30,66,2.1,697.5,.262,.21,3.3!g}75,7.52090 DATA SPAGHETTI-MEATBALLS,.75,cp,249,70,8.77,29.02,756.75,498.75,13.95,93,177,2.77,1192.5,.187,.225,3,16.52091 DA!q}b%DOS SYSb*)DUP SYSb SAUTORUN SYSb_HELP DOCboDIET DOCbsAUTORUN OBJbuTITLE bzCNG SAVb#DATAFILE1 bDATAFILE2 b DATAFILE3 TA SPAGHETTI-MEATBALLS,.75,cp,193,78,7.72,21.37,915,183.75,9.22,39.75,84.75,2.47,750,.112,.135,1.72,3.752092 DATA TOASTED WH!r}EAT GERM,1,tbsp,23,4.2,.7,3,.001,57,1.8,3,70,.5,10,.11,.05,.3,12093 DATA ANGELFOOD CAKE-MIX,1,sl,137,34,.1,31.5,77,32,3,50,6!s}3,.2,0,.001,.06,.1,02094 DATA BOSTON CREAM PIE-HR,1,sl,208,34.5,6.5,34.4,128,61,3.5,46,70,.3,140,.02,.08,.1,.0012095 DATA C!t}HOCOLATE CAKE-MIX,1,sl,234,23.6,8.5,40.2,181,90,3,41,72,.6,100,.02,.06,.2,.0012096 DATA DARK FRUITCAKE-HR,1,sl,57,18.1,2.3,9!u},24,74,.7,11,17,.4,20,.02,.02,.1,.0012097 DATA GINGERBREAD-MIX,1,sl,174,37,4.3,32.2,192,173,2,57,63,1,.001,.02,.06,.5,.0012!v}098 DATA PLAIN CAKE W/O ICING,1,sl,313,24.5,12,48.1,258,68,3.9,55,88,.3,150,.02,.08,.2,.0012099 DATA PLAIN CUPCAKE-HR,1,ea,1!w}20,24.5,4.6,18.4,99,26,1.5,21,34,.1,60,.01,.03,.1,.0012100 DATA PLAIN CAKE & ICING,1,sl,255,21.4,9.64,41.17,158.75,79,2.91,4!x}3.69,72.06,.42,125,.014,.062,.137,.1252101 DATA PLAIN CUPCAKE-ICING,1,ea,173,21.4,6.5,27.9,108,54,2,30,49,.3,80,.01,.04,.1,.!y}0012102 DATA POUND CAKE-OLD FASH,1,sl,142,17.2,8.9,14.1,33,18,1.7,6,24,.2,80,.01,.03,.1,02103 DATA SPONGE CAKE,1,sl,146,31.!z}8,2.8,26.5,82,43,3.7,15,55,.6,220,.02,.07,.1,.0012104 DATA CARAMELS,3,ea,113,7.6,2.9,21.7,64,54,1.1,42,35,.4,.001,.01,.05,.1!{},.0012105 DATA BUTTERSCOTCH,1,oz,113,1.5,1,26.9,19,1,.001,5,2,.4,40,0,.001,.001,02106 DATA MILK CHOCOLATE-SWEET,1,oz,147,.9!|},9.2,16.1,27,109,2.2,65,65,.3,80,.02,.1,.1,.0012107 DATA MILK CHOCOLATE-ALMON,1,oz,151,1.5,10.1,14.5,23,125,2.6,65,77,.5,70,!}}.02,.12,.2,.0012108 DATA CHOCOLATE MINTS,1,oz,116,5.8,3,23,52,26,.05,16,15,.3,.001,.01,.02,.001,.0012109 DATA CANDY CORN,1,!~}oz,103,7.6,.6,25.4,60,1,.001,4,2,.3,0,.001,.001,.001,02110 DATA MINTS,1,oz,103,7.6,.6,25.4,60,1,.001,4,2,.3,0,.001,.001,.001!},02111 DATA VANILLA FUDGE-PLAIN,1,oz,113,10,3.1,21.2,59,36,.9,32,24,.1,.001,.01,.04,.001,.0012112 DATA CHOCOLATE FUDGE,1,oz!},113,8.2,3.5,21.3,54,42,.8,22,24,.3,.001,.01,.03,.1,.0012113 DATA VANILLA FUDGE-NUTS,1,oz,120,9.4,4.6,19.5,53,32,1.2,31,32,.!}2,.001,.01,.04,.001,.0012114 DATA CHOCOLATE FUDGE-NUTS,1,oz,121,7.8,4.9,19.6,48,50,1.1,22,32,.3,.001,.01,.03,.1,.0012115 DA!}TA GUMDROPS,1,oz,98,11.7,.2,24.8,10,1,.001,2,.001,.1,0,0,.001,.001,02116 DATA HARD CANDY,1,oz,109,1.4,.3,27.6,9,1,0,6,2,.5,0!},0,0,0,02117 DATA JELLYBEANS,1,oz,104,6.3,.1,26.4,3,.001,.001,3,1,.3,0,0,.001,.001,02118 DATA MARSHMALLOWS,4,ea,92,17.3,.00!}4,23.2,12,.004,.4,4,.004,.4,0,0,.004,.004,02119 DATA PEANUT BRITTLE,1,oz,119,2,2.9,23,9,43,1.6,10,27,.7,0,.05,.01,1,02120 D!}ATA CHOC CHIP-COOKY,1,ea,51,3,3,6,34.75,11.75,.55,3.5,10,.2,10,.01,.01,.1,02121 DATA FIG BAR,1,ea,50,13.6,.775,10.55,35.25,2!}7.75,.55,11,8.5,.15,15,.005,.01,.05,02122 DATA SANDWICH COOKY,1,ea,49,2.2,2.25,6.925,48.25,3.75,.475,2.5,24,.075,0,.005,.005!},.05,02123 DATA SUGAR COOKY-HR,1,ea,35,7.9,1.34,5.44,25.4,6.1,.48,6.2,8.2,.11,9,.013,.013,.1,02124 DATA VANILLA WAFER,1,ea,!}18,2.8,.64,2.98,10.1,2.9,.22,1.6,2.5,.02,5,.001,.003,.01,02125 DATA APPLE PIE,1,sl,302,47.6,13.1,45,355,94,2.6,9,26,.4,40,.0!}2,.02,.5,12126 DATA BLUEBERRY PIE,1,sl,286,51,12.7,41.2,316,77,2.8,13,27,.7,40,.02,.02,.4,42127 DATA CHERRY PIE,1,sl,308,46!}.6,13.3,45.3,359,124,3.1,17,30,.4,520,.02,.02,.6,.0012128 DATA CHOCOLATE MERINGUE,1,sl,287,48.4,13.7,38.2,292,158,5.5,79,112!},.8,220,.03,.14,.2,.0012129 DATA COCONUT CUSTARD PIE,1,sl,268,55.4,14.3,28.4,282,186,6.8,107,132,.8,260,.07,.22,.3,02130 DA!}TA PLAIN CUSTARD PIE,1,sl,249,58.1,12.7,26.7,327,156,7,109,129,.7,260,.06,.18,.3,02131 DATA LEMON MERINGUE PIE,1,sl,268,47.4!},10.7,39.6,296,53,3.9,15,51,.5,180,.03,.08,.2,32132 DATA MINCE PIE,1,sl,320,43,13.6,48.6,529,210,3,33,45,1.2,.001,.08,.05,.5!},12133 DATA PEACH PIE,1,sl,301,47.5,12.6,45.1,316,176,3,12,34,.6,860,.02,.05,.8,42134 DATA PECAN PIE,1,sl,431,19.5,23.6,52.!}8,228,127,5.3,48,106,2.9,160,.16,.07,.3,.0012135 DATA PUMPKIN PIE,1,sl,241,59.2,12.8,27.9,244,182,4.6,58,79,.6,2810,.03,.11,!}.6,.0012136 DATA RAISIN PIE,1,sl,319,42.5,12.6,50.7,336,227,3.1,21,47,1.1,10,.04,.04,.4,12137 DATA SWEET POTATO PIE,1,sl,24!}3,59.3,12.9,27,249,186,5.1,79,96,.6,2730,.06,.14,.3,52138 DATA STRAWBERRY PIE,1,sl,184,58.4,7.3,28.7,180,112,1.8,15,23,.7,40!},.02,.04,.4,232139 DATA BITTERSWEET CHOC,1,oz,135,1.8,11.3,13.3,1,174,2.2,16,81,1.4,10,.01,.05,.3,02140 DATA SEMISWEET CHOC!}OLATE,1,oz,144,1.1,10.1,16.2,1,92,1.2,9,43,.7,10,.001,.02,.1,.0012141 DATA CHOCOLATE SYRUP-THIN,1,tbsp,46,31.6,.4,11.75,10,5!}3,.45,3,17.5,.3,0,.005,.015,.1,02142 DATA CHOCOLATE SYRUP-FDG,1,tbsp,62,25.4,2.55,10.15,16.5,53.5,.95,24,30,.25,30,.01,.04,.!}1,02143 DATA CRANBERRY SAUCE,1,tbsp,25,62.1,.037,6.49,.187,5.19,.019,1.06,.69,.037,3.75,.002,.002,.006,.3752144 DATA HONEY,!}1,tbsp,64,17.2,0,17.3,1,11,.1,1,1,.1,0,.001,.01,.1,.0012145 DATA JAM-PRESERVES,1,tbsp,54,29,.001,14,2,18,.1,4,2,.2,.001,.001!},.01,.001,.0012146 DATA JELLY-MARMALADE,1,tbsp,49,29,.001,12.7,3,14,.001,4,1,.3,.001,.001,.01,.001,12147 DATA MOLASSES,1,tb!}sp,50,24,-,13,3,183,-,33,9,.9,-,.01,.01,.001,-2148 DATA SYRUP-TABLE BLENDS,1,tbsp,59,24,0,15.4,14,1,0,9,3,.8,0,0,0,0,02149 !}DATA SUGAR-GRANULATED,1,tsp,15,.5,0,4,.001,.001,0,0,0,.001,0,0,0,0,02150 DATA APPLE BETTY,.5,cp,162,64.5,3.75,31.95,164.5,10!}7.5,1.7,19.5,23.5,.65,110,.065,.045,.45,12151 DATA BREAD PUDDING,.5,cp,248,58.6,8.1,37.65,266.5,285,7.4,144.5,151,1.45,400,.!}08,.25,.65,1.52152 DATA BROWNIE-HOME RECIPE,1,ea,97,9.8,6.3,10.2,50,38,1.3,8,30,.4,40,.04,.02,.1,.0012153 DATA BAKED CUSTAR!}D,.5,cp,152,77.2,7.3,14.7,104.5,193.5,7.15,148.5,155,.55,465,.055,.25,.15,.52154 DATA RICE PUDDING-RAISINS,.5,cp,193,65.8,4.!}1,35.4,94,234.5,4.75,130,124.5,.55,145,.04,.185,.25,02155 DATA PLAIN GELATIN,.5,cp,71,84.2,0,16.9,61,-,1.8,-,-,-,-,-,-,-,-2!}156 DATA GELATIN WITH FRUIT,.5,cp,80,81.8,.1,19.7,41,-,1.55,-,-,-,-,-,-,-,72157 DATA ICE CREAM-REGULAR,.5,cp,128,63.2,7.05,1!}3.85,42,120.5,3,97,76.5,.05,295,.025,.14,.05,.52158 DATA ICE CREAM-RICH,.5,cp,164.5,62.8,11.9,13.15,24.5,70.5,1.9,57.5,45,0,!}490,.015,.08,.05,.52159 DATA ICE MILK-HARDENED,.5,cp,99.5,66.7,3.35,14.65,44.5,127.5,3.15,102,81,.05,140,.035,.145,.05,.521!}60 DATA ICE MILK-SOFT,.5,cp,133,66.7,4.45,19.6,59.5,170.5,4.2,136.5,108.5,.1,185,.045,.195,.1,12161 DATA PRUNE WHIP-BAKED,.5!},cp,70,57.3,.1,16.6,74,130.5,2,10,15,.6,205,.01,.065,.25,12162 DATA PUDDING-VANILLA,.5,cp,141,76,4.95,20.25,83,176,4.45,149,!}116,0,205,.04,.205,.15,12163 DATA PUDDING-CHOCOLATE,.5,cp,161,70,3.9,29.65,167.5,177,4.4,132.5,123.5,.4,170,.025,.195,.15,1!}2164 DATA PUDDING-RENNET TYPE,.5,cp,119,79.7,4.5,16,57.5,160,4,146.5,115,0,190,.04,.2,.15,1.52165 DATA PUDDING-TAPIOCA,.5,cp!},110,71.8,4.2,14.1,128.5,111.5,4.15,86.5,90,.35,240,.035,.15,.1,12166 DATA SHERBET,.5,cp,129,67,1.15,29.7,9.5,21,.85,15.5,12!}.5,0,60,.01,.03,0,22167 DATA REGULAR BUTTER-1 PAT,1,ea,36,15.5,4.1,.001,49,1,.001,1,1,0,170,-,-,-,02168 DATA REGULAR BUTTER!}-TBSP,1,tbsp,102,15.5,11.5,.1,140,3,.1,3,2,0,470,-,-,-,02169 DATA MARGARINE-WHIPPED,1,tbsp,68,15.5,7.6,.001,93,2,.1,2,2,0,31!}0,-,-,-,02170 DATA COOKING FAT-VEG,1,tbsp,111,0,12.5,0,0,0,0,0,0,0,-,0,0,0,02171 DATA COOKING FAT-LARD,1,tbsp,117,0,13,0,0,!}0,0,0,0,0,0,0,0,0,02172 DATA BLUE CHEESE DRESSING,1,tbsp,76,32.3,7.8,1.1,164,6,.7,12,11,.001,30,.001,.02,.001,.0012173 DATA!} FRENCH DRESSING,1,tbsp,66,38.8,6.2,2.8,219,13,.1,2,2,.1,-,-,-,-,-2174 DATA HOME COOKED DRESSING,1,tbsp,26,68,1.6,2.4,116,19!},.7,14,15,.1,80,.01,.03,.001,.0012175 DATA ITALIAN DRESSING,1,tbsp,83,27.5,9,1,314,2,.001,2,1,.001,.001,.001,.001,.001,-217!}6 DATA MAYONAISE,1,tbsp,101,15.1,11.2,.3,84,5,.2,3,4,.1,40,.001,.01,.001,-2177 DATA MAYONAISE TYPE,1,tbsp,65,40.6,6.3,2.2,88!},1,.2,2,4,.001,30,.001,.001,.001,-2178 DATA RUSSIAN DRESSING,1,tbsp,74,34.5,7.6,1.6,130,24,.2,3,6,.1,100,.01,.01,.1,12179 D!}ATA THOUSAND ISLAND,1,tbsp,80,32,8,2.5,112,18,.1,2,3,.1,50,.001,.001,.001,.0012180 DATA FRENCH DRESSING-LC,1,tbsp,15,77.3,.7!},2.5,126,13,.1,2,2,.1,-,-,-,-,-2181 DATA ITALIAN DRESSING-LC,1,tbsp,8,90.1,.7,.4,118,2,.001,.001,1,.001,.001,.001,.001,.001,!}-2182 DATA THOUSAND ISLAND-LC,1,tbsp,27,68.2,2.1,2.3,105,17,.1,2,3,.1,50,.001,.001,.001,.0012183 DATA SALAD OIL,1,tbsp,120,!}0,13.6,0,0,0,0,0,0,0,-,0,0,0,02184 DATA CREAM-HALF AND HALF,1,tbsp,20,79.7,1.8,.7,7,19,.5,16,13,.001,70,.001,.02,.001,.0012!}185 DATA CREAM-HALF AND HALF,1,cp,324,79.7,28.3,11.1,111,312,7.7,261,206,.1,1160,.07,.39,.1,22186 DATA CREAM-LIGHT,1,tbsp,32!},71.5,3.1,.6,6,18,.5,15,12,.001,130,.001,.02,.001,.0012187 DATA CREAM-LIGHT,1,cp,506,71.5,49.4,10.3,103,293,7.2,245,192,.1,2!}020,.07,.36,.1,22188 DATA SOUR CREAM,1,tbsp,26,70.9,2.52,.51,6,17,.38,14,10,.01,95,.004,.018,.008,.12189 DATA WHIPPED CREAM!}-HEAVY,1,tbsp,53,56.6,5.6,.5,5,13,.3,11,9,.001,230,.001,.02,.001,.0012190 DATA WHIPPED CREAM-LIGHT,1,tbsp,45,62.1,4.7,.5,5,1!}5,.4,13,10,.001,190,.001,.02,.001,.0012191 DATA IMITATION CREAMER-FR,.5,oz,20,77,1.5,1.71,12,29,.15,1,10,.001,13,0,0,0,0219!}2 DATA IMITATION CREAMER-PD,1,tsp,11,2,.71,1.1,4,16,.1,.001,8,.02,4,0,.003,0,02193 DATA SOUR DRESSING,1,tbsp,21,74.8,1.99,.5!}6,6,19,.39,14,10,.001,1,.005,.02,.009,.112194 DATA WHIPPED TOPPING-PRES,1,tbsp,11,60.5,.89,.64,2,1,.04,.001,1,.001,19,0,0,0,!}02195 DATA WHIPPED TOPPING-FR,1,tbsp,13,50.25,1.01,.92,1,1,.05,.001,.001,.001,34,0,0,0,02196 DATA WHIPPED TOPPING-PD,1,tbsp!},8,66.7,.5,.66,3,6,.14,4,3,.001,14,.001,.005,.002,.032197 DATA BEEF & VEGETABLE-CN,1,cp,194,82.5,7.6,17.4,1007,426,14.2,29,1!}10,2.2,2380,.07,.12,2.5,72198 DATA BEEF & VEGETABLE-HR,1,cp,218,82.4,10.5,15.2,91,613,15.7,29,184,2.9,2400,.15,.17,4.7,1721!}99 DATA BEEF POTPIE,1,ea,387,55.1,22.77,29.6,447.25,250.5,15.9,22,111.75,2.82,1292.5,.172,.19,3.15,4.752200 DATA CHILI CON C!}ARNE-BEAN,.5,cp,169,72.4,7.8,15.55,677,297,9.55,41,160.5,2.15,75,.04,.09,1.65,-2201 DATA CHILI CON CARNE,.5,cp,240,-,17.75,6!}.96,-,-,12.34,45.5,182.3,1.69,179.93,.021,.143,2.7,-2202 DATA CORNED BEEF,3,oz,184,59.3,10.2,0,-,-,21.52,17.06,90.19,3.66,-,!}.017,.204,2.89,02203 DATA CORNED BEEF HASH,3,oz,154,67.4,9.62,9.09,459.2,170.06,7.48,11.06,57,1.71,-,.009,.077,1.78,-2204 D!}ATA DRIED BEEF-CHIPPED,.33,cp,116,47.7,3.6,0,2438,114,19.4,12,230,2.8,-,.04,.18,2.2,02205 DATA DRIED BEEF-CREAMED,.5,cp,188,!}72,12.6,8.7,877,187.5,10.05,128.5,171.5,1,440,.075,.235,.75,.52206 DATA HAMBURGER-REGULAR,3,oz,235,54.2,16.6,0,49,221,19.8,9!},159,2.6,30,.07,.17,4.4,-2207 DATA HAMBURGER-LEAN,3,oz,186,60,9.6,0,57,261,23.3,10,196,3,20,.08,.2,5.1,-2208 DATA OVEN ROAS!}T-FAT CUTS,3,oz,374,40,33.5,0,41,189,16.9,8,158,2.2,70,.05,.13,3.1,-2209 DATA OVEN ROAST-FAT CUTS,3,oz,205,57.2,11.4,0,59,26!}9,24,10,218,3.1,20,.06,.18,4.3,-2210 DATA OVEN ROAST-LEAN CUTS,3,oz,222,54.7,13.1,0,60,272,24.3,10,213,3,20,.07,.19,4.8,-22!}11 DATA OVEN ROAST-LEAN CUTS,3,oz,161,61.2,5.2,0,65,298,26.6,11,228,3.1,10,.07,.2,5.1,-2212 DATA POT ROAST-LEAN & FAT,3,oz,2!}46,53,16.3,0,40,184,23,10,114,2.9,30,.04,.18,3.6,-2213 DATA POT ROAST-LEAN,3,oz,164,61.7,6,0,45,207,25.9,12,128,3.2,10,.05,.!}2,3.9,-2214 DATA STEAK-FAT CUTS,3,oz,329,43.9,27.2,0,48,220,19.6,9,162,2.5,50,.05,.15,4,-2215 DATA STEAK-FAT CUTS,3,oz,176,!}58.7,6.5,0,67,307,27.4,11,222,3.3,10,.07,.21,5.4,-2216 DATA STEAK-LEAN CUTS,3,oz,222,54.7,13.1,0,60,272,24.3,10,213,3,20,.07!},.19,4.8,-2217 DATA STEAK-LEAN CUTS,3,oz,161,61.2,5.2,0,65,298,26.6,11,228,3.1,10,.07,.2,5.1,-2218 DATA VEAL CUTLET,3,oz,18!}4,60.4,9.4,0,56,258,23,9,196,2.7,-,.06,.21,4.6,-2219 DATA VEAL ROAST,3,oz,229,54.6,14.4,0,57,259,23.1,10,211,2.9,-,.11,.26,6!}.6,-2220 DATA LAMB-FAT LOIN CHOP,3,oz,305,47,25.01,0,45.94,209.6,18.71,7.69,146.25,1.11,-,.101,.195,4.26,-2221 DATA LAMB-LE!}AN LOIN CHOP,3,oz,160,62.1,6.37,0,58.69,268.5,23.98,10.12,186.19,1.71,-,.127,.238,5.19,-2222 DATA LAMB-FAT LEG,3,oz,237,54,1!}6.1,0,53,241,21.5,9,177,1.4,-,.13,.23,4.7,-2223 DATA LAMB-LEAN LEG,3,oz,158,62.2,6,0,60,273,24.4,11,202,1.9,-,.14,.26,5.3,-!}2224 DATA LAMB-FAT SHOULDER,3,oz,287,49.6,23.1,0,45,206,18.4,9,146,1,-,.11,.20,4,-2225 DATA LAMB-LEAN SHOULDER,3,oz,174,61.4!},8.5,0,56,255,22.8,10,186,1.6,-,.13,.24,4.8,-2226 DATA BACON-THIN SLICE,2,sl,61,8.1,5.2,.3,102,24,2.7,1,22,.3,0,.05,.03,.5,-!}2227 DATA BACON-MEDIUM SLICE,2,sl,86,8.1,7.8,.5,153,35,3.8,2,34,.5,0,.08,.05,.8,-2228 DATA CANADIAN BACON,1,sl,58,49.9,3.7,!}.1,537,91,5.7,3,46,.9,0,.19,.04,1.1,-2229 DATA PORK CHOP-FAT CUT,3,oz,333,42.3,26.97,0,51.63,235.4,21.03,10.1,228.17,2.88,0,!}.816,.239,4.93,-2230 DATA PORK CHOP-LEAN CUT,3,oz,229,52.6,13.04,0,63.6,290.8,25.96,11.2,274.8,3.32,0,.96,.28,5.76,-2231 DA!}TA HAM-FAT CUTS,3,oz,246,53.6,18.8,0,637,199,17.8,8,146,2.2,0,.4,.15,3.1,-2232 DATA HAM-LEAN CUTS,3,oz,159,61.9,7.5,0,770,24!}1,21.5,9,170,2.7,0,.49,.20,3.8,-2233 DATA PORK ROAST-FAT CUTS,3,oz,308,45.8,24.2,0,51,233,20.8,9,218,2.7,0,.78,.22,4.8,-223!}4 DATA PORK ROAST-LEAN CUTS,3,oz,216,55,12.1,0,61,280,25,11,264,3.2,0,.92,.26,5.5,-2235 DATA BOLOGNA,2,oz,172,56.2,15.6,.6,7!}38,130,6.8,4,72,1,-,.1,.12,1.4,-2236 DATA BRAUNSCHWEIGER,2,oz,180,52.6,15.6,1.4,-,-,8.4,6,138,3.4,3700,.1,.82,4.6,-2237 DAT!}A LINK SAUSAGE,4,ea,248,34.8,22.8,.004,500,140,9.6,4,84,1.2,0,.4,.16,2,-2238 DATA SAUSAGE PATTY,2,ea,258,34.8,23.8,.002,518,!}146,9.8,4,88,1.2,0,.42,.18,2,-2239 DATA SALAMI,2,oz,176,51,14.6,.8,-,-,10,6,114,1.4,-,.14,.14,2.4,-2240 DATA VIENNA SAUSAGE!},2,oz,133,63,11.2,.003,-,-,7.7,3.5,84,1.05,-,.035,.07,1.4,-2241 DATA BEEF HEART,3,oz,159,61.3,4.8,.6,87,198,26.7,6,153,5.1,3!}0,.21,1.05,6.6,.0032242 DATA BEEF LIVER,3,oz,195,56,9,4.5,156,323,22.4,9,405,7.5,45390,.22,3.56,14,232243 DATA BEEF TONGUE,!}3,oz,208,60.8,14.21,.337,51.94,139.5,18.28,6,99.56,1.87,-,.043,.247,2.98,-2244 DATA FRANKFURTER-COOKED,1,ea,170,57.3,15.2,.9!},-,-,6.9,3,57,.8,-,.08,.11,1.4,-2245 DATA BOILED HAM,2,oz,132,59.1,9.6,0,-,-,10.8,6,94,1.6,0,.24,.08,1.4,-2246 DATA DEVILED!} HAM,2,oz,200,50.5,18.4,0,-,-,7.8,4,52,1.2,0,.08,.06,1,-2247 DATA CHICKEN-BROILER,.5,ea,240,71,6.7,0,116,483,42,16,355,3,160!},.09,.34,15.5,-2248 DATA FRIED CHICKEN-BREAST,.5,ea,160,58.4,5.1,1.2,-,-,25.7,9,218,1.3,70,.04,.17,11.6,-2249 DATA FRIED CH!}ICKEN-THIGH,1,ea,122,55.8,5.9,1.3,-,-,15,7,121,1.2,100,.03,.25,3.5,-2250 DATA FRIED CHICKEN-LEG,1,ea,88,55,3.8,.4,-,-,12.2,6!},89,.9,50,.03,.15,2.7,-2251 DATA CHICKEN-CANNED,.5,cp,203,65.2,12,0,-,141.5,22.25,21.5,253,1.55,235,.04,.125,4.5,42252 DATA!} CHICKEN POTPIE-HR,1,ea,410,56.6,23.5,31.9,446.7,258.25,17.6,52.2,174.5,2.3,2320,.192,.192,3.15,3.52253 DATA TURKEY-LIGHT ME!}AT,3,oz,150,62.1,3.3,0,70,349,28,-,-,1,-,.04,.12,9.4,-2254 DATA TURKEY-DARK MEAT,3,oz,173,60.5,7.1,0,84,338,25.5,-,-,2,-,.03!},.2,3.6,-2255 DATA BLUEFISH-BAKED,3,oz,135,68,4.5,0,87,-,22.2,24,243,.6,30,.09,.09,1.5,-2256 DATA CLAMS-CANNED,3,oz,44,86.3!},.6,2.38,-,119.06,6.71,46.69,116.44,3.49,-,.009,.094,.844,-2257 DATA CLAMS-RAW,3,oz,65,81.7,1.37,1.71,102,153.94,10.72,58.69!},137.81,5.19,84.37,.084,.154,1.106,8.442258 DATA CRABMEAT-COOKED,3,oz,79,78.5,1.61,.431,-,-,14.72,36.6,148.87,.675,1845,.137!},.067,2.38,1.692259 DATA FISH STICKS,3,ea,150,65.8,7.5,5.4,-,-,14.1,9,141,.3,0,.03,.06,1.5,-2260 DATA HADDOCK-FRIED,3,oz,14!}1,66.3,5.4,4.8,150,297,16.8,33,210,.9,-,.03,.06,2.7,32261 DATA MACKEREL-BROILED,3,oz,201,61.6,13.5,0,-,-,18.6,6,237,.9,450,.!}12,.24,6.6,-2262 DATA MACKEREL-CANNED,3,oz,153,66.4,8.51,0,-,-,17.94,221.06,244.87,1.87,26.25,.026,.281,7.48,-2263 DATA OCE!}AN PERCH-FRIED,3,oz,192,59,11.4,5.7,129,243,16.2,27,192,1.2,-,.09,.09,1.5,-2264 DATA OYSTERS,.5,cp,79,84.6,2.15,4.1,87.5,145!},10.1,113,171.5,6.6,370,.17,.215,3,-2265 DATA SALMON-COOKED,3,oz,156,63.4,6.3,0,99,378,23.1,-,351,.9,150,.15,.06,8.4,-2266 !}DATA SALMON-CANNED,3,oz,120,70.8,5.02,0,329.06,306.94,17.44,166.69,243.19,.675,60,.026,.154,6.81,-2267 DATA SARDINES-CANNED,!}3,oz,174,61.8,9.3,-,699,501,20.4,372,423,2.4,180,.03,.18,4.5,-2268 DATA SHRIMP-CANNED,3,oz,99,70.4,.9,.6,-,105,20.7,99,225,2!}.7,60,.003,.03,1.5,-2269 DATA TUNAFISH-CANNED,3,oz,168,60.6,6.97,0,-,-,24.49,6.75,198.94,1.61,67.5,.043,.101,10.12,-2270 DA!}TA EGG-FRIED,1,ea,83,71.9,6.41,.53,144,58,5.37,26,80,.92,286,.033,.126,.026,02271 DATA BOILED EGG,1,ea,82,73.7,5.8,.5,61,65,!}6.5,27,103,1.2,590,.04,.14,.001,02272 DATA EGG-OMELET,1,ea,95,76.3,7.08,1.37,155,85,5.96,47,97,.93,311,.039,.156,.042,.1322!}73 DATA POACHED EGG,1,ea,82,73.3,5.8,.5,136,65,6.5,27,103,1.2,590,.04,.13,.001,02274 DATA SCRAMBLED EGG,1,ea,95,76.3,7.08,1.!}37,155,85,5.96,47,97,.93,311,.039,.156,.042,.132275 DATA BAKED BEANS-CANNED,.5,cp,155,70.7,3.3,24.25,590.5,268,7.8,69,117.5,!}2.3,165,.1,.04,.75,2.52276 DATA BAKED BEANS-CANNED,.5,cp,191,66.4,6,26.9,484.5,-,7.9,80.5,145.5,2.95,-,.075,.05,.65,-2277 D!}ATA LIMA BEANS,.5,cp,131,64.1,.55,24.3,2,581.5,7.8,27.5,146.5,2.95,-,.125,.055,.65,-2278 DATA RED KIDNEY BEANS,.5,cp,109,69,!}.45,19.8,3,314.5,7.2,35,129.5,2.2,5,.1,.055,.65,-2279 DATA ALMONDS,2,tbsp,96,4.7,8.6,3.2,.002,124,3,38,80,.8,0,.04,.14,.6,.0!}022280 DATA BRAZIL NUTS,1,oz,185,4.6,19,3.1,.001,203,4.1,53,196,1,.001,.27,.03,.5,-2281 DATA CASHEWS,1,oz,159,5.2,13,8.3,4,!}132,4.9,11,106,1.1,30,.12,.07,.5,-2282 DATA COCONUT-NOT PACKED,.25,cp,69,50.9,7.05,1.87,4.5,51.25,.7,2.5,19,.35,0,.01,.005,.!}1,.52283 DATA PEANUT-SHELL ROASTED,2,tbsp,104,1.8,8.8,3.8,.002,126,4.8,12,74,.4,-,.06,.02,3,02284 DATA PEANUT BUTTER,1,tbsp!},94,1.7,8.1,3,97,100,4,9,61,.3,-,.02,.02,2.4,02285 DATA PECANS-HALVES,10,ea,96,3.4,10,2,.001,84,1.3,10,40,.3,20,.12,.02,.1,.!}0012286 DATA BLACK WALNUT-CHOPPED,1,tbsp,100,3.1,9.4,2.4,.002,74,3.2,.002,92,1,40,.04,.02,.2,-2287 DATA ENGLISH WALNUT-HALV!}E,7,ea,92,3.5,9.05,2.25,.5,64,2.1,14,54,.45,5,.045,.02,.15,.52288 DATA ENGLISH WALNUT-CHP,2,tbsp,104,3.5,10.2,2.6,.002,72,2.!}4,16,60,.4,.002,.06,.02,.2,.0022289 DATA BUTTERMILK,1,cp,88,90.5,.2,12.5,319,343,8.8,296,233,.1,10,.1,.44,.2,22290 DATA CON!}DENSED MILK,.5,cp,491,27.1,13.3,83.1,171.5,480.5,12.4,401,315,.15,550,.12,.58,.3,1.52291 DATA EVAPORATED MILK,.5,cp,172,73.8!},9.95,12.2,148.5,382,8.8,317.5,258.5,.15,405,.05,.43,.25,1.52292 DATA 2% LOWFAT MILK,1,cp,145,87,4.9,14.8,150,431,10.3,352,2!}76,.1,200,.1,.52,.2,2.8,317.5,258.5,.15,405,.05,.43,.25,1.52292 DATA 2% LOWFAT MILK,1,cp,145,87,4.9,14.8,150,431,10.3,352,2 1 ? "}"5 DIM FOOD$(20),SER$(3),X$(4),CAL$(5),W$(5),F$(7),CAR$(7),SO$(7),POT$(7),PR$(7),CA$(7),PHO$(7)6 DIM TH$(7),RIB$(7),N&}I$(7),C$(7),IR$(7),A$(7),SS(292,0),BB(292,1)10 TRAP 80:OPEN #2,8,0,"D:DATAFILE.2"20 OPEN #3,8,0,"D:POINTER.2"30 FOR N=293 &}TO 53433 READ FOOD$,SER$,X$,CAL$,W$,F$,CAR$,SO$,POT$,PR$,CA$,PHO$,IR$,A$,TH$,RIB$,NI$,C$:NOTE #2,S,B35 PRINT #3;S;",";B36 &}PRINT #2;FOOD$37 PRINT #2;SER$38 PRINT #2;X$39 PRINT #2;CAL$40 PRINT #2;W$41 PRINT #2;F$42 PRINT #2;CAR$43 PRINT #2;SO&}$44 PRINT #2;POT$45 PRINT #2;PR$46 PRINT #2;CA$47 PRINT #2;PHO$48 PRINT #2;IR$49 PRINT #2;A$50 PRINT #2;TH$51 PRINT #&}2;RIB$52 PRINT #2;NI$53 PRINT #2;C$75 NEXT N78 GOTO 10080 ? "CAN'T WRITE FILE TO DISKETTE."81 ? "CHECK DISK DRIVE OR DA&}TA STATEMENT."82 ? "CHECK LAST NUMBER IN LINE 30."83 ? "MAKE CORRECTIONS AND RUN PROGRAM AGAIN"100 END 2293 DATA SKIM MIL&}K,1,cp,88,90.5,.2,12.5,127,355,8.8,296,233,.1,10,.09,.44,.2,22294 DATA WHOLE MILK,1,cp,159,87.4,8.5,12,122,351,8.5,288,227,.&}1,350,.07,.41,.2,22295 DATA YOGURT-SKIM MILK,1,cp,123,89,4.2,12.7,125,350,8.3,294,230,.1,170,.1,.44,.2,22296 DATA YOGURT-WH&}OLE MILK,1,cp,152,88,8.3,12,115,323,7.4,272,213,.1,340,.07,.39,.2,22297 DATA CHOCOLATE MILK-SKIM,1,cp,190,82.8,5.8,27.3,115,& }355,8.3,270,228,.5,210,.1,.4,.3,32298 DATA CHOCOLATE MILK-WHOLE,1,cp,213,81.5,8.5,27.5,118,365,8.5,278,235,.5,330,.08,.4,.3,& }32299 DATA COCOA-HOMEMADE,1,cp,243,79,11.5,27.3,128,363,9.5,295,283,1,400,.1,.45,.5,32300 DATA MALTED MILK,1,cp,244,78.2,10& }.3,27.5,214,470,11,317,287,.7,590,.14,.49,.2,22301 DATA DICED CHEESE-AMER,.5,cp,259,40,21,1.35,795,56,16.25,488,539.5,.65,85& }5,.015,.285,0,02302 DATA SHREDDED CHEESE-AMER,.5,cp,209,40,16.95,1.05,642,45,13.1,394,435.5,.5,690,.01,.23,0,02303 DATA CHE& }ESE-SANDWICH SIZE,1,sl,78,40,6.3,.4,239,17,4.9,146,162,.2,260,.001,.09,.001,02304 DATA CHEESE-BURGER SIZE,1,sl,52,40,4.2,.3,&}159,11,3.2,98,108,.1,170,.001,.06,.001,02305 DATA PIMIENTO CHEESE,1,sl,78,40,6.3,.4,-,-,4.8,-,-,-,-,-,-,-,-2306 DATA CHEESE&} LOAF,1,ea,840,40,68.1,4.3,2579,182,52.7,1582,1750,2,2770,.05,.93,.001,02307 DATA CHEESE LOAF-SLICE,1,sl,48,40,3.9,.2,148,10&},3,91,100,.1,160,.001,.05,.001,02308 DATA CHEESE LOAF-CUBE,1,ea,65,40,5.3,.3,199,14,4.1,122,135,.2,210,.001,.07,.001,02309 &}DATA CHEESE FOOD,1,tbsp,45,43.2,3.4,1,-,-,2.8,80,106,.1,140,.001,.08,.001,02310 DATA CHEESE FOOD,1,ea,57,43.2,4.2,1.2,-,-,3.&}5,100,132,.1,170,.001,.1,.001,02311 DATA CHEESE SPREAD,1,tbsp,40,48.6,3,1.1,228,34,2.2,79,123,.1,120,.001,.08,.001,02312 DA&}TA CHEESE SPREAD,1,oz,82,48.6,6.1,2.3,461,68,4.5,160,248,.2,250,.001,.15,.001,02313 DATA BLUE CHEESE,1,oz,104,40,8.6,.6,-,-,&}6.1,89,96,.1,350,.01,.17,.3,02314 DATA BLUE CHEESE,1,ea,64,40,5.3,.3,-,-,3.7,54,59,.1,210,.001,.11,.2,02315 DATA CAMEMBERT-&}WEDGE,1,ea,114,52.2,9.4,.7,-,42,6.7,40,70,.2,380,.02,.29,.3,02316 DATA CHEDDAR CHEESE,1,oz,113,37,9.1,.6,198,23,7.1,213,136,&}.3,370,.01,.13,.001,02317 DATA CHEDDAR CHEESE,1,ea,68,37,5.5,.4,120,14,4.3,129,82,.2,230,.01,.08,.001,02318 DATA CHEDDAR CH&}EESE,.5,cp,225,37,18.2,1.2,395.5,46.5,14.15,424,270,.55,740,.015,.26,.05,02319 DATA COTTAGE CHEESE-CREAM,2,tbsp,30,78.3,1.2,&}.8,65,24,3.9,27,43,.1,50,.01,.07,.001,02320 DATA COTTAGE CHEESE-CREAM,1,cp,260,78.3,10.3,7.1,561,208,33.3,230,372,.7,420,.07&},.61,.2,02321 DATA COTTAGE CHEESE,2,tbsp,24,79,.1,.8,82,20,4.8,26,50,.1,.001,.01,.08,.001,02322 DATA COTTAGE CHEESE,1,cp,17&}2,79,.6,5.4,580,144,34,180,350,.8,20,.06,.56,.2,02323 DATA CREAM CHEESE-WHIPPED,1,oz,106,51,10.7,.6,71,21,2.3,18,27,.1,440,.&}01,.07,.001,02324 DATA CREAM CHEESE,1,ea,60,51,6.1,.3,40,12,1.3,10,15,.001,250,.001,.04,.001,02325 DATA PARMESAN CHEESE,1,t&}bsp,23,17,1.5,.2,44,9,2.1,68,46,.001,60,.001,.04,.001,02326 DATA PARMESAN CHEESE,1,oz,132,17,8.7,1,247,50,12.1,383,263,.1,36&}0,.01,.25,.1,02327 DATA SWISS CHEESE-NATURAL,1,oz,105,39,7.9,.5,201,29,7.8,262,160,.3,320,.001,.11,.001,02328 DATA SWISS CH&}EESE-NATURAL,1,ea,56,39,4.2,.3,107,16,4.1,139,84,.1,170,.001,.06,.001,02329 DATA SWISS CHEESE-PROCESS,1,oz,101,40,7.6,.5,331&},28,7.5,251,246,.3,310,.001,.11,.001,02330 DATA SWISS CHEESE-PROCESS,1,ea,64,40,4.8,.3,209,18,4.7,159,155,.2,200,.001,.07,.0& }01,02331 DATA BOUILLON CUBE,1,ea,5,4,.1,.2,960,4,.8,-,-,-,-,-,-,-,-2332 DATA CHEESE STRAWS,5,ea,136,21.7,8.95,10.35,216.5,1&!}9,3.35,77.5,62,.2,115,.005,.05,.1,02333 DATA HORSERADISH,1,tsp,2,87.1,.001,.5,5,15,.1,3,2,.001,-,-,-,-,-2334 DATA DOUGHNUT-&"}CAKE TYPE,1,ea,164,23.7,7.8,21.6,210,38,1.9,17,80,.6,30,.07,.07,.5,.0012335 DATA DOUGHNUT-YEAST LEAV,1,ea,176,28.3,11.3,16,9&#}9,34,2.7,16,32,.6,30,.07,.07,.6,02336 DATA RELISH-FINELY CUT,1,tbsp,21,63,.1,5.1,107,-,.1,3,2,.1,-,-,-,-,-2337 DATA RELISH-&$}FINELY CUT,1,ea,14,63,.1,3.4,71,-,.1,2,1,.1,-,-,-,-,-2338 DATA MUSTARD-BROWN,1,tsp,5,71.8,.3,.3,65,7,.3,6,7,.1,-,-,-,-,-233&%}9 DATA MUSTARD-YELLOW,1,tsp,4,80.2,.2,.3,63,7,.2,4,4,.1,-,-,-,-,-2340 DATA TOMATO CATSUP,1,tbsp,16,68.6,.1,3.8,156,54,.3,3,8&&},.1,210,.01,.01,.2,22341 DATA OLIVES-GREEN,5,ea,16,78.2,1.8,.2,343,8,.2,8.5,2.5,.25,45,-,-,-,-2342 DATA OLIVES-RIPE,5,ea,30&'},80,3.25,.6,192.5,8,.25,20,4,.4,15,-,-,-,-2343 DATA DILL PICKLE,1,ea,15,93.3,.3,3,1928,270,.9,35,28,1.4,140,.001,.03,.001,8&(}2344 DATA SWEET PICKLE,1,ea,22,60.7,.1,5.5,-,-,.1,2,2,.2,10,.001,.001,.001,12345 DATA PLAIN CHEESE PIZZA,1,sl,153,48.3,5.4,1&)}8.4,456,85,7.8,144,127,.7,410,.04,.13,.7,52346 DATA POPCORN,1,cp,41,3.1,2,5.3,175,-,.9,1,19,.2,-,-,.01,.2,02347 DATA POTATO&*} CHIPS,10,ea,114,1.8,8,10,200,226,1.1,8,28,.4,.001,.04,.01,1,32348 DATA DUTCH PRETZEL-TWIST,1,ea,62,4.5,.7,12.1,269,21,1.6,4&+},21,.2,0,.001,.001,.1,02349 DATA STICK PRETZEL,10,ea,12,4.5,.1,2.3,50,4,.3,1,4,.001,0,.001,.001,.001,02350 DATA TOMATO CHIL&,}I SAUCE,1,tbsp,16,68,.001,3.7,201,56,.4,3,8,.1,210,.01,.01,.2,22351 DATA WHITE SAUCE,.5,cp,202,73.3,15.65,11,474,174,4.9,144&-},116.5,.25,575,.05,.215,.25,12352 DATA BEAN & BACON SOUP,1,cp,168,84.4,5.8,21.8,1008,395,8,63,128,2.3,650,.13,.08,1,32353 D&.}ATA BEEF NOODLE SOUP,1,cp,67,93.2,2.6,7,917,77,3.8,7,48,1,50,.05,.07,1,.0012354 DATA BOUILLON SOUP,1,cp,31,95.8,0,2.6,782,13&/}0,5,.001,31,.5,.001,.001,.02,1.2,-2355 DATA CHICKEN GUMBO SOUP,1,cp,55,93.8,1.4,7.4,950,108,3.1,19,24,.5,220,.02,.05,1.2,52&0}356 DATA CHICKEN NOODLE SOUP,1,cp,62,93.3,1.9,7.9,979,55,3.4,10,36,.5,50,.02,.02,.7,.0012357 DATA CHICKEN & RICE SOUP,1,cp,4&1}8,94.8,1.2,5.8,917,98,3.1,7,24,.2,140,.001,.02,.7,-2358 DATA CLAM CHOWDER SOUP,1,cp,81,91.9,2.5,12.3,938,184,2.2,34,47,1,880&2},.02,.02,1,-2359 DATA SOUP-CREAM OF ASPARG,1,cp,65,92.9,1.7,10.1,984,120,2.4,26,38,.7,310,.05,.1,.7,-2360 DATA SOUP-CREAM O&3}F ASPARG,1,cp,147,86.4,5.9,16.7,1068,301,6.9,176,157,.7,490,.07,.29,.7,.0012361 DATA SOUP-CREAM OF CHICK,1,cp,94,91.9,5.8,7.&4}9,970,79,2.9,24,34,.5,410,.02,.05,.5,.0012362 DATA SOUP-CREAM OF CHICK,1,cp,179,85.4,10.3,14.5,1054,260,7.4,172,152,.5,610,.&5}05,.27,.7,22363 DATA SOUP-CREAM OF MUSHRM,1,cp,134,89.6,9.6,10.1,955,98,2.4,41,50,.5,70,.02,.12,.7,.0012364 DATA SOUP-CREAM&6} OF MUSHRM,1,cp,216,83.2,14.2,16.2,1039,279,6.9,191,169,.5,250,.05,.34,.7,12365 DATA MINESTRONE SOUP,1,cp,105,89.5,3.4,14.2,&7}995,314,4.9,37,59,1,2350,.07,.05,1,-2366 DATA ONION SOUP,1,cp,65,93.4,2.4,5.3,1051,103,5.3,29,26,.5,.001,.001,.02,.001,-236&8}7 DATA TURKEY NOODLE SOUP,1,cp,79,92.3,2.9,8.4,998,77,4.3,14,43,.7,190,.05,.05,.12,.0012368 DATA SPLIT PEA SOUP,1,cp,145,85.&9}4,3.2,20.6,941,270,8.6,29,149,1.5,440,.25,.15,1.5,12369 DATA TOMATO SOUP,1,cp,88,90.5,2.5,15.7,970,230,2,15,34,.7,1000,.05,.&:}05,1.2,122370 DATA TOMATO SOUP,1,cp,173,84,7,22.5,1055,418,6.5,168,155,.8,1200,.1,.25,1.3,152371 DATA VEGETABLE BEEF SOUP,1&;},cp,78,91.9,2.2,9.6,1046,162,5.1,12,49,.7,2700,.05,.05,1,-2372 DATA CABBAGE-PLAIN,4,oz,27,92.4,.225,6.12,22.75,264.2,1.47,55&<}.5,33,.45,147.5,.057,.057,.35,53.252373 DATA COLESLAW,.5,cp,86,79,8.4,2.9,72,119.5,.8,26.5,17.5,.25,95,.03,.03,.2,17.52374 &=}DATA COLESLAW,.5,cp,59,82.9,4.75,4.25,74.5,115,.7,26,17,.25,90,.03,.03,.2,17.52375 DATA CARROT,1,ea,30,88.2,.1,7,34,246,.8,2&>}7,26,.5,7930,.04,.04,.4,62376 DATA CARROT-GRATED,.5,cp,23,88.2,.1,5.35,26,187.5,.6,20.5,20,.4,6050,.035,.03,.35,4.52377 DAT&?}A CELERY,3,ea,9,94.1,.1,2,63,171,.5,20,14,.2,140,.02,.02,.2,52378 DATA CHICORY,.5,cp,7,95.1,.05,1.45,3,82,.45,8,9.5,.25,-,-,&@}-,-,-2379 DATA CHIVES,1,tbsp,1,91.3,.001,.2,-,8,.1,2,1,.1,170,.001,.001,.001,22380 DATA CUCUMBER,6,ea,4,95.7,.001,.9,2,45,.&A}2,5,5,.1,.001,.01,.01,.1,32381 DATA ENDIVE,.5,cp,5,93.1,.05,1.05,3.5,73.5,.45,20.5,13.5,.45,825,.02,.035,.15,2.52382 DATA L&B}ETTUCE-LEAVES,2,ea,4,95.1,.002,.8,2,80,.4,10,8,.6,300,.02,.02,.002,22383 DATA LETTUCE-SHREDDED,.5,cp,5,94,.1,.95,2.5,72.5,.3&C}5,18.5,7,.4,525,.015,.02,.1,52384 DATA LETTUCE-WEDGE,1,ea,9,95.5,.1,2,6,123,.6,14,15,.4,230,.04,.04,.2,42385 DATA GREEN ONI&D}ON-CHOPPED,1,tbsp,2,89.4,.001,.5,.001,14,.1,3,2,.1,120,.001,.001,.001,22386 DATA GREEN ONION,2,ea,14,87.6,.1,3.2,2,69,.3,12,&E}12,.2,.001,.02,.01,.1,82387 DATA ONION-MATURE,1,tbsp,4,89.1,.001,.9,1,16,.2,3,4,.1,.001,.001,.001,.001,12388 DATA PARSLEY-C&F}HOPPED,1,tbsp,2,85.1,.001,.3,2,25,.1,7,2,.2,300,.001,.01,.001,62389 DATA GREEN PEPPER-CHOPPED,.5,cp,16,93.4,.15,3.6,10,160,.&G}9,7,16.5,.55,315,.06,.06,.4,962390 DATA GREEN PEPPER-RING,1,ea,2,93.4,.001,.5,1,21,.1,1,2,.1,40,.01,.01,.1,132391 DATA RADI&H}SHES,5,ea,4,94.5,-,.8,4,72.5,.25,7,7,.25,-,.005,.005,.05,62392 DATA TOMATO,1,ea,20,93.5,.2,4.3,3,222,1,12,25,.5,820,.05,.04,&I}.6,212393 DATA TURNIP,.5,cp,19,91.5,.15,4.3,32,174,.65,25.5,19.5,.35,-,.025,.045,.4,23.52394 DATA WATERCRESS-CHOPPED,.5,cp,&J}12,93.3,.2,1.9,32.5,176.5,1.4,94.5,34,1.05,3065,.05,.1,.55,49.52395 DATA ASPARAGUS SPEARS,4,ea,12,93.6,.1,2.2,1,110,1.3,13,3&K}0,.4,540,.1,.11,.8,162396 DATA LIMA BEAN-GREEN,.5,cp,88,80.8,.35,16.6,292.5,275.5,5.1,32,83,3,160,.05,.05,.6,8.52397 DATA S&L}NAP BEAN-GREEN,.5,cp,15,92.4,.15,3.4,2.5,94.5,1,31.5,23,.4,340,.04,.05,.2,6.52398 DATA BEET-DICED OR SLICED,.5,cp,27,90.9,.1&M},6.1,36.5,177,.95,12,19.5,.45,15,.025,.035,.25,52399 DATA BEET GREENS,.5,cp,13,93.6,.15,2.4,55,240.5,1.25,72,18,1.4,3700,.05&N},.11,.2,112400 DATA BROCCOLI-CHOPPED,.5,cp,24,91.6,.3,4.25,14,196,2.7,50,52,.65,2405,.55,.11,.45,52.52401 DATA BROCCOLI-STA&O}LKS,3,ea,24,91.4,.3,4.2,12,198,2.7,36,51,.6,1710,.06,.12,.6,662402 DATA BRUSSELS SPROUTS,.5,cp,25,89.3,.15,5.05,11,228.5,2.5&P},16.5,47.5,.6,440,.6,.08,.45,632403 DATA CABBAGE-COOKED,.5,cp,14,93.9,.15,3.1,10,118,.8,32,14.5,.2,95,.03,.03,.2,242404 DAT&Q}A CARROT-COOKED,.5,cp,24,91.2,.15,5.5,25.5,172,.7,25.5,24,.45,8140,.04,.04,.4,4.52405 DATA CAULIFLOWER,.5,cp,16,94,.2,2.95,9&R},186.5,1.7,15.5,34,.45,25,.035,.045,.35,372406 DATA CELERY-COOKED,.5,cp,10,95.3,.1,2.35,66,179.5,.6,23.5,16.5,.15,195,.015,.&S}025,.25,4.52407 DATA CHARD-COOKED,.5,cp,16,93.7,.2,2.9,75.5,281,1.6,64,21,1.6,4725,.035,.095,.35,142408 DATA COLLARD,.5,cp,&T}21,90.8,.45,3.55,18,169.5,1.95,110,28.5,.45,3915,.1,.145,.85,33.52409 DATA CORN ON COB,1,ea,70,74.1,.8,16.2,.001,151,2.5,2,6&U}9,.5,310,.09,.08,1.1,72410 DATA CORN-KERNELS,.5,cp,87,75.5,.55,21.55,248,102,2.65,3,76.5,.55,370,.03,.065,1.15,5.52411 DATA&V} CORN-CREAM STYLE,.5,cp,105,76.3,.75,25.6,302,124,2.7,4,71.5,.75,420,.04,.065,1.3,6.52412 DATA CRESS-GARDEN,.5,cp,15,92.9,.4&W},2.45,5.5,221.5,1.2,39,29.5,.45,4725,.025,.1,.45,15.52413 DATA DANDELION GREENS,.5,cp,17,89.8,.3,3.35,23,122,1.05,73.5,22,.9&X}5,6145,.7,.085,-,9.52414 DATA EGGPLANT-DICED,.5,cp,19,94.3,.2,4.1,1,150,1,11,21,.6,10,.05,.04,.5,32415 DATA KALE,.5,cp,20,9&Y}0.5,.35,3.5,13.5,125.5,1.95,78.5,31,.65,5330,.04,.1,.45,24.52416 DATA KOHLRABI-DICED,.5,cp,20,92.2,.1,4.35,5,214.5,1.4,27,34&Z},.25,15,.5,.025,.15,35.52417 DATA MUSHROOM,.5,cp,12,89.1,.2,2.3,3.5,131.5,.65,4.5,34,.5,-,.035,.115,2.4,12418 DATA MUSTARD &[}GREENS,.5,cp,15,93.8,.3,2.35,7.5,118,1.65,78,32.5,1.15,4500,.025,.075,.3,152419 DATA OKRA-CUTS & PODS,.5,cp,35,88.3,.1,8.15,&\}2,151.5,2.05,87,40,.45,445,.13,.155,.95,112420 DATA OKRA-SLICED,.5,cp,23,91.1,.25,4.8,1.5,139,1.6,73.5,33,.4,390,.105,.145,.&]}7,162421 DATA ONION-COOKED,.5,cp,30,91.8,.1,6.85,7.5,115.5,1.25,25,31.5,.4,40,.03,.03,.2,7.52422 DATA PARSNIP-DICED,.5,cp,5&^}1,82.2,.4,11.55,6,293.5,1.15,35,48,.45,25,.055,.06,.1,82423 DATA PARSNIP-MASHED,.5,cp,69,82.2,.55,15.65,8.5,398,1.6,47.5,65,&_}.65,30,.075,.085,.1,10.52424 DATA SWEET PEA-GREEN,.5,cp,68,79,.35,12.75,200.5,81.5,3.9,21.5,57,1.45,585,.095,.05,.85,72425 &`}DATA GREEN PEPPER-COOKED,1,ea,13,94.7,.1,2.8,7,109,.7,7,12,.4,310,.05,.05,.4,702426 DATA POTATOES AU GRATIN,.5,cp,127,76.7,4&a}.8,18,435,400.5,3.7,66,90.5,.5,195,.075,.11,1.25,13.52427 DATA BAKED POTATO,1,ea,145,75.1,.2,32.8,6,782,4,14,101,1.1,.001,.1&b}5,.07,2.7,312428 DATA BOILED POTATO,1,ea,73,82.8,.1,16.2,2,319,2.1,7,47,.6,.001,.1,.05,1.3,182429 DATA BOILED POTATO-DICED,&c}.5,cp,50,82.8,.1,11.25,1.5,221,1.45,4.5,32.5,.4,-,.7,.025,.95,12.52430 DATA POTATO CHIPS,10,ea,114,1.8,8,10,200,226,1.1,8,28&d},.4,.001,.04,.01,1,32431 DATA FRENCH FRIES-FRESH,10,ea,214,44.7,10.3,28.1,5,665,3.4,12,87,1,.001,.1,.06,2.4,162432 DATA FRE&e}NCH FRIES-FROZEN,10,ea,170,63.5,6.5,26.1,3,506,2.8,7,67,1.4,.001,.14,.02,2.1,202433 DATA POTATO-HASH BROWN,.5,cp,177,54.2,9.&f}05,22.55,223,368,2.4,9.5,61,.7,-,.06,.04,1.65,72434 DATA MASHED POTATOES-MILK,.5,cp,68,82.8,.75,13.65,316,274,2.2,25,51.5,.4&g},20,.085,.055,1.05,10.52435 DATA MASHED POTATOES-FAT,.5,cp,98,79.8,4.5,12.9,347.5,262.5,2.2,25,50.5,.4,180,.085,.055,1.05,9.&h}52436 DATA MASHED POTATOES-GRAN,.5,cp,83,81.4,2.3,13.75,245.5,352,2.1,32.5,46,.65,95,.03,.055,.85,32437 DATA POTATO-FRIED R&i}AW,.5,cp,228,46.9,12.05,27.7,189.5,659,3.4,13,86,.95,-,.1,.06,2.4,162438 DATA POTATO SALAD,.5,cp,124,76,3.5,20.4,660,399,3.4&j},40,80,.75,175,.1,.09,1.4,142439 DATA POTATO SALAD-MAYO,.5,cp,181,72.4,11.5,16.75,600,370,3.75,24,79,1,225,.09,.075,1.15,14&k}2440 DATA SCALLOPED POTATOES,.5,cp,127,76.7,4.8,18,435,400.5,3.7,66,90.5,.5,195,.075,.11,1.25,13.52441 DATA POTATO STICK,.5,&l}cp,95,1.5,6.35,8.9,-,23,1.1,7.5,24.5,.3,-,.035,.01,.85,72442 DATA PUMPKIN,.5,cp,40,90.2,.35,9.7,2.5,294,1.25,30.5,32,.5,7840&m},.035,.06,.75,62443 DATA RUTABAGAS,.5,cp,30,90.2,.1,6.95,3.5,142,.75,50,26.5,.25,470,.05,.05,.7,222444 DATA SAUERKRAUT,.5,c&n}p,21,92.8,.25,4.7,877.5,164.5,1.2,42.5,21,.6,60,.035,.045,.25,16.52445 DATA SPINACH,.5,cp,24,91.4,.6,3.7,242,256.5,2.75,121,&o}26.5,2.65,8200,.02,.125,.3,14.52446 DATA SUMMER SQUASH,.5,cp,14,95.5,.1,3.25,1,148,.95,26.5,26.5,.4,410,.055,.085,.85,10.52&p}447 DATA WINTER SQUASH-BAKED,.5,cp,64,81.4,.4,15.8,1,472.5,1.85,28.5,49,.8,4305,.05,.135,.7,13.52448 DATA WINTER SQUASH-BOIL&q}ED,.5,cp,46,88.8,.35,11.25,1,316,1.35,24.5,39,.6,4290,.05,.125,.5,102449 DATA SWEETPOTATO-BAKED,1,ea,161,63.7,.6,37,14,342,2&r}.4,46,66,1,9230,.1,.08,.8,252450 DATA SWEETPOTATO-CANDIED,.5,ea,176,60,3.5,35.9,44,200,1.4,39,45,.9,6620,.06,.04,.4,112451 &s}DATA SWEETPOTATO-CANNED,.5,cp,137,71.9,.25,31.75,61,255,2.55,32,52.5,1,9945,.065,.05,.75,182452 DATA TOMATO-COOKED,.5,cp,31,&t}92.4,.25,6.65,5,346,1.55,18,38.5,.7,1205,.085,.06,.95,292453 DATA TOMATO JUICE,.5,cp,23,93.6,.1,5.2,243,276,1.1,8.5,22,1.1,9&u}70,.06,.035,.95,19.52454 DATA TOMATO COCKTAIL,.5,cp,25,93,.1,6.1,243,268.5,.85,12,22,1.1,970,.06,.025,.75,19.52455 DATA TUR&v}NIP-COOKED,.5,cp,18,93.6,.15,3.8,26.5,145.5,.6,27,18.5,.3,-,.03,.04,.25,172456 DATA TURNIP GREENS,.5,cp,14,93.5,.15,2.4,-,-,&w}1.6,126,24.5,.75,4135,.075,.165,.35,342457 DATA VEGETABLE COCKTAIL,.5,cp,20,94.1,.1,4.35,242,267.5,1.1,14.5,26.5,.6,845,.06,&x}.035,.95,112458 DATA APPLE,1,ea,80,84.4,.8,20,1,152,.3,10,14,.4,120,.04,.03,.1,62459 DATA APRICOT,3,ea,55,85.3,.2,13.7,1,30&y}1,1.1,18,25,.5,2890,.03,.04,.6,112460 DATA AVOCADO-CALIFORNIA,.5,ea,185,73.6,18.4,6.5,4,652,2.4,11,45,.6,310,.12,.22,1.7,15&z}2461 DATA AVOCADO-FLORIDA,.5,ea,196,78,16.8,13.5,6,924,2,15,64,.9,440,.17,.31,2.4,212462 DATA BANANA-6 TO 7 INCH,1,ea,81,75.&{}7,.2,21.1,1,352,1,8,25,.7,180,.05,.06,.7,102463 DATA BANANA-8 TO 9 INCH,1,ea,101,75.7,.2,26.4,1,440,1.3,10,31,.8,230,.06,.07&|},.8,122464 DATA BLACKBERRIES,.5,cp,42,84.5,.65,9.3,.5,122.5,.85,23,13.5,.65,145,.02,.03,.3,152465 DATA BLUEBERRIES-RAW,.5,c&}}p,45,83.2,.35,11.2,.5,58.5,.5,11,9.5,.75,75,.02,.045,.35,102466 DATA RASPBERRIES-BLACK,.5,cp,49,80.8,.95,10.5,.5,133.5,1,20,&~}14.5,.6,-,.02,.06,.6,122467 DATA RASPBERRIES-RED,.5,cp,35,84.2,.3,8.35,.5,103.5,.75,13.5,13.5,.55,80,.02,.055,.55,15.52468 &}DATA STRAWBERRIES-RAW,.5,cp,27,89.9,.35,6.25,.5,122,.5,15.5,15.5,.75,45,.02,.05,.45,442469 DATA CANTALOUP,.5,ea,82,91.2,.3,2&}0.4,33,682,1.9,38,44,1.1,9240,.11,.08,1.6,902470 DATA SOUR CHERRIES-RAW,.5,cp,45,83.7,.25,11.1,1.5,148,.95,17,14.5,.3,775,.0&}4,.045,.3,82471 DATA SWEET CHERRIES-RAW,.5,cp,51,80.4,.2,12.6,1.5,138.5,.95,16,14,.3,80,.035,.045,.3,7.52472 DATA DATES,.5,&}cp,244,22.5,.45,64.9,1,576.5,1.95,52.5,56,2.65,45,.08,.09,1.95,02473 DATA FIGS-SMALL & FRESH,1,ea,32,77.5,.1,8.1,1,78,.5,14,&}9,.2,30,.02,.02,.2,12474 DATA FIGS-LARGE & FRESH,1,ea,52,77.5,.2,13.2,1,126,.8,23,14,.4,50,.04,.03,.3,12475 DATA GRAPEFRUIT&}-HALF,.5,ea,49,88.2,.1,13,1,163,.6,19,19,.5,10,.05,.02,.2,462476 DATA GRAPEFRUIT-SECTIONS,.5,cp,41,88.2,.1,10.8,1,135,.5,16,&}16,.4,10,.04,.02,.2,382477 DATA GRAPEFRUIT-PINK HALF,.5,ea,51,88.6,.1,13.3,1,173,.6,20,20,.5,560,.05,.03,.3,502478 DATA GRA&}PES-SLIP SKIN,.5,cp,35,81.6,.5,7.95,1.5,80,.65,8,6,.2,50,.025,.015,.15,22479 DATA GRAPES-ADHERENT SKIN,.5,cp,51,81.4,.25,13.&}15,2.5,131.5,.45,9,15,.3,75,.04,.025,.25,32480 DATA HONEYDEW MELON-WEDGE,1,ea,49,90.6,.4,11.5,18,374,1.2,21,24,.6,60,.06,.04&},.9,342481 DATA ORANGES,1,ea,64,86,.3,16,1,263,1.3,54,26,.5,260,.13,.05,.5,662482 DATA PEACH-RAW SLICES,.5,cp,32,89.1,.1,8.&}25,1,171.5,.5,7.5,16,.45,1130,.015,.045,.85,62483 DATA PEACH-RAW WHOLE,1,ea,33,89.1,.1,8.5,1,177,.5,8,17,.4,1160,.02,.04,.9,&}62484 DATA PEAR,1,ea,100,83.2,.7,25.1,3,213,1.1,13,18,.5,30,.03,.07,.2,72485 DATA PINEAPPLE-DICED,.5,cp,40,85.3,.15,10.6,1,&}113,.3,13,6,.4,55,.07,.025,.15,132486 DATA PLUM-DAMSON,5,ea,33,81.1,-,8.9,1,149.5,.25,9,8.5,.25,150,.04,.015,.25,-2487 DATA&} PLUM-JAPANESE,1,ea,32,86.6,.1,8.1,1,112,.3,8,12,.3,160,.02,.02,.3,42488 DATA RAISINS-PACKED,.5,cp,238,18,.15,63.85,22.5,629&}.5,2.05,51,83.5,2.9,15,.09,.065,.4,12489 DATA TANGERINE,1,ea,39,87,.2,10,2,108,.7,34,15,.3,360,.05,.02,.1,272490 DATA WATER&}MELON-WEDGE,1,ea,118,92.6,.9,29,5,454,2.3,32,45,2.3,2680,.14,.14,.9,322491 DATA APPLESAUCE-UNSWEET,.5,cp,50,88.5,.25,13.2,2.&}5,95,.25,5,6,.6,50,.025,.01,.05,12492 DATA APPLESAUCE-SWEET,.5,cp,116,75.7,.15,30.35,2.5,83,.25,5,6.5,.65,50,.025,.015,.05,1&}.52493 DATA APRICOT-WATER PACKED,.5,cp,46,89.1,.1,11.8,1,302.5,.85,15,19.5,.35,2250,.025,.025,.5,52494 DATA APRICOT-SIRUP P&}ACKED,.5,cp,111,76.9,.15,28.4,1.5,302,.75,14,19.5,.4,2245,.025,.025,.5,52495 DATA APRICOTS-COOKED,.5,cp,106,75.6,.25,27,10,3&}97.5,2,27.5,44,2.25,3750,.005,.065,1.25,42496 DATA BLUEBERRIES-UNSWEET,.5,cp,45,85,.4,11.2,1,67,.6,8.5,10.5,.65,60,.025,.05,&}.4,62497 DATA BLUEBERRIES-SWEET,.5,cp,121,72.3,.35,30.5,1,76,.7,7,12.5,.45,35,.045,.06,.45,92498 DATA RED RASPBERRY-FROZEN,&}.5,cp,122,74.3,.25,30.75,1.5,125,.9,16.5,21.5,.75,90,.025,.075,.75,26.52499 DATA STRAWBERRIES-FROZEN,.5,cp,139,71.3,.25,35.4&}5,1.5,143,.65,18,21.5,.9,40,.025,.075,.65,67.52500 DATA SOUR CHERRIES-CANNED,.5,cp,52,88,.25,13.05,2.5,158.5,1,18.5,16,.35,8&}30,.035,.025,.25,62501 DATA SWEET CHERRY-WATER,.5,cp,59,86.6,.25,14.8,1,161.5,1.1,18.5,16,.35,75,.025,.025,.25,3.52502 DATA&} SWEET CHERRY-SIRUP,.5,cp,104,78,.25,26.3,1.5,161.5,1.15,19.5,16.5,.4,75,.025,.025,.25,42503 DATA FIGS-CANNED,.5,cp,109,77.2&},.25,28.25,2.5,193,.65,17,17,.5,40,.04,.04,.25,1.52504 DATA FRUIT COCKTAIL-CN,.5,cp,97,79.6,.15,25.1,6.5,205.5,.5,11.5,15.5,&}.5,180,.025,.015,.5,2.52505 DATA GRAPEFRUIT-WATER,.5,cp,36,91.3,.1,9.25,5,175.5,.75,16,17,.35,10,.035,.025,.25,36.52506 DAT&}A GRAPEFRUIT-SIRUP,.5,cp,89,81.1,.15,22.6,1.5,171.5,.75,16.5,18,.4,15,.04,.025,.25,382507 DATA PEACHES-WATER PACK,.5,cp,38,9&}1.1,.1,9.9,2.5,167,.5,5,16,.35,550,.01,.035,.75,3.52508 DATA PEACHES-SIRUP PACK,.5,cp,100,79.1,.15,25.75,2.5,166.5,.5,5,15.5&},.4,550,.015,.025,.75,42509 DATA PEACHES-COOKED,.5,cp,102,76.5,.25,26.75,6.5,371.5,1.25,19,46.5,2.4,1525,.005,.075,1.9,2.52&}510 DATA PEACHES-FROZEN,.5,cp,110,76.5,.15,28.25,2.5,155,.5,5,16.5,.65,815,.015,.05,.9,502511 DATA PEARS-WATER PACK,.5,cp,39&},91.1,.25,10.15,1,107.5,.25,6,8.5,.25,5,.01,.025,.1,12512 DATA PEARS-SYRUP PACK,.5,cp,97,79.8,.25,25,1.5,107,.25,6.5,9,.25,5&},.015,.025,.15,1.52513 DATA PINEAPPLE CHUNKS-CN,.5,cp,94,79.9,.15,24.75,1.5,122.5,.4,14,6.5,.4,65,.10,.025,.25,92514 DATA P&}INEAPPLE SLICES-CN,1,sl,78,79.9,.1,20.4,1,101,.3,12,5,.3,50,.08,.02,.2,72515 DATA PLUMS-CANNED,.5,cp,107,77.4,.15,28.9,1.5,1&}83.5,.5,11.5,13,1.15,1565,.025,.025,.5,2.52516 DATA PRUNES-UNSWEETENED,.5,cp,126,66.4,.3,33.35,4.5,347.5,1.05,25.5,39.5,1.9,&}795,.035,.075,.75,12517 DATA PRUNES-SWEETENED,.5,cp,204,53.2,.25,53.65,3.5,312,.95,22.5,35.5,1.8,715,.03,.07,.7,12518 DATA &}RHUBARB-COOKED,.5,cp,190,62.8,.15,48.6,2.5,274,.7,105.5,20.5,.8,110,.025,.07,.4,82519 DATA APPLEJUICE,.5,cp,58,87.8,-,14.75,&}1,125,.1,7.5,11,.75,-,.01,.025,.1,12520 DATA GRAPEJUICE,.5,cp,83,82.9,-,21,2.5,146.5,.25,14,15,.4,-,.05,.025,.25,-2521 DATA&} GRAPEJUICE-FROZEN,.5,cp,66,86.4,-,16.65,1.5,42.5,.25,4,5,.15,5,.025,.04,.25,52522 DATA GRAPEFRUIT JUICE-FSH,.5,cp,48,90,.1,&}11.3,1,199.5,.6,11,18.5,.25,100,.05,.025,.25,46.52523 DATA GRAPEFRUIT JUICE-CN,.5,cp,50,89.2,.1,12.1,1,200,.6,10,17.5,.5,10,&}.035,.025,.25,422524 DATA GRAPEFRUIT JUICE-CN,.5,cp,66,86.2,.15,16,1.5,202.5,.65,10,17.5,.5,15,.04,.025,.25,392525 DATA GRA&}PEFRUIT JUICE-FR,.5,cp,50,89.3,.1,12.1,1,210,.6,12.5,21,.1,10,.05,.02,.25,482526 DATA GRAPEFRUIT JUICE-FR,.5,cp,58,87.8,.1,1&}4.15,1,178.5,.5,10,17.5,.1,10,.04,.015,.2,412527 DATA LEMON JUICE-RAW,1,tbsp,4,91,.001,1.2,.001,10.5,.1,1,2,.001,.001,.001,.&}001,.001,3.52528 DATA ORANGE JUICE-FRESH,.5,cp,56,88.3,.25,12.9,1,248,.85,13.5,21,.25,250,.11,.035,.5,622529 DATA ORANGE JU&}ICE-CANNED,.5,cp,60,87.4,.25,13.95,1,248,1,12.5,22.5,.5,250,.085,.025,.35,502530 DATA ORANGE JUICE-FROZEN,.5,cp,61,87.2,.1,1&}4.45,1,251.5,.85,12.5,21,.1,270,.115,.015,.45,602531 DATA PINEAPPLE JUICE-CN,.5,cp,69,85.6,.15,16.9,1.5,186.5,.5,19,11.5,.4,&}65,.065,.025,.25,11.52532 DATA PRUNE JUICE-CANNED,.5,cp,98,80,.15,24.3,2.5,301,.5,18,25.5,5.25,-,.015,.015,.5,2.52533 DATA &}TANGERINE JUICE-CN,.5,cp,53,88.8,.25,12.6,1,220,.6,22,17.5,.25,520,.75,.025,.1,272534 DATA TANGERINE JUICE-CN,.5,cp,62,87,.2&}5,14.95,1,220,.6,22,17.5,.25,520,.75,.025,.1,27.6,22,17.5,.25,520,.75,.025,.1,272534 DATA TANGERINE JUICE-CN,.5,cp,62,87,.2$01 ? "}"5 DIM PR$(7),CA$(7),PHO$(7)6 DIM TH$(7),RIB$(7),NI$(7),C$(7),IR$(7),A$(7),SS(18,0),BB(18,1)10 TRAP 80:OPEN #2,8,0,"*}D:DATAFILE.3"20 OPEN #3,8,0,"D:POINTER.3"30 FOR N=587 TO 60433 READ PR$,CA$,PHO$,IR$,A$,TH$,RIB$,NI$,C$:NOTE #2,S,B35 PRI*}NT #3;S;",";B45 PRINT #2;PR$46 PRINT #2;CA$47 PRINT #2;PHO$48 PRINT #2;IR$49 PRINT #2;A$50 PRINT #2;TH$51 PRINT #2;RIB*}$52 PRINT #2;NI$53 PRINT #2;C$75 NEXT N78 GOTO 10080 ? "CAN'T WRITE FILE TO DISKETTE."81 ? "CHECK DISK DRIVE OR DATA ST*}ATEMENT."83 ? "MAKE CORRECTIONS AND RUN PROGRAM AGAIN"100 END 105 DATA 6,360,240,10,420,.3,.4,6,35110 DATA 9,540,360,15,4*}00,.5,.6,8,35115 DATA 23,800,800,15,400,.7,.8,9,45120 DATA 30,800,800,10,500,.9,1,11,45125 DATA 34,800,800,10,700,1.2,1.4,*}16,45130 DATA 45,1200,1200,18,1000,1.4,1.6,18,50135 DATA 56,1200,1200,18,1000,1.4,1.7,18,60140 DATA 56,800,800,10,1000,1.5*},1.7,19,60145 DATA 56,800,800,10,1000,1.4,1.6,18,60150 DATA 56,800,800,10,1000,1.2,1.4,16,60155 DATA 46,1200,1200,18,800,1*}.1,1.3,15,50160 DATA 46,1200,1200,18,800,1.1,1.3,14,60165 DATA 44,800,800,18,800,1.1,1.3,14,60170 DATA 44,800,800,18,800,1*},1.2,13,60175 DATA 44,800,800,10,800,1,1.2,13,60180 DATA 30,400,400,45,200,.4,.3,2,20185 DATA 20,400,400,45,400,.5,.5,5,40*}190 DATA 50,800,800,90,600,.9,.8,7,60,1.2,13,60180 DATA 30,400,400,45,200,.4,.3,2,20185 DATA 20,400,400,45,400,.5,.5,5,40('