From 6c7bcf55ecc3f78358136c59238a9bde9c022b0d Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Fri, 6 Jul 2012 01:12:20 -0400
Subject: [PATCH] Added bufflush for the hell of it

---
 scripts/mpldemo.mps | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/scripts/mpldemo.mps b/scripts/mpldemo.mps
index 848855a..7b1c015 100644
--- a/scripts/mpldemo.mps
+++ b/scripts/mpldemo.mps
@@ -13,15 +13,22 @@ Procedure FadeWrite (X, Y: Byte; S: String);
 Begin
   GotoXY (X, Y);
   Write  ('|08' + S);
+  BufFlush;
   Delay  (250);
+  
   GotoXY (X, Y);
   Write  ('|07' + S);
+  BufFlush;
   Delay  (250);
+  
   GotoXY (X, Y);
   Write  ('|15' + S);
+  BufFlush;
   Delay  (250);
+  
   GotoXY (X, Y);
   Write  ('|07' + S);
+  BufFlush;
 End;
 
 Procedure Draw_M (X: Byte);
@@ -32,6 +39,8 @@ Begin
   Write  (' |17|09Б|16|01ллл   л');
   GotoXY (X - 1, 11);
   Write  (' |01лллл   л');
+
+  BufFlush;
 End;
 
 Procedure Draw_P (Y: Byte)
@@ -44,6 +53,8 @@ Begin
   Write  ('|09|17Б|01|16лллмл');
   GotoXY (39, Y + 2);
   Write  ('лллл');
+
+  BufFlush;
 End;
 
 Procedure Draw_L (X : Byte)
@@ -54,6 +65,8 @@ Begin
   Write  ('|09|17Б|01|16ллл ');
   GotoXY (X, 11);
   Write  ('ллллмл ');
+
+  BufFlush;
 End;
 
 Procedure Draw_Animated_Intro;