roboforum.ru

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

Попробовал поискать в гугле - конкретной ссылки (чтобы скачать) я так и не нашол.
Подскажите кто сталкивался с такой проблемкой кде можно скачать библиотеку. Или может у меня не полная версия по этому она отсутствует? Версия баскома 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

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

Спроси у EdGull !

В Апноутах AVR есть пример подключения клавиатуры - линк на апноуты для AVR у меня есть на страничке 7 курса по AVR в самом низу.

да вот же она 15 евро

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

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

EdGull подскажите пожалуйста - вы не пробовали подключать АТ-клавиатуру от ПК к AVR? Если да то не моглибы сказать где можно скачать библиотеку?

Дак и накалякай на Баскоме. В апноуте просто принцип и алгоритм выложен.

кто тот всегда найдет, библиотечки в свободном доступе нет, но выход есть
я как раз вспомнил, что IDE microPascal, microBasic, microC имеют в своем составе библиотеку PS/2, так что тебе осталось только добыть варез этих сред. по крайней мере где-то в этой теме упоминание о micropascal было.

Дак это и в демо есть наверняка и объем не большой. МикроЭ классно развиваются !