led.lst

系统采用SONIX单片机作为控制核心

     1  000000             ;***********************************************************************************************
     2  000000             ;File name	:led.asm
     3  000000             ;Author		:bili
     4  000000             ;Purpose	:Training
     5  000000             ;Data		:2/8/2007
     6  000000             ;Dscription	:led driver				
     7  000000             ;Version:	v1.1
     8  000000             ;Hardware&IDE:	m2 1.14
     9  000000             ;Copyright(C).SONIX TECHNOLOGY CO.,Ltd.		   
    10  000000             ;*************************************************************************************************
    11  000000             ;led左移
    12  000000             ;shift left the 4 led,,when key was pressed,the rightledbuf must inital to 10h
    13  000000             mn_led:
    14  000000             	call	sl_led
    15  000000             	call	sr_led
    16  000000             	call	slr_led
    17  000000             	call	addspeed
    18  000000             	call	subspeed	
    19  000000             	ret
    20  000000             	
    21  000000             sl_led:
    22  000000             	b0mov	a,leftledbuf
    23  000000             	mov	p2,a
    24  000000             	b0bts1	fleftled
    25  000000             	jmp	sl_led90
    26  000000             	b0bclr	frightled
    27  000000             	b0bclr	flrled
    28  000000             	b0bts1  timeout
    29  000000             	jmp	sl_led90
    30  000000             	b0bclr	timeout
    31  000000             	rlc	leftledbuf
    32  000000             	mov	a,leftledbuf
    33  000000             	mov	p2,a
    34  000000             	cmprs	a,#80h
    35  000000             	jmp 	sl_led90
    36  000000             	mov	a,#10h
    37  000000             sl_led90:
    38  000000             	b0mov	leftledbuf,a
    39  000000             	ret	
    40  000000             	
    41  000000             
    42  000000             	
    43  000000             	
    44  000000             
    45  000000             ;shift right the 4 led,,when key was pressed,the rightledbuf must inital to 80h
    46  000000             sr_led:
    47  000000             	b0mov	a,rightledbuf
    48  000000             	mov	p2,a
    49  000000             	b0bts1	frightled
    50  000000             	jmp	sr_led90
    51  000000             	b0bclr	fleftled
    52  000000             	b0bclr	flrled
    53  000000             	b0bts1  timeout
    54  000000             	jmp	sr_led90
    55  000000             	b0bclr	timeout
    56  000000             	rrc	rightledbuf
    57  000000             	cmprs	a,#10h
    58  000000             	jmp 	sl_led90
    59  000000             	mov	a,#80h
    60  000000             sr_led90:
    61  000000             	b0mov	rightledbuf,a
    62  000000             	ret
    63  000000             
    64  000000             ;shift right and left the 4 led,,when key was pressed,the rightledbuf must inital to 60h
    65  000000             ;led两边移动
    66  000000             slr_led:
    67  000000             	b0mov	a,lrledbuf
    68  000000             	mov	p2,a
    69  000000             	b0bts1	flrled
    70  000000             	jmp	slr_led90
    71  000000             	b0bclr	fleftled
    72  000000             	b0bclr	frightled
    73  000000             	b0bts1  timeout
    74  000000             	jmp	slr_led90
    75  000000             	b0bclr	timeout
    76  000000             	mov	a,#90h
    77  000000             	mov	p2,a
    78  000000             slr_led90:
    79  000000             	b0mov	lrledbuf,a
    80  000000             	ret
    81  000000             
    82  000000             
    83  000000             ;加速度
    84  000000             addspeed:
    85  000000             	b0mov	a,delayvalue
    86  000000             	b0bts1	addledflag
    87  000000             	jmp	addspeed90
    88  000000             
    89  000000             	b0bclr	subledflag
    90  000000             	cmprs	a,#28h
    91  000000             	jmp	addspeed10
    92  000000             	mov	delayvalbuf,a
    93  000000             	jmp	addspeed90
    94  000000             	
    95  000000             addspeed10:
    96  000000             	sub	a,subdelayval
    97  000000             	b0mov	delayvalbuf,a
    98  000000             addspeed90:
    99  000000             	ret
   100  000000             
   101  000000             ;减速度
   102  000000             subspeed:
   103  000000             	b0mov	a,delayvalue
   104  000000             	b0bts1	subledflag
   105  000000             	jmp	subspeed90
   106  000000             	b0bclr	addledflag
   107  000000             	cmprs	a,#3ch
   108  000000             	jmp	subspeed10
   109  000000             	mov	a,#3ch
   110  000000             	mov	delayvalbuf,a
   111  000000             	jmp	subspeed90
   112  000000             subspeed10:
   113  000000             	add	a,adddelayval
   114  000000             	b0mov	delayvalbuf,a
   115  000000             subspeed90:
   116  000000             	ret
   117  000000             	
   118  000000             	
   119  000000             
   120  000000             
   121  000000             	
   122  000000             
   123  000000