Below is a Visual Basic sub-procedure which will allow sending the Goto RA-Dec command to any model of NexStar.  The ScopeType argument takes one of three values: "Little", "Big" or "GPS".  "Little" for the original GT models (60/80/114/4), "Big" for the N5 and N8, "GPS" for N8/11GPS and the new GT models.  Examples of how to call the procedure:

To point a little NexStar at Aldebaran:
ScopeGoto 4, 35.9, "+", 16, 30, "Little")

To point a big NexStar at Aldebaran:
ScopeGoto 4, 35.9, "+", 16, 30, "Big"

To point a GPS or new GT NexStar at Aldebaran:
ScopeGoto 4, 35.9, "+", 16, 30, "GPS"

To use the following procedure, place a serial communications control on Form1 and insure it is named Comm1.  You could then place text boxes on Form1 and a command button to call the procedure, passing the contents of the text boxes as the arguments.

Place the ScopeGoto and Wait procedures in a standard module and you'll be all set.

-----

Sub ScopeGoto(RAHour, RAMin, DecSign, DecDeg, DecMinute)
    On Error GoTo ScopeGotoError
    Dim RA1, RA2, Dec1, Dec2 As Integer
    Dim RA, Dec As Long
    Dim strCoord As String
    
    If DecSign <> "-" Then DecSign = "+"
    NSObserverListMain!Comm2.CommPort = Val(SerPort)
    NSObserverListMain!Comm2.Settings = "9600,N,8,1"
    NSObserverListMain!Comm2.InputLen = 0
    NSObserverListMain!Comm2.PortOpen = True
    RA = Int((((RAHour * 60 + RAMin) * 15) * 3 * 1.011358))
    If DecSign = "+" Then
        Dec = Int((DecDeg * 60 + DecMinute) * 3 * 1.011358)
    Else
        Dec = Int(((360 * 60) - (Abs(Val(DecDeg)) * 60 + DecMinute)) * 3 * 1.011358)
    End If
    RA1 = Int(RA / 256)
    RA2 = RA Mod 256
    Dec1 = Int(Dec / 256)
    Dec2 = Dec Mod 256
    If ScopeType = "Little" Then
        NSObserverListMain!Comm2.Output = "?"
        Wait 0.25
        strCoord = "R" & Chr(RA1) & Chr(RA2) & Chr(0) & Chr(Dec1) & Chr(Dec2) & Chr(0)
        NSObserverListMain!Comm2.Output = strCoord
    Else
        If ScopeType = "Big" Then
            NSObserverListMain!Comm2.Output = "?"
            Wait 0.25
            strCoord = "R" & Chr(RA1) & Chr(RA2) & Chr(Dec1) & Chr(Dec2)
            NSObserverListMain!Comm2.Output = strCoord
        Else
            If ScopeType = "GPS" Then
                strCoord = "R" & Mid("00", 1, 2 - Len(Hex(RA1))) & Hex(RA1) & Mid("00", 1, 2 - Len(Hex(RA2))) & Hex(RA2) & "," & Mid("00", 1, 2 - Len(Hex(Dec1))) & Hex(Dec1) & Mid("00", 1, 2 - Len(Hex(Dec2))) & Hex(Dec2)
                NSObserverListMain!Comm2.Output = strCoord
            End If
        End If
    End If
        
    NSObserverListMain!Comm2.PortOpen = False
    
    
    Exit Sub
ScopeGotoError:
    MsgBox "Unable to communicate with the scope.", vbOKOnly, "Error"
    
End Sub

-----

Sub Wait(SecondsToPause As Double)
On Error GoTo NSError
    Dim Start
    Screen.MousePointer = vbHourglass
    Start = Timer   ' Set start time.
    Do While Timer < Start + SecondsToPause
        'Do nothing during the loop
    Loop
    Screen.MousePointer = vbDefault
Exit Sub
NSError:
  MsgBox Err.Description
End Sub