Il prodotto
CuSB-22R della COMFILE (figura 1) unisce alle note potenzialità del
CUBLOC,microcontrollore programmabile
sia in linguaggio BASIC che in LADDER, l’integrazione in un unico modulo del microcontrollore, la connessione diretta di ingressi ed uscite
digitali di potenza e l’alimentazione a
220 AC. Costituisce quindi un PLC completo ed economico .Allo scopo di testarlo
abbiamo implementato alcune applicazioni, a livello essenzialmente didattico.

Figura 1:il modulo CUSB
22R
La prima applicazione ,Figura 2, è basata sul riempimento di un contenitore
di liquido. Su una base circolare viene posto
un bicchiere con un fondo opaco. Questa base poggia su 3 microinterruttori disposti
elettricamente in serie e geometricamente a 120° che commutano al
raggiungimento di circa 300 grammi complessivi di peso del bicchiere. Premendo
il pulsante di START una pompa situata in un serbatoio adiacente manda
acqua al bicchiere se:
BASE


Figura 2:schema dell’applicazione
COLLEGAMENTI

Figura 3:il collegamento degli
ingressi digitali

Figura 4:collegamento
ingresso analogico

Figura 5:collegamento
di una uscita di potenza in alternata, PX=rappresenta
la porta generica
Nella
realizzazione fisica del dispositivo abbiamo “incapsulato” il modulo nella
scatola di un alimentatore per PC adattato allo scopo e sfruttandone la presa
dell’alimentazione. Un comportamento anomalo del programma è stato eliminato
collegando la terra del modulo alla terra dell’alimentazione.
Per
migliorare l’aspetto visivo del funzionamento abbiamo utilizzato la comunicazione
seriale con il PC(figura 6) .Il software
del microcontrollore invia i dati del processo al PC che , con apposito
software in DELPHI, visualizza in tempo reale lo stato del processo . Se il
programma viene eseguito con la visualizzazione diretta sul monitor occorre
porre Set Debug ON ed oscurare la chiamata
alla routine seriale (ponendo un apice: ‘seriale)
Const Device = CB280
Dim a As Byte
Dim b As Byte
Dim d As Integer
Dim start As Integer
Dim st As String
Dim i As Integer
Dim r As Single
Set Debug Off
Out 46,0
start=0
Debug clr
st="programma
erogatore "
scrivist 1,st
Low 5
Do
b=In(33)
a=In(32)
d=Adin(0)
If b=1 Then st="pulsante
start =ON "
If b=0 Then st="pulsante
start =OFF"
scrivist 2,st
If a=1 Then st="peso =ON "
If a=0 Then st="peso =OFF"
scrivist 3,st
st="fotocellula="
scrivi 4,st,d,0
If b=1 Then start=1
If a=1 Then start=0
If d>50 Then start=0
If d>50 Then st="bicchiere
non presente"
If d<50 Then st="bicchiere presente"
scrivist 5,st
If start=1 Then Out 46,1
If start=0 Then Out 46,0
If start=1 Then st="pompa ON "
If start=0 Then st="pompa OFF"
scrivist 6,st
seriale
Loop
Sub scrivist(riga As
Integer,s As String)
Debug Goxy,1,riga
Debug s
End Sub
'provaseriale
Sub seriale()
Bclr 0,1
Opencom 0,9600,18,9,30
Bclr 1,2
For i=1 To 5
If i=1 Then r=b
If i=2 Then r=a
If i=3 Then r=d
If i=4 Then r=liv
If i=5 Then r=start
st=Fp(r,5,0)
Putstr 0,st
Next
Delay 300
End Sub

La stessa applicazione,mantenendo
inalterato l’hardware, può essere
implementata in LADDER(figura 7)

Figura 7:il LADDER