(42S) Easy Transverse - Printable Version +- HP Forums (https://www.hpmuseum.org/forum) +-- Forum: HP Software Libraries (/forum-10.html) +--- Forum: General Software Library (/forum-13.html) +--- Thread: (42S) Easy Transverse (/thread-6531.html) |
(42S) Easy Transverse - Eddie W. Shore - 07-10-2016 02:03 AM HP 42S: Easy Transverse Calculates the new point knowing the original coordinates, direction, and angle of travel. The angle 0° comes from due east and rotates counterclockwise. The program sets the HP 42S to degrees mode. We make use of the Programmable Menu. Code: 00 {183-Byte Prgm} Test: Initial Data Coordinates: N = 1,000, E = 1,000 Travel #1: 170 units at 118° (28° NW) Travel #2: 162 units at 45° (45° NE) Input: [XEQ] {EASYT} 1000 [R/S] [R/S] 118 [R/S] 170 [R/S] Result: EAST: 920.1898 [R/S], NORTH: 1,150.1011 {NEXT} 45 [R/S] 162 [R/S] EAST: 935.5061 [R/S], NORTH: 1,192.4143 {QUIT} ΣDIST: 215 [R/S], N on Y stack, E on X stack. |