main.s

环保型IC卡门禁系统的C程序

	.module main.c
	.area text(rom, con, rel)
	.dbfile D:\PROGRA~1\ICC\Pro(AVR)\环保型IC卡门禁系统\main.c
	.dbfunc e port_init _port_init fV
	.even
_port_init::
	.dbline -1
	.dbline 7
; #include <iom8v.h>
; #include <macros.h>
; #include "lcd1602.h"
; 
; //端口初始化
; void port_init(void)
; {                    //  IR_receiver ----- PB0
	.dbline 8
;  PORTB = 0x02;       //  LCD_D7~D4   ----- PB7~pB4
	ldi R24,2
	out 0x18,R24
	.dbline 9
;  DDRB  = 0xfd;       //  LCD_EN      ----- PC0
	ldi R24,253
	out 0x17,R24
	.dbline 10
;  PORTC = 0x00;       //  LCD_RS      ----- PC1
	clr R2
	out 0x15,R2
	.dbline 11
;  DDRC  = 0xff;       //  SW1       ----- PD1
	ldi R24,255
	out 0x14,R24
	.dbline 12
;  PORTD = 0x0f;       //  SW2       ----- PD0
	ldi R24,15
	out 0x12,R24
	.dbline 13
;  DDRD  = 0xf0;       //  LCD_RW      ----- GND      
	ldi R24,240
	out 0x11,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e menu_Init _menu_Init fV
;       Total_ge -> R20
;      Total_shi -> R22
;          Total -> R10
	.even
_menu_Init::
	rcall push_gset3
	sbiw R28,2
	.dbline -1
	.dbline 17
; }
; 
; void menu_Init(void)
; {  
	.dbline 18
;   unsigned char Total = 0 , Total_shi = 0 , Total_ge = 0 ;
	clr R10
	.dbline 18
	clr R22
	.dbline 18
	clr R20
	.dbline 20
;   
;   LCD_init();   //  液晶初始化
	rcall _LCD_init
	.dbline 21
;   delay_nms(2);
	ldi R16,2
	ldi R17,0
	rcall _delay_nms
	.dbline 23
; 
;   Total = EEPROM_read(511) ;
	ldi R16,511
	ldi R17,1
	rcall _EEPROM_read
	mov R10,R16
	.dbline 24
;   Total_shi = ( Total / 10 ) ;
	ldi R17,10
	rcall div8u
	mov R22,R16
	.dbline 25
;   Total_ge  = ( Total % 10 ) ;
	ldi R17,10
	mov R16,R10
	rcall mod8u
	mov R20,R16
	.dbline 27
;   
;   LCD_write_string(1,0,"Jason  Janitor");
	ldi R24,<L3
	ldi R25,>L3
	std y+1,R25
	std y+0,R24
	clr R18
	ldi R16,1
	rcall _LCD_write_string
	.dbline 28
;   LCD_write_string(2,1,"Total :   /83");
	ldi R24,<L4
	ldi R25,>L4
	std y+1,R25
	std y+0,R24
	ldi R18,1
	ldi R16,2
	rcall _LCD_write_string
	.dbline 29
;   display( Total_shi , 26 );                                                                                                                                                            
	ldi R18,26
	mov R16,R22
	rcall _display
	.dbline 30
;   display( Total_ge  , 27 );
	ldi R18,27
	mov R16,R20
	rcall _display
	.dbline 32
;   
;   Menu_flag  = 0 ; 
	clr R2
	sts _Menu_flag,R2
	.dbline 33
;   Wrong_flag  = 0 ; 
	sts _Wrong_flag,R2
	.dbline 34
;   Exist_flag  = 0 ;
	sts _Exist_flag,R2
	rjmp L6
L5:
	.dbline 37
;   
;   while(1)
;   {
	.dbline 38
;     if(IC_SW==0)
	in R24,0x10
	andi R24,8
	out 0x10,R24
	tst R24
	brne L8
	.dbline 39
; 	{
	.dbline 40
;       delay_nms(50);               //   检测是否有卡插入
	ldi R16,50
	ldi R17,0
	rcall _delay_nms
	.dbline 41
; 	  if(IC_SW==0)
	in R24,0x10
	andi R24,8
	out 0x10,R24
	tst R24
	brne L10
	.dbline 42
; 	  { 
	.dbline 43
; 	    Read_Card();      //  读IC-Card 函数
	rcall _Read_Card
	.dbline 44
; 		Card_Verify();
	rcall _Card_Verify
	.dbline 45
;       }
L10:
	.dbline 46
; 	}
L8:
	.dbline 48
	rcall _Menu
	.dbline 49
L6:
	.dbline 36
	rjmp L5
X0:
	.dbline -2
L2:
	adiw R28,2
	rcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r Total_ge 20 c
	.dbsym r Total_shi 22 c
	.dbsym r Total 10 c
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 54
; 	
; 	Menu();
;   }
; }
; 
; 
; void main (void)
; {
	.dbline 55
;   port_init();   //  端口初始化
	rcall _port_init
	.dbline 57
;   
;   delay_nms(1);
	ldi R16,1
	ldi R17,0
	rcall _delay_nms
	.dbline 59
;   
;   menu_Init();
	rcall _menu_Init
	.dbline -2
L12:
	.dbline 0 ; func end
	ret
	.dbend
	.area data(ram, con, rel)
	.dbfile D:\PROGRA~1\ICC\Pro(AVR)\环保型IC卡门禁系统\main.c
L4:
	.blkb 14
	.area idata
	.byte 'T,'o,'t,'a,'l,32,58,32,32,32,47,56,51,0
	.area data(ram, con, rel)
	.dbfile D:\PROGRA~1\ICC\Pro(AVR)\环保型IC卡门禁系统\main.c
L3:
	.blkb 15
	.area idata
	.byte 'J,'a,'s,'o,'n,32,32,'J,'a,'n,'i,'t,'o,'r,0
	.area data(ram, con, rel)
	.dbfile D:\PROGRA~1\ICC\Pro(AVR)\环保型IC卡门禁系统\main.c