main.s

基于ＡＶＲ单片机的２４Ｃ０２的仿真源码 用ＰＲＯＴＵＥＳ软件

	.module main.c
	.area text(rom, con, rel)
	.dbfile D:\avr\+++精华+++\24c02/delay.h
	.dbfunc e delay_1us _delay_1us fV
	.even
_delay_1us::
	.dbline -1
	.dbline 16
; #include <iom16v.h>
; #include "I2C.h"
; #include "1602.h"
; #include "delay.h"
; void main(void)
; 
; {	
; 	unsigned char i;
; 	LCD_init();
; 	  while(1)
; 	  {
; 	 I2C_Write('n',0x00);
; 	 I2C_Write('c',0x01);
; 	 I2C_Write('e',0x02);
; 	 I2C_Write('p',0x03);
; 	 I2C_Write('u',0x04);
	.dbline 17
; 	 
	nop
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e delay_nus _delay_nus fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nus::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 21
; 	 i=I2C_Read(0x00);
; 	 LCD_write_char(0,0,i);
; 	 i=I2C_Read(0x01);
; 	 LCD_write_data(i);
	.dbline 22
; 	 i=I2C_Read(0x02);
	clr R20
	clr R21
	.dbline 23
; 	 LCD_write_data(i);
	xjmp L6
L3:
	.dbline 24
	xcall _delay_1us
L4:
	.dbline 23
	subi R20,255  ; offset = 1
	sbci R21,255
L6:
	.dbline 23
	cp R20,R22
	cpc R21,R23
	brlo L3
	.dbline -2
L2:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 28
; 	 i=I2C_Read(0x03);
; 	 LCD_write_data(i);
; 	 i=I2C_Read(0x04);
; 	 LCD_write_data(i);
; 	  }
	.dbline 30
	clr R16
	clr R17
	xjmp L11
L8:
	.dbline 30
L9:
	.dbline 30
	subi R16,255  ; offset = 1
	sbci R17,255
L11:
	.dbline 30
; 
; }
	cpi R16,116
	ldi R30,4
	cpc R17,R30
	brlo L8
	.dbline -2
L7:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_nms _delay_nms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nms::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 34
; }
; }
; }
; }
	.dbline 35
; }
	clr R20
	clr R21
	.dbline 36
; }
	xjmp L16
L13:
	.dbline 37
	xcall _delay_1ms
L14:
	.dbline 36
	subi R20,255  ; offset = 1
	sbci R21,255
L16:
	.dbline 36
	cp R20,R22
	cpc R21,R23
	brlo L13
	.dbline -2
L12:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfile D:\avr\+++精华+++\24c02/I2C.h
	.dbfunc e I2C_Write _I2C_Write fc
;     RegAddress -> R22
;          Wdata -> R20
	.even
_I2C_Write::
	xcall push_gset2
	mov R22,R18
	mov R20,R16
	.dbline -1
	.dbline 39
; }
; }
; }
	.dbline 41
; }
; }
	ldi R24,164
	out 0x36,R24
	.dbline 42
L18:
	.dbline 42
L19:
	.dbline 42
; }
	in R2,0x36
	sbrs R2,7
	rjmp L18
	.dbline 42
	.dbline 42
	.dbline 43
; }
	in R24,0x1
	andi R24,248
	cpi R24,8
	breq L21
	.dbline 44
; }
	ldi R16,1
	xjmp L17
L21:
	.dbline 46
; }
; }
	.dbline 46
	ldi R24,160
	out 0x3,R24
	.dbline 46
	ldi R24,132
	out 0x36,R24
	.dbline 46
	.dbline 46
	.dbline 47
L23:
	.dbline 47
L24:
	.dbline 47
; }
	in R2,0x36
	sbrs R2,7
	rjmp L23
	.dbline 47
	.dbline 47
	.dbline 48
; }
	in R24,0x1
	andi R24,248
	cpi R24,24
	breq L26
	.dbline 49
; }
	ldi R16,1
	xjmp L17
L26:
	.dbline 51
; }
; }
	.dbline 51
	out 0x3,R22
	.dbline 51
	ldi R24,132
	out 0x36,R24
	.dbline 51
	.dbline 51
	.dbline 52
L28:
	.dbline 52
L29:
	.dbline 52
; }
	in R2,0x36
	sbrs R2,7
	rjmp L28
	.dbline 52
	.dbline 52
	.dbline 53
; }
	in R24,0x1
	andi R24,248
	cpi R24,40
	breq L31
	.dbline 54
; }
	ldi R16,1
	xjmp L17
L31:
	.dbline 56
; }
; }
	.dbline 56
	out 0x3,R20
	.dbline 56
	ldi R24,132
	out 0x36,R24
	.dbline 56
	.dbline 56
	.dbline 57
L33:
	.dbline 57
L34:
	.dbline 57
; }
	in R2,0x36
	sbrs R2,7
	rjmp L33
	.dbline 57
	.dbline 57
	.dbline 58
; }
	in R24,0x1
	andi R24,248
	cpi R24,40
	breq L36
	.dbline 59
; }
	ldi R16,1
	xjmp L17
L36:
	.dbline 61
; }
; }
	ldi R24,148
	out 0x36,R24
	.dbline 62
; }
	ldi R16,10
	ldi R17,0
	xcall _delay_nms
	.dbline 63
; }
	clr R16
	.dbline -2
L17:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r RegAddress 22 c
	.dbsym r Wdata 20 c
	.dbend
	.dbfunc e I2C_Read _I2C_Read fc
;           temp -> R20
;     RegAddress -> R16,R17
	.even
_I2C_Read::
	xcall push_gset1
	.dbline -1
	.dbline 74
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 76
; }
; }
	ldi R24,164
	out 0x36,R24
	.dbline 77
L39:
	.dbline 77
L40:
	.dbline 77
; }
	in R2,0x36
	sbrs R2,7
	rjmp L39
	.dbline 77
	.dbline 77
	.dbline 78
; }
	in R24,0x1
	andi R24,248
	cpi R24,8
	breq L42
	.dbline 79
; }
	ldi R16,1
	xjmp L38
L42:
	.dbline 81
; }
; }
	.dbline 81
	ldi R24,160
	out 0x3,R24
	.dbline 81
	ldi R24,132
	out 0x36,R24
	.dbline 81
	.dbline 81
	.dbline 82
L44:
	.dbline 82
L45:
	.dbline 82
; }
	in R2,0x36
	sbrs R2,7
	rjmp L44
	.dbline 82
	.dbline 82
	.dbline 83
; }
	in R24,0x1
	andi R24,248
	cpi R24,24
	breq L47
	.dbline 84
; }
	ldi R16,1
	xjmp L38
L47:
	.dbline 86
; }
; }
	.dbline 86
	out 0x3,R16
	.dbline 86
	ldi R24,132
	out 0x36,R24
	.dbline 86
	.dbline 86
	.dbline 87
L49:
	.dbline 87
L50:
	.dbline 87
; }
	in R2,0x36
	sbrs R2,7
	rjmp L49
	.dbline 87
	.dbline 87
	.dbline 88
; }
	in R24,0x1
	andi R24,248
	cpi R24,40
	breq L52
	.dbline 89
; }
	ldi R16,1
	xjmp L38
L52:
	.dbline 91
; }
; }
	ldi R24,164
	out 0x36,R24
	.dbline 92
L54:
	.dbline 92
L55:
	.dbline 92
; }
	in R2,0x36
	sbrs R2,7
	rjmp L54
	.dbline 92
	.dbline 92
	.dbline 93
; }
	in R24,0x1
	andi R24,248
	cpi R24,16
	breq L57
	.dbline 94
; }
	ldi R16,1
	xjmp L38
L57:
	.dbline 96
; }
; }
	.dbline 96
	ldi R24,161
	out 0x3,R24
	.dbline 96
	ldi R24,132
	out 0x36,R24
	.dbline 96
	.dbline 96
	.dbline 97
L59:
	.dbline 97
L60:
	.dbline 97
; }
	in R2,0x36
	sbrs R2,7
	rjmp L59
	.dbline 97
	.dbline 97
	.dbline 98
; }
	in R24,0x1
	andi R24,248
	cpi R24,64
	breq L62
	.dbline 99
; }
	ldi R16,1
	xjmp L38
L62:
	.dbline 101
; }
; }
	ldi R24,132
	out 0x36,R24
	.dbline 102
L64:
	.dbline 102
L65:
	.dbline 102
; }
	in R2,0x36
	sbrs R2,7
	rjmp L64
	.dbline 102
	.dbline 102
	.dbline 103
; }
	in R24,0x1
	andi R24,248
	cpi R24,88
	breq L67
	.dbline 104
; }
	ldi R16,1
	xjmp L38
L67:
	.dbline 106
; }
; }
	in R20,0x3
	.dbline 107
; }
	ldi R24,148
	out 0x36,R24
	.dbline 108
; }
	mov R16,R20
	.dbline -2
L38:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r temp 20 c
	.dbsym r RegAddress 16 i
	.dbend
	.dbfile D:\avr\+++精华+++\24c02/1602.h
	.dbfunc e LCD_init _LCD_init fV
	.even
_LCD_init::
	.dbline -1
	.dbline 45
	.dbline 46
	in R24,0x1a
	ori R24,240
	out 0x1a,R24
	.dbline 47
	sbi 0x14,7
	.dbline 48
	sbi 0x14,6
	.dbline 49
	ldi R16,40
	xcall _LCD_write_command
	.dbline 50
	xcall _LCD_en_write
	.dbline 51
	ldi R16,40
	ldi R17,0
	xcall _delay_nus
	.dbline 52
	ldi R16,40
	xcall _LCD_write_command
	.dbline 53
	ldi R16,12
	xcall _LCD_write_command
	.dbline 54
	ldi R16,1
	xcall _LCD_write_command
	.dbline 55
	ldi R16,2
	ldi R17,0
	xcall _delay_nms
	.dbline -2
L69:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_en_write _LCD_en_write fV
	.even
_LCD_en_write::
	.dbline -1
	.dbline 59
	.dbline 60
	sbi 0x15,7
	.dbline 61
	ldi R16,1
	ldi R17,0
	xcall _delay_nus
	.dbline 62
	cbi 0x15,7
	.dbline -2
L70:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_write_command _LCD_write_command fV
;        command -> R20
	.even
_LCD_write_command::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 66
	.dbline 67
	ldi R16,16
	ldi R17,0
	xcall _delay_nus
	.dbline 68
	cbi 0x15,6
	.dbline 69
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 70
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 71
	xcall _LCD_en_write
	.dbline 72
	mov R24,R20
	andi R24,#0x0F
	swap R24
	mov R20,R24
	.dbline 73
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 74
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 75
	xcall _LCD_en_write
	.dbline -2
L71:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r command 20 c
	.dbend
	.dbfunc e LCD_write_data _LCD_write_data fV
;           data -> R20
	.even
_LCD_write_data::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 80
	.dbline 81
	ldi R16,16
	ldi R17,0
	xcall _delay_nus
	.dbline 82
	sbi 0x15,6
	.dbline 83
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 84
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 85
	xcall _LCD_en_write
	.dbline 86
	mov R24,R20
	andi R24,#0x0F
	swap R24
	mov R20,R24
	.dbline 87
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 88
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 89
	xcall _LCD_en_write
	.dbline -2
L72:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r data 20 c
	.dbend
	.dbfunc e LCD_set_xy _LCD_set_xy fV
;        address -> R20
;              y -> R20
;              x -> R22
	.even
_LCD_set_xy::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 94
	.dbline 96
	tst R20
	brne L74
	.dbline 96
	mov R20,R22
	subi R20,128    ; addi 128
	xjmp L75
L74:
	.dbline 97
	mov R20,R22
	subi R20,64    ; addi 192
L75:
	.dbline 98
	mov R16,R20
	xcall _LCD_write_command
	.dbline -2
L73:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r address 20 c
	.dbsym r y 20 c
	.dbsym r x 22 c
	.dbend
	.dbfunc e LCD_write_string _LCD_write_string fV
;              s -> R20,R21
;              Y -> R10
;              X -> R22
	.even
_LCD_write_string::
	xcall push_gset3
	mov R10,R18
	mov R22,R16
	ldd R20,y+6
	ldd R21,y+7
	.dbline -1
	.dbline 102
	.dbline 103
	mov R18,R10
	mov R16,R22
	xcall _LCD_set_xy
	xjmp L78
L77:
	.dbline 105
	.dbline 106
	movw R30,R20
	ldd R16,z+0
	xcall _LCD_write_data
	.dbline 107
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 108
L78:
	.dbline 104
	movw R30,R20
	ldd R2,z+0
	tst R2
	brne L77
	.dbline -2
L76:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r s 20 pc
	.dbsym r Y 10 c
	.dbsym r X 22 c
	.dbend
	.dbfunc e LCD_write_char _LCD_write_char fV
;           data -> y+4
;              Y -> R22
;              X -> R20
	.even
_LCD_write_char::
	xcall push_gset2
	mov R22,R18
	mov R20,R16
	.dbline -1
	.dbline 113
; }
; }
; }
; }
; }
	.dbline 114
; }
	mov R18,R22
	mov R16,R20
	xcall _LCD_set_xy
	.dbline 115
; }
	ldd R16,y+4
	xcall _LCD_write_data
	.dbline -2
L80:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym l data 4 c
	.dbsym r Y 22 c
	.dbsym r X 20 c
	.dbend
	.dbfile D:\avr\+++精华+++\24c02\main.c
	.dbfunc e main _main fV
;              i -> R20
	.even
_main::
	sbiw R28,1
	.dbline -1
	.dbline 7
	.dbline 9
	xcall _LCD_init
	xjmp L83
L82:
	.dbline 11
	.dbline 12
	clr R18
	ldi R16,110
	xcall _I2C_Write
	.dbline 13
	ldi R18,1
	ldi R16,99
	xcall _I2C_Write
	.dbline 14
	ldi R18,2
	ldi R16,101
	xcall _I2C_Write
	.dbline 15
	ldi R18,3
	ldi R16,112
	xcall _I2C_Write
	.dbline 16
	ldi R18,4
	ldi R16,117
	xcall _I2C_Write
	.dbline 18
	clr R16
	clr R17
	xcall _I2C_Read
	mov R20,R16
	.dbline 19
	std y+0,R20
	clr R18
	clr R16
	xcall _LCD_write_char
	.dbline 20
	ldi R16,1
	ldi R17,0
	xcall _I2C_Read
	.dbline 21
	xcall _LCD_write_data
	.dbline 22
	ldi R16,2
	ldi R17,0
	xcall _I2C_Read
	.dbline 23
	xcall _LCD_write_data
	.dbline 24
	ldi R16,3
	ldi R17,0
	xcall _I2C_Read
	.dbline 25
	xcall _LCD_write_data
	.dbline 26
	ldi R16,4
	ldi R17,0
	xcall _I2C_Read
	mov R20,R16
	.dbline 27
	xcall _LCD_write_data
	.dbline 28
L83:
	.dbline 10
	xjmp L82
X0:
	.dbline -2
L81:
	adiw R28,1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend