Znači imaš indikaciju tog prekidača sa brojem 63, čim nije 63 prekidač je otvoren....
Nešto ovako:
Code:
Dim NovoStanje as Integer, StaroStanje as Integer
Dim Broj as Integer ' promjenjiva u koju se smješta taj broj 63
Dim Suma as Integer' suma broja impulsa
NovoStanje=0:StaroStanje=0
Pocetak:
NovoStanje=Broj
If NovoStanje<>StaroStanje then
If NovoStanje=63 then Suma=Suma+1
EndIf
StaroStanje=NovoStanje
Goto Pocetak
Smjesti ovo u neku proceduru. Vrijednost promjenjive "Suma" ispituj da vidiš dokle je lift došao.....
Starac bez mora...