From 33613a85afc4b1481367fbe92a17ee59c240250b Mon Sep 17 00:00:00 2001
From: Sven Eisenhauer <sven@sven-eisenhauer.net>
Date: Fri, 10 Nov 2023 15:11:48 +0100
Subject: add new repo

---
 Bachelor/Mikroprozessorsysteme/Praktikum3/P3_2.BAK | 42 ++++++++++++++++++++++
 1 file changed, 42 insertions(+)
 create mode 100644 Bachelor/Mikroprozessorsysteme/Praktikum3/P3_2.BAK

(limited to 'Bachelor/Mikroprozessorsysteme/Praktikum3/P3_2.BAK')

diff --git a/Bachelor/Mikroprozessorsysteme/Praktikum3/P3_2.BAK b/Bachelor/Mikroprozessorsysteme/Praktikum3/P3_2.BAK
new file mode 100644
index 0000000..347d609
--- /dev/null
+++ b/Bachelor/Mikroprozessorsysteme/Praktikum3/P3_2.BAK
@@ -0,0 +1,42 @@
+;Sven Eisenhauer
+;MPS1 Versuch 3 Aufgabe 2
+;14.06.2005
+
+LSTOUT-
+$SFR80515.INC
+LSTOUT+
+
+ORG 0000h
+
+SETB P1.0
+MOV DPTR,#0F803h
+MOV A,#92h
+MOVX @DPTR,A
+MOV DPTR,#0F802h
+
+MOV A,#00h
+MOVX @DPTR,A
+MOV P5,#00h
+MOV R5,#00h
+
+WARTE: JNB P1.0,WARTE
+INC R5
+
+LCALL PORTS
+SJMP WARTE
+
+PORTS:  MOV A,R5
+	CJNE A,#0FFh,CARRY
+CARRY: JC HIGHBYTE
+	MOV P5,R5
+	RET
+HIGHBYTE: MOV A,R5
+	MOVX @DPTR,A
+	RET
+
+SENDSE: MOV SBUF,A
+	CLR TI
+WARTE: JNB TI, WARTE
+	RET
+
+END
-- 
cgit v1.2.3