pomagajte mi, kako uporabiti grafični LCD z pic 16f877

A

ali NMR

Guest
Jaz sem poskušal nabaviti LCD in grafični vmesnik z pic16F877A.Moči neki nedoločni zaimek prosim vodič mi kako conect z pic in napišite program za to "osnovno ali sestavljanje" (kako je programsko) z osnovno (visoki ravni language)
svoj email "alinmr2222 (at) yahoo.com"

 
kaj GLCD krmilnik u uporabljate?KS0107 / 8 ali T6963C?
Tukaj je vzorec program iz mikroelektronika v BASIC pro uporabo KS0107 / 8 krmilnik Grafični LCD

Code:

program Glcd_Test"Glcd modul povezave

dim GLCD_DataPort kot byte na PORTDdim GLCD_CS1 kot sbit na RB0_bit

GLCD_CS2 kot sbit na RB1_bit

GLCD_RS kot sbit na RB2_bit

GLCD_RW kot sbit na RB3_bit

GLCD_EN kot sbit na RB4_bit

GLCD_RST kot sbit na RB5_bitdim GLCD_CS1_Direction kot sbit na TRISB0_bit

GLCD_CS2_Direction kot sbit na TRISB1_bit

GLCD_RS_Direction kot sbit na TRISB2_bit

GLCD_RW_Direction kot sbit na TRISB3_bit

GLCD_EN_Direction kot sbit na TRISB4_bit

GLCD_RST_Direction kot sbit na TRISB5_bit

"Konec Glcd modul povezavedim counter kot byte

someText kot char [18]Delay2S sub postopek () "2 sekund zamude sub funkcijo

Delay_ms (2000)

end subGlavni:

'Ansel = 0' Konfiguriraj nožice so digitalna I / O

'ANSELH = 0Glcd_Init () 'Initialize Glcd

Glcd_Fill (0x00) "Clear Glcdmedtem ko TRUE

Glcd_Image (@ truck_bmp) "Draw image

Delay2S () delay2S ()Glcd_Fill (0x00) "Clear GlcdGlcd_Box (62,40,124,63,1) "Draw box

Glcd_Fill (0x00) "Clear Glcd

Glcd_Rectangle (5,5,84,35,1) "Risanje pravokotnika

Glcd_Fill (0x00) "Clear Glcd

Glcd_Line (0, 0, 127, 63, 1) "Draw line

Delay2S ()

counter = 5while (counter <= 59) "Draw vodoravne in navpične črte

Delay_ms (250)

Glcd_V_Line (2, 54, števec, 1)

Glcd_H_Line (2, 120, števec, 1)

Counter = counter 5

NanašatiDelay2S ()Glcd_Fill (0x00) "Clear GlcdGlcd_Set_Font (@ Character8x7, 8, 7, 32) "Izberi pisavo" Character8x7 "

Glcd_Write_Text ( "mikroE", 1, 7, 2) "Write stringza nasprotno = 1 do 10 "Draw krogi

Glcd_Circle (63,32, 3 * števec, 1)

Naslednja counter

Delay2S ()Glcd_Box (10,20, 70,63, 2) "Draw box

Delay2S ()Glcd_Fill (0xFF) "Fill Glcd

Glcd_Set_Font (@ Character8x7, 8, 7, 32) "Change font

someText = "8x7 Pisava"

Glcd_Write_Text (someText, 5, 0, 2) "Write string

delay2S ()Glcd_Set_Font (@ System3x5, 3, 5, 32) "Change font

someText = "3x5 ČRKAMI SAMO"

Glcd_Write_Text (someText, 60, 2, 2) "Write string

delay2S ()Glcd_Set_Font (@ font5x7, 5, 7, 32) "Change font

someText = "5x7 Pisava"

Glcd_Write_Text (someText, 5, 4, 2) "Write string

delay2S ()Glcd_Set_Font (@ FontSystem5x7_v2, 5, 7, 32) "Change font

someText = "5x7 Font (v2)"

Glcd_Write_Text (someText, 5, 6, 2) "Write string

delay2S ()

Nanašati

konec.
 

Welcome to EDABoard.com

Sponsor

Back
Top