eeprom.s

atmega8的片内eeprom读写操作程序

	.module eeprom.c
	.area text(rom, con, rel)
	.dbfile ./74164.h
	.dbfunc e write164 _write164 fV
;             ch -> R20
;              i -> R22
;              x -> R16
	.even
_write164::
	rcall push_gset2
	.dbline -1
	.dbline 2
; //ICC-AVR application builder : 2005-3-1 23:23:33
; // Target : M8
	.dbline 5
; // Crystal: 8.0000Mhz
; 
; #include <iom8v.h>
	mov R20,R16
	.dbline 6
; #include <macros.h>
	cbi 0x18,0
	.dbline 7
; #include <74164.h>
	cbi 0x12,6
	.dbline 8
	clr R22
	rjmp L5
L2:
	.dbline 8
; #include <eeprom.h>
	.dbline 9
; 
	sbrs R20,7
	rjmp L6
	.dbline 10
; unsigned char    display[4];  // 显示缓冲区
	sbi 0x12,7
	rjmp L7
L6:
	.dbline 12
; unsigned char    dis;         // 当前显示
; unsigned char    s,m;          // 时间
	cbi 0x12,7
L7:
	.dbline 13
	lsl R20
	.dbline 14
	sbi 0x12,6
	.dbline 15
	nop
	.dbline 16
	cbi 0x12,6
	.dbline 17
L3:
	.dbline 8
	inc R22
L5:
	.dbline 8
	cpi R22,8
	brlo L2
	.dbline 18
; 
; //TIMER0 initialisation - prescale:256
; // WGM: Normal
; // desired value: 5mSec
; // actual value:  4.992mSec (0.2%)
; void timer0_init(void)
	sbi 0x18,0
	.dbline -2
	.dbline 19
; {
L1:
	rcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r ch 20 c
	.dbsym r i 22 c
	.dbsym r x 16 c
	.dbend
	.dbfile D:\job\avrtest\web\example\eeprom\eeprom.c
	.dbfunc e timer0_init _timer0_init fV
	.even
_timer0_init::
	.dbline -1
	.dbline 19
	.dbline 20
;  TCCR0 = 0x00; //stop
	clr R2
	out 0x33,R2
	.dbline 21
;  TCNT0 = 0x64; //set count
	ldi R24,100
	out 0x32,R24
	.dbline 22
;  TCCR0 = 0x04; //start timer
	ldi R24,4
	out 0x33,R24
	.dbline -2
	.dbline 23
; }
L8:
	.dbline 0 ; func end
	ret
	.dbend
	.area vector(rom, abs)
	.org 18
	rjmp _timer0_ovf_isr
	.area text(rom, con, rel)
	.dbfile D:\job\avrtest\web\example\eeprom\eeprom.c
	.dbfunc e timer0_ovf_isr _timer0_ovf_isr fV
	.even
_timer0_ovf_isr::
	rcall push_lset
	rcall push_gset1
	.dbline -1
	.dbline 27
; 
; #pragma interrupt_handler timer0_ovf_isr:10
; void timer0_ovf_isr(void)
; {
	.dbline 28
;  TCNT0 = 0x64; //reload counter value
	ldi R24,100
	out 0x32,R24
	.dbline 30
	lds R20,_dis
	clr R21
	cpi R20,0
	cpc R20,R21
	breq L13
X0:
	cpi R20,1
	ldi R30,0
	cpc R21,R30
	breq L14
	cpi R20,2
	ldi R30,0
	cpc R21,R30
	breq L15
	cpi R20,3
	ldi R30,0
	cpc R21,R30
	breq L16
	rjmp L10
X1:
	.dbline 30
; //  display
;     switch(dis){  //  显示
L13:
	.dbline 31
;         case  0:  write164(display[dis] | 0x70);  break;
	ldi R24,<_display
	ldi R25,>_display
	lds R30,_dis
	clr R31
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	ori R16,112
	rcall _write164
	.dbline 31
	rjmp L11
L14:
	.dbline 32
;         case  1:  write164(display[dis] | 0xB0);  break;
	ldi R24,<_display
	ldi R25,>_display
	lds R30,_dis
	clr R31
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	ori R16,176
	rcall _write164
	.dbline 32
	rjmp L11
L15:
	.dbline 33
;         case  2:  write164(display[dis] | 0xD0);  break;
	ldi R24,<_display
	ldi R25,>_display
	lds R30,_dis
	clr R31
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	ori R16,208
	rcall _write164
	.dbline 33
	rjmp L11
L16:
	.dbline 34
;         case  3:  write164(display[dis] | 0xE0);  break;
	ldi R24,<_display
	ldi R25,>_display
	lds R30,_dis
	clr R31
	add R30,R24
	adc R31,R25
	ldd R16,z+0
	ori R16,224
	rcall _write164
	.dbline 34
L10:
L11:
	.dbline 36
	lds R24,_dis
	subi R24,255    ; addi 1
	mov R2,R24
	sts _dis,R2
	ldi R24,3
	cp R24,R2
	brsh L17
	.dbline 36
	clr R2
	sts _dis,R2
L17:
	.dbline -2
	.dbline 38
;     }
;     if(++dis > 3) dis = 0;
; //end  display
; }
L9:
	rcall pop_gset1
	rcall pop_lset
	.dbline 0 ; func end
	reti
	.dbend
	.dbfunc e timer1_init _timer1_init fV
	.even
_timer1_init::
	.dbline -1
	.dbline 45
; 
; //TIMER1 initialisation - prescale:1024
; // WGM: 0) Normal, TOP=0xFFFF
; // desired value: 1Hz
; // actual value:  1.000Hz (0.0%)
; void timer1_init(void)
; {
	.dbline 46
;  TCCR1B = 0x00; //stop
	clr R2
	out 0x2e,R2
	.dbline 47
;  TCNT1H = 0xE1; //setup
	ldi R24,225
	out 0x2d,R24
	.dbline 48
;  TCNT1L = 0x7C;
	ldi R24,124
	out 0x2c,R24
	.dbline 49
;  OCR1AH = 0x1E;
	ldi R24,30
	out 0x2b,R24
	.dbline 50
;  OCR1AL = 0x84;
	ldi R24,132
	out 0x2a,R24
	.dbline 51
;  OCR1BH = 0x1E;
	ldi R24,30
	out 0x29,R24
	.dbline 52
;  OCR1BL = 0x84;
	ldi R24,132
	out 0x28,R24
	.dbline 53
;  ICR1H  = 0x1E;
	ldi R24,30
	out 0x27,R24
	.dbline 54
;  ICR1L  = 0x84;
	ldi R24,132
	out 0x26,R24
	.dbline 55
;  TCCR1A = 0x00;
	out 0x2f,R2
	.dbline 56
;  TCCR1B = 0x05; //start Timer
	ldi R24,5
	out 0x2e,R24
	.dbline -2
	.dbline 57
; }
L19:
	.dbline 0 ; func end
	ret
	.dbend
	.area vector(rom, abs)
	.org 16
	rjmp _timer1_ovf_isr
	.area text(rom, con, rel)
	.dbfile D:\job\avrtest\web\example\eeprom\eeprom.c
	.dbfunc e timer1_ovf_isr _timer1_ovf_isr fV
	.even
_timer1_ovf_isr::
	rcall push_lset
	.dbline -1
	.dbline 61
; 
; #pragma interrupt_handler timer1_ovf_isr:9
; void timer1_ovf_isr(void)
; {
	.dbline 63
;  //TIMER1 has overflowed
;  TCNT1H = 0xE1; //reload counter high value
	ldi R24,225
	out 0x2d,R24
	.dbline 64
;  TCNT1L = 0x7C; //reload counter low value
	ldi R24,124
	out 0x2c,R24
	.dbline 65
;  if(++s == 60){
	lds R24,_s
	subi R24,255    ; addi 1
	mov R2,R24
	sts _s,R2
	cpi R24,60
	brne L21
	.dbline 65
	.dbline 66
;    s = 0;
	clr R2
	sts _s,R2
	.dbline 67
;    if(++m == 60) m = 0;
	lds R24,_m
	subi R24,255    ; addi 1
	mov R2,R24
	sts _m,R2
	cpi R24,60
	brne L23
	.dbline 67
	clr R2
	sts _m,R2
L23:
	.dbline 68
;  }
L21:
	.dbline 69
;  EEPROMwrite(1,s);       //  保存时间
	lds R18,_s
	ldi R16,1
	ldi R17,0
	rcall _EEPROMwrite
	.dbline 70
;  EEPROMwrite(2,m);
	lds R18,_m
	ldi R16,2
	ldi R17,0
	rcall _EEPROMwrite
	.dbline 71
;  display[0] = s % 10;    //  刷新显示缓冲
	ldi R17,10
	lds R16,_s
	rcall mod8u
	sts _display,R16
	.dbline 72
;  display[1] = s / 10;
	ldi R17,10
	lds R16,_s
	rcall div8u
	sts _display+1,R16
	.dbline 73
;  display[2] = m % 10;
	ldi R17,10
	lds R16,_m
	rcall mod8u
	sts _display+2,R16
	.dbline 74
;  display[3] = m / 10;
	ldi R17,10
	lds R16,_m
	rcall div8u
	sts _display+3,R16
	.dbline -2
	.dbline 75
; }
L20:
	rcall pop_lset
	.dbline 0 ; func end
	reti
	.dbend
	.dbfunc e init_devices _init_devices fV
	.even
_init_devices::
	.dbline -1
	.dbline 79
; 
; //call this routine to initialise all peripherals
; void init_devices(void)
; {
	.dbline 81
;  //stop errant interrupts until set up
;  CLI(); //disable all interrupts
	cli
	.dbline 82
;  DDRB = 0x01;    //  初始化操作74LS164的管脚
	ldi R24,1
	out 0x17,R24
	.dbline 83
;  DDRD = 0xC0;    //  初始化操作74LS164的管脚
	ldi R24,192
	out 0x11,R24
	.dbline 84
;  timer0_init();
	rcall _timer0_init
	.dbline 85
;  timer1_init();
	rcall _timer1_init
	.dbline 87
; 
;  MCUCR = 0x00;
	clr R2
	out 0x35,R2
	.dbline 88
;  GICR  = 0x00;
	out 0x3b,R2
	.dbline 89
;  TIMSK = 0x05; //timer interrupt sources
	ldi R24,5
	out 0x39,R24
	.dbline 90
;  SEI(); //re-enable interrupts
	sei
	.dbline -2
	.dbline 92
;  //all peripherals are now initialised
; }
L28:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 96
; 
; //
; void main(void)
; {
	.dbline 97
;  init_devices();
	rcall _init_devices
	.dbline 98
;  s = EEPROMread(1);  //  读取时间
	ldi R16,1
	ldi R17,0
	rcall _EEPROMread
	sts _s,R16
	.dbline 99
;  m = EEPROMread(2);
	ldi R16,2
	ldi R17,0
	rcall _EEPROMread
	sts _m,R16
	.dbline 100
;  display[0] = s % 10;    //  刷新显示缓冲
	ldi R17,10
	lds R16,_s
	rcall mod8u
	sts _display,R16
	.dbline 101
;  display[1] = s / 10;
	ldi R17,10
	lds R16,_s
	rcall div8u
	sts _display+1,R16
	.dbline 102
;  display[2] = m % 10;
	ldi R17,10
	lds R16,_m
	rcall mod8u
	sts _display+2,R16
	.dbline 103
;  display[3] = m / 10;
	ldi R17,10
	lds R16,_m
	rcall div8u
	sts _display+3,R16
L33:
	.dbline 104
L34:
	.dbline 104
	rjmp L33
X2:
	.dbline -2
	.dbline 105
;  while(1);
; }
L29:
	.dbline 0 ; func end
	ret
	.dbend
	.area bss(ram, con, rel)
	.dbfile D:\job\avrtest\web\example\eeprom\eeprom.c
_m::
	.blkb 1
	.dbsym e m _m c
_s::
	.blkb 1
	.dbsym e s _s c
_dis::
	.blkb 1
	.dbsym e dis _dis c
_display::
	.blkb 4
	.dbsym e display _display A[4:4]c