From 1d950021b818cb1bc6348d0bdac615493b2c4260 Mon Sep 17 00:00:00 2001 From: uruk Date: Thu, 27 Jun 2013 09:06:46 +0200 Subject: AVALANCHE: Add Pingo. --- engines/avalanche/pingo2.cpp | 114 +++++++++++++++++++++++++++++++++++++++++++ engines/avalanche/pingo2.h | 58 ++++++++++++++++++++++ 2 files changed, 172 insertions(+) create mode 100644 engines/avalanche/pingo2.cpp create mode 100644 engines/avalanche/pingo2.h diff --git a/engines/avalanche/pingo2.cpp b/engines/avalanche/pingo2.cpp new file mode 100644 index 0000000000..1311c65b56 --- /dev/null +++ b/engines/avalanche/pingo2.cpp @@ -0,0 +1,114 @@ +/* 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. + */ + +/* PINGO Full-screen sub-parts of the game. */ + +#include "avalanche/pingo2.h" + +#include "avalanche/gyro2.h" +#include "avalanche/lucerna2.h" +#include "avalanche/trip6.h" +#include "avalanche/scrolls2.h" + +#include "common/textconsole.h" + +namespace Avalanche { + + namespace Pingo { + + void dplot(int16 x, int16 y, Common::String z) { + warning("STUB: Pingo::dplot()"); + } + + void bosskey() { + /*const + months : array[0..11] of char = 'JFMAMJJASOND'; + title = 'Net Profits'; + fish = #224; { à } + var fv:byte; gd,gm:int16; r:char; + begin; + dusk; delavvy; + setactivepage(3); mousepage(3); setvisualpage(3); off; + cleardevice; setfillstyle(xhatchfill,11); + settextstyle(1,0,4); settextjustify(1,1); + dplot(320,10,title); + settextstyle(1,0,0); setusercharsize(4,3,7,12); + for fv:=0 to 11 do + begin; + dplot(26+fv*52,187,months[fv]); + bar(fv*52,177-fv*14,51+fv*52,180); + rectangle(fv*52,177-fv*14,51+fv*52,180); + end; + settextstyle(0,0,1); + for fv:=1 to 177 do + begin; + gd:=random(630); gm:=random(160)+30; + setcolor(lightred); outtextxy(gd ,gm ,fish); + setcolor(yellow); outtextxy(gd+1,gm-1,fish); + end; + newpointer(6); { TTHand } + dawn; on; setbkcolor(1); repeat check until (mpress>0) or keypressed; + while keypressed do r:=readkey; setbkcolor(0); settextjustify(0,0); + dusk; setvisualpage(0); setactivepage(0); mousepage(0); dawn; + copy02;*/ + + warning("STUB: Pingo::bosskey()"); + } + + void copy02() { /* taken from Wobble (below) */ + warning("STUB: Pingo::copy02()"); + } + + void copy03() { /* taken from Wobble (below) */ + warning("STUB: Pingo::copy03()"); + } + + void copypage(byte frp, byte top) { /* taken from Copy02 (above) */ + warning("STUB: Pingo::copypage()"); + } + + void wobble() { + warning("STUB: Pingo::wobble()"); + } + + void zonk(); + + static void zl(int16 x1, int16 y1, int16 x2, int16 y2) { + warning("STUB: Pingo::zl()"); + } + + void zonk() { + warning("STUB: Pingo::zonk()"); + } + + void winning_pic() { + warning("STUB: Pingo::winning_pic()"); + } + + } // End of namespace Pingo. + +} // End of namespace Avalanche. diff --git a/engines/avalanche/pingo2.h b/engines/avalanche/pingo2.h new file mode 100644 index 0000000000..10b9511f5e --- /dev/null +++ b/engines/avalanche/pingo2.h @@ -0,0 +1,58 @@ +/* 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. + */ + +/* PINGO Full-screen sub-parts of the game. */ + +#ifndef PINGO2_H +#define PINGO2_H + +#include "common/scummsys.h" + + +namespace Avalanche { + + namespace Pingo { + + void bosskey(); + + void copy02(); + + void copy03(); + + void copypage(byte frp, byte top); + + void wobble(); + + void zonk(); + + void winning_pic(); + + } // End of namespace Pingo. + +} // End of namespace Avalanche. + +#endif // PINGO2_H -- cgit v1.2.3