197
end if
if (PORTB.1 = 1)and (correoaux = $FF) then
Eeprom_Write($DF,$00)
configuracioncorreo()
corteenergia()
end if
if (PORTB.1 = 0) and (correoaux = $00) then
Eeprom_Write($DF,$FF)
configuracioncorreo()
reestablecimientoenergia()
end if
next cc
next bb
next aa
wend
end. 'Fin del programa
Comments to this Manuals