Подключаем цветной графический 131x175 ЖКИ от Siemens S65 к МиниБоту — различия между версиями

Материал из roboforum.ru Wiki
Перейти к: навигация, поиск
м (ссылка на инет магазин)
 
(не показаны 4 промежуточные версии 3 участников)
Строка 1: Строка 1:
1. Выкладываю с позволения очень хорошего и правильного человека под ником '''Karavan''' бибилиотеку с примерами для цветного графического 131x175 ЖКИ '''LCD LS020''' от '''Siemens S65''' который можно приобрести вместе с МиниБотом в http://minibot.webasyst.net/shop/.<br />
+
[[Категория:МиниБот]]
 +
[[Изображение:appn1.jpg|thumb]]
 +
1. Выкладываю с позволения очень хорошего и правильного человека под ником '''Karavan''' библиотеку с примерами для цветного графического 131x175 ЖКИ '''LCD LS020''' от '''Siemens S65''' который можно приобрести вместе с МиниБотом в http://www.MiniBot.ru.<br />
 
Использует '''стандартные''' команды Bascom AVR Basic. <br />
 
Использует '''стандартные''' команды Bascom AVR Basic. <br />
 
Выводит:<br />
 
Выводит:<br />
Строка 11: Строка 13:
 
[[Медиа:Test_Lcd-siemens_s65_ls020.rar]]<br />
 
[[Медиа:Test_Lcd-siemens_s65_ls020.rar]]<br />
 
[[Изображение:Pins LCD.JPG|thumb]]
 
[[Изображение:Pins LCD.JPG|thumb]]
2. Распиновка цветного графического 131x175 ЖКИ '''LCD LS020''' от '''Siemens S65'''<br />
+
'''2. Распиновка цветного графического 131x175 ЖКИ '''LCD LS020''' от '''Siemens S65''''''<br />
 
--- на выводы 2.9В и 1.8В подаем бортовое пинтание МиниБота, а именно 3.3В <br />
 
--- на выводы 2.9В и 1.8В подаем бортовое пинтание МиниБота, а именно 3.3В <br />
 
--- выводы подсветки отсавляем не подкюченными<br />
 
--- выводы подсветки отсавляем не подкюченными<br />
Строка 19: Строка 21:
 
|-
 
|-
 
! Пин ЖКИ
 
! Пин ЖКИ
! Порт Меги32
 
 
! Пин разъема МиниБота
 
! Пин разъема МиниБота
 
|-
 
|-
 
| RS
 
| RS
| PortB.4
 
 
| 4
 
| 4
 
|-
 
|-
 
| Reset
 
| Reset
| PortB.5
 
 
| 5
 
| 5
 
|-
 
|-
 
| CS
 
| CS
| PortB.6
 
 
| 6
 
| 6
 
|-
 
|-
 
| CLK
 
| CLK
| PortB.7
 
 
| 8
 
| 8
 
|-
 
|-
 
| DAT
 
| DAT
| PortB.5
 
 
| 9
 
| 9
 
|-
 
|-
 
| 2.9V & 1.8V
 
| 2.9V & 1.8V
| 3.3V
 
 
| 2
 
| 2
 
|-
 
|-
| GND
 
 
| GND
 
| GND
 
| 1
 
| 1
 
|}
 
|}
[[Изображение:appn1.jpg|thumb]]
+
[[Изображение:3.1-3.2.jpg|thumb]]
3. Теперь нужно внести 3 изменения в схему МиниБота<br />
+
[[Изображение:3.3.jpg|thumb]]
 +
'''3. Теперь нужно внести 3 изменения в схему МиниБота'''<br />
 
--- 3.1 выпаять два резистора<br />
 
--- 3.1 выпаять два резистора<br />
 
--- 3.2 впаять первую перемычку<br />
 
--- 3.2 впаять первую перемычку<br />
 
--- 3.3 впаять вторую перемычку<br />
 
--- 3.3 впаять вторую перемычку<br />
 +
'''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]]

Текущая версия на 09:10, 6 января 2009

Appn1.jpg

1. Выкладываю с позволения очень хорошего и правильного человека под ником Karavan библиотеку с примерами для цветного графического 131x175 ЖКИ LCD LS020 от Siemens S65 который можно приобрести вместе с МиниБотом в http://www.MiniBot.ru.
Использует стандартные команды Bascom AVR Basic.
Выводит:
точки
линии
окружности
текст в т.ч. и русский
картинки
прямоугольники (заполненные произвольным цветом).
стирает командой CLS чёрным цветом. Минус: цвет 8-битный.
Медиа:Test_Lcd-siemens_s65_ls020.rar

Pins LCD.JPG

'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.1-3.2.jpg
3.3.jpg

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