Witam.Jestem początkujący.Mam problem jak wykonać skok do podprogramu przy użyciu 1 przycisku?
Program BASCOM
Dzięki:)
Program BASCOM
Dzięki:)
Czy wolisz polską wersję strony elektroda?
Nie, dziękuję Przekieruj mnie tam$regfile = "attiny2313.dat" 'najpierw określamy typ proca
$crystal = 1000000 'definiujemy z jakim taktowaniem będzie pracował
config portb=input 'port b jako wejścia
portb=&B00000000 'wszędzie stan spoczynkowy-0
config portd=output 'pprt d jako wyjścia
portd=&B0000000 'wszędzie stan spoczynkowy-0
do 'pętla nieskończona
if pinb.0=1 then 'jeżeli przycisk 1 wciśnięty
portd.0=1 'zapal diode
elseif pinb.1=1 then 'jeżeli przycisk 2 wciśnięty
portd.0=0 'zgaś diodę
endif 'koniec bloku warunkowego
loop 'koniec pętli
end 'koniec programu
config portb=input 'port b jako wejścia
portb=&B11111111
do 'pętla nieskończona
if pinb.0=0 then 'jeżeli przycisk 1 wciśnięty
portd.0=1
endif 'zapal diode
if pinb.1=0 then 'jeżeli przycisk 2 wciśnięty
portd.0=0 'zgaś diodę
endif 'koniec bloku warunkowego
loop 'koniec pętli