Units Script
Webb - all rights reserved - ©2004
spacer
Author - Robert J. Platt
Email: plattro@us.schindler.com
Webpage:

Summary: Length, time, volume, mass, ASCII conversions and physical
constants

Instructions: Download the latest version from
http://www.palmpilotgear.com
or http://www.gti.net/rjplatt
and follow the instructions there.

or

Here are the latest 3 files as of Feb 1999
UNITS.RPN, CONSTANTS.RPN, and ASCII.RPN

Comments welcome!

Code:

File UNITS.RPN

RPN.1.c
[a]D'Metric|<|mm|cm|m|km|>|'
   c(Cc:#'.001':#'.01':#'1':#'1000':Cb:);
[b]D'English|<|in|ft|yd|mi|>|'
   c(Ca:#'36'tCd:#'3'tCd:#'1'Cd:#'1760'Cd:Cc:);
[c]D'Misc|<|NMi|LiYr|>|'
   c(Cb:#'1852':#'9.4605284e15':Ca:);
[d]#'.9144'*;
[e]D'Time|hz|ms|s|min|hr|day|'
   c(t1:#'.001':#'1':#'60':#'3600':#'86400':);
[f]D'Mass|g|kg|lb|oz|'
   c(#'.001':#'1':Ch:Ch4/4/:);
[g]D'Volume|ml|l|gal|qt|pt|oz|'
   c(#'.001':#'1':Ch8*:Ch2*:Ch:Ch4/4/:);
[h]#'.45359237';

"Units"
"->m"Ca*;"m->"Ca/;~
"->s"Ce*;"s->"Ce/;~
"->l"Cg*;"l->"Cg/;~
"->kg"Cf*;"kg->"Cf/;


File CONSTANTS.RPN

RPN.1.b
"Constants"

"c"#'299792458';
"e0"#'8.85418781761e-12';
"0"#'1.25663706144e-6';~
"G"#'6.67259e-11';
"g"#'9.80665';
"h"#'6.6260755e-34';~
"NA"#'6.0221367e23';
"k"#'1.380658e-23';
"R"#'8.31451';~
"q"#'1.60217733e-19';
"me"#'9.1093897e-31';
"mp"#'1.6726231e-27';

File ASCII.RPN

RPN.1.a
"ASCII"
"^A"D'Control|SOH|STX|ETX|EOT|ENQ|ACK|'
#'1'+;
"^G"D'Control|BEL|BS|HT|LF|VT|FF|CR|'
#'7'+;
"^N"D'Control|SO|SI|DLE|Dc1|Dc2|Dc3|Dc4|'
#'14'+;
"^U"D'Control|NAK|SYN|ETB|CAN|EM|SUB|'
#'21'+;
~
"Esc"D'Control|ESC|FS|GS|RS|US|SPACE|'
#'27'+;
"!$"D'Punctuation|!|``|#|$|%|&|`|(|)|*|+|,|-|.|/|'
#'33'+;
"0-9"D'Numbers|0|1|2|3|4|5|6|7|8|9|'
#'48'+;
"=?"D'Punctuation|:|;|<|=|>|?|@|'
#'58'+;
~
"A-M"D'Uppercase|A|B|C|D|E|F|G|H|I|J|K|L|M|'
#'65'+;
"N-Z"D'Uppercase|N|O|P|Q|R|S|T|U|V|W|X|Y|Z|'
#'78'+;
"[^"D'Punctuation|[|\\|]|^|_|`|'
#'91'+;
~
"a-m"D'Lowercase|a|b|c|d|e|f|g|h|i|j|k|l|m|'
#'97'+;
"n-z"D'Lowercase|n|o|p|q|r|s|t|u|v|w|x|y|z|'
#'110'+;
"{~"D'Punctuation|{|I|}|~|'
#'123'+;