From f755cf54db4d6558b81a9526ed470131fd6de1c4 Mon Sep 17 00:00:00 2001
From: Markus Birth <mbirth@gmail.com>
Date: Fri, 14 Mar 2003 00:44:00 +0100
Subject: [PATCH] Added CM2010.BAS to METEX.

---
 METEX/CM2010.BAS | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 METEX/CM2010.BAS

diff --git a/METEX/CM2010.BAS b/METEX/CM2010.BAS
new file mode 100644
index 0000000..a03ff5d
--- /dev/null
+++ b/METEX/CM2010.BAS
@@ -0,0 +1,11 @@
+10 KEY OFF
+20 CLS
+25 PRINT "™ffne..."
+30 OPEN "com2:9600,N,8,1,rs,cd,ds,cd" AS #1
+35 PRINT "Lese..."
+40 IN$ = INPUT$(34,#1)
+45 PRINT "Gebe aus..."
+50 FOR I=1 TO 34
+60 PRINT ASC(MID$(IN$,I,1));", ";
+70 NEXT
+
\ No newline at end of file