Witam,
Napisałem program w bascomAVR i niestety nie chce działać tak jak powinien. Zapis na pamięci mikrokontrolera przebiega pomyślnie a mimo to układ zachowuje sie tak jakby programu wcale nie było. Poniżej zamieszczam plik .bas z programem, proszę kogoś kto się orientuje (ja jakoś nie mogę przerzucić się na cyfrówkę...) o rzucenie okiem na program, i przejrzenie czy ni ma w nim jakichś błędów.
Za wszelakie przejawy pomocy bardzo dziękuję.
Pozdrawiam, Pepi.
Kod programu:
inventco.eu - program umieszczamy z znacznikach CODE, proszę stosować się do regulaminu forum i tego działu. Tytuł tym razem poprawiłem.
Napisałem program w bascomAVR i niestety nie chce działać tak jak powinien. Zapis na pamięci mikrokontrolera przebiega pomyślnie a mimo to układ zachowuje sie tak jakby programu wcale nie było. Poniżej zamieszczam plik .bas z programem, proszę kogoś kto się orientuje (ja jakoś nie mogę przerzucić się na cyfrówkę...) o rzucenie okiem na program, i przejrzenie czy ni ma w nim jakichś błędów.
Za wszelakie przejawy pomocy bardzo dziękuję.
Pozdrawiam, Pepi.
Kod programu:
$regfile = "m8def.dat" 'Typ miktokontrolera
$crystal = 8000000 'taktowanie
'$noramclear
Config Portd = Output
Portd = &B00000000
Config Portb = Output
Portb = &B00000000
Config Portc = Input
Portc = &B0000000
Tow Alias Portc.4
Q4 Alias Portc.0
Q3 Alias Portc.1
Q2 Alias Portc.2
Q1 Alias Portc.3
Do
If Tow = 1 And Q4 = 0 And Q3 = 0 And Q2 = 0 And Q1 = 1 Then
Gosub Przelacz1
Elseif Tow = 1 And Q4 = 0 And Q3 = 0 And Q2 = 1 And Q1 = 0 Then
Gosub Przelacz2
Elseif Tow = 1 And Q4 = 0 And Q3 = 0 And Q2 = 1 And Q1 = 1 Then
Gosub Przelacz3
Elseif Tow = 1 And Q4 = 0 And Q3 = 1 And Q2 = 0 And Q1 = 0 Then
Gosub Przelacz4
Elseif Tow = 1 And Q4 = 0 And Q3 = 1 And Q2 = 0 And Q1 = 1 Then
Gosub Przelacz5
Elseif Tow = 1 And Q4 = 0 And Q3 = 1 And Q2 = 1 And Q1 = 0 Then
Gosub Przelacz6
Elseif Tow = 1 And Q4 = 1 And Q3 = 0 And Q2 = 1 And Q1 = 0 Then
Gosub Shutdown
End If
Loopinventco.eu - program umieszczamy z znacznikach CODE, proszę stosować się do regulaminu forum i tego działu. Tytuł tym razem poprawiłem.