Land Surveyor Forum

Here is the Hp 35s,it came out in 2007.This was introduced to commemorate the 35th anniversary of the

of the Hp 35,that came out in 1972 for 395 Dollars. This calculator only had 35 keys,hints the name Hp 35.This was the first scientific pocket calculator. now you can own this one for 60 dollars or even try it Free on your computer. And it has a lot more keys.

PART  2 :  Translate,Rotate and Scale:  Coordinate Transformation

 Hi Everyone, For those using Hp 35s,this is one more for The Little Big Calculator that calculated , I think I can. You can add this to the List of Programs it can do. This calculator may run more different programs than any other made at this time . That includes Surveying. Today there are plenty of computer programs that will perform these routines. And are very simple to use. One only input the data and click solve and large number of coordinates are transform right before your eyes.We as surveyors can appreciate how much math and thought went into the early thinking of all these equations and formulas. These are now used in the modern world of surveying. So when you like to do more than just click for the answer ,dust off your  HP 35 s calculator.  Here is one routine that is simple and can run it on it's own by itself. It does not need a Utility program for it to work. Dr Bill Hazelton's programs are part of a program package,these work with each other or have Utility programs. They will not work on their own,although they are much more complicated and much more advanced programming and this shows how powerful RPN keystroke programming  in a calculator can be. Alphanumeric RPN programming is still the most advanced and can not be used in the HP 35s. But one also can not use it while  taking a NCEES test either,  so you have the next best thing,a HP 35s calculator. If you have never used one and like to try one,  try a Emulator,they work great. So here I am again talking about doing translations,rotations and scaling coordinates.But this I call Coordinate Transformation.Why because I am doing all of it at one Time. This time I will not do it on a Data collector,but like I said, on a calculator,with a Keystroke program. In Translate,Rotate and Scale,TDS Recon. I went over this using a TDS RECON,which is now SPECTRA RECON  and has been for some time now. And this is how some surveyors in the field adjusted their jobs,with the tools in hand, their Data Collectors. Every since the TDS 48 GX Survey Card this thought went into the early thinking of all these equations and formulas. These are now used in the modern world of surveying. Others may just be curious to see how to do this or HP 35 users. Either way,  This is how I and I am sure many others done it many times, using programs similar to this one.  In the field or at a later time for the next day. This is again part of our Surveying History. And there will be those who do not care to use it at all. But some of you with HP 35's will. This is not intended to be used in Modern Surveying practices of today,there are many computer programs for that. This is for Students ,HP Users and it's Historic  value. Although this will work for those who want to use it,even today in our hi tech World. I will also give links to Dr.Bill Hazelton's Coordinates Transformation Programs for the HP 35s. He gives complete details on how to use his programs and the equations used in this process.This program here I wrote many years ago and have always kept it as my own personal program. Now I would like to share it with everyone. This Program was written by Billy Brooks ,before the date of Oct. 21 ,2016. Before and for,Hp 41 CX, HP 32s,HP 33s and this version HP 35s. This calculator is a amazing tool for just $60.00 US Dollars.   Do the Math and you will buy one. And for those who just like to use one before you buy it. Then download an Emulator on your computer, it is just like the calculator, but is faster and the batteries never go dead.And it is all FREE. Here is some links, for the calculator and the manual for it. And you will find many more.

https://www.educalc.net/2336231.page

Here is also a French Site: They will also work in English.

http://www.calculatrices-hp.com/index.php?page=emulateurs

Here is the manual:

http://www.hp.com/ctg/Manual/c01579350.pdf

And for those who like to try the HP 41 CX Program.
You can also download the Hp 41 Cx Emulator,that contains
the Survey Pac, that has a program similar to this,
but is more advanced in programming. It will Transform
from Old to New or back vice versa. This is also
 pre-programmed and does not need to be entered
into the memory of the calculator.
The Hp 41 cx is no longer made,but is a very advanced
calculator still by it's users,even by today's standards.
Here is the HP 41 Cx with Survey pac Emulator Download.
Thanks to this Arizona web site Surveyor Resource Page .
In download Library you will find the Emulator
 and how to install the survey pac and also
a copy of the Quick reference card for it.

http://surveyorresourcepage.com/

http://surveyorresourcepage.com/downloads/index.html

,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
Here is Coordinate Transformation: Hp 35s

Formulas Used:

AZ r = Φ + tan -1  E 1 - Ep / N 1 - Np

HDs = S √ ( N1 - Np)² + ( E 1 - E p)²
or
HDs = S  SQRT( ( N1 - Np)² +( E1 - E p)² )

N = HDs  COS (AZr) +  Nt 1

E = HDs  SIN ( AZr) + Et 1

Tn =N t1 - Ep  (41 CX ) survey mod

Te = E t1 - Ep ( 41 CX ) survey mod

where: AZr =Rotated azimuth
    
            Φ =  Rotation angle

           N1, E1 =Northing,Easting of current point before transformation

          Np, Ep = Original Northing, Easting of pivot point  

          HDs = Scaled horizontal distance

          S =Scale Factor

          N , E =Northing, Easting after transformation
 
          Nt 1, Et 1 = Northing, Easting of pivot point after transformation

PROGRAM
Coordinate Transformation B4 HP 35s
Note: Titles and Input Titles may be shorten.

..............,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,61.PSE
..............,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,62.SF 10
..............,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,63.plus + = LT
1. LBL Q...................................64.PSE
2.CLx.......................................65.INPUT R
3.CLVARS................................66.HMS→
4.SF 10....................................67.STO I
5.COORDINATES......................68.SF 10
6.PSE......................................69.IS S FAC
7.TRANSFORMATION...............70. PSE
8.PSE......................................71.  1.0
9.ROTATION.............................72.R/S STOP
10.PSE....................................73.SF 10
11.POINT 1...............................74.SCALE
12.PSE....................................75.PSE
13.OLD NORTH........................76.FACTOR =F
14.PSE....................................77.PSE
15.OLD EAST...........................78.INPUT F
16.PSE....................................79.STO F
17.SF 10..................................80.SF 10
18.OLD NORTH.........................81.OLD NORTH
19.PSE....................................82.PSE
20.INPUT W..............................83.INPUT N
21.SF 10..................................84.STO N
22.OLD EAST...........................85.SF 10
23.PSE....................................86.OLD EAST
24.INPUT X...............................87.PSE
25.STO B.................................88.INPUT E
26.X<>Y...................................89.RCL B
27.STO A.................................90.minus -
28.STO P..................................91.RCL N
29.SF 10..................................92.RCL A
30.ROTATION...........................93.minus -
31.PSE....................................94.X<>Y
32.SF 10..................................95.  i
33.POINT 2..............................96.  x
34.PSE....................................97.  +
35.NEW NORTH = Y.................98.ARG
36.PSE....................................99.LASTx
37.NEW EAST =Z....................100.ABS
38.PSE...................................101.RCL F
39.SF 10.................................102.  x
40.NEW NORTH......................103.X<>Y
41.PSE...................................104.RCL I
42.INPUT Y..............................105.minus -
43.SF 10.................................106.X<>Y
44.NEW EAST.........................107.X<>Y
45.PSE...................................108.COS
46.INPUT Z..............................109.X<>Y
47.R ↨ DN...............................110.LASTx
48.minus -...............................111.SIN
49.STO C................................112.X<>Y
50.R ↨ DN...............................113.  x
51.X<>Y..................................114.X<>Y
52.minus -...............................115.LASTx
53.STO D................................116.  x
54.R/S,STOP...........................117.RCL A
55.SF 10.................................118.  +
56.ROTATION..........................119.RCL C
57.PSE...................................120.minus -
58.ANGLE = R ?......................121.X<>Y
59.PSE...................................122.RCL B
60.minus - = RT.......................123.  +


124.RCL D
125.minus -
126.SF 10
127.NEW NORTH
128.PSE
129.NEW EAST
130.PSE
131.R/S STOP
132.GTO Q080

Note: Option in program, If you like Scale factor of 1
can be made to be default, then if you like changed the Scale factor at
Input ? 1.0000, then do so. I prefer Scale Factor of ? 0.0000 at Input , this makes you ENTER
a factor no matter what it is,1 or not. But If you like 1.0000 to be in display.
To change this simply add STO F on line  Q073,
this will change all of the next line numbers.
Line  132 GTO Q080,WILL BE LINE 133 GTO Q081.
Whatever you like.This is up to you.

Q001 thru Q132 =LN =541,CK =41FD
Q001 thru Q133 =LN =544, CK =5DC6

 I kept this program as simple as I could, here is how to run it.
This program,will translate,rotate and scale coordinates.You must calculate,
the Rotation angle and Scale Factor you desire. Choose a translation,rotation point in both systems.
It must be the same point in both system and the same point for translation and rotation.
This is your pivot point in the old and new coordinate system.
First Enter,your OLD NORTH and OLD EAST then your NEW NORTH and NEW EAST.
Of the same pt in both systems. Your old will be moved to Your new.
This is also your rotation point. If no rotation 0.00 is your angle. If rotation desired then,
The rotation angle is entered as a negative value for clockwise rotation
or a positive value for a counterclockwise rotation. You will be REMINDED for your scale factor
of 1, at this time R/S will prompt you to enter, either a scale factor of 1 or a new scale factor.
If your old scale factor is not 1, this must be re-entered as you desire. This Defines what you are using,
 1 or the same old scale factor or a completely New scale Factor. This is all the Data.
R/S will prompt to enter next point, old North and R/S, next old East, then R/S will RUN
 and your New North and your New East, will be in display. Repeat for next points.

Examples : Given to check program

XEQ Q001, ENTER ,Q001 RUN

OLD NORTH,ROTATION POINT
W ?
150.000   R/S, RUN

OLD EAST
X ?
400.000   R/S,RUN

NEW NORTH ,ROTATION POINT
Y ?
100.00  R/S,RUN

NEW EAST,
Z ?
350.00  R/S, RUN

350.00= EAST
50.00 = DEP. R/S, RUN

ROTA ANG. + POS OR -NEG, POS =CCKW,NEG =CKW
R ?
3.0, +/- ,display, -3.0,HMS CLOCKWISE, R/S ,RUN

 IS SCALE FACTOR
1.000  , reminder scale factor of 1.000

-3.0000  DOD   Rot Ang in decimals of a deg
  1  ,  R/S ,RUN

CHANGE FACTOR OR NOT
1.00 OR NEW FACTOR

SCALE FACTOR  ?
F ? 0.0000 ,key in
1.0 , NO CHANGE R/S , RUN

PROMPT for OLD NORTH,next point
N ?
224.540 ,R/S, RUN

OLD EAST
E ?
561.673, R/S , RUN

NEW NORTH AND NEW EAST
N 165.9765
E 515.3526      , R/S FOR NEXT POINT

 OLD NORTH
N ?.............R/S ,RUN
OLD EAST
E ?..............REPEAT,R/S, RUN
NEW NORTH AND NEW EAST

OLD  SYSTEM.......................NEW SYSTEM
.................ROTATION POINT
N 150.000...........................N 100.000
E 400.000...........................E 350.000
...................NEXT POINT
N 224.540...........................N 165.9765
E 561.673...........................E 515.3526
..................NEXT POINT
N 356.577...........................N 302.6979
E 468.710...........................E 429.4272
..................NEXT POINT
N 232.414...........................N 187.1512
E 307.327............................E 261.7672

Next,  This is a traverse,were the lat's. and dep's have been balance.
Point 1 is the assumed coordinates pivot point and transformation point.
The scale factor has been calculated to be at 0.9999204
The Rotation angle has been calculated at 24.24-45 HMS CCKW = +
So  I will move it, rotate it and scale it all at one time.

XEQ Q001,ENTER, Q001 RUN

OLD NORTH,ROTATION POINT
W ?
5,643.1285 R/S ,RUN

OLD EAST
X ?
4,489.1651  R/S,RUN

NEW NORTH ,ROTATION POINT
Y ?
732,467.6671  R/S,RUN

NEW EAST,
Z ?
3,011,791.9724 R/S, RUN

3,011,791.9724 = EAST
-3,007,302.8073 = DEP. R/S, RUN

ROTA ANG. + POS OR -NEG, POS =CCKW,NEG =CKW
R ?
24.2445 ,display, + 24.2445, CCKWISE, R/S ,RUN

 IS SCALE FACTOR
1.000  , reminder scale factor of 1.000

 24.4125  DOD, Rot Ang in decimals of a deg
  1  ,  R/S ,RUN

CHANGE FACTOR OR NOT
1.00 OR NEW FACTOR

SCALE FACTOR ?
F ? 0.0000 ,key in
0.9999204, NEW ,  R/S , RUN

 OLD NORTH
N ?.............R/S ,RUN
OLD EAST
E ?..............REPEAT,R/S, RUN
NEW NORTH AND NEW EAST

OLD SYSTEM......................... NEW SYSTEM
....................Rotation Point
N 5643.1285.........................732467.6671
E 4489.1651.........................3011791.9724
.....................NEXT POINT
N 5974.1649.........................732955.7759
E 4940.9113..........................3012066.4893
.....................NEXT POINT
N 6389.5079.........................733231.1026
E 4692.0382.........................3011668.2363
.....................NEXT POINT
N 6079.2723.........................732861.1737
E 4480.4263..........................3011603.7703
.....................NEXT POINT
N 5975.8837..........................732645.5700
E 4186.5114...........................3011378.8820
......................CLOSING POINT
N 5643.1285...........................732467.6671
E 4489.1651...........................3011791.9724

Grid Azimuth..........Surface Dist. ...........Grid Dist.
Az- 29.21-14 ..........560.0533' ...............560.0087'
AZ-304.39-27 .........484.1979' ...............484.1593'
AZ-189.53-08 .........375.5339' ...............375.5040'
AZ-226.12-27 ..........311.5689' ..............311.5441'
Az- 113.17-59 ..........449.8058' ..............449.7701'

Grid area by coordinate method = 5.6708 acres

Surface area =5.6708 /(0.9999204)² =5.6717 acres

As you can see ,not intended for the modern world,
but at one time it was. But it still works.
This program is HP 35s version.

Here are Dr. Bill Hazelton's HP 35s Programs
can be found at these links and also downloaded.

pdf drive .net
http://www.pdfdrive.net/hp-35s-closure-1-central-valley-chapter-e8969545.html

Co-ordinate Systems and Related Programs
Wollindina Media ,with Associated Material for programs.
and much more avaible.

http://www.wollindina.com/index.php/hp-calculators/hp-35s-calculator

http://www.wollindina.com/images/HP-33S_PDF/TM_Notes.pdf

http://www.wollindina.com/images/HP-33S_PDF/Lambert_Notes.pdf

Geodetic Computations

http://www.wollindina.com/images/HP-35S_PDF/HP-35s_OM_1.pdf

( 1. ) 7.Traverse Prog. using latitude and longitude and the Gauss mid -latitude Formulae.

( 2. ) 11.Convert latitude and longitude to Lambert Conformal conic projection coordinates (SPCS).

( 3. ) 12.Convert Lambert Conformal conic projection coordinates (SPSC) to latitude and longitude.

( 4. ) 16.Convert Latitude and Longitude to Transverse Mercator coordinates (UTM,SPCS,etc.).

( 5. ) 17.Converts Transverse Mercator coordinates (UTM,SPCS, etc)to latitude and longitude.

( 6. ) 25.Convert latitude ,longitude and height on any Ellipsoid  to XYZ Geocentric coordinates.

( 7. ) 26.Convert XYZ Geocentric coordinates  on and Ellipsoid to  latitude and longitude and height.

Happy programming.

Although these programs are for HP 35s and Hp 41 Cx. I promote the use of any Brand
of programmable calculator used today in surveying.