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

---
 .../Mikroprozessorsysteme1/Praktikum3/P3_1.S03     | 41 ++++++++++++++++++++++
 1 file changed, 41 insertions(+)
 create mode 100644 Bachelor/Mikroprozessorsysteme1/Praktikum3/P3_1.S03

(limited to 'Bachelor/Mikroprozessorsysteme1/Praktikum3/P3_1.S03')

diff --git a/Bachelor/Mikroprozessorsysteme1/Praktikum3/P3_1.S03 b/Bachelor/Mikroprozessorsysteme1/Praktikum3/P3_1.S03
new file mode 100644
index 0000000..75b0e33
--- /dev/null
+++ b/Bachelor/Mikroprozessorsysteme1/Praktikum3/P3_1.S03
@@ -0,0 +1,41 @@
+;Sven Eisenhauer
+;MPS1 Versuch 3 Aufgabe 1
+;14.06.2005
+
+LSTOUT-
+$SFR80515.INC
+LSTOUT+
+
+ORG 0000h
+
+SETB P1.0
+SETB P1.3
+MOV DPTR,#1000h
+
+START: JNB P1.3,OUTPUT
+JNB P1.0,READ
+SJMP START
+
+READ: MOV A,P4
+      MOVX @DPTR,A
+      INC DPTR
+      LCALL SENDSE
+      MOV A,#00h
+      MOVX @DPTR,A
+LOOP: JNB P1.0,LOOP
+      SJMP START
+
+OUTPUT: MOV DPTR,#1000h
+OUTPUT2: MOVX A,@DPTR
+	INC DPTR
+	LCALL SENDSE
+	MOVX A,@DPTR
+	CJNE A,#00h,OUTPUT2
+	LJMP 8000h
+
+SENDSE: MOV SBUF,A
+	CLR TI
+WARTE: JNB TI, WARTE
+	RET
+
+END
-- 
cgit v1.2.3