roboforum.ru

Технический форум по робототехнике.

Подключение АТ-клавиатуры к AVR - нужна помощь

Программирование микроконтроллеров AVR, PIC, ARM.
Разработка и изготовление печатных плат для модулей.

Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение VIRUS_V8 » 07 июл 2009, 22:43

Добрый вечер.
Решил попробовать подключить АТ-клавиатуру от ПК к МК. Программа на баскоме - взята из примеров. После компиляции - 1 ошибка не найдена библиотека AT_EMULATOR.LBX
code.jpg

Попробовал поискать в гугле - конкретной ссылки (чтобы скачать) я так и не нашол.
Подскажите кто сталкивался с такой проблемкой кде можно скачать библиотеку. Или может у меня не полная версия по этому она отсутствует? Версия баскома 1.11.9.0
вот код программы
Код: Выделить всёРазвернуть
$regfile = "2313def.dat"                                    ' specify the used micro
$crystal = 4000000                                          ' used crystal frequency
$baud = 19200                                               ' use baud rate
$hwstack = 32                                               ' default use 32 for the hardware stack
$swstack = 10                                               ' default use 10 for the SW stack
$framesize = 40                                             ' default use 40 for the frame space


$lib "mcsbyteint.lbx"                                       ' use optional lib since we use only bytes


'configure PS2 AT pins
Enable Interrupts                                           ' you need to turn on interrupts yourself since an INT is used

Config Atemu = Int1 , Data = Pind.3 , Clock = Pinb.0
'                 ^------------------------ used interrupt
'                              ^----------- pin connected to DATA
'                                       ^-- pin connected to clock

'Note that the DATA must be connected to the used interrupt pin
Waitms 500                                                  ' optional delay


'rcall _AT_KBD_INIT
Print "Press t for test, and set focus to the editor window"
Dim Key2 As Byte , Key As Byte
Do
   Key2 = Waitkey()                                         ' get key from terminal
   Select Case Key2
     Case "t" :
     Waitms 1500
     Sendscankbd Mark                                       ' send a scan code
     Case Else
   End Select
Loop

Print Hex(key)


Mark:                                                       ' send mark
Data 12 , &H3A , &HF0 , &H3A , &H1C , &HF0 , &H1C , &H2D , &HF0 , &H2D , &H42 , &HF0 , &H42
'    ^ send 12 bytes
'           m                    a                   r                    k
VIRUS_V8
 
Сообщения: 170
Зарегистрирован: 06 май 2008, 18:33
Откуда: г. Щигры, Курская обл.
прог. языки: Delphi, BASCOM-AVR(basic)
ФИО: Павел

Re: Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение avr123.nm.ru » 07 июл 2009, 22:51

Попробовал поискать в гугле


Спроси у EdGull !

В Апноутах AVR есть пример подключения клавиатуры - линк на апноуты для AVR у меня есть на страничке 7 курса по AVR в самом низу.
Аватара пользователя
avr123.nm.ru
отсылающий читать курс
 
Сообщения: 14195
Зарегистрирован: 06 ноя 2005, 04:18
Откуда: Москва
Предупреждения: -8

Re: Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение MiBBiM » 07 июл 2009, 22:55

да вот же она :D 15 евро
Tomorrow will be. Better
Аватара пользователя
MiBBiM
 
Сообщения: 1866
Зарегистрирован: 29 окт 2007, 18:11
Откуда: Пермь
прог. языки: Brainfuck/Basic/Delphi/C++/Lisp/x86asm/JavaScript

Re: Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение VIRUS_V8 » 07 июл 2009, 23:28

avr123.nm.ru - большое спасибо!
сейчас посмотрю

Добавлено спустя 27 минут 53 секунды:
avr123.nm.ru - нашол апноут AVR313 вот ток там на си пример (с си как то не очень дружу, хотелось бы все таки на баскоме), ну всеже большое спасибо за помощь.

EdGull подскажите пожалуйста - вы не пробовали подключать АТ-клавиатуру от ПК к AVR? Если да то не моглибы сказать где можно скачать библиотеку?
VIRUS_V8
 
Сообщения: 170
Зарегистрирован: 06 май 2008, 18:33
Откуда: г. Щигры, Курская обл.
прог. языки: Delphi, BASCOM-AVR(basic)
ФИО: Павел

Re: Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение avr123.nm.ru » 07 июл 2009, 23:42

Дак и накалякай на Баскоме. В апноуте просто принцип и алгоритм выложен.
Аватара пользователя
avr123.nm.ru
отсылающий читать курс
 
Сообщения: 14195
Зарегистрирован: 06 ноя 2005, 04:18
Откуда: Москва
Предупреждения: -8

Re: Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение MiBBiM » 07 июл 2009, 23:46

кто :Search: тот всегда найдет, библиотечки в свободном доступе нет, но выход есть :wink:
я как раз вспомнил, что IDE microPascal, microBasic, microC имеют в своем составе библиотеку PS/2, так что тебе осталось только добыть варез этих сред. по крайней мере где-то в этой теме упоминание о micropascal было.
Вложения
08.07.png
Tomorrow will be. Better
Аватара пользователя
MiBBiM
 
Сообщения: 1866
Зарегистрирован: 29 окт 2007, 18:11
Откуда: Пермь
прог. языки: Brainfuck/Basic/Delphi/C++/Lisp/x86asm/JavaScript

Re: Подключение АТ-клавиатуры к AVR - нужна помощь

Сообщение avr123.nm.ru » 08 июл 2009, 00:06

Дак это и в демо есть наверняка и объем не большой. МикроЭ классно развиваются !
Аватара пользователя
avr123.nm.ru
отсылающий читать курс
 
Сообщения: 14195
Зарегистрирован: 06 ноя 2005, 04:18
Откуда: Москва
Предупреждения: -8


Вернуться в Микроконтроллеры

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 0

cron