Land Surveyor Forum

Replies

• Not a Surveyor

  patrick kirol August 24, 2019 at 11:52pm

   

   

   

  for input in latitude and longitude

  5 'ixlalo.ub adapted from code at
  6 'https://rosettacode.org/wiki/Find_the_intersection_of_two_linesSinclair _ZX81_BASIC
  7 'In U Basic by yuji kida https://en.wikipedia.org/wiki/UBASIC
  10 XA=48.7815144526:YA=-117.2847245001 'XA=669595.708:XB=2495736.332
  30 XB=48.7815093807:YB=-117.2901673467 'XB:669533.412:YB=2494425.45
  50 XC=48.7824947147:YC=-117.28751374:'XC=669595.708:YC = 2495736.332:
  60 XD=48.77996737:YD=-117.2922957:'XC= 669331.214:Yc=2494260.804
  90 print "THE TWO LINES ARE:"
  100 print "YAB=";YA-XA*((YB-YA)/(XB-XA));"+X*";((YB-YA)/(XB-XA))
  110 print "YCD=";YC-XC*((YD-YC)/(XD-XC));"+X*";((YD-YC)/(XD-XC))
  120 X=((YC-XC*((YD-YC)/(XD-XC)))-(YA-XA*((YB-YA)/(XB-XA))))/(((YB-YA)/(XB-XA))-((YD-YC)/(XD-XC)))
  130 print "Lat = ";X
  140 Y=YA-XA*((YB-YA)/(XB-XA))+X*((YB-YA)/(XB-XA))
  150 print "Lon = ";Y
  160 'print "YCD=";YC-XC*((YD-YC)/(XD-XC))+X*((YD-YC)/(XD-XC))

   

  for input in northing and easting (survey feet / meters)

  5 'ixspc.ub adapted from code at
  6 'https://rosettacode.org/wiki/Find_the_intersection_of_two_linesSinclair _ZX81_BASIC
  7 'In U Basic by yuji kida https://en.wikipedia.org/wiki/UBASIC
  10 XA=669595.708:XB=2495736.332 'XA=48.7815144526:YA=-117.2847245001
  30 XB=669533.412:YB=2494425.45:'XB=48.7815093807:YB=-117.2901673467
  50 XC=669595.708:YC=2495736.332:'XC=48.7824947147:YC=-117.28751374
  60 XC=669331.214:YC=2494260.804:'XD=48.77996737:YD=-117.2922957:
  90 print "THE TWO LINES ARE:"
  100 print "YAB=";YA-XA*((YB-YA)/(XB-XA));"+X*";((YB-YA)/(XB-XA))
  110 print "YCD=";YC-XC*((YD-YC)/(XD-XC));"+X*";((YD-YC)/(XD-XC))
  120 X=((YC-XC*((YD-YC)/(XD-XC)))-(YA-XA*((YB-YA)/(XB-XA))))/(((YB-YA)/(XB-XA))-((YD-YC)/(XD-XC)))
  130 print "Lat = ";X
  140 Y=YA-XA*((YB-YA)/(XB-XA))+X*((YB-YA)/(XB-XA))
  150 print "Lon = ";Y
  160 'print "YCD=";YC-XC*((YD-YC)/(XD-XC))+X*((YD-YC)/(XD-XC))

   

   
• 

  Geospatial JS August 30, 2013 at 11:28pm

  Hi Jetro,

   

  It can be done by the geometry in this way...see below;

  1. take Y2-Y1/X2-X1 = H

  2. take X3-X4/Y3-Y4 = G

   

  Cal for X:

  (Y3-1/GxX3-Y1+HxX1) / (H-1/G) = L

   

  Cal for Y:

  Y1+Hx(L-X1)

   

  Cheers,

  Geospatial JS
• 

  Arnel M. Domag August 30, 2013 at 10:16am

  You can simply go back to your Analytic Geometry in college days. The idea is to get the equations of the two intersecting lines then equate variables.
  • 

    JETRO CARBONILLA > Arnel M. Domag August 30, 2013 at 6:39pm

    Please give me example friend.Thank you