tled.asm

Led控制,这是一个不错的东东,希望对这方面的朋友有帮助

RX                 equ     0x0     ; received packet                   
TX                 equ     0x1     ; transmitted packet                
COLL               equ     0x2     ; collision indicator               
SPEED_C            equ     0x3     ; 100 Mbps                          
SPEED_M            equ     0x4     ; 1000 Mbps                         
DUPLEX             equ     0x5     ; half/full duplex                  
FLOW               equ     0x6     ; flow control capable              
LINKUP             equ     0x7     ; link down/up status               
LINKEN             equ     0x8     ; link disabled/enabled status      
ZERO               equ     0xE     ; always 0                          
ONE                equ     0xF     ; always 1  

test_end 	equ 0xc1
total			equ	28
total_bits	equ 64

begin:
	ld 	A, 0
	ld (test_end), A
loop:
	cmp A,test_end
	jnc link_up
	call link_down
	inc A
	cmp A, total
	jnz	loop
sendto:
    send total_bits  
    	
link_up:
	port A
	pushst    ONE
  pack
  pushst    ZERO
  pack
  
link_down:
	pushst    ONE
  pack
  ret