MikroElektronika PIC Microcontrollers PIC16 Datový list Strana 179

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 194
  • Tabulka s obsahem
  • ŘEŠENÍ PROBLÉMŮ
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 178
Programming PIC Microcontrollers in BASIC - mikroElektronika
while true
GLCD_Clear_Screen
' Draw Circles
GLCD_Clear_Screen
text = "Circle"
GLCD_Put_Text(0, 7, text, NONINVERTED_TEXT)
GLCD_Circle(63,31,10)
Delay_Ms(4000)
' Draw Rectangles
GLCD_Clear_Screen
text = "Rectangle"
GLCD_Put_Text(0, 7, text, NONINVERTED_TEXT)
GLCD_Rectangle(10, 0, 30, 35)
Delay_Ms(4000)
GLCD_Clear_Screen
' Draw Lines
GLCD_Clear_Screen
text = "Line"
GLCD_Put_Text(55, 7, text, NONINVERTED_TEXT)
GLCD_Line(0, 0, 127, 50)
GLCD_Line(0,63, 50, 0)
Delay_Ms(5000)
' Fonts Demo
GLCD_Clear_Screen
text = "Fonts DEMO"
GLCD_Set_Font(FONT_TINY)
GLCD_Put_Text(0, 4, text, NONINVERTED_TEXT)
GLCD_Put_Text(0, 5, text, INVERTED_TEXT)
GLCD_Set_Font(FONT_BIG)
GLCD_Put_Text(0, 6, text, NONINVERTED_TEXT)
GLCD_Put_Text(0, 7, text, INVERTED_TEXT)
Delay_ms(5000)
wend
end.
http://www.mikroelektronika.co.yu/english/product/books/picbasicbook/07.htm (13 sur 16)05/11/2004 02:27:46
Zobrazit stránku 178
1 2 ... 174 175 176 177 178 179 180 181 182 183 184 ... 193 194

Komentáře k této Příručce

Žádné komentáře