Unbenannt

$nomod51 ; Der Programmiermodus fr den 8051 wird abgeschaltet
$debug ; Aufnahme der Symboltabelle in den Objektcode
$nolist ; Das Listen nachfolgender Dateien wird unterdrckt
$include(reg535.pdf) ; Header-Datei des 80535 laden
$list ; ab hier wird das Listing wieder ausgefhrt
$title(Programmname) ; Programmnamen eintragen
; Programmbeschreibung
; Hier die Aufgabe und die Funktion des Programms protokollieren
;
; Initialisierungsteil fr allgemeine Konstanten
; Konstanten
;
; Programmcodebeginn
cseg at 0h ; Startadresse des Codesegments
jmp start ; Springe zum Programmcode
;
; Interruptvektoren
;
; Programmcode
org 100h ;Startadresse des Programmcodes
start: ; Sprungmarke
; Ausgang P5.2
MOV C,P1.3
CPL C
ANL C,P1.2
MOV F0,C
MOV C,P1.3
ANL C,/P1.2
ORL C,F0
MOV P5.2,C
; Ausgang P5.1
MOV C,P1.2
ANL C,/P1.1
ANL C,/P1.3
MOV F0,C
MOV C,P1.1
ANL C,/P1.2
ANL C,/P1.3
ORL C,F0
MOV F0,C
MOV C,/P1.1
ANL C,/P1.2
ANL C,P1.3
ORL C,F0
MOV F0,C
MOV C,P1.1
ANL C,P1.2
ANL C,P1.3
ORL C,F0
MOV P5.1,C

;Ausgang P5.0
ret
;
; Unterprogramme und Konstanten im Programmcode
;
end