Подключаем цветной графический 131x175 ЖКИ от Siemens S65 к МиниБоту — различия между версиями
Кирилл (обсуждение | вклад) |
MiBBiM (обсуждение | вклад) м (ссылка на инет магазин) |
||
Строка 1: | Строка 1: | ||
[[Категория:МиниБот]] | [[Категория:МиниБот]] | ||
[[Изображение:appn1.jpg|thumb]] | [[Изображение:appn1.jpg|thumb]] | ||
− | 1. Выкладываю с позволения очень хорошего и правильного человека под ником '''Karavan''' библиотеку с примерами для цветного графического 131x175 ЖКИ '''LCD LS020''' от '''Siemens S65''' который можно приобрести вместе с МиниБотом в http:// | + | 1. Выкладываю с позволения очень хорошего и правильного человека под ником '''Karavan''' библиотеку с примерами для цветного графического 131x175 ЖКИ '''LCD LS020''' от '''Siemens S65''' который можно приобрести вместе с МиниБотом в http://www.MiniBot.ru.<br /> |
Использует '''стандартные''' команды Bascom AVR Basic. <br /> | Использует '''стандартные''' команды Bascom AVR Basic. <br /> | ||
Выводит:<br /> | Выводит:<br /> |
Текущая версия на 09:10, 6 января 2009
1. Выкладываю с позволения очень хорошего и правильного человека под ником Karavan библиотеку с примерами для цветного графического 131x175 ЖКИ LCD LS020 от Siemens S65 который можно приобрести вместе с МиниБотом в http://www.MiniBot.ru.
Использует стандартные команды Bascom AVR Basic.
Выводит:
точки
линии
окружности
текст в т.ч. и русский
картинки
прямоугольники (заполненные произвольным цветом).
стирает командой CLS чёрным цветом. Минус: цвет 8-битный.
Медиа:Test_Lcd-siemens_s65_ls020.rar
'2. Распиновка цветного графического 131x175 ЖКИ LCD LS020 от Siemens S65'
--- на выводы 2.9В и 1.8В подаем бортовое пинтание МиниБота, а именно 3.3В
--- выводы подсветки отсавляем не подкюченными
--- остальные выводы подключаем согласно конфигурации в васике, а именно следующим порядком:
Пин ЖКИ | Пин разъема МиниБота |
---|---|
RS | 4 |
Reset | 5 |
CS | 6 |
CLK | 8 |
DAT | 9 |
2.9V & 1.8V | 2 |
GND | 1 |
3. Теперь нужно внести 3 изменения в схему МиниБота
--- 3.1 выпаять два резистора
--- 3.2 впаять первую перемычку
--- 3.3 впаять вторую перемычку
4. Собственно весь код
<source lang="vb">
$hwstack = 128
$swstack = 128
$framesize = 128
$regfile = "m32def.Dat" $crystal = 8000000 $baud = 1200
$include "LCD_Siemens_S65.cfg"
Config Adc = Single , Prescaler = Auto , Reference = Internal Dim W As Word , J As Single
Cls Box(0 , 0) ,(176 , 131) , White
Do
Lcdat 1 , 0 , "MiniBot спецом" , Blue , White Lcdat 8 , 0 , "для Roboforum.ru" , Blue , White
Start Adc : W = Getadc(7) : Stop Adc : J = W / 400 : J = J * 2
Lcdat 16 , 0 , "Akb=" ; J , 0 , 255 Lcdat 24 , 0 , "4" , Blue , White Lcdat 32 , 0 , "5" , Blue , White Lcdat 40 , 0 , "6" , Blue , White Lcdat 48 , 0 , "7" , Blue , White Lcdat 56 , 0 , "8" , Blue , White Lcdat 64 , 0 , "9" , Blue , White Lcdat 72 , 0 , "10" , Blue , White Lcdat 80 , 0 , "11" , Blue , White Lcdat 88 , 0 , "12" , Blue , White Lcdat 96 , 0 , "13" , Blue , White Lcdat 104 , 0 , "14" , Blue , White Lcdat 112 , 0 , "15" , Blue , White Lcdat 120 , 0 , "16" , Blue , White Lcdat 128 , 0 , "17" , Blue , White Lcdat 136 , 0 , "18" , Blue , White Lcdat 142 , 0 , "19" , Blue , White Lcdat 150 , 0 , "20" , Blue , White Lcdat 158 , 0 , "21" , Blue , White Lcdat 166 , 0 , "22" , Blue , White
Wait 1
Loop
</source>
5. архив с всеми необходимыми файлами и библиотеками Медиа:MINIBOT LCD-SIEMENS_S65_LS020.rar