Lars 1s
2006-06-30 12:32:21

code at 0
include c51rd2.inc

		LEDs data p2
		sjmp init
		
		org 00Bh
		mov TL0,#0F0h
		mov TH0,#0D8h
		dec r0
		mov a,r0
		jz zaehlen
rueck:		
		reti

init:		
		setb ET0
		setb EA
		mov TMOD,#00000001b
		mov TCON,#00010000b
		mov TL0,#0F0h
		mov TH0,#0D8h
		mov r0,#64h
		mov r1,#10000000b
		mov LEDs,r1
		
haupt:
		sjmp haupt

zaehlen:
		mov a,r1
		rr a
		mov r1,a
		mov LEDs,r1
		mov r0,#0fa0h
		sjmp rueck