From e16b4f4a3497b4431d1fba2a8f90b960283f8ed9 Mon Sep 17 00:00:00 2001
From: davidly <davidly_lee@hotmail.com>
Date: Tue, 2 Jul 2024 07:58:57 -0700
Subject: [PATCH] add interpreter script

---
 Microsoft QuickBASIC v4/SIEVE.BAS | 2 ++
 Microsoft QuickBASIC v4/mi.bat    | 2 ++
 2 files changed, 4 insertions(+)
 create mode 100644 Microsoft QuickBASIC v4/mi.bat

diff --git a/Microsoft QuickBASIC v4/SIEVE.BAS b/Microsoft QuickBASIC v4/SIEVE.BAS
index ee54d72..e5439bb 100644
--- a/Microsoft QuickBASIC v4/SIEVE.BAS	
+++ b/Microsoft QuickBASIC v4/SIEVE.BAS	
@@ -18,3 +18,5 @@
 18 NEXT I%
 19 NEXT X%
 20 PRINT COUNT%," PRIMES"
+21 SYSTEM
+
diff --git a/Microsoft QuickBASIC v4/mi.bat b/Microsoft QuickBASIC v4/mi.bat
new file mode 100644
index 0000000..2e357c2
--- /dev/null
+++ b/Microsoft QuickBASIC v4/mi.bat	
@@ -0,0 +1,2 @@
+ntvdm -r:. -c -p QB /RUN %1.BAS
+