Grazie MSchiepp, era proprio quello il problema, la variabile va definita come word.
A chi può essere utile, ecco lo stesso programmino funzionante con quarzo da 8mhz
@ DEVICE XT_OSC ' sets programmer to external oscillator - low power, HS would be for faster xtals.
DEFINE OSC 8 ' for 8 mhz osc
TRISA=%11111111
TRISB=%00000000
ingresso var porta.0
uscita var portb.0
segnale var word
segnale = 200
inizio:
if ingresso = 1 then
segnale = segnale + 1
else
segnale = segnale - 1
endif
if segnale > 400 then segnale = 400
if segnale < 200 then segnale = 200
pulsout uscita,segnale
pause 18
goto inizio
end
Grazie ancora
|