diff options
author | leporia <aleporia@gmail.com> | 2017-08-23 16:03:05 +0200 |
---|---|---|
committer | leporia <aleporia@gmail.com> | 2017-08-23 16:03:05 +0200 |
commit | f8e69a43ee9d1717b41a1b18e0dfac7083b06dbd (patch) | |
tree | fbf67f9e5d4d665a55eebe5ffdb31729b6de0516 /P | |
download | hp35s-programs-f8e69a43ee9d1717b41a1b18e0dfac7083b06dbd.tar.gz hp35s-programs-f8e69a43ee9d1717b41a1b18e0dfac7083b06dbd.zip |
first commit
Diffstat (limited to 'P')
-rw-r--r-- | P | 90 |
1 files changed, 90 insertions, 0 deletions
@@ -0,0 +1,90 @@ +LBL P +XEQ S001 +105.110 +STO J +R⬇ +x<>y +XEQ P061 +R⬇ +XEQ P061 +100.102 +STO I +106 +110 +XEQ P079 +x +109 +107 +XEQ P079 +x +- +[1,0,0] +x +STO (I) +ISG I +107 +108 +XEQ P079 +x +110 +105 +XEQ P079 +x +- +[0,1,0] +x +STO (I) +ISG I +105 +109 +XEQ P079 +x +108 +106 +XEQ P079 +x +- +[0,0,1] +x +100.101 +STO I +R⬇ +RCL (I) +ISG I +GTO P052 ++ ++ +STO I +XEQ S011 +RCL I +RTN +STO I +[1,0,0] +x +STO (J) +ISG J +CLx +RCL I +[0,1,0] +x +STO (J) +ISG J +CLx +RCL I +[0,0,1] +x +STO (J) +ISG J +RTN +STO J +CLx +RCL (J) +x<>y +STO J +CLx +RCL (J) +x<>y +RTN + +LN=360 +CK=4FDF |