+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Calculators (and very old HP Computers) (/forum-3.html)
+--- Forum: General Forum (/forum-4.html)
+--- Thread: HP 50g Surveyor's Stuff (/thread-1740.html)
HP 50g Surveyor's Stuff - MNH - 06-29-2014 12:59 PM
Hello,
The following program appends the standard
degrees, minutes, and seconds characters
that surveyors like to see on their angles,
bearings, and azimuths. Enjoy!
\<< 4 RND DUP FP \->STR
5 6 SUB "60" SAME
\<< IP 1 +
\>> IFT DUP IP STD
\->STR DUP SIZE 1 - 1
SWAP SUB 176 CHR +
SWAP 4 FIX FP \->STR
DUP 3 4 SUB 39 CHR
+ SWAP 5 6 SUB 34
CHR + + +
\>>
checksum: # 27DCh
bytes: 181
Regards,
Mark