Бегло посмотрел кое-какие документы... Пишут, что можно использовать любой язык программирования ( в том числе
), но предпочтительнее обращаться к PickitS.dll через .NET Framework. В
как раз есть хорошая поддержка .NET, так что выбор очевиден. После установки PICkit™ Serial Analyzer в системе должны появиться классы:
• I2C Master (class PICkitS.I2CM)
• I2C Slave (class PICkitS.I2CS)
• SPI Master (class PICkitS.SPIM)
• Microwire Master (class PICkitS.MicrowireM)
• USART (class PICkitS.USART)
• LIN (class PICkitS.LIN)
• Device (class PICkitS.Device)
• USBRead (Class PICkitS.USBRead)
К ним можно будет обращаться через .NET Framework. Также, возможно, появятся контролы, которые можно будет импортировать в
через меню: Tools -> Import -> .NET Controls to Palette... Для инициализации и финализации нужно будет вызывать функции класса Device. Для остальных операций - функции классов с именами соответствующих протоколов. Есть примеры, но они на Visual Basic, советую вам установить Microsoft Visual Studio версии, например, 2005. Можно будет покопаться в примерах и сразу их запустить. И удобнее будет переносить код в
. Вот, например, код для инициализации из примера PKSA Example GUI - I2C Master Demo Bd v1-00:
Код: Выделить всё
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If (PICkitS.Device.Initialize_PICkitSerial()) Then
If (PICkitS.I2CM.Configure_PICkitSerial_For_I2CMaster()) Then
RichTextBox_Display.Text += "PICkit Serial correctly configured for I2C" & vbCrLf
Else
RichTextBox_Display.Text += "Error configuring PICkit Serial for I2C" & vbCrLf
End If
Else
RichTextBox_Display.Text += "Error initializing PICkit Serial" & vbCrLf
End If
End Sub
Получение напряжения на плате:
Код: Выделить всё
Private Sub Button_Get_Volt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_Get_Volt.Click
Dim Volt As Double = 0
Dim PKSA_Power As Boolean
If (PICkitS.I2CM.Get_Source_Voltage(Volt, PKSA_Power)) Then
RichTextBox_Display.Text += "Source voltage set to " & String.Format("{0:0.0}V", Volt) & vbCrLf & "PKSA powering device is set to " & PKSA_Power.ToString() & vbCrLf
Else
RichTextBox_Display.Text += "Error retrieving source voltage" & vbCrLf
PICkitS.Device.Reset_Control_Block() ' clear any errors in PKSA
End If
End Sub
И так далее. Советую для начала почитать какие-нибудь статьи, как делать .NET-вызовы в
(про конструкторы-деструкторы и вызовы функций объектов), разобраться в каком-нибудь простеньком примере (вот, например,
вызов диалогового окна на .NET), а потом уже экспериментировать с вашими приборами. Начать эксперименты с самых простых вещей, а потом уже усложнять по мере понимания и работоспособности программы.
.
