From d4c175e4197729d1a436adf0e777614698c18bdf Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Mon, 13 Feb 2012 18:57:52 -0500
Subject: [PATCH] Initial import

---
 mdl/m_types.pas | 54 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 54 insertions(+)
 create mode 100644 mdl/m_types.pas

diff --git a/mdl/m_types.pas b/mdl/m_types.pas
new file mode 100644
index 0000000..44e8d50
--- /dev/null
+++ b/mdl/m_types.pas
@@ -0,0 +1,54 @@
+{
+  Mystic Software Development Library
+  ===========================================================================
+  File    | M_TYPES.PAS
+  Desc    | Common types used throughout the development library.
+  Created | August 22, 2002
+  ---------------------------------------------------------------------------
+}
+
+Unit m_Types;
+
+{$I M_OPS.PAS}
+
+Interface
+
+{$IFDEF WINDOWS}
+Uses
+  Windows;
+{$ENDIF}
+
+Const
+  {$IFDEF UNIX}
+    PathSep = '/';
+  {$ELSE}
+    PathSep = '\';
+  {$ENDIF}
+
+Type
+  TMenuFormFlagsRec = Set of 1..26;
+
+  {$IFNDEF WINDOWS}
+  TCharInfo = Record
+    Attributes  : Byte;
+    UnicodeChar : Char;
+  End;
+  {$ENDIF}
+
+  TConsoleLineRec   = Array[1..80] of TCharInfo;
+  TConsoleScreenRec = Array[1..50] of TConsoleLineRec;
+
+  TConsoleImageRec  = Record
+    Data    : TConsoleScreenRec;
+    CursorX : Byte;
+    CursorY : Byte;
+    CursorA : Byte;
+    X1      : Byte;
+    X2      : Byte;
+    Y1      : Byte;
+    Y2      : Byte;
+  End;
+
+Implementation
+
+End.