mirror of
https://github.com/libretro/scummvm.git
synced 2024-12-22 09:49:11 +00:00
158 lines
4.1 KiB
C++
158 lines
4.1 KiB
C++
/* 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 file is based on WME Lite.
|
|
* http://dead-code.org/redir.php?target=wmelite
|
|
* Copyright (c) 2011 Jan Nedoma
|
|
*/
|
|
|
|
#include "dcgf.h"
|
|
#include "AdScaleLevel.h"
|
|
#include "BParser.h"
|
|
#include "BDynBuffer.h"
|
|
#include "BGame.h"
|
|
#include "BFileManager.h"
|
|
|
|
namespace WinterMute {
|
|
|
|
IMPLEMENT_PERSISTENT(CAdScaleLevel, false)
|
|
|
|
//////////////////////////////////////////////////////////////////////////
|
|
CAdScaleLevel::CAdScaleLevel(CBGame *inGame): CBObject(inGame) {
|
|
_posY = 0;
|
|
_scale = 100;
|
|
}
|
|
|
|
|
|
//////////////////////////////////////////////////////////////////////////
|
|
CAdScaleLevel::~CAdScaleLevel() {
|
|
|
|
}
|
|
|
|
|
|
//////////////////////////////////////////////////////////////////////////
|
|
HRESULT CAdScaleLevel::LoadFile(const char *Filename) {
|
|
byte *Buffer = Game->_fileManager->ReadWholeFile(Filename);
|
|
if (Buffer == NULL) {
|
|
Game->LOG(0, "CAdScaleLevel::LoadFile failed for file '%s'", Filename);
|
|
return E_FAIL;
|
|
}
|
|
|
|
HRESULT ret;
|
|
|
|
_filename = new char [strlen(Filename) + 1];
|
|
strcpy(_filename, Filename);
|
|
|
|
if (FAILED(ret = LoadBuffer(Buffer, true))) Game->LOG(0, "Error parsing SCALE_LEVEL file '%s'", Filename);
|
|
|
|
|
|
delete [] Buffer;
|
|
|
|
return ret;
|
|
}
|
|
|
|
|
|
TOKEN_DEF_START
|
|
TOKEN_DEF(SCALE_LEVEL)
|
|
TOKEN_DEF(TEMPLATE)
|
|
TOKEN_DEF(Y)
|
|
TOKEN_DEF(SCALE)
|
|
TOKEN_DEF(EDITOR_PROPERTY)
|
|
TOKEN_DEF_END
|
|
//////////////////////////////////////////////////////////////////////////
|
|
HRESULT CAdScaleLevel::LoadBuffer(byte *Buffer, bool Complete) {
|
|
TOKEN_TABLE_START(commands)
|
|
TOKEN_TABLE(SCALE_LEVEL)
|
|
TOKEN_TABLE(TEMPLATE)
|
|
TOKEN_TABLE(Y)
|
|
TOKEN_TABLE(SCALE)
|
|
TOKEN_TABLE(EDITOR_PROPERTY)
|
|
TOKEN_TABLE_END
|
|
|
|
byte *params;
|
|
int cmd;
|
|
CBParser parser(Game);
|
|
|
|
if (Complete) {
|
|
if (parser.GetCommand((char **)&Buffer, commands, (char **)¶ms) != TOKEN_SCALE_LEVEL) {
|
|
Game->LOG(0, "'SCALE_LEVEL' keyword expected.");
|
|
return E_FAIL;
|
|
}
|
|
Buffer = params;
|
|
}
|
|
|
|
while ((cmd = parser.GetCommand((char **)&Buffer, commands, (char **)¶ms)) > 0) {
|
|
switch (cmd) {
|
|
case TOKEN_TEMPLATE:
|
|
if (FAILED(LoadFile((char *)params))) cmd = PARSERR_GENERIC;
|
|
break;
|
|
|
|
case TOKEN_Y:
|
|
parser.ScanStr((char *)params, "%d", &_posY);
|
|
break;
|
|
|
|
case TOKEN_SCALE: {
|
|
int i;
|
|
parser.ScanStr((char *)params, "%d", &i);
|
|
_scale = (float)i;
|
|
}
|
|
break;
|
|
|
|
case TOKEN_EDITOR_PROPERTY:
|
|
ParseEditorProperty(params, false);
|
|
break;
|
|
}
|
|
}
|
|
if (cmd == PARSERR_TOKENNOTFOUND) {
|
|
Game->LOG(0, "Syntax error in SCALE_LEVEL definition");
|
|
return E_FAIL;
|
|
}
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
|
|
//////////////////////////////////////////////////////////////////////////
|
|
HRESULT CAdScaleLevel::SaveAsText(CBDynBuffer *Buffer, int Indent) {
|
|
Buffer->PutTextIndent(Indent, "SCALE_LEVEL {\n");
|
|
Buffer->PutTextIndent(Indent + 2, "Y=%d\n", _posY);
|
|
Buffer->PutTextIndent(Indent + 2, "SCALE=%d\n", (int)_scale);
|
|
CBBase::SaveAsText(Buffer, Indent + 2);
|
|
Buffer->PutTextIndent(Indent, "}\n");
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
|
|
//////////////////////////////////////////////////////////////////////////
|
|
HRESULT CAdScaleLevel::Persist(CBPersistMgr *PersistMgr) {
|
|
|
|
CBObject::Persist(PersistMgr);
|
|
|
|
PersistMgr->Transfer(TMEMBER(_scale));
|
|
|
|
return S_OK;
|
|
}
|
|
|
|
} // end of namespace WinterMute
|