Lettura Dati Da Plc Con Vb

[droncel@tin.it]

Buongiorno a tutti,

devo leggere dei dati da un plc CQM1 con programma scritto in VB

1) che strumenti mi servono per collegare il plc al pc via seriale

2) che strumenti mi servono per la programmazione (devo acquistare delle librerie, etc ...)

Grazie a tutti anticipatamente .....

[PinoD]

Visto che è un cqm1 è ancora valido il protocollo sysway, non devi comprare niente, solo copiarti le routine di trasmissione e la routine per il calcolo dell'FCS

[droncel@tin.it]

grazie per la risposta ... sai dove posso trovare degli esempi a proposito?

[edogol]

1) Più che uno strumento ti serve un cavo! Che CQM1 è? Se hai già la porta seriale a bordo la piedinatura del cavo PC-PLC la trovi nel forum con la funzione 'Cerca'. Se non ha la porta seriale, c'è un cavo diretto PC-Porta periferiche PLC (CQM1-CIF02) oppure puoi convertire la porta periferiche in porta seriale con un CPM1-CIF01

2) Nessuna liberia. Usa il protocollo hostlink che è molto semplice e documentato su tutti i manuali

Ciao!

[PinoD]

Il comando deve iniziare con la chiocciolina [at] dopo con il numero di nodo del pcl dato da 2 caratteri ( da 0 a 31 max)

dopo con il tipo di comando che varia a seconda delle aree di memoria, il numero della locazione di memoria e per quante word

esempio : [at] + 00 + RD + 0000 + 00001

leggo il contenuto della dm 0 del plc con nodo 0, ma prima di spedirlo devo fare il calcolo dell 'FCS

Questa è la routine del calcolo FCS dopo che hai scritto il comando

Sub Fcs()

Dim l As Integer

Dim a As Integer

Dim j As Integer

Dim tj As String

l = Len(Comando)

a = 0

For j = 1 To l

tj = Mid$(Comando, j, 1)

If tj <> Chr$(10) Then a = Asc(tj) Xor a

Next j

fc = Hex$(a)

If Len(fc) = 1 Then fc = "0" + fc

TxPlc = Comando + fc + "*" + Chr$(13)

End Sub

quindi il comnado diventa [at] + 00 + RD + 0000 + 00001 + FCS

dopo dichè trasmetti e ricevi una stringa del tipo [at]00RD00000010+FCS dove 10 è il supposto vaolore del dm10

comunque sui manuali omron prima dei cs1 c'è scritto tutto