Скрипт є орієнтовним кодом-заготовкою, за допомогою якої можна зробити власни каталог координат, додавши до стандартного будь-які колонки, наприклад, ось такі:
$Tab=@Calc char(9)
$Tab=@DequoteText $Tab
@Map.DeselectAll
@Map.SelectLayer ID70005
@ExecuteMenu InsertTableCoor
$SO=@Map.SelectedObject
$Text=@Map.Object[$SO].TableText
@Text[1].Text $Text
;@Map.Selected.Delete
$1=Від
$8=До
$9=Азімут (магніт)
$10=Азімут (іст)
$11=Відстань
$4=long Х
$5=long У
$Zahol=$1$Tab $8$Tab $9$Tab $10$Tab $11$Tab $4$Tab $5
@Text[3].Add $Zahol
;
$Count=@Text[1].Count
$N=1
%Start
$N=$N+1
@if $N>$Count then @Goto %Finish
$L1SK63=@Text[1].Line[$N]
$Nomer=$N-1
$1=ТП$Nomer
$4=@StringPart 2$Tab$L1SK63
$5=@StringPart 3$Tab$L1SK63
$R1=$1$Tab $Tab $Tab $Tab $Tab $4$Tab $5
@Text[3].Add $R1
@Goto %Start
%Finish
;
$Text=@Text[3].Text
@Map.Object[$SO].TableText $Text
@Map.RefreshObject $SO
@Map.DeselectAll
@Window.Refresh |