программа микроконтроллера AtTiny2313

cheeks · 04.12.2012

A = PORT (кнопка 1)
B = PORT (кнопка 2)

IF A = 1 and B = 1 THEN Portb = &B00000000

так наверное?

tifo · 04.12.2012

у данному випадку я б зробив два переривання - натиск та відпуск кнопки, а у головному циклі б крутив движок між ними

пс - що це за чудо-мова? інтуітивно якось зрозуміло, але я хз як там компілятор з нуля розбирається

NetX · 04.12.2012

cheeks сказав(ла):
A = PORT (кнопка 1)
B = PORT (кнопка 2)

IF A = 1 and B = 1 THEN Portb = &B00000000

так наверное?

дописал в шапку
Config Portd.2 = Input
Config Portd.3 = Input
Shag1 Alias Portd.2
Shag2 Alias Portd.3

потом в тело
If Shag1 = 1 And Shag2 = 1 Then
Portb = &B00000000
End If

ни каких изменений...

roker · 04.12.2012

Чикс, компилятор сам перестроит порт на вход, потому что кнопки висят на аппаратных интах и вся программа в обработчиках прерывания.

Ладно, сделаем через жопу:
If Knopka1=1 then
If Knopka2=1 then Portb=0 EndIf
EndIf

Но в таком случае таки придется перестроит порт на вход.

NetX · 04.12.2012

roker сказав(ла):
Чикс, компилятор сам перестроит порт на вход, потому что кнопки висят на аппаратных интах и вся программа в обработчиках прерывания.

Ладно, сделаем через жопу:
If Knopka1=1 then
If Knopka2=1 then Portb=0 EndIf
EndIf

Но в таком случае таки придется перестроит порт на вход.

invalid datatype....

roker · 04.12.2012

NetX сказав(ла):
invalid datatype....

наверное на
Portb=0
ругается

NetX · 04.12.2012

roker сказав(ла):
наверное на
Portb=0
ругается

нет на это
If Knopka1 = 1 And Knopka2 = 1 Then

roker · 04.12.2012

У меня там And не было

NetX · 04.12.2012

roker сказав(ла):
У меня там And не было

тупо копипаст
If Knopka1=1 then
If Knopka2=1 then Portb=0 EndIf
EndIf

вот на это ругается

Knopka1=1

invalid datatype....

roker · 04.12.2012

Ааааа, гоню. Knopka1 это метка для перехода на обработчик прерывания. Надо как то обозвать их.
Если в шапке

NetX сказав(ла):
дописал в шапку
Config Portd.2 = Input
Config Portd.3 = Input
Shag1 Alias Portd.2
Shag2 Alias Portd.3

Тогда
If Shag1=1 then
If Shag2=1 then Portb = &B00000000 EndIf
EndIf

NetX · 04.12.2012

roker сказав(ла):
Ааааа, гоню. Knopka1 это метка для перехода на обработчик прерывания. Надо как то обозвать их.
Если в шапке

Тогда
If Shag1=1 then
If Shag2=1 then Portb = &B00000000 EndIf
EndIf

да в том то и соль что с дописыванием этого кода ничего не меняется вообще по сравнению с исходным кодом...
как работало так и работает.....

блин придется использовать тупо с дописыванием
после Led = 0
Portb = &B00000000

Или может есть кто доделает исходный код - за небольшое вознаграждение))))

roker · 04.12.2012

Может быть вместо
Shag1 Alias Portd.2
Shag2 Alias Portd.3

должно быть
Shag1 Alias Pind.2
Shag2 Alias Pind.3

Физически в МК три регистра DDR для настройки направления работы порта, PORT для выдачи сигналов на выход и PIN для приема сигнала извне.

NetX · 04.12.2012

roker сказав(ла):
Может быть вместо
Shag1 Alias Portd.2
Shag2 Alias Portd.3

должно быть
Shag1 Alias Pind.2
Shag2 Alias Pind.3

Физически в МК три регистра DDR для настройки направления работы порта, PORT для выдачи сигналов на выход и PIN для приема сигнала извне.

Елы палы!!!!! точно!!!!

дописал в шапку
Config Pind.2 = Input
Config Pind.3 = Input
Shag1 Alias Pind.2
Shag2 Alias Pind.3

потом в тело
Do

If Shag1 = 1 And Shag2 = 1 Then
Portb = &B00000000
End If
Loop

Все окейно вроде))

roker · 04.12.2012

Ну и заипца

Гість 3253 · 04.12.2012

NetX сказав(ла):
Делал так, в таком варианте двигатель начинает заметно шуметь, т.к. у меня стоит Waitus 200, т.е. оболроты больше чем как в приведенном коде, что не хотелось бы....

Синтаксис понял(в php пишу частенько),
но не совсем вкурю как его превратить в удобоваримый код BASCOM-AVR
синтаксис AVR пока не весь понял - это первый микроконтроллер у меня)))

Почему именно баском?
С есть для AVR и неплохо работает. Хотя я бы выбрал ассемблер