min.s

用ICC-AVR编译器编译M16单片机适用的LCD12232液晶屏驱动程序.

	.module MIN.C
	.area data(ram, con, rel)
_b1::
	.blkb 1
	.area idata
	.byte 0
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e b1 _b1 c
_pianyi::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e pianyi _pianyi c
_sz0::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e sz0 _sz0 c
_sz1::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e sz1 _sz1 c
_sz2::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e sz2 _sz2 c
_sz3::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e sz3 _sz3 c
_sz4::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e sz4 _sz4 c
_sz5::
	.blkb 1
	.area idata
	.byte 65
	.area data(ram, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbsym e sz5 _sz5 c
	.area text(rom, con, rel)
	.dbfile F:\新建文件夹\LCD12232APP/LCD12232.C
	.dbfunc e wcodel _wcodel fV
;         status -> R20
;              c -> R16
	.even
_wcodel::
	xcall push_gset1
	.dbline -1
	.dbline 30
; //-----------------------------------------------------------------------------
; //-----------------------------------------------------------------------------
; //					    	LCD12232 APP for AVR 
; //								  V0.1c
; // 	  							 zhongwh
; //							Copyright 2003-2005 
; //   					   Email: [e-mail]
; //						    2005-6-19 15:38:52
; //			    Compiled with Imagecraft C Compiler for the AVR series
; //				ICC-AVR application builder : 2005-6-19 18:15:13
; // 								Target : M16
; // 								Crystal: 6.0000Mhz
; //-----------------------------------------------------------------------------
; //-----------------------------------------------------------------------------
; #include <iom16v.h>
; #include <macros.h>
; #include "LCD12232.C"
; const char chartable[35][32]={
; //输   C4268 
; {0x88,0x68,0x1F,0xC8,0x0C,0x28,0x90,0xA8,0xA6,0xA1,0x26,0x28,0x10,0xB0,0x10,0x00,
; 0x09,0x09,0x05,0xFF,0x05,0x00,0xFF,0x0A,0x8A,0xFF,0x00,0x1F,0x80,0xFF,0x00,0x00},//A
; //入   C4075 
; {0x00,0x00,0x00,0x00,0x00,0x01,0xE2,0x1C,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
; 0x80,0x40,0x20,0x10,0x0C,0x03,0x00,0x00,0x00,0x03,0x0C,0x30,0x40,0xC0,0x40,0x00},//B
; /*--  文字:  卡  --*/
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
; {0x00,0x40,0x40,0x40,0x40,0x40,0x40,0xFF,0x44,0x44,0x44,0x44,0x44,0x44,0x40,0x00,
; 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xFF,0x00,0x02,0x04,0x0C,0x38,0x10,0x00,0x00},//C
; /*号   C2637 */
; {0x80,0x80,0x80,0xBE,0xA2,0xA2,0xA2,0xA2,0xA2,0xA2,0xA2,0xBF,0x82,0xC0,0x80,0x00,
	xjmp L3
L2:
	.dbline 32
; 0x00,0x00,0x00,0x04,0x06,0x05,0x04,0x04,0x44,0x84,0x44,0x3E,0x04,0x00,0x00,0x00},//D
; /*密   C3560 */
	.dbline 33
; {0x10,0x4C,0x24,0x04,0xF4,0x84,0x4D,0x56,0x24,0x24,0x14,0x84,0x24,0x54,0x0C,0x00,
	clr R2
	out 0x14,R2
	.dbline 34
; 0x00,0x01,0xFD,0x41,0x40,0x41,0x41,0x7F,0x41,0x41,0x41,0x41,0xFC,0x00,0x00,0x00},//E
	sbi 0x12,4
	.dbline 35
; /*码   C3475 */
	cbi 0x12,7
	.dbline 36
; {0x02,0x82,0xF2,0x4E,0x43,0xE2,0x42,0xFA,0x02,0x02,0x02,0xFF,0x02,0x80,0x00,0x00,
	sbi 0x12,6
	.dbline 37
; 0x01,0x00,0x7F,0x20,0x20,0x7F,0x08,0x09,0x09,0x09,0x0D,0x49,0x81,0x7F,0x01,0x00},//F
	cbi 0x12,4
	.dbline 38
; /*插   C1869 */
	in R20,0x13
	.dbline 39
; {0x10,0x10,0x10,0xFF,0x90,0x24,0x24,0xA4,0x24,0xFC,0x22,0x23,0x22,0xB0,0x20,0x00,
	andi R20,128
	.dbline 40
; 0x02,0x42,0x81,0x7F,0x00,0xFF,0x49,0x48,0x40,0x7F,0x40,0x49,0x49,0xFF,0x01,0x00},//G
	brne L5
	.dbline 40
	xjmp L4
L5:
	.dbline 41
L3:
	.dbline 32
	xjmp L2
L4:
	.dbline 42
; /*座   C5589 */
; {0x00,0x00,0xFC,0x04,0x84,0x74,0x84,0x05,0xFE,0x04,0x84,0x74,0x84,0x06,0x04,0x00,
	ldi R24,255
	out 0x14,R24
	.dbline 43
; 0x40,0x30,0x4F,0x42,0x49,0x48,0x48,0x4B,0x7F,0x4A,0x49,0x4C,0x48,0x63,0x40,0x00},//H
	sbi 0x12,4
	.dbline 44
; /*时   C4217 */
	cbi 0x12,6
	.dbline 45
; {0x00,0xFC,0x84,0x84,0x84,0xFE,0x14,0x10,0x90,0x10,0x10,0x10,0xFF,0x10,0x10,0x00,
	out 0x15,R16
	.dbline 46
; 0x00,0x3F,0x10,0x10,0x10,0x3F,0x00,0x00,0x00,0x23,0x40,0x80,0x7F,0x00,0x00,0x00},//I
	cbi 0x12,4
	.dbline -2
	.dbline 48
; /*间   C2868 */
; {0x00,0xF8,0x01,0x02,0xF6,0x10,0x12,0x12,0x12,0x12,0xFA,0x12,0x02,0xFF,0x02,0x00,
L1:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r status 20 c
	.dbsym r c 16 c
	.dbend
	.dbfunc e wdatal _wdatal fV
;         status -> R20
;              d -> R16
	.even
_wdatal::
	xcall push_gset1
	.dbline -1
	.dbline 50
; 0x00,0xFF,0x00,0x00,0x3F,0x11,0x11,0x11,0x11,0x11,0x3F,0x40,0x80,0x7F,0x00,0x00},//J
; /*已   C5049 */
	xjmp L9
L8:
	.dbline 52
; {0x00,0x02,0xF2,0x42,0x42,0x42,0x42,0x42,0x42,0x42,0x42,0xFF,0x02,0x00,0x00,0x00,
; 0x00,0x00,0x3F,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x40,0x78,0x00,0x00},//K
	.dbline 53
; /*--  文字:  开  --*/
	clr R2
	out 0x14,R2
	.dbline 54
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
	sbi 0x12,4
	.dbline 55
; {0x40,0x42,0x42,0x42,0x42,0xFE,0x42,0x42,0x42,0x42,0xFE,0x42,0x42,0x42,0x42,0x00,
	cbi 0x12,7
	.dbline 56
; 0x00,0x40,0x20,0x10,0x0C,0x03,0x00,0x00,0x00,0x00,0x7F,0x00,0x00,0x00,0x00,0x00},//L
	sbi 0x12,6
	.dbline 57
; /*电   C2171 */
	cbi 0x12,4
	.dbline 58
; {0x00,0xF8,0x48,0x48,0x48,0x48,0xFF,0x48,0x48,0x48,0x48,0xFC,0x08,0x00,0x00,0x00,
	in R20,0x13
	.dbline 59
; 0x00,0x07,0x02,0x02,0x02,0x02,0x3F,0x42,0x42,0x42,0x42,0x47,0x40,0x70,0x00,0x00},//M
	andi R20,128
	.dbline 60
; /*--  文字:  关  --*/
	brne L11
	.dbline 60
	xjmp L10
L11:
	.dbline 61
L9:
	.dbline 52
	xjmp L8
L10:
	.dbline 62
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
; {0x00,0x10,0x10,0x10,0x11,0x1E,0x14,0xF0,0x10,0x18,0x17,0x12,0x18,0x10,0x00,0x00,
	ldi R24,255
	out 0x14,R24
	.dbline 63
; 0x01,0x81,0x41,0x21,0x11,0x09,0x05,0x03,0x05,0x09,0x31,0x61,0xC1,0x41,0x01,0x00},//N
	sbi 0x12,4
	.dbline 64
; /*剩   C4203 */
	sbi 0x12,7
	.dbline 65
; {0x08,0x48,0x4A,0xEA,0x0A,0xFE,0x09,0xE9,0x4D,0x48,0x00,0xF8,0x00,0xFF,0x00,0x00,
	cbi 0x12,6
	.dbline 66
; 0x00,0x11,0x09,0x05,0x02,0xFF,0x04,0x09,0x19,0x01,0x00,0x4F,0x80,0x7F,0x00,0x00},//O
	out 0x15,R16
	.dbline 67
; 
	cbi 0x12,4
	.dbline -2
	.dbline 69
; /*余   C5164 */
; // **** Enabled Break Point -- do not edit ****
L7:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r status 20 c
	.dbsym r d 16 c
	.dbend
	.dbfunc e wcoder _wcoder fV
;         status -> R20
;              c -> R16
	.even
_wcoder::
	xcall push_gset1
	.dbline -1
	.dbline 71
; {0x80,0x80,0x40,0x20,0x50,0x48,0x44,0xC3,0x44,0x48,0x50,0x20,0x40,0xC0,0x40,0x00,
; 0x00,0x40,0x22,0x12,0x1A,0x42,0x82,0x7F,0x02,0x02,0x0A,0x13,0x32,0x60,0x00,0x00},//P
	xjmp L15
L14:
	.dbline 73
; /*--  文字:  错  --*/
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
	.dbline 74
; {0x40,0x30,0x2C,0xE7,0x24,0x24,0x40,0x48,0x7F,0x48,0x48,0x7F,0x48,0x48,0x40,0x00,
	clr R2
	out 0x14,R2
	.dbline 75
; 0x01,0x01,0x01,0xFF,0x41,0x21,0x00,0xFF,0x49,0x49,0x49,0x49,0x49,0xFF,0x00,0x00},//Q
	sbi 0x12,5
	.dbline 76
; /*--  文字:  误  --*/
	cbi 0x12,7
	.dbline 77
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
	sbi 0x12,6
	.dbline 78
; {0x40,0x41,0xCE,0x04,0x00,0x40,0x5F,0x51,0x51,0xD1,0x51,0x51,0x5F,0x40,0x00,0x00,
	cbi 0x12,5
	.dbline 79
; 0x00,0x00,0x3F,0x10,0x88,0x42,0x22,0x12,0x0A,0x07,0x0A,0x12,0x22,0xE2,0x42,0x00},//R
	in R20,0x13
	.dbline 80
; /*请   C3975 */
	andi R20,128
	.dbline 81
; {0x20,0x22,0xEC,0x00,0x20,0x22,0xAA,0xAA,0xAA,0xBF,0xAA,0xAA,0xEB,0xA2,0x20,0x00,
	brne L17
	.dbline 82
; 0x00,0x00,0x7F,0x20,0x10,0x00,0xFF,0x0A,0x0A,0x0A,0x4A,0x8A,0x7F,0x00,0x00,0x00},//S
	.dbline 82
	xjmp L16
L17:
	.dbline 83
L15:
	.dbline 73
	xjmp L14
L16:
	.dbline 84
; /*--  文字:  源  --*/
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
	ldi R24,255
	out 0x14,R24
	.dbline 85
; {0x10,0x21,0x06,0xE0,0x00,0xFE,0x02,0xF2,0x5A,0x56,0x52,0x52,0x52,0xF2,0x02,0x00,
	sbi 0x12,5
	.dbline 86
; 0x04,0xFC,0x03,0x40,0x30,0x0F,0x20,0x11,0x4D,0x81,0x7F,0x01,0x05,0x09,0x30,0x00},//T
	cbi 0x12,6
	.dbline 87
; /*：   C0326 */
	out 0x15,R16
	.dbline 88
; {0x00,0x00,0x00,0x00,0x80,0xC0,0xC0,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
	cbi 0x12,5
	.dbline -2
	.dbline 90
; 0x00,0x00,0x00,0x00,0x31,0x7B,0x7B,0x31,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//U
; /*空格*/
L13:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r status 20 c
	.dbsym r c 16 c
	.dbend
	.dbfunc e wdatar _wdatar fV
;         status -> R20
;              d -> R16
	.even
_wdatar::
	xcall push_gset1
	.dbline -1
	.dbline 92
; {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
; 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//V
	xjmp L21
L20:
	.dbline 94
; /*--  文字:  0  --*/
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
	.dbline 94
	clr R2
	out 0x14,R2
	.dbline 95
; {0x00,0xE0,0xF0,0x18,0x08,0x08,0x18,0xF0,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
	sbi 0x12,5
	.dbline 96
; 0x00,0x0F,0x1F,0x30,0x20,0x20,0x30,0x1F,0x0F,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//W
	cbi 0x12,7
	.dbline 97
; 
	sbi 0x12,6
	.dbline 98
; 
	cbi 0x12,5
	.dbline 99
; /*--  文字:  1  --*/
	in R20,0x13
	.dbline 100
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
	andi R20,128
	.dbline 101
; {0x00,0x20,0x30,0xF8,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
	brne L23
	.dbline 101
	xjmp L22
L23:
	.dbline 102
L21:
	.dbline 94
	xjmp L20
L22:
	.dbline 103
; 0x00,0x00,0x00,0x3F,0x3F,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//X
; 
	ldi R24,255
	out 0x14,R24
	.dbline 104
; 
	sbi 0x12,5
	.dbline 105
; /*--  文字:  2  --*/
	sbi 0x12,7
	.dbline 106
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
	cbi 0x12,6
	.dbline 107
; {0x00,0x60,0x70,0x18,0x08,0x18,0xF0,0xE0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
	out 0x15,R16
	.dbline 108
; 0x00,0x30,0x38,0x2C,0x26,0x23,0x21,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//Y
	cbi 0x12,5
	.dbline -2
	.dbline 110
; 
; /*--  文字:  3  --*/
L19:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r status 20 c
	.dbsym r d 16 c
	.dbend
	.dbfunc e clear _clear fV
;           page -> R20
;            col -> R22
;         symbol -> R10
	.even
_clear::
	xcall push_gset3
	mov R10,R16
	.dbline -1
	.dbline 114
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
; {0x00,0x30,0x38,0x08,0x08,0x08,0xF8,0xF0,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
; 0x00,0x18,0x38,0x20,0x21,0x21,0x3F,0x1E,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//Z
; 
	.dbline 115
; /*--  文字:  4  --*/
	clr R20
	.dbline 116
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
	clr R22
	.dbline 117
; {0x00,0x00,0x00,0xC0,0xE0,0x30,0xF8,0xF8,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
	xjmp L29
L26:
	.dbline 118
; 0x00,0x06,0x07,0x05,0x04,0x04,0x3F,0x3F,0x04,0x00,0x00,0x00,0x00,0x00,0x00,0x00},//[
	.dbline 120
; 
; /*--  文字:  5  --*/
	mov R16,R20
	subi R16,72    ; addi 184
	xcall _wcodel
	.dbline 122
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
; {0,248,8,200,72,200,8,200,8,200,
	clr R22
	xjmp L33
L30:
	.dbline 123
	.dbline 124
	mov R16,R22
	xcall _wcodel
	.dbline 125
	mov R16,R10
	xcall _wdatal
	.dbline 126
L31:
	.dbline 122
	inc R22
L33:
	.dbline 122
	cpi R22,97
	brlo L30
	.dbline 127
L27:
	.dbline 117
	inc R20
L29:
	.dbline 117
	cpi R20,4
	brlo L26
	.dbline 128
; 8,200,72,200,8,248,0,31,16,23,
; 19,21,16,23,20,23,16,23,16,23,
; 16,31},//\
; /*--  文字:  5  --*/
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
; {248,8,8,200,8,200,8,200,72,72,
	clr R20
	xjmp L37
L34:
	.dbline 129
; 8,200,8,8,8,248,31,16,16,23,
	.dbline 130
; 20,23,16,21,21,23,16,23,21,23,
	mov R16,R20
	subi R16,72    ; addi 184
	xcall _wcoder
	.dbline 132
; 16,31}
; ,//]
	clr R22
	xjmp L41
L38:
	.dbline 133
	.dbline 134
	mov R16,R22
	xcall _wcoder
	.dbline 135
	mov R16,R10
	xcall _wdatar
	.dbline 136
L39:
	.dbline 132
	inc R22
L41:
	.dbline 132
	cpi R22,97
	brlo L38
	.dbline 137
L35:
	.dbline 128
	inc R20
L37:
	.dbline 128
	cpi R20,4
	brlo L34
	.dbline -2
	.dbline 138
; 
; /*--  文字:  6  --*/
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
; {248,248,56,184,184,248,56,184,184,248,
; 184,56,184,248,248,0,31,31,26,26,
; 24,31,24,26,26,31,31,24,31,31,
L25:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r page 20 c
	.dbsym r col 22 c
	.dbsym r symbol 10 c
	.dbend
	.dbfunc e addressl _addressl fV
;            col -> R20
;           page -> R22
	.even
_addressl::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 141
; 31,0},//^
; 
; /*--  文字:  7  --*/
	.dbline 142
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
	mov R16,R22
	subi R16,72    ; addi 184
	xcall _wcodel
	.dbline 143
; {0,224,80,72,120,136,72,72,8,8,
	mov R16,R20
	xcall _wcodel
	.dbline -2
	.dbline 144
; 8,8,8,8,248,0,0,31,16,16,
L42:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r col 20 c
	.dbsym r page 22 c
	.dbend
	.dbfunc e addressr _addressr fV
;            col -> R20
;           page -> R22
	.even
_addressr::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 147
; 17,17,17,17,17,19,23,23,22,16,
; 31,0},//_
; 
	.dbline 148
; 
	mov R16,R22
	subi R16,72    ; addi 184
	xcall _wcoder
	.dbline 149
; /*--  文字:  8  --*/
	mov R16,R20
	subi R16,253    ; addi 3
	xcall _wcoder
	.dbline -2
	.dbline 150
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
L43:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r col 20 c
	.dbsym r page 22 c
	.dbend
	.dbfunc e lcdinit _lcdinit fV
	.even
_lcdinit::
	.dbline -1
	.dbline 153
; {248,56,184,120,184,56,248,56,184,184,56,248,184,184,56,248,31,24,31,30,
; 31,24,31,24,30,30,30,31,26,26,24,31},//`
; 
	.dbline 153
	ldi R24,255
	out 0x15,R24
	.dbline 154
; /*--  文字:  9  --*/
	clr R2
	out 0x14,R2
	.dbline 155
; /*--  黑体12;  此字体下对应的点阵为：宽x高=10x16   --*/
	out 0x11,R24
	.dbline 156
; {0,248,24,248,56,248,120,248,248,248,248,248,248,248,248,248,0,31,16,31,
	sbi 0x1a,7
	.dbline 157
; 16,31,16,31,16,31,17,31,19,31,23,31},//a
	sbi 0x1b,7
	.dbline 158
; /*--  文字:  用  --*/
	ldi R16,226
	xcall _wcodel
	.dbline 158
	ldi R16,226
	xcall _wcoder
	.dbline 159
; /*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
	ldi R16,174
	xcall _wcodel
	.dbline 159
	ldi R16,174
	xcall _wcoder
	.dbline 160
;  {0,128,128,64,176,208,128,0,128,224,160,128,0,0,0,0,0,0,1,8,40,61,15,7,15,29,56,
	ldi R16,164
	xcall _wcodel
	.dbline 160
	ldi R16,164
	xcall _wcoder
	.dbline 161
;  16,0,0,0,0},//b
	ldi R16,169
	xcall _wcodel
	.dbline 161
	ldi R16,169
	xcall _wcoder
	.dbline 162
; 
	ldi R16,160
	xcall _wcodel
	.dbline 162
	ldi R16,160
	xcall _wcoder
	.dbline 163
; {0,224,32,248,8,232,232,232,232,232,232,232,232,8,248,0,0,7,4,31,16,23,23,23,23,
	ldi R16,238
	xcall _wcodel
	.dbline 163
	ldi R16,238
	xcall _wcoder
	.dbline 164
; 23,23,23,23,16,31,0}};//c
	ldi R16,192
	xcall _wcodel
	.dbline 164
	ldi R16,192
	xcall _wcoder
	.dbline 165
; char string0[]={"ac`_^]\n"};//用电计费系统
	clr R16
	xcall _wcodel
	.dbline 165
	clr R16
	xcall _wcoder
	.dbline 166
; char string1[]={"ABEFWXY\n"};//待机状态
	clr R16
	xcall _clear
	.dbline 167
; void port_init(void)
	ldi R16,175
	xcall _wcodel
	.dbline 167
	ldi R16,175
	.dbline -2
	.dbline 169
; {
;  PORTA = 0x00;
L44:
	.dbline 0 ; func end
	xjmp _wcoder
	.dbend
	.dbfunc e displaystring _displaystring fV
;              w -> R14
;              j -> R22
;              z -> R10
;              i -> R20
;        onechar -> y+16
;              y -> y+14
;              x -> y+12
	.even
_displaystring::
	xcall push_arg4
	xcall push_gset5
	sbiw R28,2
	.dbline -1
	.dbline 171
;  DDRA  = 0x00;
;  PORTB = 0x00;
	.dbline 172
;  DDRB  = 0x00;
	clr R20
	.dbline 172
	clr R10
	.dbline 172
	clr R22
	.dbline 173
;  PORTC = 0x00; //m103 output only
	ldd R14,y+14
	.dbline 174
;  DDRC  = 0x00;
	ldi R24,60
	mov R0,R14
	cp R24,R14
	brlo X8
	xjmp L46
X8:
	.dbline 175
;  PORTD = 0x00;
	.dbline 176
;  DDRD  = 0x00;
	mov R24,R0
	subi R24,61
	std y+14,R24
	.dbline 177
;  DDRA  = 0x80;
	mov R18,R24
	ldd R16,y+12
	xcall _addressr
	xjmp L49
L48:
	.dbline 179
;  PORTA = 0x80;
; }
	.dbline 180
; 
	clr R20
	xjmp L54
L51:
	.dbline 181
	.dbline 181
	lds R2,_b1