训练项目三：跑马灯.s

长沙理工自己的实验程序

	.module _训练项目三：跑马灯.c
	.area text(rom, con, rel)
;              i -> R20,R21
;         voi49d -> <dead>
	.even
_delay_1ms::
	st -y,r17
	st -y,r16
	st -y,R20
	st -y,R21
; /****************************************************************************
; ** File Name:          跑马灯
; ** Createed By:        Wangchangsong
; ** Create Date:        07/25/2008
; ** Version:            1.0
; ** Descriptions:       led display
; **
; **---------------------------------------------------------------------------
; ** Modified By:
; ** Modified Date:
; ** Version:
; ** Descriptions:
; **
; ****************************************************************************/
; 
; #include <iom128v.h>
; 
; 
; /****************************************************************************
; ** Function Name:      delay_1ms       
; ** Descriptions:       delay time
; ** Input Parameters:   void
; ** Output parameters:  void
; ** Returned Value:     void
; **---------------------------------------------------------------------------
; ****************************************************************************/
; 
; void delay_1ms(voi49d)                     /* 延时                          */                
; { 
;     unsigned int i;
; 	
;     for (i = 0;i < 2260;i++);
	clr R20
	clr R21
	xjmp L5
L2:
L3:
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	cpi R20,212
	ldi R30,8
	cpc R21,R30
	brlo L2
X0:
L1:
	.dbline 0 ; func end
	ld R21,y+
	ld R20,y+
	adiw R28,2
	ret
;              i -> R20,R21
;         uiTime -> R10,R11
	.even
_delay_nms::
	xcall push_xgset300C
	movw R10,R16
; }
; 
; /****************************************************************************
; ** Function Name:      delay_nms       
; ** Descriptions:       delay time
; ** Input Parameters:   uiTime
; ** Output parameters:  void
; ** Returned Value:     void
; **---------------------------------------------------------------------------
; ****************************************************************************/  
; 
; void delay_nms(unsigned int uiTime)        /* 延时                         */   
; {  
;     unsigned int i = 0;
	clr R20
	clr R21
; 
;     for (i = 0;i < uiTime;i++)
	xjmp L10
L7:
;     delay_1ms();
	xcall _delay_1ms
L8:
	subi R20,255  ; offset = 1
	sbci R21,255
L10:
	cp R20,R10
	cpc R21,R11
	brlo L7
X1:
L6:
	.dbline 0 ; func end
	xjmp pop_xgset300C
;              i -> R10,R11
	.even
_LED_On::
	st -y,R10
	st -y,R11
	movw R10,R16
; }
; 
; /****************************************************************************
; ** Function Name:      timeDelay       
; ** Descriptions:       delay time
; ** Input Parameters:   uiTime
; ** Output parameters:  void
; ** Returned Value:     void
; **---------------------------------------------------------------------------
; ****************************************************************************/
; 
; void LED_On(int i)
; {	
;     PORTB = ~(1<<i);	                  /* 将1左移i位，取反，LED低电平有效 */
	ldi R16,1
	ldi R17,0
	movw R18,R10
	xcall lsl16
	movw R2,R16
	com R2
	com R3
	out 0x18,R2
; 	delay_nms(100);
	ldi R16,100
	ldi R17,0
	xcall _delay_nms
L11:
	.dbline 0 ; func end
	ld R11,y+
	ld R10,y+
	ret
;              i -> R20,R21
	.even
_main::
; }
; 
; /****************************************************************************
; ** Function Name:      main      
; ** Descriptions:       led display 
; ** Input Parameters:   void
; ** Output parameters:  void
; ** Returned Value:     void
; **---------------------------------------------------------------------------
; ****************************************************************************/
; 
; void main()
; {	
;     int i;
;     DDRB = 0xFF;                           /* B口作输出                      */
	ldi R24,255
	out 0x17,R24
; 	PORTB = 0xFF;	                       /* B口初始化为1                   */
	out 0x18,R24
	xjmp L14
L13:
; 	
; 	while (1)                              /* 死循环                         */
;     {	
;         for (i = 0; i < 8; i++)
	clr R20
	clr R21
L16:
; 			LED_On(i);
	movw R16,R20
	xcall _LED_On
L17:
	subi R20,255  ; offset = 1
	sbci R21,255
	cpi R20,8
	ldi R30,0
	cpc R21,R30
	brlt L16
X2:
; 	    for (i = 8; i > 0; i--)
	ldi R20,8
	ldi R21,0
L20:
; 			LED_On(i);
	movw R16,R20
	xcall _LED_On
L21:
	subi R20,1
	sbci R21,0
	clr R2
	clr R3
	cp R2,R20
	cpc R3,R21
	brlt L20
X3:
; 	    for (i = 0; i < 8; i += 2)
	clr R20
	clr R21
L24:
; 			LED_On(i);
	movw R16,R20
	xcall _LED_On
L25:
	subi R20,254  ; offset = 2
	sbci R21,255
	cpi R20,8
	ldi R30,0
	cpc R21,R30
	brlt L24
X4:
; 	    for (i = 7; i > 0; i -= 2)
	ldi R20,7
	ldi R21,0
L28:
; 			LED_On(i);
	movw R16,R20
	xcall _LED_On
L29:
	subi R20,2
	sbci R21,0
	clr R2
	clr R3
	cp R2,R20
	cpc R3,R21
	brlt L28
X5:
; 	}
L14:
	xjmp L13
X6:
L12:
	.dbline 0 ; func end
	ret
; }
; 
; /****************************************************************************
;  END FILE
; ****************************************************************************/