aboutsummaryrefslogtreecommitdiff
path: root/engines/avalanche/oldincln.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'engines/avalanche/oldincln.cpp')
-rw-r--r--engines/avalanche/oldincln.cpp298
1 files changed, 0 insertions, 298 deletions
diff --git a/engines/avalanche/oldincln.cpp b/engines/avalanche/oldincln.cpp
deleted file mode 100644
index b9b58265bf..0000000000
--- a/engines/avalanche/oldincln.cpp
+++ /dev/null
@@ -1,298 +0,0 @@
-/* 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.
- */
-
-/*
- ÛßÜ ÛßÜ ÜßßÜ ßÛß Ûßß Üß ßÛß ÜßÛßÜ ßÛß ÛÜ Û ÜÛßß ßÛß ÛßÜ Ûßß Û
- Ûß ÛÛ Û Û Ü Û Ûßß ßÜ Û Û Û Û Û Û ÛÜÛ ßßßÜ Û ÛÛ Ûßß Û
- ß ß ß ßß ßß ßßß ß ß ß ß ß ßßß ß ßß ßßß ß ß ß ßßß ßßß
-
- INCLINE The command-line parser. */
-
-#define __incline_implementation__
-
-
-#include "oldincln.h"
-
-#include "gyro.h"
-#include "logger.h"
-
-namespace Avalanche {
-
-const integer bug_twonames = 255;
-const integer bug_pandl = 254;
-const integer bug_weirdswitch = 253;
-const integer bug_invalidini = 252;
-const integer bug_notyesorno = 251;
-
-byte fv;
-char t;
-string bugline;
-boolean usingp, usingl;
-boolean zoomy, numlockhold;
-
-boolean filename_specified;
-
-string inihead, initail; /* For reading the .INI file. */
-
-
-void linebug(byte which) {
- output << "AVALOT : ";
- switch (which) {
- case bug_twonames :
- output << "You may only specify ONE filename." << NL;
- break;
- case bug_pandl :
- output << "/p and /l cannot be used together." << NL;
- break;
- case bug_weirdswitch :
- output << "Unknown switch (\"" << bugline <<
- "\"). Type AVALOT /? for a list of switches." << NL;
- break;
- case bug_invalidini:
- output << "Invalid line in AVALOT.INI (\"" << bugline << "\")" << NL;
- break;
- case bug_notyesorno:
- output << "Error in AVALOT.INI: \"" << inihead << "\" must be \"yes\" or \"no.\"" << NL;
- break;
- }
- exit(which);
-}
-
-void syntax() {
- assign(output, "");
- rewrite(output);
- output << NL;
- output << string("Lord Avalot d'Argent\n\n(c) ") + copyright + " Mark, Mike and Thomas Thurman." << NL;
- output << string("~~~~~~~~~~~~~~~~~~~~~\n\n") + vernum << NL;
- output << NL;
- output << "Syntax:" << NL;
- output << "\n/?\ndisplays this screen," << NL;
- output << "\n/O\noverrides EGA check," << NL;
- output << "\n/L<f>\nlogs progress to <f>, default AVVY.LOG," << NL;
- output << "\n/P<x>\nlogs with Epson codes to <x>, default PRN," << NL;
- output << "\n/Q\ncancels sound effects," << NL;
- output << "\n/S\ndisables Soundblaster," << NL;
- output << "\n/Z\ngoes straight into the game." << NL;
- output << NL;
- output << "\n\n\n\n\n\n\n... Have fun!" << NL;
- exit(177);
-}
-
-void upstr(string &x) {
- byte fv;
- for (fv = 1; fv <= length(x); fv ++) x[fv] = upcase(x[fv]);
-}
-
-boolean yesno() {
- boolean yesno_result;
- if (initail == "YES") yesno_result = true;
- else if (initail == "NO") yesno_result = false;
- else
- linebug(bug_notyesorno);
- return yesno_result;
-}
-
-void ini_parse() {
- upstr(inihead);
- upstr(initail);
-
- if (inihead == "QUIET") soundfx = ! yesno();
- else if (inihead == "ZOOMYSTART") zoomy = yesno();
- else if (inihead == "NUMLOCKHOLD") numlockhold = yesno();
- else if (inihead == "LOADFIRST") filetoload = initail;
- else if (inihead == "OVERRIDEEGACHECK") cl_override = yesno();
- else if (inihead == "KEYBOARDCLICK") keyboardclick = yesno();
-}
-
-void strip_ini() {
- byte fv;
- if (inihead == "") return;
-
- /* Firstly, delete any comments. */
- fv = pos(";", inihead);
- if (fv > 0) Delete(inihead, fv, 255);
-
- /* Lose the whitespace... */
-
- while (inihead[length(inihead)] == ' ') inihead[0] -= 1;
- while ((inihead != "") && (inihead[1] == ' ')) Delete(inihead, 1, 1);
-
- /* It's possible that now we'll end up with a blank line. */
-
- if ((inihead == "") || (inihead[1] == '[')) return;
-
- fv = pos("=", inihead);
-
- if (fv == 0) {
- ; /* No "="! Weird! */
- bugline = inihead;
- linebug(bug_invalidini);
- }
-
- initail = copy(inihead, fv + 1, 255);
- inihead[0] = chr(fv - 1);
-}
-
-void load_ini() {
- text ini;
- assign(ini, "AVALOT.INI");
- reset(ini);
-
- while (! eof(ini)) {
- ini >> inihead >> NL;
- strip_ini();
- if (inihead != "") ini_parse();
- }
-
- close(ini);
-}
-
-void parse(string x);
-static string arg;
-
-static string getarg(string otherwis) {
- string getarg_result;
- if (arg == "") getarg_result = otherwis;
- else getarg_result = "";
- return getarg_result;
-}
-
-void parse(string x)
-
-{
- switch (x[1]) {
- case '/':
- case '-': {
- arg = copy(x, 3, 255);
- switch (upcase(x[2])) {
- case '?':
- syntax();
- break;
- case 'O':
- cl_override = true;
- break;
- case 'L':
- if (! usingp) {
- log_setup(getarg("avvy.log"), false);
- usingl = true;
- } else {
- close(logfile);
- linebug(bug_pandl);
- }
- break;
- case 'P':
- if (! usingl) {
- log_setup(getarg("prn"), true);
- usingp = true;
- } else {
- close(logfile);
- linebug(bug_pandl);
- }
- break;
- case 'Q':
- soundfx = false;
- break;
- case 'Z':
- zoomy = true;
- break;
- case 'K':
- keyboardclick = true;
- break;
- case 'D':
- demo = true;
- break;
- default: {
- bugline = x;
- linebug(bug_weirdswitch);
- }
- }
- }
- break;
- case '*': {
- inihead = copy(x, 2, 255);
- strip_ini();
- if (inihead != "") ini_parse();
- }
- break;
- default: {
- ; /* filename */
- if (filename_specified)
- linebug(bug_twonames);
- else
- filetoload = x;
- filename_specified = true;
- }
- }
-}
-
-void not_through_bootstrap() {
- output << "Avalot must be loaded through the bootstrap." << NL;
- exit(0);
-}
-
-void get_storage_addr() {
- integer e;
-
- val(paramstr(2), storage_seg, e);
- if (e != 0) not_through_bootstrap();
- val(paramstr(3), storage_ofs, e);
- if (e != 0) not_through_bootstrap();
- skellern = storage_ofs + 1;
-}
-
-class unit_incline_initialize {
-public:
- unit_incline_initialize();
-};
-static unit_incline_initialize incline_constructor;
-
-unit_incline_initialize::unit_incline_initialize() {
- filetoload = "";
- usingl = false;
- usingp = false;
- logging = false;
- cl_override = false;
- soundfx = true;
- zoomy = false;
- numlockhold = false;
- filename_specified = false;
- keyboardclick = false;
-
- load_ini();
-
- if ((paramcount < 3) ||
- ((paramstr(1) != "Go") && (paramstr(1) != "et"))) not_through_bootstrap();
-
- reloaded = paramstr(1) == "et";
-
- get_storage_addr();
-
- for (fv = 4; fv <= paramcount; fv ++)
- parse(paramstr(fv));
-}
-
-} // End of namespace Avalanche. \ No newline at end of file