11-02-2018, 01:24 PM
This program was adapted from the Hand-Held-Calculator Programs
for the Field Forester.
More detail information attached here.
Procedure:
1. Enter slope distance to base of tree [A] -->Display known distance
2. Enter Slope percent to tip, [R/S] --> Display 0 (Slope to tip Stored)
3. Enter Slope percent to Base.
I. If Positive [B] --> display 0 // slope base entered
II. If Negative [C] --> display 0 // slope base entered
4. [D] ---> Tree Heights
-----------------------------------------------
Example: FIX 1
Slope Percent to tip = 40
Negative slope percent to base = 20
Distance to tree = 56
What is the Tree Heights?
56 [A] display 56
40 [R/S] display 0
20 [C] display 0
[D] 32.9
Tree Heights is 32.9
-------------------------------------------------
Slope Percent to tip = 40
Positive slope percent to base = 20
Distance to tree = 56
What is the Tree Heights?
56 [A] display 56
40 [R/S] display 0
20 [B] display 0
[D] 10.9
Tree Heights is 10.9
Program:
Gamo
for the Field Forester.
More detail information attached here.
Procedure:
1. Enter slope distance to base of tree [A] -->Display known distance
2. Enter Slope percent to tip, [R/S] --> Display 0 (Slope to tip Stored)
3. Enter Slope percent to Base.
I. If Positive [B] --> display 0 // slope base entered
II. If Negative [C] --> display 0 // slope base entered
4. [D] ---> Tree Heights
-----------------------------------------------
Example: FIX 1
Slope Percent to tip = 40
Negative slope percent to base = 20
Distance to tree = 56
What is the Tree Heights?
56 [A] display 56
40 [R/S] display 0
20 [C] display 0
[D] 32.9
Tree Heights is 32.9
-------------------------------------------------
Slope Percent to tip = 40
Positive slope percent to base = 20
Distance to tree = 56
What is the Tree Heights?
56 [A] display 56
40 [R/S] display 0
20 [B] display 0
[D] 10.9
Tree Heights is 10.9
Program:
Code:
LBL A // Enter Distance and Slope Tip
STO 3
R/S
GSB 1
STO 1
CLx
RTN
--------------------------------------------
LBL B // Enter Positive Slope Base
GSB 1
RCL 1
-
CHS
STO 2
CLx
RTN
------------------------------------------
LBL C // ENTER Negative Slope Base
GSB 1
RCL 1
+
STO 2
CLx
RTN
-----------------------------------------
LBL D // Compute Tree Height
RCL 2
SIN
RCL 3
x
90
ENTER
RCL 1
-
SIN
÷
RTN
---------------------------------------
LBL 1
EEX
2
÷
TAN -1
RTN
Gamo