;Steuerprogramm für Testmodule 

;Verwendete Hardware:
;ESEM 80535 Board, Testboard für LED Modul
;
;Erstellt: Oktober 2001, Klaus Leidinger
;http://www.mikrocontroller-projekte.de

;Letzte Änderung:

;------------------------------------------------------------------------------


;Adressen des LED Ports
LED equ P1

; Start des Programmcodes
          org 0000H      ;Programmstart
        ljmp STARTPROG
          org 0003H      ;Interrupttabelle
        ;ljmp INT0_int   ;Sprungziel fuer Interrupt 0
          org 000BH      ;Sprungziel für Timer0 Interrupt
        ;ljmp Timer0_int
          org 0013H      ;Interrupt 1
        ;ljmp INT1_int   ;Sprungziel fuer Interrupt 1
          org 001BH      ;Interrupt Timer1
        ;ljmp
          org 0023H      ;Interrupt Serial Port
        ;ljmp
          org 0033H      ;Ende der Interrupttabelle

  db "Testprogramm LED Ansteuerung"
  db "Klaus Leidinger 07.10.01"




STARTPROG               ;Start des eigentlichen Programms
        mov  SP,#0DFH   ;Stack setzen

;		mov A,#1		;für Verwendung mit invertierendem 74540
		mov A,#0FEH     ;für Verwendung mit nicht invertierendem 74541
endloop
		mov LED,A
		rl A
		acall delay
        sjmp endloop

                  
delay     mov R6,#8      ;Zeitschleife ohne Verwendung ACC
delay1    mov R5,#0
delay2    mov R4,#0
          djnz R4,$
          djnz R5,delay2
          djnz R6,delay1
          ret

  
;ENDE                    ;letzte Zeile des Programmes