Якщо кнопку натиснути, щоб вона була у включеному (вдавленому) положенні, то тоді при нанесенні на карту пікетів зразу з'являється діалогове вікно, де потрібно ввести висоту точки (координата Z). І зразу автоматично виноситься підпис висоти даного пікету .

%Events.OnCollect
$EO=@EventObject
$XYZ=@Map.Object[$EO].Point[1]
$X=@StringPart 1 $XYZ
$Y=@StringPart 2 $XYZ
$Z=@Map.TempInteger
$Z=@Dialog.Ask Висота точки Default=$Z
@if $Z= then @Break
$ZT=@ReplaceChar .,$Z
$ZT=@StringPart 1,$ZT
@Map.TempInteger $ZT
$XYZ=$X $Y $Z
@Map.Object[$EO].Point[1] $XYZ
@Map.RefreshObject $EO
@Map.SelectObject $EO
@Map.Selected.RemoveCaptions -2
@Map.Selected.CreateCaptions -2 1 2 0 1 4 4
@Map.DeselectAll