1
1
2
1
1
0
0
DefaultXSLSurface
Cancel requested
1
2
3
4
5
All measured points on profile
Last measured points on profile
All measured points on profile
6
Elevations
Offsets
Elevations
7
Nothing
Overbreak/Underbreak
Point Name
Nothing
8
Every profile point
Every 2nd profile point
Every 5th profile point
Every profile point
9
Yes
No
10
Yes
No
11
Yes
No
true
false
Elevations
Offsets
Yes
No
20
100
1.0
3.280839895
3.2808333333357
1.0
m
ift
sft
m
1.0
1.111111111111
17.77777777777
1.0
1.0
0.0001
1.0
true
true
false
Clothoid
true
1.0
no
no
no
preserve
Tünel Kesiti
(Chainage =
(Km =
)
Tipkesit Tabakası:
Ölçü Tarihi:
-
Metre
International Feet
US Survey Feet
Metre
HESAPLANAN ASBUILT GÜZERGAH NOKTASI (
)
0
8000
8500
Tipkesit Alanı
Kazılacak Alan
Dolgu Alanı
Ölçülen Alan
1600
1000
Kot
Düş.Ofset
Chn Delta
Ist. Delta
red
blue
red
blue
Design template elements
true
false
blue
gray
2.0
1.0
Grid lines
1
Lines between scanned points
DefaultXSLSurface
Over/underbreak lines projected onto design profile
true
true
true
red
green
1
2
5
1
true
Overbreak/Underbreak line
Profile point annotation
Scanned points
red
blue
#f60
green
Design profile centre point
Computed profile centre point
Computed profile polar delta value
true
blue
gray
2.0
1.0
true
DefaultXSLSurface
1
Undercut
Overcut
DefaultXSLSurface
true
true
0.0
0.0
0
0
0
1
0
0
0
true
false
0
0
0
0
0
false
0
true
true
false
0
0
false
true
false
false
true
false
true
false
true
false
true
false
true
m²
Sq Miles
ft²
USft²
Acres
ha
m²
left
right
center
1
1
Trimble Navigation New Zealand Limited
11.6568
dxa
Oca
Şub
Mar
Nis
May
Haz
Tem
Aug
Eyl
Eki
Kas
Ara
iVBORw0KGgoAAAANSUhEUgAAAZAAAABgCAMAAAAEhNRTAAAAAXNSR0IArs4c6QAAAjdQTFRFF1GS
GFWXHlaWFFSVElOTH1eXFlWWHFWVJVmYJVubMV+dK12cIViYLF6dJlycJFqaKVybMF+cN2KfO2Sf
NWGeMmCeOmOePWahPGWgOGOgW3ivUXOrR22nVnWtQGehU3KqX3qwWneuV3WrVXSsUnSsQmqlQ2qk
Sm+nXnmvSG6oQGmkS2+oRmymTXCpQWiiTnGrT3CpXXiuWXasXHitYn2zYHuxZH6zZX+0YXyyb4a4
f5C9Z4C1fo+8dou6cYe3bYS2dIq6boW3eY69aoK1cIe5a4O2c4m5aYG0eI28eo++fI69gJG+gpK+
g5O/gZK/j53GhpjEjp7HjZ3GhpbCiJjEipnDi5rFjJzFipvGhJTAkp/GhZXBkZ7FjZvEiJnDm6nN
narMmKTKm6bKk6DInKfLnqnOmaXLl6PJkqLJlqLIrrbVtL3YpLDRsLfVoqzPsrnXtrzYrLTToKrN
qrPSqbLRtr/ao6zNtLrWpq/RpK3Ot73ZprHSqbLTtbvXuL7aoavOr7bUsbjWrbXUu8Pdv8bfucLe
vcXfvMTet8Dcvsbg0tfq1dnq1trrxs3j0dXp3N7s0NTnytDl297u2t3txczi2dzrw8vjwcjhztPo
y9HmxMvhx87k1Njpyc/mztPm3d/twMfg3uDu8/L2+vv87Oz18PD2+fn7/v7++/z+9vf79fb6+Pj6
7+/19vT56+v08vT48vH39/X65+jy4+Xx4eLu4OHt6ury7u706enx5ufx5Oby5ebw////RuO/GAAA
EcZJREFUeNrtnflDE8cXwIdcJJwCARQjCCjhRjmqgAjK17aoiNaDCq2IV62AYKX6rRf2i0jBBDkE
5KqFAAkk4ZbDzh/33dndJLuT3c0GQk0x8wPszs7Ozr7P7ntv3sxsAPQlr0rAJwIfEF8SA6Qz5t6E
TxxeBOSNEuytM/gE4jVAdCoA/GL0Pol4ExAAJPldPpl4ExAAVGfe+qTiTUAACKiY9MnFm4AAEF4/
5ZOMNwEBQNMw7ZONNwEB0n11RjLfNDMxhdKs2eh25eYpN5PFKnAR8/2a68xU2+1JQcxgLZkVvl3j
hIV9gmGbgQAgy23V9dwryNUEyoOCgiSxcYXnG7vm3Kr8gh861Y2k2D/PX9ukAmvhd54Ecl7BagnI
nREsPh7BKi9RNW07EBBwsUKCZflrjtUtiK/8EnA37V34XEDOYJXHLwoW7w1mF5fe22YgIUWtS3Dm
VYKTyBSxx0R3VS67DSRx4nMBOYsDEX5D3uJAGrYVSETFMpU7XZeocJKaJL/T5APyDwIJvrJkP27o
OQAOJsmw1sqPv/EB+aeAyPL7bHnmB3kBSnlgebyz5AIrzT4g/wgQNdM6vSuIDS3uN64UhHDY304f
kH8ASMJH9nHzOHW0JMhJeAGtPiDbDqSE2+2cnukv8gvWBrNFIv/FB2R7gSjO093T1YHBQX3/mr2z
uhIDJEBZoOu/kbyL2YxyH5DtBKKopbcXkkm7nXLGbrjfFyJpHKyZgH3fRzLacdUHZNuAhIIqenM+
j75KAUNp3VOjnNSHBrhyguEFVxt8QLYHyBtJsW2znL5ILDLwuuNtVC9wPJfkoCVMeTOjNZUClV90
G0jcgg8InbqPr9Jbv9puvBrtFQJQ+J7MX7xJhbZiBuCQ2tGSB/yVP0pKYaa0cCcAyjRWidSTsz4g
dHpsc2ItcfQ1ggaJPT2Sgvy8hUIViPL9C/+bK3c0JYw/tDW7vspMhhonIMnTrBLrUwJBb8PwICu9
XtnJQHTpw/TWA9s1opE+z6e20/SkpHq02kvtU7Pzj+MZT2uC6PjvQycgX0FvSV4GxHhEQs8AMtjj
JIloL82mW34grfcCbcNNf+x1NKbKB8TjQBpA0AjcGCW2eu3a6ASxNx7FJ3ZTY7TtiKrfB8TDQNYy
gKoHVrQRmw49X0LsdYbR1zvwm2MqirV37Mmt203Lt21G+rgPiIeBEHZD1T2SiuJWR+zXKCX2NmLR
liKviRHbbUujKL2Cy1eooGPIn9sIxLjU3fT08WbmHU8ONT5rfqhfdaqx99WD5uZ7+nURQNb095qf
NQ5NbQ6IoVff0PzwYXNHp9ktIDPpAOzSJ2Si7Sz7NTKQYsoAQJbQZrMcM8i092odOuy1hOyc/Ger
QIx9w3pGeqe30HfU9WNiVKAChPUSV+9ildEPfkIlpgZYme96aMfZ8iB39y7keqiiSjsYvpuxq/JQ
AIqUykKj9j83CwIxtJ+KCCVuUBqS+fWgyV0gaw0n0iNVUtJhDT5YWL8uHkgjcdHwY0CLakm1XyMC
Kal8oHlM45hvLYxFSg0uJ5HHTxH5G+rwXOLu1P1bBGL4BigYSSZ/QerGZ1m0NxfYRzjRWlYZBWXV
XrEzZWHIEMKJWmaAR1poG+IxDZX6Ma+/d4wXiBm2ZTFCErL9Y0Y3gJhGy7ESILigVywQFLqSB4Is
9Jpn2iuQtxP7+lradvxdm0HADkZ5cIi8VpyV8LoOgSf6wwDUbxHIdC52f2gSx6sMx80gIAe5Ooav
sUwV6ha1arHciEHyMrPl+LQNeQMPkLyNr7Fx0qALBtFAPp1RcsQhVNcWRAHpD6DKIyBzsY7zLzJe
v4oIKk9NdgOf+6O+yTzxJB4Ah+DMi8zsmS2+ITiQJ9B4myE8EkiSKCCd0NjiPHizG81Y/sgx9Kkc
5gYSrnEue2JGJJDWWJ7QUJpODJAbqGhUAAnE4lBZQLNBF5q64wiVZJL94wpk9IkHZj0VyDsIWdXc
sHgWyAtYxXrdxQPRcc8+yodwRcN1AL3oHEA4U/6iKCC3/XhriNS7BmIqJApKrgYAjZFl1EH+GiWs
ByxJJKNGGb6i5PGWeBbPov3d6S9NngTSrldsDkhg/3VOSchHzRpuGb0UDwT8KAaIYExVPeYSyAf0
+AcMBIPdaLJJqV1l3qJdkEqsym8Rt/FwMIDeTUQIlTsJFAntRo8B8X8UBzYHJKwikFsSv+TziCjH
DSCKVtdAfpEJVpH50RWQYdJlGg0Eocjy/USfl2onORrBrlF2nRRuKVKoZcT+HuRiPUcHSrtNHgKi
jJNsEoicT12EK/ie2VXxQMChGVdAfpW7qKLQ7AJICyp1e3wX8RAhD8qfOou0Hwby3PEUTCsMEZlm
pM8syB2QI7WoI29XUdTvIZWFSU88EPeTsocPSKiG7gMz0l0XQD5FubzgdRdAilChgb+JTncZ8gxJ
B+EyScJ4M2kE/Z/LZ7+F+2yMa8ndP4itJdoZCDk76QkgeNpOIJJWbiD+x7om1z5+hz0amklhIGVO
1QTJMR0WsSwMJBHJcXxFBUA6MiLfEXW0kMeWCGsfTfppxudaKbNK2iEepZwv1JbZ/XYN8NPkZwfi
L+GzARz6RP6aE4iaNhdXsPyngkAGMY87+IrOuvRyHzuzShgIUjupa+NoGhBq2qhC0kwe6iH7iBE9
VDf9YbKjqxP8AxWdyAZ2INR7Rj9E96c+K5DUH9pe303lqCXi+xcdNenigITZ/NMPmAk9ahYCcoqd
HUD1cgxFbNYWQSCIaS7sRUBQ2NZU8Tt5pJn2VkLoMdqZ/mdlOdo0bV75kxXKneqh63+Odq4xzX7a
E9PnA1JC3q7OuW+WR6qK1TRRQA7bl5AdwYqvCAAZZLsUsmd0HRa209jiEsgp2IeAKFEAzIjEbaq0
605ZgT0sZjCbzY74wWIy1cJ3aOc6u4E5euNnApJHS/IH/ICGvo0WUUAc4fcq7Ei9ABCslix7R/IG
WzougZRSQMBlOtt8jnl+1O01zpOp6RDqUQ4gwK+0e8tA/DO1MblpuxV0cFEUEL8eusqXmCmVjdAH
uiTuAfldwdFmbiBr4XzGoo/lrgV0iwUSMEpZjFKsedE/fmAqIfPAV+itM5KWPH6WCwhhQItXtwQk
9vroxpzVMLn8viU+VnxPfZSusg2Tu8L2nnfK3QMyiJUPN/MCaWVnSt477p1t0+6LBaIg6zVwdGqV
OTcG+8hZJH2DVRkykIlWAzZK7W+Vx4FUMzwD08aMG8FFKg0F8gDpchNIfwjHFbiBnMMULSM8nMw6
clKkUQdXSc1v+pZbkwema1NSUuh1CzVEwWnCcipHOJTk1lXWNaezPxeQvl2Y7vuNFwjmL2gZdrSY
dSTOIgAEubNps6Tbe5RuxbwLG0u2GBmsHwE4RJ1S7lmjnmz1GiD4G0JGGDmBrKqxOhitZ3cYg98K
AEFB0Oj1jwSQcHIxCJKkZb9LIArkYvcpwGOyHmMJ8xlKqduq21sGvRfIKT4gw1ivMFHXr6PTB2yV
75AAkBxkfnTLKuBPdkCePkJ/F5JdEkFrEaxZeZSenGCM/XiiY1jkxUCO8gFpxhw7SYjKlkIwF6NJ
AMhpVGDwkwqN4UA4EiQnO3prX7kCEom+ItBOTzj5ZHf4PBM68WYgcbM8QKqA6HRLAEg9KnCzVxmM
AvVzWgBCSTM9Xa5wUekrRj3v6TxPBRe9GsgiD5DT4oGUCwAhIyAJ3fIL9nZFklMCjA1q8ZVS3V+P
hd+9GohmlQfISfFAigSALKEbDWnMRoZ/mIrFKEmtBT+WSoUqjWXUg4aBPThA5dVAwvt4gBz3DBCI
eh2KYuQtGWyf0pD/TNpqY2uWQKV5pGs6gYJts2og2+fBIVyvBqLWcQMxJ3sIyFPyKuhG/rC/EdIS
qpu92JzD85aE15BNtpxFY+svFdpm1x8o2iFAose5gRhzPQRkCUX8VSj+H8NUSO20HIbLgp0rjL5J
zxH6HfV+Zi/VilkkskOAZEzwqKwiDwGBJ9CNjOD3oDhtW6K09qQsTW0fn/IPSynrsH/XanQQLtZp
GiH8coBkWbdu1P8jCKRHQQG5i50VVWWbKgcNK4MPqy5dvnz+u/o/dCzlZHx9GKRZviQg8UYeIHgd
mdeuXeZO1W2CQNBUOQTE2UvYU8k/Z9tUh3yxrlwJNV3lywGC1mlwArmDFUyG7idqfcg7KQJiSeR4
t0JOD3KOTlla88A1+OYk0mRJi18UkIt8QBow/2efcbNAjN8gIOsp3PpOc+73D+yPlG40VaOyZ2up
tjbDnQzEKfxezwekG/tMYrpps0Bgj1I+wjGnyH4zkenFFc8GR/R6/cjzO6fjo1BURapWUsG0xMUd
DWQMW1lATqzjBGLFJsntmt40EHhNSbi962mCngG9JIbei3j6K7UR9AruaCBPsMmp6gU+IGTgnJEk
7CX8H+/+aRYNZOoUil91hYt12wK+34BfU5vX4E4EEmOXXQsWVM+DvEDwcG8N6wYqQNDhW+MigUA9
ORgyECwKR9DZXgiXKd2abd6RQFLs7uUx7MgdfiDdQm7WHJrnIAs42mQRBaQ7jRwD7whwjUNeOIq8
XuoWwvvhjgSitK+sOYyJ/g0/kHlsKZ1qhNH+C7bcyDMja0aXQHRyaiLZSLQrHnkjqDZrPunjqVrh
zgRin6LWg7lO2bP8QODP+Cvi+JjOc+b4br7VNRAVyCVHXvsSBHFo20gV1UfNjQx6AXcqEMkAWdqE
T4miFhPwANHhRrjA5vm2sLh+DcUAAbnk8vyFq0G8OA42k86H8R41EU/p3hfP/1VAgPLWsmV+HLcg
Ub1CQJyXs8W3r89P/d3KXm4aSKgyKznJbd1qmFxdR++RZX19HgcCEqhw4l88oyBRP1P26G0htR/y
GO5gIISyz8p2cnLor+zxAVlxWuEjTc1O3IPloa+W3FInpaSkR9eOxyRFV0H4ITn1YJUTEJBKWaGF
p0nOzQusphaafDxDXzSiB+5sIFyMxoWBwJsiKglEsxcuAcKdloHyLqLfmbQEbwNypbDTd3tD/0vZ
f+v9DPbEFeVx8u2xDh2zKcOYZbgzgQiNW9+BLoAsHnANhFyNYDbo5dKORdipDFOAIVgMYknL4vyp
8VJ6laipvUDrb7+b48jTtQxfOGC7G0ml+9+D+ZcAOXyEV5SHZ1wBgf17XPEoon3eTrl0iPgblLQP
3P8UHlvMAwRE/mLr6q39+ezb7ChVKMh6oO96dDk31mHt43sg3KlAmqxJPKJ0dLoElkW3BwnzOGKb
RkgAIaTYKYm7DpIbwNUiPiAAHGpzuM9G+KEISIIlrElaqc2b+oWffweQpA34hvvTGMo6KAIIbFIJ
8dhvH+y2AUnUS/yTQfs5fiBAmthi+3Gj2Uf4ojxp9m9rEO5cIJeIvVEuIoEMJ1/w0xod/CFB6WlH
l9AGJGMuB4DY5WMCQAjzH3W8dcIIF/6HS0FdNmaFcAcD2UWqpf4Mp7amMbW08Mdnxvfz8FDVM1SL
DYgGrXwugSWCQBCTsNzGMqamku+JO9e2ADefBD7PdBQ7UOJ8tjVTDBClLeQ9FsIHBJv3TK1TL7Dt
5tFXq2CLfFe1hdkY/DeoZP9jtdVQz7UKOCj/A7NQl0Q6Rvz1S4cdfuApPE6uuRUAAuT5I/1NLefL
T31T+s2p8orfXm8Y4ZZSa3QKO0XbvgBlqE5lHYi963y2uZj9Xebdz8gXIZOVmR5ju2ddzkHWgSyb
nn2bmM48kJRILg2ooSrXaN7ZJXLF/n0PyaFKLIb6KZlde9pfWGvX7udg4KNOY2sQdOHBfxJ/I+ON
8+m738Iz0jOCQGSlQ3QcxogS9EAysz+svLq6bn/fFtiH1jl+Ps9owcqQA5XTWJ2TNp1gmGQfmbPd
gmGOXc0cOa5ntZVmDLtOdT6+czG/uuZJtwVvjAmrfdV5EGJm9GH+oUCJQqHwl6sPV77+hMvQ3Kcj
bsHcP26E48RjtDS6BEX8sKQvbSEZzdaNsXfDuimraK/U99OrXpZ8P07s/UB8P9/tVUB8P3DvVUAk
+V1fsjS8DYhfjP5LloV3AXmjBHvrDF+yKLwMSGfMvYkvWRBeB8SXfEB8yQfE+9P/AX8d0hScr6bE
AAAAAElFTkSuQmCC
function E(){ return Math.E;}
function LN2(){ return Math.LN2;}
function LN10(){ return Math.LN10;}
function LOG2E(){ return Math.LOG2E;}
function LOG10E(){ return Math.LOG10E;}
function PI(){ return Math.PI;}
function SQRT1_2(){ return Math.SQRT1_2;}
function SQRT2(){ return Math.SQRT2;}
function abs(arg){ return Math.abs(arg);}
function acos(arg){ return Math.acos(arg);}
function asin(arg){ return Math.asin(arg);}
function atan(arg){ return Math.atan(arg);}
function atan2(arg1, arg2){ return Math.atan2(arg1, arg2);}
function ceil(arg){ return Math.ceil(arg);}
function cos(arg){ return Math.cos(arg);}
function exp(arg){ return Math.exp(arg);}
function floor(arg){ return Math.floor(arg);}
function log(arg){ return Math.log(arg);}
function pow(arg1, arg2){ return Math.pow(arg1, arg2);}
function random(){ return Math.random();}
function round(arg){ return Math.round(arg);}
function sin(arg){ return Math.sin(arg);}
function sqrt(arg){ return Math.sqrt(arg);}
function tan(arg){ return Math.tan(arg);}
function log10(arg) {return Math.log(arg) / Math.log(10);}
function CheckFileExists(fileName)
{
var fileSys
fileSys = new ActiveXObject("Scripting.FileSystemObject");
if (fileSys.FileExists(fileName))
{
return(true)
}
else
{
return(false);
}
}
function LowerCase(stringVal)
{
return(stringVal.toLowerCase())
}
function DisplayOptionsDialog(surfacesList, defaultProfilePtsToDisplay, defaultVerticalDisplay, defaultAnnotation,
defaultAnnotateEvery, defaultShowGridLines, defaultCompProfileOffsets, defaultClosedScans)
{
var fileSys = new ActiveXObject("Scripting.FileSystemObject"); // Create file system object
var shellObj = new ActiveXObject("WScript.Shell"); // Create script shell object
var tempFolder = shellObj.ExpandEnvironmentStrings("%TEMP%"); // Get Windows temp folder
// Create a HTML Application file that can be executed to bring up a form allowing the
// selection of a surface.
var htaFile = fileSys.CreateTextFile(tempFolder + "\\OptionsDialog.hta", true); // Create temporary hta file
htaFile.WriteLine("<!doctype html>");
htaFile.WriteLine("");
htaFile.WriteLine("<html>");
htaFile.WriteLine("<head>");
htaFile.WriteLine("<title>Seçenekler</title>");
htaFile.WriteLine("<HTA:APPLICATION");
htaFile.WriteLine(" ID=\"objTest\"");
htaFile.WriteLine(" APPLICATIONNAME=\"OptionsDialog\"");
htaFile.WriteLine(" SCROLL=\"no\"");
htaFile.WriteLine(" SINGLEINSTANCE=\"yes\"");
htaFile.WriteLine(" maximizeButton=\"no\"");
htaFile.WriteLine(" showInTaskbar=\"no\"");
htaFile.WriteLine("/>");
htaFile.WriteLine("</head>");
htaFile.WriteLine("");
htaFile.WriteLine("<SCRIPT LANGUAGE=\"VBScript\">");
htaFile.WriteLine("");
htaFile.WriteLine(" dim fso, shellObj, tempFolder, result, surfNames(50), surfaceCount");
htaFile.WriteLine(" Set shellObj = CreateObject(\"WScript.Shell\")");
htaFile.WriteLine(" tempFolder = shellObj.ExpandEnvironmentStrings(\"%TEMP%\")");
htaFile.WriteLine(" Set fso = CreateObject(\"Scripting.FileSystemObject\")");
htaFile.WriteLine("");
htaFile.WriteLine(" Sub Window_onLoad");
htaFile.WriteLine(" window.resizeTo 610,490");
htaFile.WriteLine("");
htaFile.WriteLine(" strComputer = \".\"");
htaFile.WriteLine(" Set objWMIService = GetObject(\"Winmgmts:\\\\\" & strComputer & \"\\root\\cimv2\")");
htaFile.WriteLine(" Set colItems = objWMIService.ExecQuery(\"Select * From Win32_DesktopMonitor\")");
htaFile.WriteLine(" For Each objItem in colItems");
htaFile.WriteLine(" If objItem.Availability = 3 then");
htaFile.WriteLine(" intHorizontal = objItem.ScreenWidth");
htaFile.WriteLine(" intVertical = objItem.ScreenHeight");
htaFile.WriteLine(" End If");
htaFile.WriteLine(" Next");
htaFile.WriteLine(" intLeft = (intHorizontal - 610) / 2");
htaFile.WriteLine(" intTop = (intVertical - 490) / 2");
htaFile.WriteLine(" window.moveTo intLeft, intTop");
htaFile.WriteLine(" End Sub");
htaFile.WriteLine("");
htaFile.WriteLine(" Function CloseWindow");
htaFile.WriteLine(" dim file");
htaFile.WriteLine(" Set file = fso.OpenTextFile(tempFolder & \"\\result.txt\", 2, True)");
htaFile.WriteLine(" file.Write -1");
htaFile.WriteLine(" file.Close");
htaFile.WriteLine(" window.Close");
htaFile.WriteLine(" End Function");
htaFile.WriteLine("");
htaFile.WriteLine(" Function ReturnResult");
htaFile.WriteLine(" dim file");
htaFile.WriteLine(" Set file = fso.OpenTextFile(tempFolder & \"\\result.txt\", 2, True)");
htaFile.WriteLine(" file.Write txlFileName.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write surfNames(SurfaceChooser.selectedIndex)");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write startStation.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write endStation.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write profilePointsToDisplay.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write outputVerticalValuesAs.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write annotateWithChooser.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write annotateEveryChooser.Value");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write showGridLinesOption.checked");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write computeProfileOffsetsOption.checked");
htaFile.WriteLine(" file.Write \"|\"");
htaFile.WriteLine(" file.Write closedScansOption.checked");
htaFile.WriteLine(" file.Close");
htaFile.WriteLine(" window.Close");
htaFile.WriteLine(" End Function");
htaFile.WriteLine("");
htaFile.WriteLine(" Function TxlFileChanged");
htaFile.WriteLine(" ReadSurfaceNames");
htaFile.WriteLine(" count = SurfaceChooser.length");
htaFile.WriteLine(" For i = count - 1 To 0 Step -1");
htaFile.WriteLine(" SurfaceChooser.remove(i)");
htaFile.WriteLine(" Next");
htaFile.WriteLine(" For j = 0 to surfaceCount");
htaFile.WriteLine(" Set opt = document.CreateElement(\"option\")");
htaFile.WriteLine(" opt.text = surfNames(j)");
htaFile.WriteLine(" SurfaceChooser.Add opt, j");
htaFile.WriteLine(" Next");
htaFile.WriteLine(" End Function");
htaFile.WriteLine("");
htaFile.WriteLine(" Function ReadSurfaceNames");
htaFile.WriteLine(" dim file, line, surfPending, haveSurface");
htaFile.WriteLine(" surfaceCount = 0");
htaFile.WriteLine(" surfPending = False");
htaFile.WriteLine(" Set file = fso.OpenTextFile(txlFileName.Value, 1, True)");
htaFile.WriteLine(" Do While not file.AtEndOfStream");
htaFile.WriteLine(" line = file.Readline");
htaFile.WriteLine(" line = Trim(line)");
htaFile.WriteLine("");
htaFile.WriteLine(" If surfPending Then");
htaFile.WriteLine(" If InStr(line, \"<Name>\") > 0 Then");
htaFile.WriteLine(" line = Replace(line, \"<Name>\", \"\")");
htaFile.WriteLine(" line = Replace(line, \"</Name>\", \"\")");
htaFile.WriteLine(" haveSurface = False");
htaFile.WriteLine(" If surfaceCount > 0 Then");
htaFile.WriteLine(" For i = 0 To surfaceCount - 1");
htaFile.WriteLine(" If StrComp(surfNames(i), line, 1) = 0 Then");
htaFile.WriteLine(" haveSurface = True");
htaFile.WriteLine(" End If");
htaFile.WriteLine(" Next");
htaFile.WriteLine(" End If");
htaFile.WriteLine(" If not haveSurface Then");
htaFile.WriteLine(" surfNames(surfaceCount) = line");
htaFile.WriteLine(" surfaceCount = surfaceCount + 1");
htaFile.WriteLine(" End If");
htaFile.WriteLine(" End If");
htaFile.WriteLine(" End If");
htaFile.WriteLine("");
htaFile.WriteLine(" If InStr(line, \"<TemplateSurface>\") > 0 Then");
htaFile.WriteLine(" surfPending = True");
htaFile.WriteLine(" Else");
htaFile.WriteLine(" surfPending = False");
htaFile.WriteLine(" End If");
htaFile.WriteLine(" Loop");
htaFile.WriteLine(" file.Close");
htaFile.WriteLine("");
htaFile.WriteLine(" surfaceCount = surfaceCount - 1");
htaFile.WriteLine(" End Function");
htaFile.WriteLine("</SCRIPT>");
htaFile.WriteLine("");
htaFile.WriteLine("<body>");
htaFile.WriteLine("");
htaFile.WriteLine("<font face=\"Arial\">");
htaFile.WriteLine("<small>")
htaFile.WriteLine("<table borders=\"0\" width=\"100%\" cellspacing=\"8\">");
// Input field for txl file name
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.Write("Trimble tünel dosyası (*.txl):");
htaFile.WriteLine("</td>");
htaFile.WriteLine("<td align=\"right\">");
htaFile.WriteLine("<input type=\"file\" name=\"txlFileName\" size=\"40\" onChange=\"TxlFileChanged\">");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Drop-down list for selecting surface - will be updated based on the txl file selected
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.Write("Tabaka:");
htaFile.WriteLine("</td>");
htaFile.WriteLine("<td align=\"right\">");
// Add the surface names from the passed in node set as select element option elements
htaFile.WriteLine("<select size=\"1\" name=\"SurfaceChooser\">");
for (var i = 0; i < surfacesList.length; i++)
{
htaFile.Write(" <option value=\"");
htaFile.Write(i);
htaFile.Write("\">");
htaFile.Write(surfacesList.item(i).firstChild.nodeValue);
htaFile.WriteLine("</option>");
}
htaFile.WriteLine("</select>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Input field for optional start station
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.Write("Başlangıç istasyonu (opsiyonel):");
htaFile.WriteLine("</td>");
htaFile.WriteLine("<td align=\"right\">");
htaFile.Write("<input type=\"text\" name=\"startStation\"></input>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Input field for optional end station
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.Write("Bitiş istasyonu (opsiyonel):");
htaFile.WriteLine("</td>");
htaFile.WriteLine("<td align=\"right\">");
htaFile.Write("<input type=\"text\" name=\"endStation\"></input>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Drop-down list for selecting which profile points to display
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.WriteLine("<label>Gösterilecek kesit noktaları:</label>");
htaFile.WriteLine("</td>");
// Add the 'Profile points to display' selection option elements
htaFile.WriteLine("<td align=\"right\">");
htaFile.WriteLine("<select size=\"1\" name=\"profilePointsToDisplay\">");
// First option
htaFile.Write(" <option value=\"0\"");
if ( defaultProfilePtsToDisplay == 1 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Kesitteki tüm ölçülen noktalar</option>");
// Second option
htaFile.Write(" <option value=\"1\"");
if ( defaultProfilePtsToDisplay == 2 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Kesitteki son ölçülen noktalar</option>");
htaFile.WriteLine("</select>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Drop-down list for selecting what to display for vertical values
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.WriteLine("<label>Düşey değerlerin gösterimi:</label>");
htaFile.WriteLine("</td>");
// Add the 'Output vertical values as' selection option elements
htaFile.WriteLine("<td align=\"right\">");
htaFile.WriteLine("<select size=\"1\" name=\"outputVerticalValuesAs\">");
// First option
htaFile.Write(" <option value=\"0\"");
if ( defaultVerticalDisplay == 1 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Kotlar</option>");
// Second option
htaFile.Write(" <option value=\"1\"");
if ( defaultVerticalDisplay == 2 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Ofsetler</option>");
htaFile.WriteLine("</select>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Drop-down list for selecting what points should be annotated with
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.WriteLine("<label>Kesitteki nokta gösterimi:</label>");
htaFile.WriteLine("</td>");
// Add the 'Annotate profile points with' selection option elements
htaFile.WriteLine("<td align=\"right\">");
htaFile.WriteLine("<select size=\"1\" name=\"annotateWithChooser\">");
// First option
htaFile.Write(" <option value=\"0\"");
if ( defaultAnnotation == 1 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Boş</option>");
// Second option
htaFile.Write(" <option value=\"1\"");
if ( defaultAnnotation == 2 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Kazı/Dolgu</option>");
// Third option
htaFile.Write(" <option value=\"2\"");
if ( defaultAnnotation == 3 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Nokta no</option>");
htaFile.WriteLine("</select>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Drop-down list for selecting which points should be annotated
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td>");
htaFile.WriteLine("<label>Gösterim:</label>");
htaFile.WriteLine("</td>");
// Add the 'Annotate' selection option elements
htaFile.WriteLine("<td align=\"right\">");
htaFile.WriteLine("<select size=\"1\" name=\"annotateEveryChooser\">");
// First option
htaFile.Write(" <option value=\"0\"");
if ( defaultAnnotateEvery == 1 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Tüm kesit noktaları</option>");
// Second option
htaFile.Write(" <option value=\"1\"");
if ( defaultAnnotateEvery == 2 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Kesitteki 2 noktada bir</option>");
// Third option
htaFile.Write(" <option value=\"2\"");
if ( defaultAnnotateEvery == 3 )
{
htaFile.Write(" selected");
}
htaFile.WriteLine(">Kesitteki 5 noktada bir</option>");
htaFile.WriteLine("</select>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Checkbox option for 'Show grid lines'
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td colspan=\"2\">");
htaFile.Write("<input type=\"checkbox\" name=\"showGridLinesOption\"");
if ( defaultShowGridLines )
htaFile.Write(" checked");
htaFile.WriteLine(">");
htaFile.Write("Karelaj göster");
htaFile.WriteLine("</input>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Checkbox option for 'Compute profile offsets'
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td colspan=\"2\">");
htaFile.Write("<input type=\"checkbox\" name=\"computeProfileOffsetsOption\"");
if ( defaultCompProfileOffsets )
htaFile.Write(" checked");
htaFile.WriteLine(">");
htaFile.Write("As-built güzergah ofsetlerini hesapla (dairesel kesitler için)");
htaFile.WriteLine("</input>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
// Checkbox option for 'Tunnel scans are closed'
htaFile.WriteLine("<tr>");
htaFile.WriteLine("<td colspan=\"2\">");
htaFile.Write("<input type=\"checkbox\" name=\"closedScansOption\"");
if ( defaultClosedScans )
htaFile.Write(" checked");
htaFile.WriteLine(">");
htaFile.Write("Her tünel kesitini kapalı kesit yap");
htaFile.WriteLine("</input>");
htaFile.WriteLine("</td>");
htaFile.WriteLine("</tr>");
htaFile.WriteLine("");
htaFile.WriteLine("</table>");
htaFile.WriteLine("</small>")
htaFile.WriteLine("</font>")
htaFile.WriteLine("<br/>");
htaFile.WriteLine("<center>");
htaFile.WriteLine(" <input type=\"button\" value=\" OK \" name=\"btnOK\" onClick=\"ReturnResult\" style=\"margin-right: 30px\">");
htaFile.WriteLine(" <input type=\"button\" value=\"Cancel\" name=\"btnCancel\" onClick=\"CloseWindow\">");
htaFile.WriteLine("</center>");
htaFile.WriteLine("");
htaFile.WriteLine("</body>");
htaFile.WriteLine("");
htaFile.WriteLine("</html>");
htaFile.Close();
// Run the hta file
shellObj.Run(tempFolder + "\\OptionsDialog.hta", 1, true);
// Fetch the returned result from the file result.txt in the Windows temp folder
var result = -1;
if ( fileSys.FileExists(tempFolder + "\\result.txt") )
{
var resultFile = fileSys.OpenTextFile(tempFolder + "\\result.txt");
result = resultFile.ReadLine();
resultFile.Close();
// Clean up by deleting the result file created in the Windows temp folder
fileSys.DeleteFile(tempFolder + "\\result.txt", true);
}
// Clean up by deleting the hta file created in the Windows temp folder
fileSys.DeleteFile(tempFolder + "\\OptionsDialog.hta", true);
return(result);
}
-
.
.
.
.
true
false
x
true
false
Yes
0
0
0
0
true
Yes
false
No
DefaultXSLSurface
0.75
0.9
true
0
true
true
true
true
true
true
true
true
false
true
false
DefaultXSLSurface
0.005
true
false
0
true
true
x
true
false
true
DefaultXSLSurface
true
true
DefaultXSLSurface
true
0
0
0
0
0
0
1
0
1
Increasing
true
Yes
0
0
0
0
0
0
0
0
true
true
0
true
true
true
true
true
true
0
Out of range
Out of range
Out of range
Out of range
true
false
true
false
0.0
0.0
0.0
0.0
0.0
0.0
0
0
0
0
0
0.9
5.175
43.1948
426.0564
0.9
1.125
1
0.0
1
0.0
1.0