1 files changed, 82 insertions, 0 deletions
diff --git a/engines/avalanche/parser.cpp b/engines/avalanche/parser.cpp
new file mode 100644
index 0000000000..d8cd37a236
--- /dev/null
+++ b/engines/avalanche/parser.cpp
@@ -0,0 +1,82 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the
+ * GNU General Public License for more details.
+
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ */
+
+/*
+ * This code is based on the original source code of Lord Avalot d'Argent version 1.3.
+ * Copyright (c) 1994-1995 Mike, Mark and Thomas Thurman.
+ */
+
+#include "avalanche/avalanche.h"
+#include "avalanche/parser.h"
+
+namespace Avalanche {
+
+Parser::Parser(AvalancheEngine *vm) {
+	_vm = vm;
+}
+
+void Parser::handleInputText(const Common::Event &event) {
+	byte inChar = event.kbd.ascii;
+	if (_vm->_dropdown->ddm_o.menunow) {
+		_vm->_dropdown->parsekey(inChar, _vm->_enhanced->extd);
+	} else {
+		if (inputText.size() < 76) {
+			if ((inChar == '"') || (inChar == '`')) {
+				if (quote)
+					inChar = '`';
+				else
+					inChar = '"';
+				quote = !quote;  // quote - unquote
+			}
+
+			inputText.insertChar(inChar, inputTextPos);
+			inputTextPos++;
+			plotText();
+		} else
+			_vm->_gyro->blip();
+	}
+}
+
+void Parser::plotText() {
+	if (_vm->_gyro->mouse_near_text())
+		_vm->_gyro->super_off();
+
+	_vm->_basher->cursor_off();
+
+	_vm->_graphics->drawBar(24, 161, 640, 169, black); // Black out the line of the text.
+
+	// Draw the text. Similar to chalk(), but here we don't have to bother with the color of the characters.
+	for (byte i = 0; i < _vm->_parser->inputText.size(); i++)
+		for (byte j = 0; j < 8; j++) {
+			byte pixel = _vm->_gyro->characters[_vm->_parser->inputText[i]][j];
+			for (byte bit = 0; bit < 8; bit++) {
+				byte pixelBit = (pixel >> bit) & 1;
+				if (pixelBit != 0)
+					*_vm->_graphics->getPixel(24 + i * 8 + 7 - bit, 161 + j) = white;
+			}
+		}
+
+	_vm->_basher->cursor_on();
+	_vm->_gyro->super_on();
+}
+
+} // End of namespace Avalanche