Roboard 的 rcservo 驅動問題

miaoichi

目前馬達已經可以控制，當我送出SendPWMPulses後，只維持一下下，馬達就鬆了。所以不能持久
請問若是要可以讓馬達一直維持在最後位置，要怎麼寫?謝謝

  RoBoIO.roboio_SetRBVer(RoBoIO.RB_100)
        Dim i As Integer
        For i = 0 To 23
            RoBoIO.rcservo_SetServo(i, RoBoIO.RCSERVO_SERVO_DEFAULT_NOFB)
        Next
        Dim channel As Integer = 0
        Dim temp As Integer = 0
        Dim temp1 As Integer = 0
        For a = 0 To 23
            temp = 2 ^ a
            If Not (a = 2 Or a = 3 Or a = 4 Or a = 5) Then
                channel += temp
            End If
            temp1 += temp
        Next
        If RoBoIO.rcservo_Initialize(channel) = False Then
            Me.Label_status.Text = RoBoIO.roboio_GetErrMsg()
        Else
            Me.Label_status.Text = "rcservo_Initialize succeesed!!!"
        End If

        RoBoIO.rcservo_EnterPWMMode()
        RoBoIO.rcservo_SendPWMPulses(1, 10000L, duty, 100L)