The Museum of HP Calculators

Rhumbline Sequence for the HP-95C

This program is Copyright © 1977 by Hewlett-Packard Company and is used here by permission. It was originally printed in the HP-95C Applications book. This program was entered and uploaded by André Wilhelmus.

This program is supplied without representation or warranty of any kind. André Wilhelmus, Hewlett-Packard and The Museum of HP Calculators therefore assume no responsibility and shall have no liability, consequential or otherwise, of any kind arising from the use of this program material or any part thereof.

Program Listing

HP-95C
CODEKEYS
A-000    lbl Af LBL A
A-001    61 39f H.MS→H
A-002    35  0STO 0
A-003    35  6STO 6
A-004    61 53f RTN
A-005    61 39f H.MS→H
A-006    35  1STO 1
A-007    35  7STO 7
A-008    61 53f RTN
A-009    61 39f H.MS→H
A-010    35  2STO 2
A-011    35  8STO 8
A-012    61 53f RTN
A-013    61 39f H.MS→H
A-014    35  3STO 3
A-015    35  9STO 9
A-016    61 53f RTN
A-017 62 63 b9g JUMP B 9
b-000    lbl bf LBL B
b-001 61 21  4f FIX 4
b-002    35  4STO 4
b-003    45  1RCL 1
b-004    45  3RCL 3
b-005       49
b-006        22
b-007       24÷
b-008    61  7f SIN
b-009    62  7g SIN-1
b-010        22
b-011       39×
b-012    45  4RCL 4
b-013       24÷
b-014    61  2f ABS
b-015       23EEX
b-016       22CHS
b-017        77
b-018       49
b-019    61  1f INT
b-020    35 52STO I
b-021        00
b-022    35  5STO 5
b-023    61 14f SPACE
b-024    45  0RCL 0
b-025    35  6STO 6
b-026    61 24f H→H.MS
b-027       14PRINT x
b-028    45  1RCL 1
b-029    35  7STO 7
b-030    61 24f H→H.MS
b-031       14PRINT x
b-032    61 14f SPACE
b-033    45  1RCL 1
b-034 61 63  1f LBL 1
b-035    45  4RCL 4
b-036       59+
b-037        11
b-038    61  6f →R
b-039    62  6g →P
b-040       12R↓
b-041    35  9STO 9
b-042    53  7GSB 7
b-043    35  8STO 8
b-044    53  9GSB 9
b-045 35 59  5STO + 5
b-046    61 14f SPACE
b-047    45  8RCL 8
b-048    35  6STO 6
b-049    61 24f H→H.MS
b-050       14PRINT x
b-051    45  9RCL 9
b-052    35  7STO 7
b-053    61 24f H→H.MS
b-054       14PRINT x
b-055    61 14f SPACE
b-056    45  9RCL 9
b-057    62 52g DSZ
b-058    63  1GTO 1
b-059    45  2RCL 2
b-060    35  8STO 8
b-061    45  3RCL 3
b-062    35  9STO 9
b-063    53  9GSB 9
b-064 35 59  5STO + 5
b-065    45  2RCL 2
b-066    61 24f H→H.MS
b-067       14PRINT x
b-068    45  3RCL 3
b-069    61 24f H→H.MS
b-070       14PRINT x
b-071    61 14f SPACE
b-072    61 14f SPACE
b-073    45  5RCL 5
b-074 61 21  1f FIX 1
b-075       14PRINT x
b-076    61 53f RTN
b-077 61 63  7f LBL 7
b-078    45  7RCL 7
b-079       49
b-080    61  7f SIN
b-081    45  2RCL 2
b-082    61  9f TAN
b-083       39×
b-084    45  9RCL 9
b-085    45  3RCL 3
b-086       49
b-087    61  7f SIN
b-088    45  6RCL 6
b-089    61  9f TAN
b-090       39×
b-091       49
b-092    45  3RCL 3
b-093    45  7RCL 7
b-094       49
b-095    61  7f SIN
b-096       24÷
b-097    62  9g TAN-1
b-098    61 53f RTN
b-099 61 63  9f LBL 9
b-100 61 21  1f FIX 1
b-101    45  7RCL 7
b-102    45  9RCL 9
b-103       49
b-104    35 .0STO ∙0
b-105        22
b-106       24÷
b-107    61  7f SIN
b-108    62  7g SIN-1
b-109        99
b-110        00
b-111       24÷
b-112    62  0g π
b-113       39×
b-114    45  8RCL 8
b-115    53  4GSB 4
b-116    45  6RCL 6
b-117    53  4GSB 4
b-118       49
b-119    62  6g →P
b-120       12R↓
b-121    35 .1STO ∙1
b-122    45 .0RCL ∙0
b-123    61  7f SIN
b-124    62  7g SIN-1
b-125    62 43g x<0
b-126    63  0GTO 0
b-127    45 .1RCL ∙1
b-128    63  2GTO 2
b-129 61 63  0f LBL 0
b-130        33
b-131        66
b-132        00
b-133    45 .1RCL ∙1
b-134    61  2f ABS
b-135       49
b-136 61 63  2f LBL 2
b-137    61  2f ABS
b-138       14PRINT x
b-139    45 .0RCL ∙0
b-140    45  8RCL 8
b-141    61  8f COS
b-142       39×
b-143       21ENTER ↑
b-144    45  8RCL 8
b-145    45  6RCL 6
b-146       49
b-147    45 .1RCL ∙1
b-148    61  8f COS
b-149    62 42g x!=0
b-150       24÷
b-151       21ENTER ↑
b-152    62 41g x=0
b-153       13R↑
b-154        66
b-155        00
b-156       39×
b-157    61  2f ABS
b-158       14PRINT x
b-159    61 14f SPACE
b-160 61 21  4f FIX 4
b-161    61 53f RTN
b-162 61 63  4f LBL 4
b-163        22
b-164       24÷
b-165        44
b-166        55
b-167       59+
b-168    61  9f TAN
b-169    61  4f LN

Go back to the HP-95C software library
Go back to the general software library
Go back to the main exhibit hall