1602lcd.p1

1602液晶显示驱动程序

"356
[v _BRGH `VXb 1 s@1218 ]
"357
[v _TRMT `VXb 1 s@1217 ]
"358
[v _TX9D `VXb 1 s@1216 ]
"361
[v _C2OUT `VXb 1 s@1255 ]
"362
[v _C1OUT `VXb 1 s@1254 ]
"363
[v _C2INV `VXb 1 s@1253 ]
"364
[v _C1INV `VXb 1 s@1252 ]
"365
[v _CIS `VXb 1 s@1251 ]
"366
[v _CM2 `VXb 1 s@1250 ]
"367
[v _CM1 `VXb 1 s@1249 ]
"368
[v _CM0 `VXb 1 s@1248 ]
"371
[v _CVREN `VXb 1 s@1263 ]
"372
[v _CVROE `VXb 1 s@1262 ]
"373
[v _CVRR `VXb 1 s@1261 ]
"374
[v _CVR3 `VXb 1 s@1259 ]
"375
[v _CVR2 `VXb 1 s@1258 ]
"376
[v _CVR1 `VXb 1 s@1257 ]
"377
[v _CVR0 `VXb 1 s@1256 ]
"380
[v _ADFM `VXb 1 s@1279 ]
"381
[v _ADCS2 `VXb 1 s@1278 ]
"382
[v _PCFG3 `VXb 1 s@1275 ]
"383
[v _PCFG2 `VXb 1 s@1274 ]
"384
[v _PCFG1 `VXb 1 s@1273 ]
"385
[v _PCFG0 `VXb 1 s@1272 ]
"388
[v _EEPGD `VZb 1 s@3175 ]
"389
[v _WRERR `VZb 1 s@3171 ]
"390
[v _WREN `VZb 1 s@3170 ]
"391
[v _WR `VZb 1 s@3169 ]
"392
[v _RD `VZb 1 s@3168 ]
"4 D:\c51andPIC\PIC\tiaoshi_yejing\1602lcd.c
[v _int2charLCD `Cuc -> 0 `x e ]
[i _int2charLCD
:U ..
-> 48 `c
-> 49 `c
-> 50 `c
-> 51 `c
-> 52 `c
-> 53 `c
-> 54 `c
-> 55 `c
-> 56 `c
-> 57 `c
-> 32 `c
-> 0 `c
..
]"7
[v _delay_us `(v 1 ef1`uc ]
{
[v _k `uc 1 r1 ]
[e :U _delay_us ]
[f ]
[; ;1602lcd.c: 6: void delay_us(unsigned char k)
[; ;1602lcd.c: 7: {
[; ;1602lcd.c: 9: while(k--)
"9
[e $U 2 ]
[e :U 3 ]
[; ;1602lcd.c: 10: {
"11
[e :U 2 ]
"9
[e $ != -> -- _k -> -> 1 `i `uc `i -> -> -> 0 `i `uc `i 3 ]
[e :U 4 ]
"12
[; ;1602lcd.c: 11: }
[; ;1602lcd.c: 12: }
[e :UE 1 ]
}
"15
[v _delay_ms `(v 1 ef1`uc ]
{
[v _k `uc 1 r1 ]
[e :U _delay_ms ]
[f ]
[; ;1602lcd.c: 14: void delay_ms(unsigned char k)
[; ;1602lcd.c: 15: { unsigned char i;
[v _i `uc 1 a ]
[; ;1602lcd.c: 16: while(k--)
"16
[e $U 6 ]
[e :U 7 ]
[; ;1602lcd.c: 17: { for(i=0;i<256;i++);
"17
[e = _i -> -> 0 `i `uc ]
[e $ < -> _i `i -> 256 `i 9 ]
[e $U 10 ]
[e :U 9 ]
[e ++ _i -> -> 1 `i `uc ]
[e $ < -> _i `i -> 256 `i 9 ]
[e :U 10 ]
"18
[e :U 6 ]
"16
[e $ != -> -- _k -> -> 1 `i `uc `i -> -> -> 0 `i `uc `i 7 ]
[e :U 8 ]
"19
[; ;1602lcd.c: 18: }
[; ;1602lcd.c: 19: }
[e :UE 5 ]
}
"21
[v _lcd_bz `(b 1 e ]
{
[e :U _lcd_bz ]
[f ]
[; ;1602lcd.c: 20: bit lcd_bz()
[; ;1602lcd.c: 21: {
"22
[v F535 `b 1 s result ]
[; ;1602lcd.c: 22: static bit result;
[; ;1602lcd.c: 23: RE0=0;
"23
[e = _RE0 -> -> 0 `i `b ]
[; ;1602lcd.c: 24: RE1=1;
"24
[e = _RE1 -> -> 1 `i `b ]
[; ;1602lcd.c: 25: RE2=1;
"25
[e = _RE2 -> -> 1 `i `b ]
[; ;1602lcd.c: 26: TRISC = 0Xff;
"26
[e = _TRISC -> -> 255 `i `uc ]
[; ;1602lcd.c: 27: delay_us(100);
"27
[e ( _delay_us (1 -> -> 100 `i `uc ]
[; ;1602lcd.c: 28: result = (bit)(PORTC&0x80);
"28
[e = F535 -> & -> _PORTC `i -> 128 `i `b ]
[; ;1602lcd.c: 29: RE2=0;
"29
[e = _RE2 -> -> 0 `i `b ]
[; ;1602lcd.c: 30: return result;
"30
[e ) -> -> F535 `i `b ]
[e $UE 12 ]
"31
[; ;1602lcd.c: 31: }
[e :UE 12 ]
}
"33
[v _write_LCD_command `(v 1 ef1`ui ]
{
[v _command `ui 1 r1 ]
[e :U _write_LCD_command ]
[f ]
[; ;1602lcd.c: 32: void write_LCD_command(unsigned command)
[; ;1602lcd.c: 33: {
[; ;1602lcd.c: 34: while(lcd_bz());
"34
[e $U 14 ]
[e :U 15 ]
[e :U 14 ]
[e $ ( _lcd_bz ..  15 ]
[e :U 16 ]
[; ;1602lcd.c: 35: RE1=0;
"35
[e = _RE1 -> -> 0 `i `b ]
[; ;1602lcd.c: 36: RE0=0;
"36
[e = _RE0 -> -> 0 `i `b ]
[; ;1602lcd.c: 37: RE2=0;
"37
[e = _RE2 -> -> 0 `i `b ]
[; ;1602lcd.c: 38: TRISC=0X00;
"38
[e = _TRISC -> -> 0 `i `uc ]
[; ;1602lcd.c: 39: PORTC=command;
"39
[e = _PORTC -> _command `uc ]
[; ;1602lcd.c: 40: delay_us(100);
"40
[e ( _delay_us (1 -> -> 100 `i `uc ]
[; ;1602lcd.c: 41: RE2=1;
"41
[e = _RE2 -> -> 1 `i `b ]
[; ;1602lcd.c: 42: delay_us(100);
"42
[e ( _delay_us (1 -> -> 100 `i `uc ]
[; ;1602lcd.c: 43: RE2=0;
"43
[e = _RE2 -> -> 0 `i `b ]
"45
[; ;1602lcd.c: 45: }
[e :UE 13 ]
}
"48
[v _write_LCD_data `(v 1 ef1`ui ]
{
[v _LCDdata `ui 1 r1 ]
[e :U _write_LCD_data ]
[f ]
[; ;1602lcd.c: 47: void write_LCD_data(unsigned LCDdata)
[; ;1602lcd.c: 48: {
[; ;1602lcd.c: 49: while(lcd_bz());
"49
[e $U 18 ]
[e :U 19 ]
[e :U 18 ]
[e $ ( _lcd_bz ..  19 ]
[e :U 20 ]
[; ;1602lcd.c: 50: RE1=0;
"50
[e = _RE1 -> -> 0 `i `b ]
[; ;1602lcd.c: 51: RE0=1;
"51
[e = _RE0 -> -> 1 `i `b ]
[; ;1602lcd.c: 52: RE2=1;
"52
[e = _RE2 -> -> 1 `i `b ]
[; ;1602lcd.c: 53: TRISC=0X00;
"53
[e = _TRISC -> -> 0 `i `uc ]
[; ;1602lcd.c: 54: PORTC=LCDdata;
"54
[e = _PORTC -> _LCDdata `uc ]
[; ;1602lcd.c: 55: delay_us(100);
"55
[e ( _delay_us (1 -> -> 100 `i `uc ]
[; ;1602lcd.c: 56: RE2=1;
"56
[e = _RE2 -> -> 1 `i `b ]
[; ;1602lcd.c: 57: delay_us(100);
"57
[e ( _delay_us (1 -> -> 100 `i `uc ]
[; ;1602lcd.c: 58: RE2=0;
"58
[e = _RE2 -> -> 0 `i `b ]
"59
[; ;1602lcd.c: 59: }
[e :UE 17 ]
}
"61
[v _init_LCD `(v 1 ef ]
{
[e :U _init_LCD ]
[f ]
[; ;1602lcd.c: 60: void init_LCD(void)
[; ;1602lcd.c: 61: {
[; ;1602lcd.c: 62: write_LCD_command(0x38);
"62
[e ( _write_LCD_command (1 -> -> 56 `i `ui ]
[; ;1602lcd.c: 63: delay_us(10);
"63
[e ( _delay_us (1 -> -> 10 `i `uc ]
[; ;1602lcd.c: 64: write_LCD_command(0x0d);
"64
[e ( _write_LCD_command (1 -> -> 13 `i `ui ]
[; ;1602lcd.c: 65: delay_us(10);
"65
[e ( _delay_us (1 -> -> 10 `i `uc ]
[; ;1602lcd.c: 66: write_LCD_command(0x06);
"66
[e ( _write_LCD_command (1 -> -> 6 `i `ui ]
[; ;1602lcd.c: 67: delay_us(10);
"67
[e ( _delay_us (1 -> -> 10 `i `uc ]
"70
[; ;1602lcd.c: 70: }
[e :UE 21 ]
}
"72
[v _clear_LCD `(v 1 e ]
{
[e :U _clear_LCD ]
[f ]
[; ;1602lcd.c: 71: void clear_LCD()
[; ;1602lcd.c: 72: {
[; ;1602lcd.c: 73: while(lcd_bz());
"73
[e $U 23 ]
[e :U 24 ]
[e :U 23 ]
[e $ ( _lcd_bz ..  24 ]
[e :U 25 ]
[; ;1602lcd.c: 74: RE1=0;
"74
[e = _RE1 -> -> 0 `i `b ]
[; ;1602lcd.c: 75: RE0=0;
"75
[e = _RE0 -> -> 0 `i `b ]
[; ;1602lcd.c: 76: RE2=0;
"76
[e = _RE2 -> -> 0 `i `b ]
[; ;1602lcd.c: 77: TRISC=0X00;
"77
[e = _TRISC -> -> 0 `i `uc ]
[; ;1602lcd.c: 78: PORTC=0x01;
"78
[e = _PORTC -> -> 1 `i `uc ]
[; ;1602lcd.c: 79: delay_ms(256);
"79
[e ( _delay_ms (1 -> -> 256 `i `uc ]
[; ;1602lcd.c: 80: RE2=1;
"80
[e = _RE2 -> -> 1 `i `b ]
[; ;1602lcd.c: 81: RE2=0;
"81
[e = _RE2 -> -> 0 `i `b ]
[; ;1602lcd.c: 83: while(lcd_bz());
"83
[e $U 26 ]
[e :U 27 ]
[e :U 26 ]
[e $ ( _lcd_bz ..  27 ]
[e :U 28 ]
[; ;1602lcd.c: 84: RE1=0;
"84
[e = _RE1 -> -> 0 `i `b ]
[; ;1602lcd.c: 85: RE0=0;
"85
[e = _RE0 -> -> 0 `i `b ]
[; ;1602lcd.c: 86: RE2=0;
"86
[e = _RE2 -> -> 0 `i `b ]
[; ;1602lcd.c: 87: TRISC=0X00;
"87
[e = _TRISC -> -> 0 `i `uc ]
[; ;1602lcd.c: 88: PORTC=0x02;
"88
[e = _PORTC -> -> 2 `i `uc ]
[; ;1602lcd.c: 89: delay_us(100);
"89
[e ( _delay_us (1 -> -> 100 `i `uc ]
[; ;1602lcd.c: 90: RE2=1;
"90
[e = _RE2 -> -> 1 `i `b ]
[; ;1602lcd.c: 91: RE2=0;
"91
[e = _RE2 -> -> 0 `i `b ]
"92
[; ;1602lcd.c: 92: }
[e :UE 22 ]
}
"94
[v _gotoxy `(v 1 ef2`ui`ui ]
{
[v _x `ui 1 r1 ]
[v _y `ui 1 r2 ]
[e :U _gotoxy ]
[f ]
[; ;1602lcd.c: 93: void gotoxy(unsigned x,unsigned y)
[; ;1602lcd.c: 94: {
[; ;1602lcd.c: 95: if(x==1)
"95
[e $ ! == _x -> -> 1 `i `ui 30 ]
[; ;1602lcd.c: 96: write_LCD_command(128+y);
"96
[e ( _write_LCD_command (1 + -> -> 128 `i `ui _y ]
[e $U 31 ]
"97
[e :U 30 ]
[; ;1602lcd.c: 97: else
[; ;1602lcd.c: 98: write_LCD_command(192+y);
"98
[e ( _write_LCD_command (1 + -> -> 192 `i `ui _y ]
[e :U 31 ]
"99
[; ;1602lcd.c: 99: }
[e :UE 29 ]
}
"101
[v _display_LCD_string `(v 1 ef1`*Cuc ]
{
[v _p `*Cuc 1 r1 ]
[e :U _display_LCD_string ]
[f ]
[; ;1602lcd.c: 100: void display_LCD_string(const char *p)
[; ;1602lcd.c: 101: {
[; ;1602lcd.c: 102: while(*p)
"102
[e $U 33 ]
[e :U 34 ]
[; ;1602lcd.c: 103: {
[; ;1602lcd.c: 104: write_LCD_data(*p);
"104
[e ( _write_LCD_data (1 -> *U _p `ui ]
[; ;1602lcd.c: 105: p++;
"105
[e ++ _p * -> -> 1 `i `x -> -> # `Cuc `i `x ]
[; ;1602lcd.c: 106: delay_us(50);
"106
[e ( _delay_us (1 -> -> 50 `i `uc ]
"107
[e :U 33 ]
"102
[e $ != -> *U _p `i -> -> -> 0 `i `Cuc `i 34 ]
[e :U 35 ]
"108
[; ;1602lcd.c: 107: }
[; ;1602lcd.c: 108: }
[e :UE 32 ]
}
"110
[v _display_LCD_number `(v 1 ef1`l ]
{
[v _number `l 1 r1 ]
[e :U _display_LCD_number ]
[f ]
[; ;1602lcd.c: 109: void display_LCD_number(long int number)
[; ;1602lcd.c: 110: { char i=0;
[v _i `uc 1 a ]
[e = _i -> -> 0 `i `uc ]
"111
[v _temp `uc -> 8 `i a ]
[; ;1602lcd.c: 111: unsigned char temp[8];
[; ;1602lcd.c: 112: for(i=0;i<7;i++)
"112
[e = _i -> -> 0 `i `uc ]
[e $ < -> _i `i -> 7 `i 37 ]
[e $U 38 ]
"113
[e :U 37 ]
[; ;1602lcd.c: 113: {
[; ;1602lcd.c: 114: temp[i]=10;
"114
[e = *U + &U _temp * -> _i `ux -> -> # `uc `ui `ux -> -> 10 `i `uc ]
"112
[e ++ _i -> -> 1 `i `uc ]
[e $ < -> _i `i -> 7 `i 37 ]
[e :U 38 ]
[; ;1602lcd.c: 115: }
[; ;1602lcd.c: 116: i=0;
"116
[e = _i -> -> 0 `i `uc ]
[; ;1602lcd.c: 117: while(number/10)
"117
[e $U 40 ]
[e :U 41 ]
[; ;1602lcd.c: 118: {
[; ;1602lcd.c: 119: temp[i]=number%10;
"119
[e = *U + &U _temp * -> _i `ux -> -> # `uc `ui `ux -> % _number -> -> 10 `i `l `uc ]
[; ;1602lcd.c: 120: number=number/10;
"120
[e = _number / _number -> -> 10 `i `l ]
[; ;1602lcd.c: 121: i++;
"121
[e ++ _i -> -> 1 `i `uc ]
"122
[e :U 40 ]
"117
[e $ != / _number -> -> 10 `i `l -> -> 0 `i `l 41 ]
[e :U 42 ]
[; ;1602lcd.c: 122: }
[; ;1602lcd.c: 123: temp[i]=number;
"123
[e = *U + &U _temp * -> _i `ux -> -> # `uc `ui `ux -> _number `uc ]
[; ;1602lcd.c: 124: i=i+1;
"124
[e = _i -> + -> _i `i -> 1 `i `uc ]
[; ;1602lcd.c: 125: while(i--)
"125
[e $U 43 ]
[e :U 44 ]
[; ;1602lcd.c: 126: {
[; ;1602lcd.c: 127: write_LCD_data(int2charLCD[temp[i]]);
"127
[e ( _write_LCD_data (1 -> *U + &U _int2charLCD * -> *U + &U _temp * -> _i `ux -> -> # `uc `ui `ux `ux -> -> # `Cuc `ui `ux `ui ]
"129
[e :U 43 ]
"125
[e $ != -> -- _i -> -> 1 `i `uc `i -> -> -> 0 `i `uc `i 44 ]
[e :U 45 ]
"130
[; ;1602lcd.c: 129: }
[; ;1602lcd.c: 130: }
[e :UE 36 ]
}