This example defines the string "1" as a hotspot and maps it to two commands which have the effect of transmitting a 1 followed by an Enter.
Sub HotspotDemo ()
With Session
.DefineHotspotEx "1", rcMatchWhole, rcAnyRow, rcAnyCol, _
"Transmit 1", "Transmit 1 followed by Enter", _
".TransmitAnsi ""1"" .TransmitTerminalKey rcIBMEnterKey"
.EnableHotSpots = True
.ShowHotSpots = True
.ExtendHotSpots = False
End With
End Sub