<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in</name>
<id>-1</id>
<cardCount>1</cardCount>
<cardID>3676</cardID>
<listID>2215</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>416</width>
<height>240</height>
</cardSize>
<script>function angleconvert n,s,dif the first char of s = "d" then put 360 into s -- degreesif the first char of s = "r" then put 2*pi into s -- radiansif the first char of s = "g" then put 400 into s -- gradiansif the first char of s = "u" then put 1 into s -- unitsif the first char of s = "b" then put 256 into s -- binaryif the first char of s = "a" then put 64 into s -- applesoft basicif the first char of d = "d" then put 360 into dif the first char of d = "r" then put 2*pi into dif the first char of d = "g" then put 400 into dif the first char of d = "u" then put 1 into dif the first char of d = "b" then put 256 into dif the first char of d = "a" then put 64 into dif d is empty then put 2*pi into dif s is empty then put 360 into sif n is empty then put 0 into nreturn n*(d/s)end angleconvertfunction tempconvert n,s,dput the first char of s into eif the first char of s = "r" then put the second char of s after eput the first char of d after eif the first char of d = "r" then put the second char of d after eif e = "fc" then return (n-32)/1.8if e = "cf" then return (n*1.8)+32if e = "fk" then return (n+459.67)/1.8if e = "ck" then return n+273.16if e = "kf" then return (n*1.8)-459.67if e = "kc" then return n-273.16if e = "rek" then return (n*1.25)+273.16if e = "rak" then return n/1.8if e = "kra" then return n*1.8if e = "kre" then return (n-273.16)/1.25if e = "ref" then return (((n*1.25)+273.16)*1.8)-459.67if e = "fre" then return (((n+459.67)/1.8)-273.16)/*1.25if e = "rec" then return n*1.25if e = "cre" then return n/1.25if e = "fra" then return n+459.67if e = "cra" then return (n+273.16)*1.8if e = "raf" then return n-459.67if e = "rac" then return (n/1.8)-273.16if e = "rare" then return ((n/1.8)-273.16)/1.25if e = "rera" then return ((n*1.25)+273.16)*1.8if e is in "/rara/rere/ff/cc/kk/" then return nend tempconvertfunction lengthconvert n,s,dif s = "meters" or s = "m" then put 39.13 into sif s = "millimeters" or s = "mm" then put 0.3125 into sif s = "centimeters" or s = "cm" then put 0.3937008 into sif s = "rods" or s = "r" then put 198 into sif s = "feet" or s = "ft" or s = "'" then put 12 into sif s = "miles" or s = "mi" then put 63360 into sif s = "inches" or s = "in" or s = "''" or s = quote then put 1 into sif s = "yards" or s = "yd" or s = "y" then put 36 into sif d = "meters" or d = "m" then put 39.13 into dif d = "millimeters" or d = "mm" then put 0.3125 into dif d = "centimeters" or d = "cm" then put 0.3937008 into dif d = "rods" or d = "r" then put 198 into dif d = "feet" or d = "ft" or d = "'" then put 12 into dif d = "miles" or d = "mi" then put 63360 into dif d = "inches" or d = "in" or d = "''" or d = quote then put 1 into dif d = "yards" or d = "yd" or d = "y" then put 36 into dreturn n*(d/s)end lengthconvertfunction areaconvert n,s,dif char 1 of s = "f" or char 1 of word 2 of s = "f" then put 144 into sif char 1 of s = "i" or char 1 of word 2 of s = "i" then put 1 into sif char 1 of s = "a" or char 1 of word 2 of s = "a" then put 6324480 into sif char 1 of s = "m" or char 1 of word 2 of s = "m" then put 4047667200 into sif char 1 of s = "y" or char 1 of word 2 of s = "y" then put 1296 into sif char 1 of s = "r" or char 1 of word 2 of s = "r" then put 39528 into sif char 1 of d = "f" or char 1 of word 2 of d = "f" then put 144 into dif char 1 of d = "i" or char 1 of word 2 of d = "i" then put 1 into dif char 1 of d = "a" or char 1 of word 2 of d = "a" then put 6324480 into dif char 1 of d = "m" or char 1 of word 2 of d = "m" then put 4047667200 into dif char 1 of d = "y" or char 1 of word 2 of d = "y" then put 1296 into dif char 1 of d = "r" or char 1 of word 2 of d = "r" then put 39528 into dreturn n*(d/s)end areaconvertfunction volumeconvert n,s,dif char 1 of s = "f" or char 1 of word 2 of s = "f" then put 1728 into sif char 1 of s = "i" or char 1 of word 2 of s = "i" then put 1 into sif char 1 of s = "y" or char 1 of word 2 of s = "y" then put 46656 into sif char 1 of s = "c" or char 1 of word 2 of s = "c" then put 221184 into sif char 1 of d = "f" or char 1 of word 2 of d = "f" then put 1728 into dif char 1 of d = "i" or char 1 of word 2 of d = "i" then put 1 into dif char 1 of d = "y" or char 1 of word 2 of d = "y" then put 46656 into dif char 1 of d = "c" or char 1 of word 2 of d = "c" then put 221184 into dreturn n*(d/s)end volumeconvertfunction bytesizeconvert n,s,dif char 1 of s = "b" and char 2 of s = "i" then put 0.125 into s -- bitsif char 1 of s = "n" then put 0.5 into s -- nybblesif char 1 of s = "b" and char 2 of s = "y" then put 1 into s -- bytesif char 1 of s = "b" then put 1 into s -- bytesif char 1 of s = "w" then put 2 into s -- wordsif char 1 of s = "l" then put 4 into s -- longsif char 1 of s = "k" then put 1024 into s -- kilobytesif char 1 of s = "m" then put 1048576 into s -- megabytesif char 1 of s = "g" then put 1073741824 into s -- gigabytesif char 1 of d = "b" and char 2 of d = "i" then put 0.125 into dif char 1 of d = "n" then put 0.5 into dif char 1 of d = "b" and char 2 of d = "y" then put 1 into dif char 1 of d = "b" then put 1 into dif char 1 of d = "w" then put 2 into dif char 1 of d = "l" then put 4 into dif char 1 of d = "k" then put 1024 into dif char 1 of d = "m" then put 1048576 into dif char 1 of d = "g" then put 1073741824 into dreturn n*(d/s)end bytesizeconvert</script>