Russ Webb's RPN

RPN is a programmable scientific RPN calculator for the US Robotics Pilot.

My PRN Script Library

Times RPN
Author: Holger Müller
Date: 04/01/98
Description: Functions to convert time to integer and vice versa.
RPN.1 \Times
[p]#'3.141592653589793';
"Times"
"clear:drop all"{h!(B)d1};
~
"_  :converts time to int" g1Vwvf#'100'*w#'60'/+v#'100'*f#'100'*w#'3600'/+;
"_<--:converts int to time" g1Vwvf#'60'*w#'100'/+v#'60'*f#'60'*g1#'59'>(#'40'+)#'10000'/+;
~
"_wp:whole integer part" w;
"_fp:fractional part" f;
"pi:" Cp;

BackBack


© Holger Müller
Last modified: Thu Oct 14 10:29:27 CEST 1999