سلام
مبحث بعدی تعریف دو تا کلید برای روشن و خاموش کردن ال ای دی
مبحث بعدی تعریف دو تا کلید برای روشن و خاموش کردن ال ای دی
TRISA=%01001
TRISB=0
BUTONon VAR BYTE 'PORTA.0
BUTONoff VAR BYTE 'PORTA.3
PORTB=0
BUTONon=0
BUTONoff=0
BUTTONloop :
BUTTON PORTA.0,0,254,0,BUTONon,1,LEDYAK
BUTTON PORTA.3,0,254,0,BUTONoff,1,LEDdo
GOTO BUTTONloop
LEDYAK:
HIGH PORTB.0
GOTO BUTTONloop
LEDdo:
LOW PORTB.0
GOTO BUTTONloop
END
TRISB=0
BUTONon VAR BYTE 'PORTA.0
BUTONoff VAR BYTE 'PORTA.3
PORTB=0
BUTONon=0
BUTONoff=0
BUTTONloop :
BUTTON PORTA.0,0,254,0,BUTONon,1,LEDYAK
BUTTON PORTA.3,0,254,0,BUTONoff,1,LEDdo
GOTO BUTTONloop
LEDYAK:
HIGH PORTB.0
GOTO BUTTONloop
LEDdo:
LOW PORTB.0
GOTO BUTTONloop
END
[hide]
:busted_red:
[/hide]