BASCOM AVR в вопросах и ответах

[amv2000]

Raf65 Вы статью по 4 версии еще не подготовили?

[raf65]

Raf65 Вы статью по 4 версии еще не подготовили?

она написана, тока что то не появляется

[amv2000]

Ничего не остается кроме как ждать, спасибо!

[vanyap1]

Подскажите пожалуйста, каким образом можно ввести в с клавиатуры цифры. Как в телефоне например? Клавиатура матричная 4Х4

С кодами которые Вы мне дали я разобрался раньше, и они работают. Но меня интересует - как сделать ввод как на калькуляторе - нажал "1" - переменная равна - 1, нажал еще раз - переменная равна - 11, нажал еще и 2, то переменная равна уже - 112 и т.д.

[raf65]

Но меня интересует - как сделать ввод как на калькуляторе - нажал "1" - переменная равна - 1, нажал еще раз - переменная равна - 11, нажал еще и 2, то переменная равна уже - 112 и т.д.

посмотрите здесь:

http://forum.avr.ru/bascom-avr-kak-beat ... 796p2.html

[amv2000]

С кодами которые Вы мне дали я разобрался раньше, и они работают.

Давал же ссылку выше постами которую Raf65 привел, а Вы поленились не прочитали...

[vanyap1]

Ок, рас уж лень... По поводу ссылки - я собственно так и сделал. Но, оно не то что мне надо. Переменная равна цифре нажатой кнопки - пока кнопка нажата, если кнопку отпустили то переменная равна - ~.
Я себе это представляю так - (может и глупость, но...) Нажал кнопку "1" - переменная стала ровная - 1 и заодно увеличить значение счетчика на 1. Нажал - 2 - проверяю счетчик, если он равен 1, то переменную умножаю на 10 и прилагаю 2 и снова увеличиваю на 1 значение счетчика. Нажал кнопку - 3 - снова проверяю счетчик, если он равен 2 то снова умножаю на 10 и прилагаю - 3.

Таким образом должно получится после последовательного нажатия кнопок "1", "2", "3" - что переменная равна - 123.

[raf65]

все гораздо проще, переменная типа стринг, и к ней прибавляется стринговая переменная нажатой кнопки включая запятую, потом из стринга преобразуется число и все

[amv2000]

Я себе это представляю так - (может и глупость, но...) Нажал кнопку "1" - переменная стала ровная - 1 и заодно увеличить значение счетчика на 1. Нажал - 2 - проверяю счетчик, если он равен 1, то переменную умножаю на 10 и прилагаю 2 и снова увеличиваю на 1 значение счетчика. Нажал кнопку - 3 - снова проверяю счетчик, если он равен 2 то снова умножаю на 10 и прилагаю - 3.

Я тоже так мыслил, когда сделал ввод цифр до 10, а дальше был тупик.... Затем благодаря исходнику от Raf65 долго сидел вкуривал в алгоритм.

[Gordon Shumway]

Доброго времени суток, уважаемые знатоки !

Прошу меня поправить или подтвердить:

Заводим переменные:

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

Dim A as byte
Dim Z as eram byte

и это означает, что переменная Z хранится в энергонезависимой памяти,
и когда мы делаем

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

Z = A

то мы сохраняем то, что было в А, в энергонезависимой памяти ?

И постоянное чтение

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

A = Z

не влияет на ресурс энергонезависимой памяти ?

И вопрос в ту же тему:

Нужно хранить 0 или 1 в энергонезависимой памяти.
Но

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

Dim A as bit
Dim Z as eram bit

вызывает ошибку во второй строке.

[max50]

Васик не разрешает хранить бит в еепром.
Я делал так:

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

Dim A as bit
Dim Z as eram byte

Байт же может принимать значение 0 или 1.

[Gordon Shumway]

Васик не разрешает хранить бит в еепром.
Я делал так:

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

Dim A as bit
Dim Z as eram byte

Байт же может принимать значение 0 или 1.

Я так и сделал, просто с Bit проще - Toggle - и все дела.

[max50]

Я так и сделал, просто с Bit проще - Toggle - и все дела.

А кто мешает сделать так?

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

Toggle A
Z = A

[selco]

А нихто эщё для LS020 болщой шрифт не выдумал?... А как-бы хотелось!

[vanyap1]

Я тоже так мыслил, когда сделал ввод цифр до 10, а дальше был тупик.... Затем благодаря исходнику от Raf65 долго сидел вкуривал в алгоритм.

А можно поподробнее и исходник?

[amv2000]

А можно поподробнее и исходник?

Ну уже два раза ссылку давали выше, ну зайдите почитайте не поленитесь я думаю много вопросов отпадет.

[amv2000]

А нихто эщё для LS020 болщой шрифт не выдумал?... А как-бы хотелось!

Почему не выдумал, есть хотя бы здесь http://forum.easyelectronics.ru/viewtop ... 2002b106cc

[vanyap1]

Подскажите пожалуйста, каким образом можно ввести в с клавиатуры цифры. Как в телефоне например? Клавиатура матричная 4Х4

Ввести куда? Если надо пример реализации то вот http://www.qsl.net/pa3ckr/bascom%20and% ... index.html
Есть еще встроенная функция GETKBD(), но я ей не пользовался есть пример в хелпе Bascoma.

Опрашивать клавиатуру я умею. Кажись уже писал это.

Меня интересует конкретно - сложение нескольких последовательных результатов опроса нажатых кнопок в число.

[selco]

А нихто эщё для LS020 болщой шрифт не выдумал?... А как-бы хотелось!

Почему не выдумал, есть хотя бы здесь http://forum.easyelectronics.ru/viewtop ... 2002b106cc

Дык этож не на Васике

[scrappy]

Может мой вопрос уже обсуждался или это известный факт, но

Это программа чисто из разряда попробывать\набить руку. Никакого функционала она не представляет из себя.

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

$regfile = "attiny2313.dat"
$Crystal=4000000
$hwstack=40
$swstack=16
$framesize=32

Dim X As Single
Dim Y As Integer 
X = 0
Y = 0
Cursor Off
Do
For X = 0 To 100 Step 0.05
Y = Y + 1
Locate 1 , 1
Lcd X
Locate 2 , 1
Lcd Y
Next X
Loop
End

По идее
первый шаг цикла
х=0
х=.05
х=.1
х=.15

и т.д.

На дисплее в протеусе получается

x=0.0
x=0.049999949
x=0.099999969
x=0.149999973
x=0.199999984


на 329 шаге вот такое вот число
x=16.449845121

хотя должно быть 16.45 ровно....

это я туплю, это протеус тупит, или тут есть какаято очевидная причина?