Подключаем цветной графический 96х65 пикселей, 4096 цветов ЖКИ от Nokia 3510i к МиниБоту — различия между версиями

Материал из roboforum.ru Wiki
Перейти к: навигация, поиск
м (чуть исправил комментарии)
 
(не показана 1 промежуточная версия этого же участника)
Строка 1: Строка 1:
 
[[Категория:МиниБот]]
 
[[Категория:МиниБот]]
 
+
[[Изображение:3510i.jpg|thumb|100px|left]]
[[Медиа:S1D15G14.pdf]]
+
* Даташит - [[Медиа:S1D15G14.pdf]]
[[Изображение:3510i.jpg]]
+
* Описание подключения - http://sandiding.tripod.com/ni3510.html
http://sandiding.tripod.com/ni3510.html
+
<br clear="both" />
 
+
Формат цвета - RRRGGBB. В библиотеке есть небольшой баг - при использовании функции '''Pset''' координатная сетка сдвигается на один пиксель вниз-вправо, поэтому необходимо вычитание единицы из обоих её аргументов; остальные функции работают согласно документации.<br />
Формат цвета - RRRGGBB. В библиотеке есть небольшой баг - при использовании функции '''Pset''' координатная сетка сдвигается на один пиксель вниз-вправо, поэтому необходимо вычитание единицы из обоих её аргументов; остальные функции работают согласно документации. </br>
 
 
Приведенный пример программы печатает на дисплее всё, что принимает из уарта.
 
Приведенный пример программы печатает на дисплее всё, что принимает из уарта.
 
<source lang="vb">
 
<source lang="vb">
Строка 46: Строка 45:
 
Do
 
Do
 
   Input S, Noecho
 
   Input S, Noecho
   ' ставим пиксель-фонарик в место, куда будет записана строка - точку (1, Y_Pos)
+
   ' ставим пиксель-фонарик в место, куда будет записана строка - точку (0, Y_Pos)
 
   Pset -1, Y_pos-1, Red
 
   Pset -1, Y_pos-1, Red
 
   ' запись строки S в позицию (3, Y_Pos) экрана,
 
   ' запись строки S в позицию (3, Y_Pos) экрана,
Строка 65: Строка 64:
 
$include "Color_exoRus.font"  ' подключаем файл со шрифтом
 
$include "Color_exoRus.font"  ' подключаем файл со шрифтом
 
</source>
 
</source>
Необходимые файлы: </br>
+
Необходимые файлы: <br />
 
* Библиотека '''nokialcd.lbx''': [[Медиа:Color_exoRus.rar‎]]
 
* Библиотека '''nokialcd.lbx''': [[Медиа:Color_exoRus.rar‎]]
 
* Шрифт 8*8 '''Color_exoRus.font''': [[Медиа:Nokialcd.rar‎]]
 
* Шрифт 8*8 '''Color_exoRus.font''': [[Медиа:Nokialcd.rar‎]]
 
+
'''Этот ЖКИ можно приобрести в http://www.MiniBot.ru'''
 
 
Этот ЖКИ можно так же как и МиниБот приобрести в http://www.MiniBot.ru
 

Текущая версия на 20:45, 7 ноября 2009

3510i.jpg


Формат цвета - RRRGGBB. В библиотеке есть небольшой баг - при использовании функции Pset координатная сетка сдвигается на один пиксель вниз-вправо, поэтому необходимо вычитание единицы из обоих её аргументов; остальные функции работают согласно документации.
Приведенный пример программы печатает на дисплее всё, что принимает из уарта. <source lang="vb"> $regfile = "m32DEF.dat" $crystal = 7372800 $baud = 115200 $hwstack = 128 $swstack = 128 $framesize = 128 Config Serialin = Buffered , Size = 20

$lib "nokialcd.lbx" ' библиотека

' соответствие пинам меги Config Graphlcd = Color , Controlport = Portc , Rs = 4 , Cs = 5 , Scl = 7 , Sda = 6

Const Blue = &B00000011 ' константы цвета Const Yellow = &B11111100 Const Red = &B11100000 Const Green = &B00011100 Const Black = &B00000000 Const White = &B11111111 Const Brightgreen = &B00111110 Const Darkgreen = &B00010100 Const Darkred = &B10100000 Const Darkblue = &B00000010 Const Brightblue = &B00011111 Const Orange = &B11111000

Const Font_height = 8 ' высота шрифта и дисплея Const Display_height = 67 Setfont Color_exo ' устанавливаем шрифт

Cls ' очищаем дисплей Enable Interrupts

Dim S As String * 20 Dim Y_pos As Byte Y_pos = 0 Do

  Input S, Noecho
  ' ставим пиксель-фонарик в место, куда будет записана строка - точку (0, Y_Pos)
  Pset -1, Y_pos-1, Red
  ' запись строки S в позицию (3, Y_Pos) экрана,
  ' цвет шрифта - черный, цвет рамки - белый
  Lcdat Y_pos , 3 , S , Black , White    
  
  Y_pos = Y_pos + Font_height           ' делаем перенос строки
  Y_pos = Y_pos + Font_height
  If Y_pos > Display_height Then
     Y_pos = 0
     Cls
  Else
     Y_pos = Y_pos - Font_height
  End If

Loop

$include "Color_exoRus.font" ' подключаем файл со шрифтом </source> Необходимые файлы:

Этот ЖКИ можно приобрести в http://www.MiniBot.ru