Asc 02 Omron - comunicazione

[masagat]

Scheda ascii basic asc02 omron c200H:

utilizzo il programma am, sono collegato sulla com1, baud rate 600, cavo seriale come da tabella omron per seriale 9 pin.

Non rieco a comunicare sul video del pc mi esce sempre errore di comunicazione.

Ho provato anche con schede diverse.

Probabilmente mi sfugge qualcosa ma non so più dove andare a parare.

Se qualcuno ha ricordi di queste vecchie schede gliene sarei molto grato.

Ciao e grazie a tutti

[Infoplc]

Di seguito ti mando un programma di comunicazione tra la suddetta scheda ed un'inverter KEB "funzionante", spero ti possa essere d'aiuto

' COMUNICAZIONE CON INVERTERS KEB PER LA SPEDIZIONE DEI SET DI FREQUENZA

' apertura porta di comunicazione 7 bit,parity even,1 bit stop

10 OPEN #2,"COMU:(27)"

' 15 NEW

' lettura da Data Memory 901,902,903,904 del valore di frequenza

20 FOR INV = 901 TO 904

30 PC READ "[at]D,"+RIGHT$(STR$(INV),3)+",1,1H4";FR$

' compilazione stringa da sottoporre al block check characters

40 SET$ = "0213" + FR$ + CHR$(&H3)

' calcolo block check character

50 L = LEN(SET$)

60 BCC = 0

70 FOR I = 1 TO L

80 OP = ASC(MID$(SET$, I, 1))

90 BCC = OP XOR BCC

100 NEXT I

' se BCC Š minore di 20H aggiungo 20H

110 IF BCC < 32 THEN BCC = BCC + 32

' compilazione e spedizione stringa set frequenza

120 STRINGA$ = CHR$(&H4) + RIGHT$(STR$(INV), 2) + CHR$(&H2) + SET$ + CHR$(BCC)

130 PRINT #2, STRINGA$;

' lettura risposta

140 RISP$ = ""

150 IF EOF(2) THEN GOTO 190

160 CARAT$ = INPUT$ (1,#2)

170 RISP$ = CARAT$ + RISP$

180 GOTO 150

' controllo risposta

190 IF RISP$ <> CHR$(&H6) THEN PROVA = PROVA + 1 ELSE GOTO 220

200 IF PROVA < 3 THEN GOTO 130

210 NOCOM$ = "0001": GOTO 230

220 NOCOM$ = "0000"

' scrittura su Data Memory 906,907,908,909 stato comunicazione

230 PC WRITE "[at]D,"+RIGHT$(STR$(INV+5),3)+",1,1H4";NOCOM$

240 PROVA = 0

250 NEXT INV

260 GOTO 20