Форум РадиоКот

Moto_v3x писал(а):vanyap1
Может такой фокус прокатит
http://radiokot.ru/forum/viewtopic.php?p=105460#p105460

TRIOD писал(а):Подскажите как узнать значение отдельного бита в переменой типа Байт.

var.x

TRIOD писал(а):Подскажите как узнать значение одельного бита в переменой типа Байт.

Dim Temp As Byte , Result As Byte

Temp = &B10101010 ' загружаем число во временную переменную

Result = Temp.5 ' забираем в переменную Result 5-й бит переменной Temp (результат = 1)

danton писал(а):люди добрые! я впервые собираю схему с контроллером и понятия не имею как его программировать.

amv2000 писал(а):

danton писал(а):люди добрые! я впервые собираю схему с контроллером и понятия не имею как его программировать.

Для начала почитать http://radiokot.ru/start/mcu_fpga/avr/ дальше будут вопросы спрашивать.(В кратце собрать программатор, соеденить с МК, прошить прошивку)

vanyap1 писал(а):Подскажите пожалуйста как обработать длительное удержание кнопки?

Wej1:
If Key_3 = 0 Then
        Waitms 1 : If Key_3 = 1 Then Goto Wej1       ' Защита от помехи

Led = 1

       Temp2 = 0
        If Key_3 = 0 Then
             For Temp = 0 To 250
                 Incr Temp2 : If Temp2 > 214 Then Goto Dolgoe_uderzhanie       ' На долгое удержание
                 If Key_3 = 1 Then Exit For       ' Выходим из цикла подсчета времени удержания кнопки
                 Waitms 14
             Next
        End If


       For Temp = 0 To 99     ' Проверка на нажатие кнопки второй раз
           If Key_3 = 0 Then Goto Dvojnoe_nazhatie
           Waitms 2
      Next


    Goto odinochnoe_nazhatie         ' Одиночное нажатие
    

    Led = 0
 End If

    My_end:
     Waitms 100
      ...
Loop

kip96 писал(а):а можно ещё проще.

kip96 писал(а):а можно ещё проще

Код: Выделить всё

debounce kn,0,aa
.....
.....
.....
aa:
waitms 800
if aa=0 then .....' делаем действие или переходим
else' или другое действие.
end if 

После нажатия кнопки проверяем через время (в данном случае 800 мс) нажата кнопка или нет. И если нажата, то одно действие , если нет то к другое. К примеру в часах, при нажатии переходим к установки часов, при долгом нажатии к установки будильника, как-то так.

Igor_67 писал(а):Возвращаясь к своей эпопее про LCD 8x2, спешу сообщить, что я его таки победил. Правда пришлось использовать другой МК (помощнее), зато теперь все работает как надо!