| CONVERT.UTL | | COPYRIGHT 1990 BY DAVID W. DENKER | Z''=INFO:z'''=int((z''-int(z''/10000)*10000)/1000) if z'''=0}1 DSP N" SORRY, THIS FILE CAN ONLY BE RUN ON MATH EXTRA!"N WAIT5:QUIT #1 TITLE= CONVERSION PROGRAM SAVM TEMP SAVV TEMP $Y="  PAGE UP  " $z="  PAGE DOWN  " f=0 boff:cls:digl5:digr5:xon:wlcc f14b0:GOTO110 #70 hoff LODM TEMP LODV TEMP DEL TEMP.VAR DEL TEMP.MEM QUIT #80 n=data t{0,5*(n-32)/9,5*(n-32)/9+273 ,9*n/5+32,n+273,n-273,(n-273)*9/5+32}:m=1:digr2:xoff $w=;ø Fahrenheit; if t=3}r:if t=6}r $w=;ø Centigrade; if t=1}r:if t=5}r $w=;ø Kelvin;:ret #90:moff:woff:n=0 dprn n$v" to "$wn" Number to be converted: ":n=inp dprn n" ANSWER = ":if m=0}c80:dprn(n*m)$wn:digr5:xon head b0f14; "C"onvert, else QUIT ; #91:mset80:mon2 call400:if r=4}}if k=2}110:IF r=5}}if i<10012}110:go70 #92 windd wr(x)wc(y)r3c20" FROM: "nnnnnnnnnnnnnnnnnnnnn wdsp l1$an$bn$cn$dn$en$fn$gn$hn$in$jn$kn$ln$mn$nn$on$pn$qn$rn$sn$tn call100:$v=$(j):ret #93 windd wr(x)wc(y)r3c40" TO: "nnnnnnnnnn wdsp l1$an$bn$cn$dn$en$fn$gn$hn$in$jn call100:$w=$(j):ret #99:j=data k{1,1,2,3,0,4,5,6,6,0,7,7,8,8,9,9,10,10,11,12,0,0,12,0,12,0} r=0:ret #100 i=mlin:if i>99}100 #101:k=kyck:if k<>0}102 i=mlin:if i=0}101:if i>99}104:if i>x-2}101:if i=j}101:j=i:go103 #102:if k=13}105:if k=27}70:if k=273}106:if k=281}107:if k=275}108 if k=272}}if j>0}}j=j-1:if k=280}}if j64}}if k<91}}k=k+32:if k>96}}if k<123}109 #103:wlcc L(j):goto101 #104:i=i-int(i/100)*100:j=i #105:r=0:ret #106:r=1:ret:|page up| #107:r=2:ret:|page down| #108:r=3:j=1:ret:|<--| #109:r=4:k=k-97:ret:|A to Z| #110:mon2:head b0f14; Pick by the LETTER or use  CURSOR keys or MOUSE. Hit ESC to quit.; j=0:x=15:windd wr(x)wc11r3c5bb1bf15b3f0" GROUP: A, B C D F G H, I K, L M, N O, P Q, R S T, W, Y [ESC]" #111:f=1:CALL100:f=0:if r=4}c99:if j=0}110 if r=0}112:if r=4}112:go110 #112 head b0f14; Pick using  CURSOR keys or MOUSE. Hit ESC to quit.; on(j)g{115,130,150,165,180,200,220,240,260,280,300,320,70}:go70 #115 $a=" Acres" $b=" Acre-feet" $c=" Ares" $d=" Atmospheres" $e=" Barrels-oil" $f=" Barrels-cement" $g=" Bags-cement" $h=" B.T.U." $i=" B.T.U./min." $j=" Bushels" $k=" Bushels (Imp.)" $l=$z j=0:x=14:y=18:call92:if r=2}130:if r=3}110 on(j)g{117,118,127,119,120,121,122,123,124,126,125,130}:go110 #117 $a=" Square feet" $b=" Hectares" $c=" Square meters" $d=" Square miles" $e=" Square rods" $f=" Square yards" j=0:x=8:y=17:call93:if j=0}115:if r=3}115 m=data j{0,43560,.405,4047,.001562,160,4840}:goto90 #118 $a=" Cubic feet" $b=" Gallons" $c=" Cubic meters" j=0:x=5:y=16:call93:if j=0}115:if r=3}115 m=data j{0,43560,325851,1233.49}:goto90 #119 $a=" Cms. of mercury" $b=" Inches of mercury" $c=" Feet of water" $d=" Kgs./sq.meter" $e=" Lbs./sq.inch" $f=" Tons/sq.ft." j=0:x=8:y=21:call93:if j=0}115:if r=3}115 m=data j{0,76,29.92,33.9,10333,14.7,1.058}:goto90 #120 $a=" Gallons-oil" $b=" Liters-oil" j=0:x=4:y=15:call93:if j=0}115:if r=3}115 m=data j{0,42,158.97}:goto90 #121 $a=" Bags-cement" $b=" Pounds-cement" j=0:x=4:y=17:call93:if j=0}115:if r=3}115 m=data j{0,4,376}:goto90 #122 $w=" Pounds-cement":m=94:goto90 #123 $a=" Kilogram-calories" $b=" Foot-lbs." $c=" Horsepower-hrs." $d=" Kilogram-meters" $e=" Kilowatt-hrs." j=0:x=7:y=21:call93:if j=0}115:if r=3}115 m=data j{0,.252,777.5,.0003927,107.5,.0002928}:goto90 #124 $a=" Foot-lbs./sec." $b=" Horsepower" $c=" Kilowatts" $d=" Watts" j=0:x=6:y=18:call93:if j=0}115:if r=3}115 m=data j{0,12.96,.02356,.01757,17.57}:goto90 #125 $a=; Cubic inches; $b=; Cubic meters; $c=; Gallons; $d=; Pecks; j=0:x=6:y=16:call93:if j=0}115:if r=3}115 m=data j{0,2219.36,.036,8,4}:goto90 #126 $a=; Cubic inches; $b=; Liters; $c=; Pecks; j=0:x=5:y=16:call93:if j=0}115:if r=3}115 m=data j{0,2150.42,35.238,4}:goto90 #127 $a=; Centare; $b=; Hectare; $c=; Square meters; $d=; Square yards; j=0:x=6:y=17:call93:if j=0}115:if r=3}115 m=data j{0,100,.001,100,119.6}:goto90 #130 $a=$y $b=; Centares (Centiares); $c=; Centigrams; $d=; Centiliters; $e=; Centimeters; $f=; Centimeters of mercury; $g=; Centimeters/sec.; $h=; Cubic centimeters; $i=; Cubic feet; $j=; Cubic feet/min.; $k=; Cubic feet/sec.; $l=; Cubic inches; $m=; Cubic meters; $n=; Cubic yards; $o=; Cubic yards/min.; $p=$z j=0:x=18:y=26:call92:if r=1}115:if r=2}150:if r=3}110 on(j)g{115,132,133,134,135,136,137,139,140,141,142,143,144,145,146d,150} go110 #132 $a=; Ares; $b=; Square feet; $c=; Square meters; j=0:x=5:y=17:call93:if j=0}130:if r=3}130 m=data j{0,.001,10.76,1}:goto90 #133 $a=; Grams; $b=; Grains; j=0:x=4:y=10:call93:if j=0}130:if r=3}130 m=data j{0,.01,.1543}:goto90 #134 $a=; Cubic inches; $b=; Fluidounces; $c=; Liters; j=0:x=5:y=16:call93:if j=0}130:if r=3}130 m=data j{0,.6102,.338,.01}:goto90 #135 $a=; Inches; $b=; Meters; $c=; Millimeters; j=0:x=5:y=15:call93:if j=0}130:if r=3}130 m=data j{0,1/25.4,.01,10}:goto90 #136 $a=; Atmospheres; $b=; Feet of water; $c=; Kgs./sq.meter; $d=; Lbs./sq.ft.; $e=; Lbs./sq.inch; j=0:x=7:y=17:call93:if j=0}130:if r=3}130 m=data j{0,.01316,.4461,136,27.85,.1934}:goto90 #137 $a=; Feet/min.; $b=; Feet/sec.; $c=; Kilometers/hr.; $d=; Meters/min.; $e=; Miles/hr.; $f=; Miles/min.; j=0:x=8:y=18:call93:if j=0}130:if r=3}130 m=data j{0,1.969,.03281,.036,.6,.02237,.0003728}:goto90 #139 $a=; Cubic feet; $b=; Cubic inches; $c=; Cubic meters; $d=; Cubic yards; $e=; Gallons; $f=; Liters; $g=; Pints (liq.); $h=; Quarts (liq.); j=0:x=10:y=17:call93:if j=0}130:if r=3}130 m=data j{0,3.531E-5,.06102,1E-6,1.308E-6,2.642E-4,.001,.002113,.001057} goto90 #140 $a=; Cubic centimeters; $b=; Cubic inches; $c=; Cubic meters; $d=; Cubic yards; $e=; Gallons; $f=; Liters; $g=; Pints (liq.); $h=; Quarts (liq.); j=0:x=10:y=22:call93:if j=0}130:if r=3}130 m=data j{0,28320,1728,.02832,.03704,7.48052,28.32,59.84,29.92}:goto90 #141 $a=; Cubic cms./sec.; $b=; Gallons/sec.; $c=; Liters/sec.; $d=; Lbs.of water/min.; j=0:x=6:y=22:call93:if j=0}130:if r=3}130 m=data j{0,472,.1247,.472,62.43}:goto90 #142 $a=; Millions gals./day; $b=; Gallons/min.; j=0:x=4:y=22:call93:if j=0}130:if r=3}130 m=data j{0,.646317,448.831}:goto90 #143 $a=; Cubic centimeters; $b=; Cubic feet; $c=; Cubic meters; $d=; Cubic yards; $e=; Gallons; $f=; Liters; $g=; Pints (liq.); $h=; Quarts (liq.); j=0:x=10:y=21:call93:if j=0}130:if r=3}130 m=data j{0,16.39,5.787E-4,1.639E-5,2.143E-5,.004329,.01639,.03463,.01732} goto90 #144 $a=; Cubic centimeters; $b=; Cubic feet; $c=; Cubic inches; $d=; Cubic yards; $e=; Gallons; $f=; Liters; $g=; Pints (liq.); $h=; Quarts (liq.); j=0:x=10:y=21:call93:if j=0}130:if r=3}130 m=data j{0,1E6,35.31,61.023,1.308,264.2,1E3,2113,1057}:goto90 #145 $a=; Cubic centimeters; $b=; Cubic feet; $c=; Cubic inches; $d=; Cubic meters; $e=; Gallons; $f=; Liters; $g=; Pints (liq.); $h=; Quarts (liq.); j=0:x=10:y=21:call93:if j=0}130:if r=3}130 m=data j{0,764600,27,46656,.7646,202,764.6,1616,807.9}:goto90 #146 $a=; Cubic feet/sec.; $b=; Gallons/sec.; $c=; Liters/sec.; j=0:x=5:y=19:call93:if j=0}130:if r=3}130 m=data j{0,.45,3.367,12.74}:goto90 #150 $a=$y $b=; Decigrams; $c=; Deciliters; $d=; Decimeters; $e=; Degrees (angle); $f=; Degrees/sec.; $g=; Dekagrams; $h=; Dekaliters; $i=; Dekameters; $j=; Drams; $k=$z j=0:x=13:y=19:call92:if r=1}130:if r=2}165:if r=3}110 on(j)g{130,152,153,154,155,156,157,158,159,160,165}:go110 #152 $w=; Grams;:m=.1:goto90 #153 $w=; Liters;:m=.1:goto90 #154 $w=; Meters;:m=.1:goto90 #155 $a=; Grads; $b=; Minutes (angle); $c=; Radians; $d=; Seconds (angle); j=0:x=6:y=19:call93:if j=0}150:if r=3}150 m=data j{0,100/90,60,pi/180,3600}:goto90 #156 $a=; Radians/sec.; $b=; Revolutions/min.; $c=; Revolutions/sec.; j=0:x=5:y=20:call93:if j=0}150:if r=3}150 m=data j{0,.01745,.16667,.002778}:goto90 #157 $w=; Grams;:m=10:goto90 #158 $w=; Liters;:m=10:goto90 #159 $w=; Meters;:m=10:goto90 #160 $a=; Grains; $b=; Ounces; $c=; Grams; j=0:x=5:y=10:call93:if j=0}150:if r=3}150 m=data j{0,27.34375,.0625,1.771845}:goto90 #165 $a=$y $b=; Fathoms; $c=; Feet; $d=; Feet of water; $e=; Feet/min.; $f=; Feet/sec.; $g=; Fluidounces; $h=; Fluidounces (Imp.); $i=; Fluidrams; $j=; Fluidrams (Imp.); $k=; Foot-pounds; $l=; Foot-pounds/min.; $m=; Foot-pounds/sec.; $n=; Furlongs; $o=$z j=0:x=17:y=22:call92:if r=1}150:if r=2}180:if r=3}110 on(j)g{150,167,168,169,170,171,176,177,178,179,173,174,175,172,180}:go110 #167 $a=; Feet; $b=; Meters; $c=; Yards; j=0:x=5:y=10:call93:if j=0}165:if r=3}165 m=data j{0,6,1.8288,2}:goto90 #168 $a=; Centimeters; $b=; Inches; $c=; Meters; $d=; Yards; j=0:x=6:y=15:call93:if j=0}165:if r=3}165 m=data j{0,30.48,12,.3048,1/3}:goto90 #169 $a=; Atmospheres; $b=; Inches of mercury; $c=; Kgs./sq.meter; $d=; Lbs./sq.ft.; $e=; Lbs./sq.inch; j=0:x=7:y=21:call93:if j=0}165:if r=3}165 m=data j{0,.0295,.8826,304.8,62.43,.4335}:goto90 #170 $a=; Centimeters/sec.; $b=; Feet/sec.; $c=; Kilometers/hr.; $d=; Meters/min.; $e=; Miles/hr.; j=0:x=7:y=20:call93:if j=0}165:if r=3}165 m=data j{0,.508,.01667,.01829,.3048,.01136}:goto90 #171 $a=; Centimeters/sec.; $b=; Kilometers/hr.; $c=; Knots; $d=; Meters/min.; $e=; Miles/hr.; $f=; Miles/min.; j=0:x=8:y=20:call93:if j=0}165:if r=3}165 m=data j{0,30.48,1.097,.5921,18.29,.6818,.01136}:goto90 #172 $a=; Miles; $b=; Rods; j=0:x=4:y=9:call93:if j=0}165:if r=3}165 m=data j{0,.125,40}:goto90 #173 $a=; B.T.U.; $b=; Horsepower-hrs.; $c=; Kilogram-calories; $d=; Kilogram-meters; $e=; Kilowatt-hrs.; j=0:x=7:y=21:call93:if j=0}165:if r=3}165 m=data j{0,.001286,5.05E-7,3.241E-4,.1383,3.766E-7}:goto90 #174 $a=; B.T.U./min.; $b=; Foot-pounds/sec.; $c=; Horsepower; $d=; Kg.-calories/min.; $e=; Kilowatts; j=0:x=7:y=21:call93:if j=0}165:if r=3}165 m=data j{0,.001286,.01667,3.03E-5,3.241E-4,2.26E-5,}:goto90 #175 $a=; B.T.U./min.; $b=; Horsepower; $c=; Kg.-calories/min.; $d=; Kilowatts; j=0:x=6:y=21:call93:if j=0}165:if r=3}165 m=data j{0,.07717,.001818,.01945,.001356}:goto90 #176 $a=; Cubic inches; $b=; Fluidrams; $c=; Milliliters; j=0:x=5:y=16:call93:if j=0}165:if r=3}165 m=data j{0,1.804,8,29.573}:goto90 #177 $a=; Cubic centimeters; $b=; Cubic inches; $c=; Fluidrams; j=0:x=5:y=21:call93:if j=0}165:if r=3}165 m=data j{0,28.416,1.7339,8}:goto90 #178 $a=; Cubic inches; $b=; Milliliters; $c=; Minims; j=0:x=5:y=16:call93:if j=0}165:if r=3}165 m=data j{0,.225,3.696,60}:goto90 #179 $a=; Cubic centimeters; $b=; Cubic inches; $c=; Minims; j=0:x=5:y=21:call93:if j=0}165:if r=3}165 m=data j{0,3.5516,.216734,60}:goto90 #180 $a=$y $b=; Gallons; $c=; Gallons (Imperial); $d=; Gallons water; $e=; Gallons/min.; $f=; Gallons water/min.; $g=; Gills; $h=; Gills (Imperial); $i=; Grads; $j=; Grains (troy); $k=; Grains/gallon; $l=; Grains/Imp.gallon; $m=; Grams; $n=; Grams/centimeter; $o=; Grams/cu.centimeter; $p=; Grams/liter; $q=$z j=0:x=19:y=23:call92:if r=1}165:if r=2}200:if r=3}110 on(j)g{165,182,183,184,185,186,194,195,196,187,188,189,190,191,192,193,200} go110 #182 $a=; Cubic centimeters; $b=; Cubic feet; $c=; Cubic inches; $d=; Cubic meters; $e=; Cubic yards; $f=; Liters; $g=; Pints (liq.); $h=; Quarts (liq.); $i=; Imperial gallons; j=0:x=11:y=21:call93:if j=0}180:if r=3}180 m=data j{0,3785,.1337,231,.003785,.004951,3.785,8,4,.83267}:goto90 #183 $a=; Cubic inches; $b=; Liters; $c=; Quarts; $d=; U.S. Gallons; j=0:x=6:y=16:call93:if j=0}180:if r=3}180 m=data j{0,277.42,4.545,4,1.20095}:goto90 #184 $w=; Pounds of water;:m=8.3453:goto90 #185 $a=; Cubic feet/sec.; $b=; Liters/sec.; $c=; Cu.ft./hr.; j=0:x=5:y=19:call93:if j=0}180:if r=3}180 m=data j{0,.002228,.06308,8.0208}:goto90 #186 $w=; Tons water/24 hrs.;:m=6.0086:goto90 #187 $a=; Grams; $b=; Pennyweights (troy); $c=; Ounces (troy); j=0:x=5:y=23:call93:if j=0}180:if r=3}180 m=data j{0,.0648,.04167,.0020833}:goto90 #188 $a=; Parts/million; $b=; Lbs./million gal.; j=0:x=4:y=21:call93:if j=0}180:if r=3}180 m=data j{0,17.118,142.86}:goto90 #189 $w=; Parts/million;:m=14.254:goto90 #190 $a=; Dynes; $b=; Grains; $c=; Kilograms; $d=; Milligrams; $e=; Ounces; $f=; Ounces (troy); $g=; Pounds; j=0:x=9:y=17:call93:if j=0}180:if r=3}180 m=data j{0,980.7,15.43,.001,1000,.03527,.03215,.0022046}:goto90 #191 $w=; Pounds/inch;:m=.0056:goto90 #192 $a=; Pounds/cubic foot; $b=; Pounds/cubic inch; j=0:x=4:y=21:call93:if j=0}180:if r=3}180 m=data j{0,62.43,.03613}:goto90 #193 $a=; Grains/gal.; $b=; Pounds/1000 gals.; $c=; Pounds/cubic foot; $d=; Parts/million; j=0:x=6:y=21:call93:if j=0}180:if r=3}180 m=data j{0,58.417,8.345,.062427,1000}:goto90 #194 $a=; Cubic inches; $b=; Fluidounces; $c=; Milliliters; j=0:x=5:y=16:call93:if j=0}180:if r=3}180 m=data j{0,7.218,4,118.291}:goto90 #195 $a=; Cubic centimeters; $b=; Cubic inches; $c=; Fluidounces; j=0:x=5:y=21:call93:if j=0}180:if r=3}180 m=data j{0,142.066,8.669,5}:goto90 #196 $a=; Degrees; $b=; Radians; j=0:x=4:y=11:call93:if j=0}180:if r=3}180 m=data j{0,90/100,90/100*pi/180}:goto90 #200 $a=$y $b=; Hectares; $c=; Hectograms; $d=; Hectoliters; $e=; Hectometers; $f=; Hectowatts; $g=; Horsepower; $h=; Horsepower (boiler); $i=; Horsepower-hours; $j=; Inches; $k=; Inches of mercury; $l=; Inches of water; $m=$z j=0:x=15:y=23:call92:if r=1}180:if r=2}220:if r=3}110 on(j)g{180,202,203,204,205,206,207,208,209,210,211,212,220}:go110 #202 $a=; Acres; $b=; Square feet; j=0:x=4:y=15:call93:if j=0}200:if r=3}200 m=data j{0,2.471,1.076E5}:goto90 #203 $w=; Grams;:m=100:goto90 #204 $w=; Liters;:m=100:goto90 #205 $w=; Meters;:m=100:goto90 #206 $w=; Watts;:m=100:goto90 #207 $a=; B.T.U./min.; $b=; Foot-lbs./min.; $c=; Foot-lbs./sec.; $d=; Horsepower (metric); $e=; Kg.-calories/min.; $f=; Kilowatts; $g=; Watts; j=0:x=9:y=23:call93:if j=0}200:if r=3}200 m=data j{0,42.44,33000,550,1.014,10.74,.7457,745.7}:goto90 #208 $a=; B.T.U./hr.; $b=; Kilowatts; j=0:x=4:y=14:call93:if j=0}200:if r=3}200 m=data j{0,33479,9.803}:goto90 #209 $a=; B.T.U.; $b=; Foot-pounds; $c=; Kilogram-calories; $d=; Kilogram-meters; $e=; Kilowatt-hours; j=0:x=7:y=21:call93:if j=0}200:if r=3}200 m=data j{0,2547,1.98E6,641.7,2.737E5,.7457}:goto90 #210 $a=; Centimeters; $b=; Millimeters; j=0:x=4:y=15:call93:if j=0}200:if r=3}200 m=data j{0,2.54,25.4}:goto90 #211 $a=; Atmospheres; $b=; Feet of water; $c=; Kgs./sq.meter; $d=; Lbs./sq.ft.; $e=; Lbs./sq.inch; j=0:x=7:y=17:call93:if j=0}200:if r=3}200 m=data j{0,.03342,1.133,345.3,70.73,.4912}:goto90 #212 $a=; Atmospheres; $b=; Feet of mercury; $c=; Kgs./sq.meter; $d=; Ounces/sq.inch; $e=; Lbs./sq.ft.; $f=; Lbs./sq.inch; j=0:x=8:y=19:call93:if j=0}200:if r=3}200 m=data j{0,.002458,.07355,25.4,.5781,5.202,.03613}:goto90 #220 $a=$y $b=; Kilograms; $c=; Kilogram-calories; $d=; Kilogram-cal./min.; $e=; Kilograms/meter; $f=; Kilograms/sq.meter; $g=; Kilograms/sq.millimeter; $h=; Kiloliters; $i=; Kilometers; $j=; Kilometers/hr.; $k=; Kilowatts; $l=; Kilowatt-hours; $m=; Knots; $n=; Liters; $o=; Liters/min.; $p=$z j=0:x=18:y=27:call92:if r=1}200:if r=2}240:if r=3}110 on(j)g{200,222,223,224,225,226,227,228,229,230,232,233,236,234,235,240} go110 #222 $a=; Dynes; $b=; Pounds; $c=; Tons (short); $d=; Grams; j=0:x=6:y=16:call93:if j=0}220:if r=3}220 m=data j{0,980665,2.2046,.001102,1000}:goto90 #223 $a=; B.T.U; $b=; Foot-pounds; $c=; Horsepower-hrs.; $d=; Kilowatt-hours; j=0:x=6:y=19:call93:if j=0}220:if r=3}220 m=data j{0,3.968,3086,.001558,.001162}:goto90 #224 $a=; Foot-pounds/sec.; $b=; Horsepower; $c=; Kilowatts; j=0:x=5:y=20:call93:if j=0}220:if r=3}220 m=data j{0,51.43,.09351,.06972}:goto90 #225 $w=; Pounds/foot;:m=.672:goto90 #226 $a=; Atmospheres; $b=; Feet of water; $c=; Inches of mercury; $d=; Pounds/sq.foot; $e=; Pounds/sq.inch; j=0:x=7:y=21:call93:if j=0}220:if r=3}220 m=data j{0,9.678E-5,.003281,.002896,.2048,.001422}:goto90 #227 $w=; Kilograms/sq.meter;:m=1E6:goto90 #228 $w=; Liters;:m=1E3:goto90 #229 $a=; Centimeters; $b=; Feet; $c=; Meters; $d=; Miles; $e=; Nautical miles; $f=; Yards; j=0:x=8:y=18:call93:if j=0}220:if r=3}220 m=data j{0,1E5,3281,1E3,.6214,.5399568,1094}:goto90 #230 $a=; Centimeters/sec.; $b=; Feet/min.; $c=; Feet/sec.; $d=; Knots; $e=; Meters/min.; $f=; Miles/hour; j=0:x=8:y=20:call93:if j=0}220:if r=3}220 m=data j{0,27.78,54.68,.9113,.5399568,16.67,.6214}:goto90 #232 $a=; B.T.U./min.; $b=; Foot-lbs./min.; $c=; Foot-lbs./sec.; $d=; Horsepower; $e=; Kilogram-cal./min.; $f=; Watts; j=0:x=8:y=22:call93:if j=0}220:if r=3}220 m=data j{0,56.92,44250,737.6,1.341,14.34,1000,}:goto90 #233 $a=; B.T.U.; $b=; Foot-pounds; $c=; Horsepower-hours; $d=; Kilogram-calories; $e=; Kilogram-meters; j=0:x=7:y=21:call93:if j=0}220:if r=3}220 m=data j{0,3415,2.655E6,1.341,860.5,3.671E5}:goto90 #234 $a=; Cubic centimeters; $b=; Cubic feet; $c=; Cubic inches; $d=; Cubic meters; $e=; Cubic yards; $f=; Gallons; $g=; Pints (liq.); $h=; Quarts (liq.); j=0:x=10:y=21:call93:if j=0}220:if r=3}220 m=data j{0,1E3,.03531,61.02,.001,.001308,.2642,2.113,1.057}:goto90 #235 $a=; Cubic ft./sec.; $b=; Gallons/sec.; j=0:x=4:y=18:call93:if j=0}220:if r=3}220 m=data j{0,5.886E-4,.004403}:goto90 #236 $a=; Feet/second; $b=; Kilometers/hour; $c=; Meters/second; $d=; Miles/hour; j=0:x=6:y=19:call93:if j=0}220:if r=3}220 m=data j{0,1.68781,1.852,.514444,1.150779}:goto90 #240 $a=$y $b=; Meters; $c=; Meters/min.; $d=; Meters/sec.; $e=; Microns; $f=; Miles; $g=; Miles/hour; $h=; Miles/min.; $i=; Milliers; $j=; Milligrams; $k=; Milliliters; $l=; Millimeters; $m=; Milligrams/liter; $n=; Million gals./day; $o=; Miner's inches; $p=; Minims; $q=; Minims (Imp.); $r=; Minutes (angle); $s=; Nautical miles; $t=$z j=0:x=22:y=21:call92:if r=1}220:if r=2}260:if r=3}110 on(j)g{220,242,243,244,245,246,247,248,249,250,251,252,253,254,255,257,258, 256,259,260}:go110 #242 $a=; Centimeters; $b=; Feet; $c=; Inches; $d=; Kilometers; $e=; Millimeters; $f=; Yards; j=0:x=8:y=15:call93:if j=0}240:if r=3}240 m=data j{0,100,3.281,39.37,.001,1000,1.094}:goto90 #243 $a=; Centimeters/sec.; $b=; Feet/min.; $c=; Feet/sec.; $d=; Kilometers/hr.; $e=; Miles/hour; j=0:x=7:y=20:call93:if j=0}240:if r=3}240 m=data j{0,1.667,3.281,.05468,.06,.03728}:goto90 #244 $a=; Feet/min.; $b=; Feet/sec.; $c=; Kilometers/hr.; $d=; Kilometers/min.; $e=; Miles/hour; $f=; Miles/min.; j=0:x=8:y=19:call93:if j=0}240:if r=3}240 m=data j{0,196.8,3.281,3.6,.06,2.237,.03728}:goto90 #245 $w=; Meters;:m=1E-6:goto90 #246 $a=; Centimeters; $b=; Feet; $c=; Furlongs; $d=; Kilometers; $e=; Nautical miles; $f=; Yards; j=0:x=8:y=18:call93:if j=0}240:if r=3}240 m=data j{0,1.609E5,5280,8,1.609,.868976,1760}:goto90 #247 $a=; Centimeters/sec.; $b=; Feet/min.; $c=; Feet/sec.; $d=; Kilometers/hr.; $e=; Knots; $f=; Meters/min.; j=0:x=8:y=20:call93:if j=0}240:if r=3}240 m=data j{0,44.7,88,1.467,1.609,.868976,26.82}:goto90 #248 $a=; Centimeters/sec.; $b=; Feet/sec.; $c=; Kilometers/min.; $d=; Miles/hour; j=0:x=6:y=20:call93:if j=0}240:if r=3}240 m=data j{0,2682,88,1.609,60}:goto90 #249 $w=; Kilograms;:m=1000:goto90 #250 $w=; Grams;:m=.001:goto90 #251 $w=; Liters;:m=.001:goto90 #252 $a=; Centimeters; $b=; Inches; j=0:x=4:y=15:call93:if j=0}240:if r=3}240 m=data j{0,.1,1/25.4}:goto90 #253 $w=; Parts/million;:m=1:goto90 #254 $w=; Cubic ft./sec.;:m=1.54723:goto90 #255 $w=; Cubic ft./min.;:m=1.5:goto90 #256 $w=; Radians;:m=2.909E-4:goto90 #257 $a=; Cubic inches; $b=; Fluidrams; $c=; Milliliters; j=0:x=5:y=16:call93:if j=0}240:if r=3}240 m=data j{0,.003759,1/60,.06161}:goto90 #258 $a=; Cubic centimeters; $b=; Cubic inches; $c=; Fluidrams; j=0:x=5:y=21:call93:if j=0}240:if r=3}240 m=data j{0,.059194,.003612,1/60}:goto90 #259 $a=; Miles; $b=; Kilometers; j=0:x=4:y=14:call93:if j=0}240:if r=3}240 m=data j{0,1.150779,1.852}:goto90 #260 $a=$y $b=; Ounces; $c=; Ounces (troy); $d=; Ounces (fluid); $e=; Ounces/sq.inch; $f=; Parts/million; $g=; Pecks; $h=; Pecks (Imp.); $i=; Pennyweights (troy); $j=; Pounds; $k=; Pounds (troy); $l=; Pounds of water; $m=; Pounds of water/min.; $n=; Pounds/cubic foot; $o=; Pounds/cubic inch; $p=; Pounds/foot; $q=; Pounds/inch; $r=; Pounds/sq.foot; $s=; Pounds/sq.inch; $t=$z j=0:x=22:y=24:call92:if r=1}240:if r=2}280:if r=3}110 on(j)g{240,262,263,264,265,266,279,278,267,268,269,270,271,272,273,274,275, 276,277,280}:go110 #262 $a=; Drams; $b=; Grains; $c=; Grams; $d=; Ounces (troy); $e=; Pounds; $f=; Tons (long); $g=; Tons (metric); j=0:x=9:y=17:call93:if j=0}260:if r=3}260 m=data j{0,16,437.5,28.349527,.9115,.0625,2.79E-5,2.835E-5}:goto90 #263 $a=; Grains; $b=; Grams; $c=; Ounces (avoir.); $d=; Pennyweights (troy); $e=; Pounds (troy); j=0:x=7:y=23:call93:if j=0}260:if r=3}260 m=data j{0,480,31.103481,1.09714,20,.08333}:goto90 #264 $a=; Cubic inches; $b=; Liters; j=0:x=4:y=16:call93:if j=0}260:if r=3}260 m=data j{0,1.805,.02957}:goto90 #265 $w=; Lbs./sq.inch;:m=.0625:goto90 #266 $a=; Grains/gallon; $b=; Grains/Imp. gal.; $c=; Lbs./million gal.; j=0:x=5:y=21:call93:if j=0}260:if r=3}260 m=data j{0,.0584,.07016,8.345}:goto90 #267 $a=; Grains; $b=; Grams; $c=; Ounces (troy); $d=; Pounds (troy); j=0:x=6:y=17:call93:if j=0}260:if r=3}260 m=data j{0,24,1.55517,.05,.0041667}:goto90 #268 $a=; Drams; $b=; Grains; $c=; Grams; $d=; Kilograms; $e=; Ounces; $f=; Ounces (troy); $g=; Pounds (troy); $h=; Quintals; $i=; Tons (short); j=0:x=11:y=17:call93:if j=0}260:if r=3}260 m=data j{0,256,7000,453.5924,.4535924,16,14.5833,1.21528,.004536,.0005} goto90 #269 $a=; Grains; $b=; Grams; $c=; Ounces (troy); $d=; Ounces (avoir.); $e=; Pennyweights (troy); $f=; Pounds (avoir.); $g=; Tons (long); $h=; Tons (short); $i=; Tons (metric); j=0:x=11:y=23:call93:if j=0}260:if r=3}260 m=data j{0,5760,373.24177,12,13.1657,240,.822857,3.6735E-4,4.1143E-4, 3.7324E-4}:goto90 #270 $a=; Cubic feet; $b=; Cubic inches; $c=; Gallons; j=0:x=5:y=16:call93:if j=0}260:if r=3}260 m=data j{0,.01602,27.68,.1198}:goto90 #271 $w=; Cubic ft./sec.;:m=2.67E-4:goto90 #272 $a=; Grams/cubic. cm.; $b=; Kgs./cubic meter; $c=; Lbs./cubic inch; j=0:x=5:y=20:call93:if j=0}260:if r=3}260 m=data j{0,.01602,16.02,5.787E-4}:goto90 #273 $a=; Grams/cubic. cm.; $b=; Kgs./cubic meter; $c=; Lbs./cubic foot; j=0:x=5:y=20:call93:if j=0}260:if r=3}260 m=data j{0,27.68,27680,1728}:goto90 #274 $w=; Kgs./meter;:m=1.488:goto90 #275 $w=; Grams/centimeter;:m=178.6:goto90 #276 $a=; Feet of water; $b=; Kgs./sq.meter; $c=; Pounds/sq.inch; j=0:x=5:y=18:call93:if j=0}260:if r=3}260 m=data j{0,.01602,4.883,.006945}:goto90 #277 $a=; Atmospheres; $b=; Feet of water; $c=; Inches of mercury; $d=; Kgs./sq.meter; j=0:x=6:y=21:call93:if j=0}260:if r=3}260 m=data j{0,.06804,2.307,2.036,703.1}:goto90 #278 $a=; Cubic inches; $b=; Gallons; $c=; Liters; j=0:x=5:y=16:call93:if j=0}260:if r=3}260 m=data j{0,554.84,2,9.09}:goto90 #279 $a=; Cubic inches; $b=; Gallons; $c=; Liters; $d=; Quarts; j=0:x=6:y=16:call93:if j=0}260:if r=3}260 m=data j{0,537.605,2,8.809,8}:goto90 #280 $a=$y $b=; Quadrants (angle); $c=; Quarts (dry); $d=; Quarts (liq.); $e=; Quarts (Imperial); $f=; Quintal (metric); $g=; Quires; $h=; Radians; $i=; Radians/sec.; $j=; Reams; $k=; Revolutions; $l=; Revolutions/min.; $m=; Revolutions/sec.; $n=; Rods; $o=$z j=0:x=17:y=21:call92:if r=1}260:if r=2}300:if r=3}110 on(j)g{260,282,283,284,297,285,286,287,288,290,291,292,294,296,300}:go110 #282 $a=; Degrees; $b=; Grads; $c=; Minutes; $d=; Radians; j=0:x=6:y=11:call93:if j=0}280:if r=3}280 m=data j{0,90,100,5400,1.571}:goto90 #283 $a=; Cubic inches; $b=; Liters; $c=; Pints; j=0:x=5:y=16:call93:if j=0}280:if r=3}280 m=data j{0,67.2,1.101,2}:goto90 #284 $a=; Cubic inches; $b=; Liters; $c=; Pints; j=0:x=5:y=16:call93:if j=0}280:if r=3}280 m=data j{0,57.75,.946,2}:goto90 #285 $w=; Pounds;:m=220.46:goto90 #286 $w=; Sheets;:m=25:goto90 #287 $a=; Degrees; $b=; Minutes; $c=; Quadrants; j=0:x=5:y=13:call93:if j=0}280:if r=3}280 m=data j{0,57.3,3438,.637}:goto90 #288 $a=; Degrees/sec.; $b=; Revolutions/sec.; $c=; Revolutions/min.; j=0:x=5:y=20:call93:if j=0}280:if r=3}280 m=data j{0,57.3,.1592,9.549}:goto90 #290 $a=; Quires; $b=; Sheets; j=0:x=4:y=10:call93:if j=0}280:if r=3}280 m=data j{0,20,500}:goto90 #291 $a=; Degrees; $b=; Quadrants; $c=; Radians; j=0:x=5:y=13:call93:if j=0}280:if r=3}280 m=data j{0,360,4,6.283}:goto90 #292 $a=; Degrees/sec.; $b=; Radians/sec.; $c=; Revolutions/min.; j=0:x=5:y=20:call93:if j=0}280:if r=3}280 m=data j{0,6,.1047,.01667}:goto90 #294 $a=; Degrees/sec.; $b=; Radians/sec.; $c=; Revolutions/min.; j=0:x=5:y=20:call93:if j=0}280:if r=3}280 m=data j{0,360,6.283,60}:goto90 #296 $a=; Feet; $b=; Kilometers; $c=; Meters; $d=; Miles; $e=; Yards; j=0:x=7:y=14:call93:if j=0}280:if r=3}280 m=data j{0,16.5,.005029,5.029,1/320,5.5}:goto90 #297 $a=; Cubic inches; $b=; Gills; $c=; Liters; $d=; Pints; j=0:x=6:y=16:call93:if j=0}280:if r=3}280 m=data j{0,69.355,8,1.136,2}:goto90 #300 $a=$y $b=; Seconds (angle); $c=; Square centimeters; $d=; Square feet; $e=; Square inches; $f=; Square kilometers; $g=; Square meters; $h=; Square miles; $i=; Square millimeters; $j=; Square rods; $k=; Square yards; $l=; Steres; $m=$z j=0:x=15:y=22:call92:if r=1}280:if r=2}320:if r=3}110 on(j)g{280,303,304,305,306,307,308,309,310,313,311,312,320}:go110 #303 $a=; Degrees; $b=; Minutes (angle); $c=; Radians; j=0:x=5:y=19:call93:if j=0}300:if r=3}300 m=data j{0,1/3600,1/60,4.848E-6}:goto90 #304 $a=; Square feet; $b=; Square inches; $c=; Square meters; $d=; Square millimeters; j=0:x=6:y=22:call93:if j=0}300:if r=3}300 m=data j{0,.001076,.155,1E4,100}:goto90 #305 $a=; Acres; $b=; Square centimeters; $c=; Square inches; $d=; Square meters; $e=; Square miles; $f=; Square yards; j=0:x=8:y=22:call93:if j=0}300:if r=3}300 m=data j{0,2.296E-5,929,144,.0929,3.587E-8,1/9}:goto90 #306 $a=; Square centimeters; $b=; Square feet; $c=; Square millimeters; j=0:x=5:y=22:call93:if j=0}300:if r=3}300 m=data j{0,6.452,.006944,645.2}:goto90 #307 $a=; Acres; $b=; Square feet; $c=; Square meters; $d=; Square miles; $e=; Square yards; j=0:x=7:y=17:call93:if j=0}300:if r=3}300 m=data j{0,247.1,1.076E7,1E7,.3861,1.196E6}:goto90 #308 $a=; Acres; $b=; Square feet; $c=; Square miles; $d=; Square yards; j=0:x=6:y=16:call93:if j=0}300:if r=3}300 m=data j{0,.0002471,10.76,3.861E-7,1.196}:goto90 #309 $a=; Acres; $b=; Square feet; $c=; Square kilometers; $d=; Square yards; j=0:x=6:y=21:call93:if j=0}300:if r=3}300 m=data j{0,640,2788E4,2.59,3098E3}:goto90 #310 $a=; Square centimeters; $b=; Square inches; j=0:x=4:y=22:call93:if j=0}300:if r=3}300 m=data j{0,.01,.00155}:goto90 #311 $a=; Acres; $b=; Square feet; $c=; Square meters; $d=; Square miles; $e=; Square rods; j=0:x=7:y=17:call93:if j=0}300:if r=3}300 m=data j{0,.0002066,9,.8361,3.228E-7,.033058}:goto90 #312 $a=; Cubic meters; $b=; Cubic yards; $c=; Decasteres; $d=; Decisteres; j=0:x=6:y=16:call93:if j=0}300:if r=3}300 m=data j{0,1,1.31,.1,10}:goto90 #313 $a=; Acres; $b=; Square feet; $c=; Square meters; $d=; Square yards; j=0:x=6:y=17:call93:if j=0}300:if r=3}300 m=data j{0,.00625,272.25,25.29,30.25}:goto90 #320 $a=$y $b=; Temp. Centigrade; $c=; Temp. Fahrenheit; $d=; Temp. Kelvin; $e=; Tons (long); $f=; Tons (metric); $g=; Tons (short); $h=; Tons of water/24 hrs.; $i=; Watts; $j=; Watt-hours; $k=; Yards; j=0:x=13:y=25:call92:if r=1}300:if r=3}110 on(j)g{300,322,323,324,325,326,327,328,329,330,331}:go110 #322 $a=; Fahrenheit; $b=; Kelvin; j=0:x=4:y=14:call93:if j=0}320:if r=3}320 m=0:t=j+2:goto90 #323 $a=; Centigrade; $b=; Kelvin; j=0:x=4:y=14:call93:if j=0}320:if r=3}320 m=0:t=j:goto90 #324 $a=; Centigrade; $b=; Fahrenheit; j=0:x=4:y=14:call93:if j=0}320:if r=3}320 m=0:t=j+4:goto90 #325 $a=; Kilograms; $b=; Pounds; $c=; Tons (metric); $d=; Tons (short); j=0:x=6:y=17:call93:if j=0}320:if r=3}320 m=data j{0,1016,2240,1.015873,1.12}:goto90 #326 $a=; Kilograms; $b=; Pounds; $c=; Tons (long); $d=; Tons (short); j=0:x=6:y=16:call93:if j=0}320:if r=3}320 m=data j{0,1000,22046,.983929,1.1025}:goto90 #327 $a=; Kilograms; $b=; Pounds; $c=; Pounds (troy); $d=; Ounces; $e=; Ounces (troy); $f=; Tons (long); $g=; Tons (metric); j=0:x=9:y=17:call93:if j=0}320:if r=3}320 m=data j{0,907.18486,2000,2430.56,32000,29166.66,.89287,.90718}:goto90 #328 $a=; Cubic feet/hr.; $b=; Gallons/min.; $c=; Pounds water/hr.; j=0:x=5:y=20:call93:if j=0}320:if r=3}320 m=data j{0,1.3349,.16643,83.333}:goto90 #329 $a=; B.T.U./min.; $b=; Foot-pounds/min.; $c=; Foot-pounds/sec.; $d=; Horsepower; $e=; Kg.-calories/min.; $f=; Kilowatts; j=0:x=8:y=21:call93:if j=0}320:if r=3}320 m=data j{0,.05692,44.26,.7376,.001341,.01434,.001}:goto90 #330 $a=; B.T.U.; $b=; Foot-pounds; $c=; Horsepower-hours; $d=; Kg.-calories; $e=; Kg.-meters; $f=; Kilowatt-hours; j=0:x=8:y=20:call93:if j=0}320:if r=3}320 m=data j{0,3.415,2655,.001341,.8605,367.1,.001}:goto90 #331 $a=; Centimeters; $b=; feet; $c=; Inches; $d=; Meters; $e=; Rods; j=0:x=7:y=15:call93:if j=0}320:if r=3}320 m=data j{0,91.44,3,36,.9144,1/5.5}:goto90 #400 i=mlin:if i>99}400 #401:k=kyck:if k<>0}402 I=MLOC:IF I>9999}}IF I<10079}406 #402:if k=13}405:if k=27}70 if k>64}}if k<91}}k=k+32:if k>96}}if k<123}409 goto401 #405:r=0:ret #406:r=5:ret:|top bar| #409:r=4:k=k-97:ret:|A to Z|