RCALL COMMAND ;
LDI XH, 0B01000110 ;GRS LEVEL 3=X100-011b4-b3b2b1b00-XXXX
LDI XL, 0B10000000 ;b4--b0=01000
RCALL COMMAND ;
LDI XH, 0B01001000 ;GRS LEVEL 4=X100-100b4-b3b2b1b00-XXXX
LDI XL, 0B00000000 ;b4--b0=00000
RCALL COMMAND ;
LDI XH, 0B01001111 ;NORMAL
LDI XL, 0B11100000 ;
RCALL COMMAND ;
LDI XH, 0B01000000 ;LCD ON
LDI XL, 0B00110000 ;
RCALL COMMAND ;
RET
;**********************************
; WRITE A COMMAND TO LCD
; INPUT: X, COMMAND(2 BYTES)
; USED REGISTER: XL,XH,YL
;**********************************
COMMAND: CBI PORTA, CS
MOV YL, XH ;WRITE HIGHEST NIBBLE(b15b14b13b12)
ANDI YL, 0XF0 ;
ORI YL, 1<<RD ;
OUT PORTA, YL ;CS=0, RW=0,PA7--PA4=b15b14b13b12
RCALL WAIT ;
SBI PORTA, WR ;WR: 0-->1
RCALL WAIT ;
ANDI XH, 0X0F ;WRITE b11b10b9b8
SWAP XH ;
ORI XH, 1<<RD ;
OUT PORTA, XH ;WR=0, PA7--PA4=b11b10b9b8
RCALL WAIT ;
SBI PORTA, WR ;WR: 0-->1
RCALL WAIT ;
MOV YL, XL ;WRITE b7b6b5b4
ANDI YL, 0XF0 ;
ORI YL, 1<<RD ;
OUT PORTA, YL ;WR=0,PA7--PA4=b7b6b5b4
RCALL WAIT ;
SBI PORTA, WR ;WR: 0-->1
RCALL WAIT ;
ANDI XL, 0X0F ;WRITE b3b2b1b0
SWAP XL ;
ORI XL, 1<<RD ;
OUT PORTA, XL ;WR=0, PA7--PA4=b3b2b1b0
RCALL WAIT ;
SBI PORTA, WR ;WR: 0-->1
RCALL WAIT ;
LDI R24, 4 ;DELAY 0.25ms*4=1ms
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页
本文关键字:单片机 程序 AVR单片机,单片机-工控设备 - AVR单片机