Index of annotations

:

::Bearing { ea na eb nb } - common.tcl

Bearing function: Calculate whole circle bearing counter clockwise from north

::Beep { repeat } - common.tcl

Beep the pc speaker

::ChangeAngle { angle {in DMS} {out RAD} } - common.tcl

Conversion function: Universal angle conversion function

::CloseCom { } - leica_com.tcl

Close communicaton port

::CloseCom { } - nmea_com.tcl

Close communicaton port

::CloseCom { } - trimble.tcl

Close communication port

::Coords { {wait 1000} {incl 0} } - leica.tcl

Read coordinates from instrument calculated from last distance measurement

::Coords { {timeout 5} } - nmea.tcl

::Coords { {wait 100} {incl 0} } - trimble.tcl

Read coordinates from instrument

::Deg2Rad { deg } - common.tcl

Conversion function: Convert sexagesimal angle to radian

::DelVal { codes buf } - common.tcl

List handling function: Delete sublist from list

::DisplayAngles { anglist {unit DMS} } - common.tcl

Instrument handling (instrument type independent functions): Display angles on standard output

::Distance { ea na eb nb } - common.tcl

Distance function: Calculate 2D distance between two points

::DM2Rad { dm } - common.tcl

Conversion function: Convert angle from DM (NMEA format) to radian

::DMS { val } - common.tcl

Conversion function: Convert radian to DMS (sexagesimal)

::DMS2Rad { dms } - common.tcl

Conversion function: Convert angle from DMS (sexagesimal) to radian

::DtmIn { dtmname } - dtmin.tcl

Load an ESRI ASCII GRID from file, elevation array is returned in a global variable dtm

::eov { x1 x2 } - wgseov.tcl

Transform from WGS84 longitude, latitude to EOV east, north

::eovx { x1 x2 } - wgseov.tcl

Transform WGS84 lambda, fi to EOV North coordinate

::eovy { x1 x2 } - wgseov.tcl

Transform WGS84 lambda, fi to EOV east coordinate

::FreeStation { geo {atr 1} {edmMode 2} } - freestation.tcl

make measurement from a geo array

::GDOP { {timeout 5} } - nmea.tcl

::GetAngles { } - leica.tcl

Read angles from instrument

::GetAngles { } - trimble.tcl

Read angles from instrument

::GetAtmCorr { } - leica.tcl

Get atmospheric correction settings

::GetAtmCorr { } - trimble.tcl

Get atmospheric correction settings

::GetATR { } - leica.tcl

Get ATR status

::GetATR { } - trimble.tcl

Get ATR status -- dummy function for compatibility purposes

::GetAutoOff { } - dna03.tcl

Query autooff state

::GetEDMMode { } - leica.tcl

Get EDM (Electronic Distance Meter) mode

::GetEDMMode { } - trimble.tcl

Get EDM (Electronic Distance Meter) mode

::GetFace { } - common.tcl

Instrument handling (instrument type independent functions): Get Face info from instrument

::GetId { } - leica.tcl

Read instrument id

::GetId { } - trimble.tcl

Read instrument id

::GetInstrument { } - leica.tcl

Read instrument name

::GetInstrument { } - trimble.tcl

Read instrument name

::GetIntTemp { } - leica.tcl

Get internal temperature

::GetLine { } - nmea_com.tcl

Send message to the instrument and wait for answer

::GetLock { } - leica.tcl

Get Lock status

::GetLock { } - trimble.tcl

Get Lock status

::GetPc { } - leica.tcl

Get prism constant

::GetPc { } - trimble.tcl

Get prism constant

::GetRefCorr { } - leica.tcl

Get refraction correction setting

::GetRefCorr { } - trimble.tcl

Get refraction correction settings

::GetStation { } - leica.tcl

Get station co-ordinates

::GetStation { } - trimble.tcl

Get station co-ordinates (dummy proc for compatibility puspose)

::GetTemp { } - dna03.tcl

Get internal temperature

::GetVal { codes buf } - common.tcl

List handling function: Get value from list of lists like {{code1 value1} {code2 value2} ...}

::Gon2Rad { angle } - common.tcl

Conversion function: Convert angle from gon to radian

::Line2D { e1 n1 e2 n2 } - common.tcl

Line2D calculates the equation of a line going through two points a * e + b * n + c = 0

::LinePointDist { a b c e n } - common.tcl

LinePointDist calculates distance between a point and a line

::LoadCoo { fn } - common.tcl

Load GeoEasy coordinate file into global array coo WARNING previous content of coo array lost! Returned error codes: -1: cannot open file positive value: line number with error

::LoadGeo { fn } - common.tcl

Load GeoEasy fieldbook (.geo file) into memory array geo WARNING previous content of geo array lost! Returned error codes: -1: cannot open file positive value: line number with error

::LoadTca { fn } - robot.tcl

Read measurement program from tca file tca file format: !,station_id,ih (optional) point_id,hz,v,faces,PC faces = 0 no measurement, 1 measure face left, 2 measure two faces, 4 measure two rounds PC prism constant [mm], optional if missing no change to the measured distance

::Measure { } - dna03.tcl

Measure horizontal distance and staff reading

::Measure { {prg 1} {wait 12000} {incl 0} } - leica.tcl

Measure distance [NOTE: call "Measure 3" to clear previous distance measurement]

::Measure { {prg 1} {wait 2000} {incl 0} } - trimble.tcl

Measure distance

::Measure1 { } - leica.tcl

Measure distance

::Move { hz v {units RAD} {atr 0} } - leica.tcl

Rotate instrument to given direction

::Move { hz v {units RAD} {atr 0} } - trimble.tcl

Rotate instrument to given direction

::MoveAndMeasure { hz v {units RAD} {atr 0} } - leica.tcl

Rotate the instrument and measure distance

::MoveAndMeasure { hz v {units RAD} {atr 0} } - trimble.tcl

Rotate the instrument and measure distance

::MoveRel { hz_rel v_rel {units RAD} {atr 0} } - common.tcl

Instrument handling (instrument type independent functions): Rotate instrument relative to the actual position

::NMEAChecksum { msg } - nmea_com.tcl

Check NMEA checksum

::OpenCom { {par leica.com} } - leica_com.tcl

Open com port, port number and other parameters are read from a file.

::OpenCom { {par leica.com} } - nmea_com.tcl

Open com port, port number and other parameters are read from a file.

::OpenCom { {par trimble5503.com} } - trimble.tcl

Open communication port, port number and other parameters are read from a file (sets global variable com)

::Rad2Deg { angle } - common.tcl

Conversion function: Convert radian to sexagesimal into pseudo dms (ddd.mmss) format

::Rad2Gon { angle } - common.tcl

Conversion function: Convert angle from radian to gon

::Rad2Sec { rad } - common.tcl

Conversion function: Convert angle from radian to seconds (ss)

::ReadCom { } - leica_com.tcl

Read input from com port Input chars are added to global input buffer (buf)

::ReadCom { } - nmea_com.tcl

Read input from com port Input chars are added to global input buffer (buf)

::ReadCom { } - trimble.tcl

Read input from com port.

::Robot { geom {atr 1} {edmMode 2} } - robot.tcl

make measurement from a geo array

::Search { hzArea vArea {units RAD} } - leica.tcl

Search prism in a given area (elliptical)

::Send { msg } - leica_com.tcl

Send message to the instrument and wait for answer

::Send { msg } - trimble.tcl

Send message to the instrument and wait for answer

::SetAtmCorr { lambda pres dry wet } - leica.tcl

Set atmospheric correction settings

::SetAtmCorr { ppm pres dry wet } - trimble.tcl

Set atmospheric correction setting

::SetATR { atr } - leica.tcl

Set ATR status on/off

::SetATR { atr } - trimble.tcl

Set ATR status -- dummy function for compatibility purposes

::SetAutoOff { par } - dna03.tcl

Set autooff

::SetEDMMode { mode } - leica.tcl

Set EDM mode

::SetEDMMode { mode } - trimble.tcl

Set EDM mode

::SetLock { lock } - leica.tcl

Set Lock status on/off

::SetLock { lock } - trimble.tcl

Set Lock status -- dummy function for compatibility purposes

::SetOri { ori {units RAD} } - leica.tcl

Set orientation angle

::SetOri { ori {units DEG} } - trimble.tcl

Set orientation angle

::SetPc { pc } - leica.tcl

Set prism constant

::SetPc { pc } - trimble.tcl

Set prism constant

::SetRCS { rcs } - leica.tcl

Set RCS searching mode

::SetRefCorr { on r s } - leica.tcl

Set refraction correction settings

::SetRefCorr { on r s } - trimble.tcl

Set refraction correction on/off

::SetStation { e n z } - leica.tcl

Set station coordinates

::SetStation { e n z } - trimble.tcl

Set station coordinates (dummy proc for compatibility puspose)

::wgs { x1 x2 } - wgseov.tcl

Transform EOV east, north to WGS84 longitude, latitude

::wgsfi { x1 x2 } - wgseov.tcl

Transform EOV east, north to WGS84 latitude

::wgslambda { x1 x2 } - wgseov.tcl

Transform EOV east, north to WGS84 longitude

B

blindOrientation.tcl - file found in .

C

common.tcl - file found in .

common.tcl - this file contains common instrument independent functions Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

coo2geo.tcl - file found in .

This program creates (writes to the standard output) input file for robot.tcl from points at given coordinates

D

dna03.tcl - file found in .

Leica DNA03 specific functions Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

dna_test.tcl - file found in .

dtmin.tcl - file found in .

Load ESRI ASCII GRID Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

F

fileMaker.tcl - file found in .

This program creates input files for other programs using Ulyxes TclAPI.

freestation.tcl - file found in .

This program measures to given directions and calculates free station using GNU GaMa, finally upload station coordinmates and orientation to the total station

G

global.tcl - file found in .

global.tcl - this file sets up the following useful global constants: debuglevel: 0/1/2 no warnings/serious warnings/all debug messages PI: relationship between the diameter and the perimeter of a circle PI2: 2 times PI RO: 180*3600/PI, 1 radian in seconds max: maximum number of tries to get answer from the instrument used in Send maxtry: maximum number of tries to find prism used in Robot com: used port name e.g. com1: or /dev/tty/ buf: I/O buffer for serial port reg: array with 4 regexp reg(0): for any text reg(1): for integer value reg(2): for float values reg(3): fom DMS values Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

L

leica.tcl - file found in .

Leica TCA1800/RTS1200 specific functions Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

leica_com.tcl - file found in .

Leica serial communication procs Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

M

measureToMachine.tcl - file found in .

This program measures to a moving object (car) and checks the object is moving on a predefined path.

measureToPrism.tcl - file found in .

This program measures a slowly moving prism (with ATR) or any target at the same direction (without ATR) and writes the time and the measured values to standard output.

N

nmea.tcl - file found in .

MNEA GPS handler Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

nmea_com.tcl - file found in .

Leica serial communication procs Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

nmea_test.tcl - file found in .

R

robot.tcl - file found in .

This program measures to given directions

T

test.tcl - file found in .

This program tests TclAPI functions IMPORTANT Target on a prism before start the test! Ulyses - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

trimble.tcl - file found in .

Trimble 550x specific functions Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki

W

wgseov.tcl - file found in .

Transformation functions between WGS84 - HD72/EOV using Piroska Laky's fromulas Ulyxes - an open source project to drive total stations and publish observation results GPL v2.0 license Copyright (C) 2010-2012 Zoltan Siki