123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478 |
- /* -*- mode: c; tab-width: 4; c-basic-offset: 3; c-file-style: "linux" -*- */
- //
- // Copyright (c) 2009, Wei Mingzhi <whistler_wmz@users.sf.net>.
- // All rights reserved.
- //
- // This file is part of SDLPAL.
- //
- // SDLPAL 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 3 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, see <http://www.gnu.org/licenses/>.
- //
- // Modified by Lou Yihua <louyihua@21cn.com> with Unicode support, 2015
- //
- #include "main.h"
- #include "resampler.h"
- static GLOBALVARS _gGlobals;
- GLOBALVARS * const gpGlobals = &_gGlobals;
- #if SDL_BYTEORDER == SDL_LIL_ENDIAN
- #define DO_BYTESWAP(buf, size)
- #else
- #define DO_BYTESWAP(buf, size) \
- do { \
- int i; \
- for (i = 0; i < (size) / 2; i++) \
- { \
- ((LPWORD)(buf))[i] = SDL_SwapLE16(((LPWORD)(buf))[i]); \
- } \
- } while(0)
- #endif
- #define LOAD_DATA(buf, size, chunknum, fp) \
- do { \
- PAL_MKFReadChunk((LPBYTE)(buf), (size), (chunknum), (fp)); \
- DO_BYTESWAP(buf, size); \
- } while(0)
- INT
- PAL_InitGlobals(
- VOID
- )
- /*++
- Purpose:
- Initialize global data.
- Parameters:
- [IN] iCodePage - the code page for text conversion.
- [IN] dwWordLength - the length of each word.
- Return value:
- 0 = success, -1 = error.
- --*/
- {
- FILE *fp;
- CODEPAGE iCodePage = CP_BIG5; // Default for BIG5
- DWORD dwExtraMagicDescLines = 0; // Default for PAL DOS/WIN95
- DWORD dwExtraItemDescLines = 0; // Default for PAL DOS/WIN95
- DWORD dwScreenWidth = 0;
- DWORD dwScreenHeight = 0;
- DWORD dwFullScreen = FALSE;
- DWORD dwKeepAspectRatio = TRUE;
- DWORD dwIsDOS = 1; // Default for DOS
- DWORD dwUseEmbeddedFonts = 1; // Default for using embedded fonts in DOS version
- DWORD dwUseSurroundOPL = 1; // Default for using surround opl
- DWORD dwUseStereo = 1; // Default for stereo audio
- float flSurroundOPLOffset = 384.0f;// Default for 384.0
- INT iSampleRate = 44100; // Default for 44100 Hz
- INT iOPLSampleRate = 49716; // Default for 49716 Hz
- INT iResampleQuality = RESAMPLER_QUALITY_MAX; // Default to maximum quality
- INT iAudioBufferSize = PAL_AUDIO_DEFAULT_BUFFER_SIZE;
- INT iVolume = 100; // Default for 100%
- MUSICTYPE eMusicType = MUSIC_RIX;
- MUSICTYPE eCDType = PAL_HAS_SDLCD ? MUSIC_SDLCD : MUSIC_OGG;
- OPLTYPE eOPLType = OPL_DOSBOX;
- if (fp = UTIL_OpenFileForMode("sdlpal.cfg", "r"))
- {
- PAL_LARGE char buf[512];
- //
- // Load the configuration data
- //
- while (fgets(buf, 512, fp) != NULL)
- {
- char *p = buf;
- //
- // Skip leading spaces
- //
- while (*p && isspace(*p)) p++;
- //
- // Skip comments
- //
- if (*p && *p != '#')
- {
- char *ptr;
- if (ptr = strchr(p, '='))
- {
- char *end = ptr - 1;
- *ptr++ = 0;
- //
- // Skip tailing & leading spaces
- //
- while (isspace(*end) && end >= p) *end-- = 0;
- if (SDL_strcasecmp(p, "CODEPAGE") == 0)
- {
- sscanf(ptr, "%d", &iCodePage);
- }
- else if (SDL_strcasecmp(p, "EXTRAMAGICDESCLINES") == 0)
- {
- sscanf(ptr, "%u", &dwExtraMagicDescLines);
- }
- else if (SDL_strcasecmp(p, "EXTRAITEMDESCLINES") == 0)
- {
- sscanf(ptr, "%u", &dwExtraItemDescLines);
- }
- else if (SDL_strcasecmp(p, "DOS") == 0)
- {
- sscanf(ptr, "%u", &dwIsDOS);
- }
- else if (SDL_strcasecmp(p, "USEEMBEDDEDFONTS") == 0)
- {
- sscanf(ptr, "%u", &dwUseEmbeddedFonts);
- }
- else if (SDL_strcasecmp(p, "USESURROUNDOPL") == 0)
- {
- sscanf(ptr, "%u", &dwUseSurroundOPL);
- }
- else if (SDL_strcasecmp(p, "STEREO") == 0)
- {
- sscanf(ptr, "%u", &dwUseStereo);
- }
- else if (SDL_strcasecmp(p, "SAMPLERATE") == 0)
- {
- sscanf(ptr, "%d", &iSampleRate);
- if (iSampleRate > PAL_MAX_SAMPLERATE) iSampleRate = PAL_MAX_SAMPLERATE;
- }
- else if (SDL_strcasecmp(p, "OPLSAMPLERATE") == 0)
- {
- sscanf(ptr, "%d", &iOPLSampleRate);
- }
- else if (SDL_strcasecmp(p, "RESAMPLEQUALITY") == 0)
- {
- sscanf(ptr, "%d", &iResampleQuality);
- }
- else if (SDL_strcasecmp(p, "SURROUNDOPLOFFSET") == 0)
- {
- sscanf(ptr, "%f", &flSurroundOPLOffset);
- }
- else if (SDL_strcasecmp(p, "WINDOWWIDTH") == 0)
- {
- sscanf(ptr, "%u", &dwScreenWidth);
- }
- else if (SDL_strcasecmp(p, "WINDOWHEIGHT") == 0)
- {
- sscanf(ptr, "%u", &dwScreenHeight);
- }
- else if (SDL_strcasecmp(p, "FULLSCREEN") == 0)
- {
- sscanf(ptr, "%u", &dwFullScreen);
- }
- else if (SDL_strcasecmp(p, "KEEPASPECTRATIO") == 0)
- {
- sscanf(ptr, "%u", &dwKeepAspectRatio);
- }
- else if (SDL_strcasecmp(p, "AUDIOBUFFERSIZE") == 0)
- {
- sscanf(ptr, "%d", &iAudioBufferSize);
- if (iAudioBufferSize > 32768)
- iAudioBufferSize = 32768;
- else if (iAudioBufferSize < 2)
- iAudioBufferSize = 2;
- if ((iAudioBufferSize & (iAudioBufferSize - 1)) != 0)
- {
- /* Make sure iAudioBufferSize is power of 2 */
- int n = 0;
- while (iAudioBufferSize) { iAudioBufferSize >>= 1; n++; }
- iAudioBufferSize = 1 << (n - 1);
- }
- }
- else if (SDL_strcasecmp(p, "VOLUME") == 0)
- {
- sscanf(ptr, "%d", &iVolume);
- if (iVolume > 100)
- iVolume = 100;
- else if (iVolume < 0)
- iVolume = 0;
- }
- else if (SDL_strcasecmp(p, "MESSAGEFILENAME") == 0)
- {
- int n = strlen(ptr);
- if (n > 0 && ptr[n - 1] == '\n') ptr[--n] = 0;
- if (n > 0 && ptr[n - 1] == '\r') ptr[--n] = 0;
- if (n > 0) gpGlobals->pszMsgName = strdup(ptr);
- }
- #if USE_RIX_EXTRA_INIT
- else if (SDL_strcasecmp(p, "RIXEXTRAINIT") == 0)
- {
- int n = 1;
- char *p;
- for (p = ptr; *p < *end; p++)
- {
- if (*p == ',')
- n++;
- }
- n &= ~0x1;
- if (n > 0)
- {
- uint32_t *regs = malloc(sizeof(uint32_t) * (n >> 1));
- uint8_t *vals = malloc(sizeof(uint8_t) * (n >> 1));
- uint32_t d, i, v = 1;
- if (regs && vals)
- {
- for (p = ptr, i = 0; *p < *end; p++, i++)
- {
- if (sscanf(p, "%u", ®s[i]) == 0) { v = 0; break; }
- while (*p < *end && *p != ',') p++; p++;
- if (sscanf(p, "%u", &d) == 0) { v = 0; break; }
- while (*p < *end && *p != ',') p++;
- vals[i] = (uint8_t)d;
- }
- if (v)
- {
- gpGlobals->pExtraFMRegs = regs;
- gpGlobals->pExtraFMVals = vals;
- gpGlobals->dwExtraLength = n >> 1;
- }
- else
- {
- free(regs);
- free(vals);
- }
- }
- }
- }
- #endif
- else if (SDL_strcasecmp(p, "CD") == 0)
- {
- char cd_type[32];
- sscanf(ptr, "%31s", cd_type);
- if (PAL_HAS_MP3 && SDL_strcasecmp(cd_type, "MP3") == 0)
- eCDType = MUSIC_MP3;
- else if (PAL_HAS_OGG && SDL_strcasecmp(cd_type, "OGG") == 0)
- eCDType = MUSIC_OGG;
- else if (PAL_HAS_SDLCD && SDL_strcasecmp(cd_type, "RAW") == 0)
- eCDType = MUSIC_SDLCD;
- }
- else if (SDL_strcasecmp(p, "MUSIC") == 0)
- {
- char music_type[32];
- sscanf(ptr, "%31s", music_type);
- if (PAL_HAS_NATIVEMIDI && SDL_strcasecmp(music_type, "MIDI") == 0)
- eMusicType = MUSIC_MIDI;
- else if (PAL_HAS_MP3 && SDL_strcasecmp(music_type, "MP3") == 0)
- eMusicType = MUSIC_MP3;
- else if (PAL_HAS_OGG && SDL_strcasecmp(music_type, "OGG") == 0)
- eMusicType = MUSIC_OGG;
- else if (SDL_strcasecmp(music_type, "RIX") == 0)
- eMusicType = MUSIC_RIX;
- }
- else if (SDL_strcasecmp(p, "OPL") == 0)
- {
- char opl_type[32];
- sscanf(ptr, "%31s", opl_type);
- if (SDL_strcasecmp(opl_type, "DOSBOX") == 0)
- eOPLType = OPL_DOSBOX;
- else if (SDL_strcasecmp(opl_type, "DOSBOXOLD") == 0)
- eOPLType = OPL_DOSBOX_OLD;
- else if (PAL_HAS_MAME && SDL_strcasecmp(opl_type, "MAME") == 0)
- eOPLType = OPL_MAME;
- }
- }
- }
- }
- UTIL_CloseFile(fp);
- }
- //
- // Set configurable global options
- //
- gpGlobals->fIsWIN95 = dwIsDOS ? FALSE : TRUE;
- gpGlobals->fUseEmbeddedFonts = dwIsDOS && dwUseEmbeddedFonts ? TRUE : FALSE;
- gpGlobals->fUseSurroundOPL = dwUseStereo && dwUseSurroundOPL ? TRUE : FALSE;
- gpGlobals->iAudioChannels = dwUseStereo ? 2 : 1;
- gpGlobals->iSampleRate = iSampleRate;
- gpGlobals->iOPLSampleRate = iOPLSampleRate;
- gpGlobals->iResampleQuality = iResampleQuality;
- gpGlobals->dSurroundOPLOffset = flSurroundOPLOffset;
- gpGlobals->eMusicType = eMusicType;
- gpGlobals->eCDType = eCDType;
- gpGlobals->eOPLType = eOPLType;
- gpGlobals->iCodePage = iCodePage;
- gpGlobals->dwWordLength = 10; // This is the default value for Chinese version
- gpGlobals->dwExtraMagicDescLines = dwExtraMagicDescLines;
- gpGlobals->dwExtraItemDescLines = dwExtraItemDescLines;
- gpGlobals->wAudioBufferSize = (WORD)iAudioBufferSize;
- gpGlobals->iVolume = SDL_MIX_MAXVOLUME * iVolume / 100;
- #if defined(NDS) || defined(__SYMBIAN32__) || defined(GEKKO) || defined(PSP) || defined(GEKKO) || defined(GPH) || defined(DINGOO) || defined(__ANDROID__)
- gpGlobals->dwScreenWidth = PAL_DEFAULT_WINDOW_WIDTH;
- gpGlobals->dwScreenHeight = PAL_DEFAULT_WINDOW_HEIGHT;
- #elif defined(__WINPHONE__) || defined(__IOS__)
- if (UTIL_GetScreenSize(&dwScreenWidth, &dwScreenHeight))
- {
- gpGlobals->dwScreenWidth = dwScreenWidth;
- gpGlobals->dwScreenHeight = dwScreenHeight;
- }
- else
- {
- gpGlobals->dwScreenWidth = PAL_DEFAULT_WINDOW_WIDTH;
- gpGlobals->dwScreenHeight = PAL_DEFAULT_WINDOW_HEIGHT;
- }
- #else
- gpGlobals->dwScreenWidth = dwScreenWidth ? dwScreenWidth : PAL_DEFAULT_WINDOW_WIDTH;
- gpGlobals->dwScreenHeight = dwScreenHeight ? dwScreenHeight : (dwFullScreen ? PAL_DEFAULT_FULLSCREEN_HEIGHT : PAL_DEFAULT_WINDOW_HEIGHT);
- #endif
- #if SDL_VERSION_ATLEAST(2,0,0)
- gpGlobals->fKeepAspectRatio = dwKeepAspectRatio ? TRUE : FALSE;
- #else
- gpGlobals->fFullScreen = dwFullScreen ? TRUE : FALSE;
- #endif
- //
- // Set decompress function
- //
- Decompress = gpGlobals->fIsWIN95 ? YJ2_Decompress : YJ1_Decompress;
- //
- // Open files
- //
- gpGlobals->f.fpFBP = UTIL_OpenRequiredFile("fbp.mkf");
- gpGlobals->f.fpMGO = UTIL_OpenRequiredFile("mgo.mkf");
- gpGlobals->f.fpBALL = UTIL_OpenRequiredFile("ball.mkf");
- gpGlobals->f.fpDATA = UTIL_OpenRequiredFile("data.mkf");
- gpGlobals->f.fpF = UTIL_OpenRequiredFile("f.mkf");
- gpGlobals->f.fpFIRE = UTIL_OpenRequiredFile("fire.mkf");
- gpGlobals->f.fpRGM = UTIL_OpenRequiredFile("rgm.mkf");
- gpGlobals->f.fpSSS = UTIL_OpenRequiredFile("sss.mkf");
- gpGlobals->lpObjectDesc = gpGlobals->fIsWIN95 ? NULL : PAL_LoadObjectDesc(va("%s%s", PAL_PREFIX, "desc.dat"));
- gpGlobals->bCurrentSaveSlot = 1;
- return 0;
- }
- VOID
- PAL_FreeGlobals(
- VOID
- )
- /*++
- Purpose:
- Free global data.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- //
- // Close all opened files
- //
- UTIL_CloseFile(gpGlobals->f.fpFBP);
- UTIL_CloseFile(gpGlobals->f.fpMGO);
- UTIL_CloseFile(gpGlobals->f.fpBALL);
- UTIL_CloseFile(gpGlobals->f.fpDATA);
- UTIL_CloseFile(gpGlobals->f.fpF);
- UTIL_CloseFile(gpGlobals->f.fpFIRE);
- UTIL_CloseFile(gpGlobals->f.fpRGM);
- UTIL_CloseFile(gpGlobals->f.fpSSS);
- //
- // Free the game data
- //
- free(gpGlobals->g.lprgEventObject);
- free(gpGlobals->g.lprgScriptEntry);
- free(gpGlobals->g.lprgStore);
- free(gpGlobals->g.lprgEnemy);
- free(gpGlobals->g.lprgEnemyTeam);
- free(gpGlobals->g.lprgMagic);
- free(gpGlobals->g.lprgBattleField);
- free(gpGlobals->g.lprgLevelUpMagic);
- //
- // Free the object description data
- //
- if (!gpGlobals->fIsWIN95)
- PAL_FreeObjectDesc(gpGlobals->lpObjectDesc);
- #if USE_RIX_EXTRA_INIT
- free(gpGlobals->pExtraFMRegs);
- free(gpGlobals->pExtraFMVals);
- free(gpGlobals->dwExtraLength);
- #endif
- free(gpGlobals->pszMsgName);
- //
- // Clear the instance
- //
- memset(gpGlobals, 0, sizeof(GLOBALVARS));
- }
- static VOID
- PAL_ReadGlobalGameData(
- VOID
- )
- /*++
- Purpose:
- Read global game data from data files.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- const GAMEDATA *p = &gpGlobals->g;
- LOAD_DATA(p->lprgScriptEntry, p->nScriptEntry * sizeof(SCRIPTENTRY),
- 4, gpGlobals->f.fpSSS);
- LOAD_DATA(p->lprgStore, p->nStore * sizeof(STORE), 0, gpGlobals->f.fpDATA);
- LOAD_DATA(p->lprgEnemy, p->nEnemy * sizeof(ENEMY), 1, gpGlobals->f.fpDATA);
- LOAD_DATA(p->lprgEnemyTeam, p->nEnemyTeam * sizeof(ENEMYTEAM),
- 2, gpGlobals->f.fpDATA);
- LOAD_DATA(p->lprgMagic, p->nMagic * sizeof(MAGIC), 4, gpGlobals->f.fpDATA);
- LOAD_DATA(p->lprgBattleField, p->nBattleField * sizeof(BATTLEFIELD),
- 5, gpGlobals->f.fpDATA);
- LOAD_DATA(p->lprgLevelUpMagic, p->nLevelUpMagic * sizeof(LEVELUPMAGIC_ALL),
- 6, gpGlobals->f.fpDATA);
- LOAD_DATA(p->rgwBattleEffectIndex, sizeof(p->rgwBattleEffectIndex),
- 11, gpGlobals->f.fpDATA);
- PAL_MKFReadChunk((LPBYTE)&(p->EnemyPos), sizeof(p->EnemyPos),
- 13, gpGlobals->f.fpDATA);
- DO_BYTESWAP(&(p->EnemyPos), sizeof(p->EnemyPos));
- PAL_MKFReadChunk((LPBYTE)(p->rgLevelUpExp), sizeof(p->rgLevelUpExp),
- 14, gpGlobals->f.fpDATA);
- DO_BYTESWAP(p->rgLevelUpExp, sizeof(p->rgLevelUpExp));
- }
- static VOID
- PAL_InitGlobalGameData(
- VOID
- )
- /*++
- Purpose:
- Initialize global game data.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- int len;
- #define PAL_DOALLOCATE(fp, num, type, lptype, ptr, n) \
- { \
- len = PAL_MKFGetChunkSize(num, fp); \
- ptr = (lptype)malloc(len); \
- n = len / sizeof(type); \
- if (ptr == NULL) \
- { \
- TerminateOnError("PAL_InitGlobalGameData(): Memory allocation error!"); \
- } \
- }
- //
- // If the memory has not been allocated, allocate first.
- //
- if (gpGlobals->g.lprgEventObject == NULL)
- {
- PAL_DOALLOCATE(gpGlobals->f.fpSSS, 0, EVENTOBJECT, LPEVENTOBJECT,
- gpGlobals->g.lprgEventObject, gpGlobals->g.nEventObject);
- PAL_DOALLOCATE(gpGlobals->f.fpSSS, 4, SCRIPTENTRY, LPSCRIPTENTRY,
- gpGlobals->g.lprgScriptEntry, gpGlobals->g.nScriptEntry);
- PAL_DOALLOCATE(gpGlobals->f.fpDATA, 0, STORE, LPSTORE,
- gpGlobals->g.lprgStore, gpGlobals->g.nStore);
- PAL_DOALLOCATE(gpGlobals->f.fpDATA, 1, ENEMY, LPENEMY,
- gpGlobals->g.lprgEnemy, gpGlobals->g.nEnemy);
- PAL_DOALLOCATE(gpGlobals->f.fpDATA, 2, ENEMYTEAM, LPENEMYTEAM,
- gpGlobals->g.lprgEnemyTeam, gpGlobals->g.nEnemyTeam);
- PAL_DOALLOCATE(gpGlobals->f.fpDATA, 4, MAGIC, LPMAGIC,
- gpGlobals->g.lprgMagic, gpGlobals->g.nMagic);
- PAL_DOALLOCATE(gpGlobals->f.fpDATA, 5, BATTLEFIELD, LPBATTLEFIELD,
- gpGlobals->g.lprgBattleField, gpGlobals->g.nBattleField);
- PAL_DOALLOCATE(gpGlobals->f.fpDATA, 6, LEVELUPMAGIC_ALL, LPLEVELUPMAGIC_ALL,
- gpGlobals->g.lprgLevelUpMagic, gpGlobals->g.nLevelUpMagic);
- PAL_ReadGlobalGameData();
- }
- #undef PAL_DOALLOCATE
- }
- static VOID
- PAL_LoadDefaultGame(
- VOID
- )
- /*++
- Purpose:
- Load the default game data.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- GAMEDATA *p = &gpGlobals->g;
- UINT32 i;
- //
- // Load the default data from the game data files.
- //
- LOAD_DATA(p->lprgEventObject, p->nEventObject * sizeof(EVENTOBJECT),
- 0, gpGlobals->f.fpSSS);
- PAL_MKFReadChunk((LPBYTE)(p->rgScene), sizeof(p->rgScene), 1, gpGlobals->f.fpSSS);
- DO_BYTESWAP(p->rgScene, sizeof(p->rgScene));
- if (gpGlobals->fIsWIN95)
- {
- PAL_MKFReadChunk((LPBYTE)(p->rgObject), sizeof(p->rgObject), 2, gpGlobals->f.fpSSS);
- DO_BYTESWAP(p->rgObject, sizeof(p->rgObject));
- }
- else
- {
- OBJECT_DOS objects[MAX_OBJECTS];
- PAL_MKFReadChunk((LPBYTE)(objects), sizeof(objects), 2, gpGlobals->f.fpSSS);
- DO_BYTESWAP(objects, sizeof(objects));
- //
- // Convert the DOS-style data structure to WIN-style data structure
- //
- for (i = 0; i < MAX_OBJECTS; i++)
- {
- memcpy(&p->rgObject[i], &objects[i], sizeof(OBJECT_DOS));
- if (i >= OBJECT_ITEM_START && i <= OBJECT_MAGIC_END)
- {
- p->rgObject[i].rgwData[6] = objects[i].rgwData[5]; // wFlags
- p->rgObject[i].rgwData[5] = 0; // wScriptDesc or wReserved2
- }
- else
- {
- p->rgObject[i].rgwData[6] = 0;
- }
- }
- }
- PAL_MKFReadChunk((LPBYTE)(&(p->PlayerRoles)), sizeof(PLAYERROLES),
- 3, gpGlobals->f.fpDATA);
- DO_BYTESWAP(&(p->PlayerRoles), sizeof(PLAYERROLES));
- //
- // Set some other default data.
- //
- gpGlobals->dwCash = 0;
- gpGlobals->wNumMusic = 0;
- gpGlobals->wNumPalette = 0;
- gpGlobals->wNumScene = 1;
- gpGlobals->wCollectValue = 0;
- gpGlobals->fNightPalette = FALSE;
- gpGlobals->wMaxPartyMemberIndex = 0;
- gpGlobals->viewport = PAL_XY(0, 0);
- gpGlobals->wLayer = 0;
- gpGlobals->wChaseRange = 1;
- #ifndef PAL_CLASSIC
- gpGlobals->bBattleSpeed = 2;
- #endif
- memset(gpGlobals->rgInventory, 0, sizeof(gpGlobals->rgInventory));
- memset(gpGlobals->rgPoisonStatus, 0, sizeof(gpGlobals->rgPoisonStatus));
- memset(gpGlobals->rgParty, 0, sizeof(gpGlobals->rgParty));
- memset(gpGlobals->rgTrail, 0, sizeof(gpGlobals->rgTrail));
- memset(&(gpGlobals->Exp), 0, sizeof(gpGlobals->Exp));
- for (i = 0; i < MAX_PLAYER_ROLES; i++)
- {
- gpGlobals->Exp.rgPrimaryExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgHealthExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgMagicExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgAttackExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgMagicPowerExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgDefenseExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgDexterityExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- gpGlobals->Exp.rgFleeExp[i].wLevel = p->PlayerRoles.rgwLevel[i];
- }
- gpGlobals->fEnteringScene = TRUE;
- }
- typedef struct tagSAVEDGAME_COMMON
- {
- WORD wSavedTimes; // saved times
- WORD wViewportX, wViewportY; // viewport location
- WORD nPartyMember; // number of members in party
- WORD wNumScene; // scene number
- WORD wPaletteOffset;
- WORD wPartyDirection; // party direction
- WORD wNumMusic; // music number
- WORD wNumBattleMusic; // battle music number
- WORD wNumBattleField; // battle field number
- WORD wScreenWave; // level of screen waving
- WORD wBattleSpeed; // battle speed
- WORD wCollectValue; // value of "collected" items
- WORD wLayer;
- WORD wChaseRange;
- WORD wChasespeedChangeCycles;
- WORD nFollower;
- WORD rgwReserved2[3]; // unused
- DWORD dwCash; // amount of cash
- PARTY rgParty[MAX_PLAYABLE_PLAYER_ROLES]; // player party
- TRAIL rgTrail[MAX_PLAYABLE_PLAYER_ROLES]; // player trail
- ALLEXPERIENCE Exp; // experience data
- PLAYERROLES PlayerRoles;
- POISONSTATUS rgPoisonStatus[MAX_POISONS][MAX_PLAYABLE_PLAYER_ROLES]; // poison status
- INVENTORY rgInventory[MAX_INVENTORY]; // inventory status
- SCENE rgScene[MAX_SCENES];
- } SAVEDGAME_COMMON, *LPSAVEDGAME_COMMON;
- typedef struct tagSAVEDGAME_DOS
- {
- WORD wSavedTimes; // saved times
- WORD wViewportX, wViewportY; // viewport location
- WORD nPartyMember; // number of members in party
- WORD wNumScene; // scene number
- WORD wPaletteOffset;
- WORD wPartyDirection; // party direction
- WORD wNumMusic; // music number
- WORD wNumBattleMusic; // battle music number
- WORD wNumBattleField; // battle field number
- WORD wScreenWave; // level of screen waving
- WORD wBattleSpeed; // battle speed
- WORD wCollectValue; // value of "collected" items
- WORD wLayer;
- WORD wChaseRange;
- WORD wChasespeedChangeCycles;
- WORD nFollower;
- WORD rgwReserved2[3]; // unused
- DWORD dwCash; // amount of cash
- PARTY rgParty[MAX_PLAYABLE_PLAYER_ROLES]; // player party
- TRAIL rgTrail[MAX_PLAYABLE_PLAYER_ROLES]; // player trail
- ALLEXPERIENCE Exp; // experience data
- PLAYERROLES PlayerRoles;
- POISONSTATUS rgPoisonStatus[MAX_POISONS][MAX_PLAYABLE_PLAYER_ROLES]; // poison status
- INVENTORY rgInventory[MAX_INVENTORY]; // inventory status
- SCENE rgScene[MAX_SCENES];
- OBJECT_DOS rgObject[MAX_OBJECTS];
- EVENTOBJECT rgEventObject[MAX_EVENT_OBJECTS];
- } SAVEDGAME_DOS, *LPSAVEDGAME_DOS;
- typedef struct tagSAVEDGAME_WIN
- {
- WORD wSavedTimes; // saved times
- WORD wViewportX, wViewportY; // viewport location
- WORD nPartyMember; // number of members in party
- WORD wNumScene; // scene number
- WORD wPaletteOffset;
- WORD wPartyDirection; // party direction
- WORD wNumMusic; // music number
- WORD wNumBattleMusic; // battle music number
- WORD wNumBattleField; // battle field number
- WORD wScreenWave; // level of screen waving
- WORD wBattleSpeed; // battle speed
- WORD wCollectValue; // value of "collected" items
- WORD wLayer;
- WORD wChaseRange;
- WORD wChasespeedChangeCycles;
- WORD nFollower;
- WORD rgwReserved2[3]; // unused
- DWORD dwCash; // amount of cash
- PARTY rgParty[MAX_PLAYABLE_PLAYER_ROLES]; // player party
- TRAIL rgTrail[MAX_PLAYABLE_PLAYER_ROLES]; // player trail
- ALLEXPERIENCE Exp; // experience data
- PLAYERROLES PlayerRoles;
- POISONSTATUS rgPoisonStatus[MAX_POISONS][MAX_PLAYABLE_PLAYER_ROLES]; // poison status
- INVENTORY rgInventory[MAX_INVENTORY]; // inventory status
- SCENE rgScene[MAX_SCENES];
- OBJECT rgObject[MAX_OBJECTS];
- EVENTOBJECT rgEventObject[MAX_EVENT_OBJECTS];
- } SAVEDGAME_WIN, *LPSAVEDGAME_WIN;
- static VOID
- PAL_LoadGame_Common(
- const LPSAVEDGAME_COMMON s
- )
- {
- gpGlobals->viewport = PAL_XY(s->wViewportX, s->wViewportY);
- gpGlobals->wMaxPartyMemberIndex = s->nPartyMember;
- gpGlobals->wNumScene = s->wNumScene;
- gpGlobals->fNightPalette = (s->wPaletteOffset != 0);
- gpGlobals->wPartyDirection = s->wPartyDirection;
- gpGlobals->wNumMusic = s->wNumMusic;
- gpGlobals->wNumBattleMusic = s->wNumBattleMusic;
- gpGlobals->wNumBattleField = s->wNumBattleField;
- gpGlobals->wScreenWave = s->wScreenWave;
- gpGlobals->sWaveProgression = 0;
- gpGlobals->wCollectValue = s->wCollectValue;
- gpGlobals->wLayer = s->wLayer;
- gpGlobals->wChaseRange = s->wChaseRange;
- gpGlobals->wChasespeedChangeCycles = s->wChasespeedChangeCycles;
- gpGlobals->nFollower = s->nFollower;
- gpGlobals->dwCash = s->dwCash;
- #ifndef PAL_CLASSIC
- gpGlobals->bBattleSpeed = s->wBattleSpeed;
- if (gpGlobals->bBattleSpeed > 5 || gpGlobals->bBattleSpeed == 0)
- {
- gpGlobals->bBattleSpeed = 2;
- }
- #endif
- memcpy(gpGlobals->rgParty, s->rgParty, sizeof(gpGlobals->rgParty));
- memcpy(gpGlobals->rgTrail, s->rgTrail, sizeof(gpGlobals->rgTrail));
- gpGlobals->Exp = s->Exp;
- gpGlobals->g.PlayerRoles = s->PlayerRoles;
- memset(gpGlobals->rgPoisonStatus, 0, sizeof(gpGlobals->rgPoisonStatus));
- memcpy(gpGlobals->rgInventory, s->rgInventory, sizeof(gpGlobals->rgInventory));
- memcpy(gpGlobals->g.rgScene, s->rgScene, sizeof(gpGlobals->g.rgScene));
- }
- static INT
- PAL_LoadGame_DOS(
- LPCSTR szFileName
- )
- /*++
- Purpose:
- Load a saved game.
- Parameters:
- [IN] szFileName - file name of saved game.
- Return value:
- 0 if success, -1 if failed.
- --*/
- {
- FILE *fp;
- PAL_LARGE SAVEDGAME_DOS s;
- int i;
- //
- // Try to open the specified file
- //
- fp = fopen(szFileName, "rb");
- if (fp == NULL)
- {
- return -1;
- }
- //
- // Read all data from the file and close.
- //
- fread(&s, sizeof(SAVEDGAME_DOS), 1, fp);
- fclose(fp);
- //
- // Adjust endianness
- //
- DO_BYTESWAP(&s, sizeof(SAVEDGAME_DOS));
- //
- // Cash amount is in DWORD, so do a wordswap in Big-Endian.
- //
- #if SDL_BYTEORDER == SDL_BIG_ENDIAN
- s.dwCash = ((s.dwCash >> 16) | (s.dwCash << 16));
- #endif
- //
- // Get all the data from the saved game struct.
- //
- PAL_LoadGame_Common((LPSAVEDGAME_COMMON)&s);
- //
- // Convert the DOS-style data structure to WIN-style data structure
- //
- for (i = 0; i < MAX_OBJECTS; i++)
- {
- memcpy(&gpGlobals->g.rgObject[i], &s.rgObject[i], sizeof(OBJECT_DOS));
- if (i >= OBJECT_ITEM_START && i <= OBJECT_MAGIC_END)
- {
- gpGlobals->g.rgObject[i].rgwData[6] = s.rgObject[i].rgwData[5]; // wFlags
- gpGlobals->g.rgObject[i].rgwData[5] = 0; // wScriptDesc or wReserved2
- }
- else
- {
- gpGlobals->g.rgObject[i].rgwData[6] = 0;
- }
- }
- memcpy(gpGlobals->g.lprgEventObject, s.rgEventObject,
- sizeof(EVENTOBJECT) * gpGlobals->g.nEventObject);
- gpGlobals->fEnteringScene = FALSE;
- PAL_CompressInventory();
- //
- // Success
- //
- return 0;
- }
- static INT
- PAL_LoadGame_WIN(
- LPCSTR szFileName
- )
- /*++
- Purpose:
- Load a saved game.
- Parameters:
- [IN] szFileName - file name of saved game.
- Return value:
- 0 if success, -1 if failed.
- --*/
- {
- FILE *fp;
- PAL_LARGE SAVEDGAME_WIN s;
- //
- // Try to open the specified file
- //
- fp = fopen(szFileName, "rb");
- if (fp == NULL)
- {
- return -1;
- }
- //
- // Read all data from the file and close.
- //
- fread(&s, sizeof(SAVEDGAME_WIN), 1, fp);
- fclose(fp);
- //
- // Adjust endianness
- //
- DO_BYTESWAP(&s, sizeof(SAVEDGAME_WIN));
- //
- // Cash amount is in DWORD, so do a wordswap in Big-Endian.
- //
- #if SDL_BYTEORDER == SDL_BIG_ENDIAN
- s.dwCash = ((s.dwCash >> 16) | (s.dwCash << 16));
- #endif
- //
- // Get all the data from the saved game struct.
- //
- PAL_LoadGame_Common((LPSAVEDGAME_COMMON)&s);
- memcpy(gpGlobals->g.rgObject, s.rgObject, sizeof(gpGlobals->g.rgObject));
- memcpy(gpGlobals->g.lprgEventObject, s.rgEventObject,
- sizeof(EVENTOBJECT) * gpGlobals->g.nEventObject);
- gpGlobals->fEnteringScene = FALSE;
- PAL_CompressInventory();
- //
- // Success
- //
- return 0;
- }
- static INT
- PAL_LoadGame(
- LPCSTR szFileName
- )
- {
- return gpGlobals->fIsWIN95 ? PAL_LoadGame_WIN(szFileName) : PAL_LoadGame_DOS(szFileName);
- }
- static VOID
- PAL_SaveGame_Common(
- const LPSAVEDGAME_COMMON s
- )
- {
- s->wViewportX = PAL_X(gpGlobals->viewport);
- s->wViewportY = PAL_Y(gpGlobals->viewport);
- s->nPartyMember = gpGlobals->wMaxPartyMemberIndex;
- s->wNumScene = gpGlobals->wNumScene;
- s->wPaletteOffset = (gpGlobals->fNightPalette ? 0x180 : 0);
- s->wPartyDirection = gpGlobals->wPartyDirection;
- s->wNumMusic = gpGlobals->wNumMusic;
- s->wNumBattleMusic = gpGlobals->wNumBattleMusic;
- s->wNumBattleField = gpGlobals->wNumBattleField;
- s->wScreenWave = gpGlobals->wScreenWave;
- s->wCollectValue = gpGlobals->wCollectValue;
- s->wLayer = gpGlobals->wLayer;
- s->wChaseRange = gpGlobals->wChaseRange;
- s->wChasespeedChangeCycles = gpGlobals->wChasespeedChangeCycles;
- s->nFollower = gpGlobals->nFollower;
- s->dwCash = gpGlobals->dwCash;
- #ifndef PAL_CLASSIC
- s->wBattleSpeed = gpGlobals->bBattleSpeed;
- #else
- s->wBattleSpeed = 2;
- #endif
- memcpy(s->rgParty, gpGlobals->rgParty, sizeof(gpGlobals->rgParty));
- memcpy(s->rgTrail, gpGlobals->rgTrail, sizeof(gpGlobals->rgTrail));
- s->Exp = gpGlobals->Exp;
- s->PlayerRoles = gpGlobals->g.PlayerRoles;
- memcpy(s->rgPoisonStatus, gpGlobals->rgPoisonStatus, sizeof(gpGlobals->rgPoisonStatus));
- memcpy(s->rgInventory, gpGlobals->rgInventory, sizeof(gpGlobals->rgInventory));
- memcpy(s->rgScene, gpGlobals->g.rgScene, sizeof(gpGlobals->g.rgScene));
- }
- static VOID
- PAL_SaveGame_DOS(
- LPCSTR szFileName,
- WORD wSavedTimes
- )
- /*++
- Purpose:
- Save the current game state to file.
- Parameters:
- [IN] szFileName - file name of saved game.
- Return value:
- None.
- --*/
- {
- FILE *fp;
- PAL_LARGE SAVEDGAME_DOS s;
- UINT32 i;
- //
- // Put all the data to the saved game struct.
- //
- PAL_SaveGame_Common((LPSAVEDGAME_COMMON)&s);
- //
- // Convert the WIN-style data structure to DOS-style data structure
- //
- for (i = 0; i < MAX_OBJECTS; i++)
- {
- memcpy(&s.rgObject[i], &gpGlobals->g.rgObject[i], sizeof(OBJECT_DOS));
- if (i >= OBJECT_ITEM_START && i <= OBJECT_MAGIC_END)
- {
- s.rgObject[i].rgwData[5] = gpGlobals->g.rgObject[i].rgwData[6]; // wFlags
- }
- }
- memcpy(s.rgEventObject, gpGlobals->g.lprgEventObject,
- sizeof(EVENTOBJECT) * gpGlobals->g.nEventObject);
- s.wSavedTimes = wSavedTimes;
- //
- // Adjust endianness
- //
- DO_BYTESWAP(&s, sizeof(SAVEDGAME));
- //
- // Cash amount is in DWORD, so do a wordswap in Big-Endian.
- //
- #if SDL_BYTEORDER == SDL_BIG_ENDIAN
- s.dwCash = ((s.dwCash >> 16) | (s.dwCash << 16));
- #endif
- //
- // Try writing to file
- //
- fp = fopen(szFileName, "wb");
- if (fp == NULL)
- {
- return;
- }
- i = PAL_MKFGetChunkSize(0, gpGlobals->f.fpSSS);
- i += sizeof(SAVEDGAME_DOS) - sizeof(EVENTOBJECT) * MAX_EVENT_OBJECTS;
- fwrite(&s, i, 1, fp);
- fclose(fp);
- }
- static VOID
- PAL_SaveGame_WIN(
- LPCSTR szFileName,
- WORD wSavedTimes
- )
- /*++
- Purpose:
- Save the current game state to file.
- Parameters:
- [IN] szFileName - file name of saved game.
- Return value:
- None.
- --*/
- {
- FILE *fp;
- PAL_LARGE SAVEDGAME_WIN s;
- UINT32 i;
- //
- // Put all the data to the saved game struct.
- //
- PAL_SaveGame_Common((LPSAVEDGAME_COMMON)&s);
- memcpy(s.rgObject, gpGlobals->g.rgObject, sizeof(gpGlobals->g.rgObject));
- memcpy(s.rgEventObject, gpGlobals->g.lprgEventObject,
- sizeof(EVENTOBJECT) * gpGlobals->g.nEventObject);
- s.wSavedTimes = wSavedTimes;
- //
- // Adjust endianness
- //
- DO_BYTESWAP(&s, sizeof(SAVEDGAME));
- //
- // Cash amount is in DWORD, so do a wordswap in Big-Endian.
- //
- #if SDL_BYTEORDER == SDL_BIG_ENDIAN
- s.dwCash = ((s.dwCash >> 16) | (s.dwCash << 16));
- #endif
- //
- // Try writing to file
- //
- fp = fopen(szFileName, "wb");
- if (fp == NULL)
- {
- return;
- }
- i = PAL_MKFGetChunkSize(0, gpGlobals->f.fpSSS);
- i += sizeof(SAVEDGAME_WIN) - sizeof(EVENTOBJECT) * MAX_EVENT_OBJECTS;
- fwrite(&s, i, 1, fp);
- fclose(fp);
- }
- VOID
- PAL_SaveGame(
- LPCSTR szFileName,
- WORD wSavedTimes
- )
- {
- if (gpGlobals->fIsWIN95)
- PAL_SaveGame_WIN(szFileName, wSavedTimes);
- else
- PAL_SaveGame_DOS(szFileName, wSavedTimes);
- }
- VOID
- PAL_InitGameData(
- INT iSaveSlot
- )
- /*++
- Purpose:
- Initialize the game data (used when starting a new game or loading a saved game).
- Parameters:
- [IN] iSaveSlot - Slot of saved game.
- Return value:
- None.
- --*/
- {
- PAL_InitGlobalGameData();
- gpGlobals->bCurrentSaveSlot = (BYTE)iSaveSlot;
- //
- // try loading from the saved game file.
- //
- if (iSaveSlot == 0 || PAL_LoadGame(va("%s%d%s", PAL_SAVE_PREFIX, iSaveSlot, ".rpg")) != 0)
- {
- //
- // Cannot load the saved game file. Load the defaults.
- //
- PAL_LoadDefaultGame();
- }
- gpGlobals->fGameStart = TRUE;
- gpGlobals->fNeedToFadeIn = FALSE;
- gpGlobals->iCurInvMenuItem = 0;
- gpGlobals->fInBattle = FALSE;
- memset(gpGlobals->rgPlayerStatus, 0, sizeof(gpGlobals->rgPlayerStatus));
- PAL_UpdateEquipments();
- }
- BOOL
- PAL_AddItemToInventory(
- WORD wObjectID,
- INT iNum
- )
- /*++
- Purpose:
- Add or remove the specified kind of item in the inventory.
- Parameters:
- [IN] wObjectID - object number of the item.
- [IN] iNum - number to be added (positive value) or removed (negative value).
- Return value:
- TRUE if succeeded, FALSE if failed.
- --*/
- {
- int index;
- BOOL fFound;
- if (wObjectID == 0)
- {
- return FALSE;
- }
- if (iNum == 0)
- {
- iNum = 1;
- }
- index = 0;
- fFound = FALSE;
- //
- // Search for the specified item in the inventory
- //
- while (index < MAX_INVENTORY)
- {
- if (gpGlobals->rgInventory[index].wItem == wObjectID)
- {
- fFound = TRUE;
- break;
- }
- else if (gpGlobals->rgInventory[index].wItem == 0)
- {
- break;
- }
- index++;
- }
- if (iNum > 0)
- {
- //
- // Add item
- //
- if (index >= MAX_INVENTORY)
- {
- //
- // inventory is full. cannot add item
- //
- return FALSE;
- }
- if (fFound)
- {
- gpGlobals->rgInventory[index].nAmount += iNum;
- if (gpGlobals->rgInventory[index].nAmount > 99)
- {
- //
- // Maximum number is 99
- //
- gpGlobals->rgInventory[index].nAmount = 99;
- }
- }
- else
- {
- gpGlobals->rgInventory[index].wItem = wObjectID;
- if (iNum > 99)
- {
- iNum = 99;
- }
- gpGlobals->rgInventory[index].nAmount = iNum;
- }
- return TRUE;
- }
- else
- {
- //
- // Remove item
- //
- if (fFound)
- {
- iNum *= -1;
- if (gpGlobals->rgInventory[index].nAmount < iNum)
- {
- //
- // This item has been run out
- //
- gpGlobals->rgInventory[index].nAmount = 0;
- return FALSE;
- }
- gpGlobals->rgInventory[index].nAmount -= iNum;
- return TRUE;
- }
- return FALSE;
- }
- }
- INT
- PAL_GetItemAmount(
- WORD wItem
- )
- /*++
- Purpose:
- Get the amount of the specified item in the inventory.
- Parameters:
- [IN] wItem - the object ID of the item.
- Return value:
- The amount of the item in the inventory.
- --*/
- {
- int i;
- for (i = 0; i < MAX_INVENTORY; i++)
- {
- if (gpGlobals->rgInventory[i].wItem == 0)
- {
- break;
- }
- if (gpGlobals->rgInventory[i].wItem == wItem)
- {
- return gpGlobals->rgInventory[i].nAmount;
- }
- }
- return 0;
- }
- VOID
- PAL_CompressInventory(
- VOID
- )
- /*++
- Purpose:
- Remove all the items in inventory which has a number of zero.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- int i, j;
- j = 0;
- for (i = 0; i < MAX_INVENTORY; i++)
- {
- if (gpGlobals->rgInventory[i].wItem == 0)
- {
- break;
- }
- if (gpGlobals->rgInventory[i].nAmount > 0)
- {
- gpGlobals->rgInventory[j] = gpGlobals->rgInventory[i];
- j++;
- }
- }
- for (; j < MAX_INVENTORY; j++)
- {
- gpGlobals->rgInventory[j].nAmount = 0;
- gpGlobals->rgInventory[j].nAmountInUse = 0;
- gpGlobals->rgInventory[j].wItem = 0;
- }
- }
- BOOL
- PAL_IncreaseHPMP(
- WORD wPlayerRole,
- SHORT sHP,
- SHORT sMP
- )
- /*++
- Purpose:
- Increase or decrease player's HP and/or MP.
- Parameters:
- [IN] wPlayerRole - the number of player role.
- [IN] sHP - number of HP to be increased (positive value) or decrased
- (negative value).
- [IN] sMP - number of MP to be increased (positive value) or decrased
- (negative value).
- Return value:
- TRUE if the operation is succeeded, FALSE if not.
- --*/
- {
- BOOL fSuccess = FALSE;
- //
- // Only care about alive players
- //
- if (gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] > 0)
- {
- //
- // change HP
- //
- gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] += sHP;
- if ((SHORT)(gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole]) < 0)
- {
- gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] = 0;
- }
- else if (gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] >
- gpGlobals->g.PlayerRoles.rgwMaxHP[wPlayerRole])
- {
- gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] =
- gpGlobals->g.PlayerRoles.rgwMaxHP[wPlayerRole];
- }
- //
- // Change MP
- //
- gpGlobals->g.PlayerRoles.rgwMP[wPlayerRole] += sMP;
- if ((SHORT)(gpGlobals->g.PlayerRoles.rgwMP[wPlayerRole]) < 0)
- {
- gpGlobals->g.PlayerRoles.rgwMP[wPlayerRole] = 0;
- }
- else if (gpGlobals->g.PlayerRoles.rgwMP[wPlayerRole] >
- gpGlobals->g.PlayerRoles.rgwMaxMP[wPlayerRole])
- {
- gpGlobals->g.PlayerRoles.rgwMP[wPlayerRole] =
- gpGlobals->g.PlayerRoles.rgwMaxMP[wPlayerRole];
- }
- fSuccess = TRUE;
- }
- return fSuccess;
- }
- VOID
- PAL_UpdateEquipments(
- VOID
- )
- /*++
- Purpose:
- Update the effects of all equipped items for all players.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- int i, j;
- WORD w;
- memset(&(gpGlobals->rgEquipmentEffect), 0, sizeof(gpGlobals->rgEquipmentEffect));
- for (i = 0; i < MAX_PLAYER_ROLES; i++)
- {
- for (j = 0; j < MAX_PLAYER_EQUIPMENTS; j++)
- {
- w = gpGlobals->g.PlayerRoles.rgwEquipment[j][i];
- if (w != 0)
- {
- gpGlobals->g.rgObject[w].item.wScriptOnEquip =
- PAL_RunTriggerScript(gpGlobals->g.rgObject[w].item.wScriptOnEquip, (WORD)i);
- }
- }
- }
- }
- VOID
- PAL_RemoveEquipmentEffect(
- WORD wPlayerRole,
- WORD wEquipPart
- )
- /*++
- Purpose:
- Remove all the effects of the equipment for the player.
- Parameters:
- [IN] wPlayerRole - the player role.
- [IN] wEquipPart - the part of the equipment.
- Return value:
- None.
- --*/
- {
- WORD *p;
- int i, j;
- p = (WORD *)(&gpGlobals->rgEquipmentEffect[wEquipPart]); // HACKHACK
- for (i = 0; i < sizeof(PLAYERROLES) / sizeof(PLAYERS); i++)
- {
- p[i * MAX_PLAYER_ROLES + wPlayerRole] = 0;
- }
- //
- // Reset some parameters to default when appropriate
- //
- if (wEquipPart == kBodyPartHand)
- {
- //
- // reset the dual attack status
- //
- gpGlobals->rgPlayerStatus[wPlayerRole][kStatusDualAttack] = 0;
- }
- else if (wEquipPart == kBodyPartWear)
- {
- //
- // Remove all poisons leveled 99
- //
- for (i = 0; i <= (short)gpGlobals->wMaxPartyMemberIndex; i++)
- {
- if (gpGlobals->rgParty[i].wPlayerRole == wPlayerRole)
- {
- wPlayerRole = i;
- break;
- }
- }
- if (i <= (short)gpGlobals->wMaxPartyMemberIndex)
- {
- j = 0;
- for (i = 0; i < MAX_POISONS; i++)
- {
- WORD w = gpGlobals->rgPoisonStatus[i][wPlayerRole].wPoisonID;
- if (w == 0)
- {
- break;
- }
- if (gpGlobals->g.rgObject[w].poison.wPoisonLevel < 99)
- {
- gpGlobals->rgPoisonStatus[j][wPlayerRole] =
- gpGlobals->rgPoisonStatus[i][wPlayerRole];
- j++;
- }
- }
- while (j < MAX_POISONS)
- {
- gpGlobals->rgPoisonStatus[j][wPlayerRole].wPoisonID = 0;
- gpGlobals->rgPoisonStatus[j][wPlayerRole].wPoisonScript = 0;
- j++;
- }
- }
- }
- }
- VOID
- PAL_AddPoisonForPlayer(
- WORD wPlayerRole,
- WORD wPoisonID
- )
- /*++
- Purpose:
- Add the specified poison to the player.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wPoisonID - the poison to be added.
- Return value:
- None.
- --*/
- {
- int i, index;
- WORD w;
- for (index = 0; index <= gpGlobals->wMaxPartyMemberIndex; index++)
- {
- if (gpGlobals->rgParty[index].wPlayerRole == wPlayerRole)
- {
- break;
- }
- }
- if (index > gpGlobals->wMaxPartyMemberIndex)
- {
- return; // don't go further
- }
- for (i = 0; i < MAX_POISONS; i++)
- {
- w = gpGlobals->rgPoisonStatus[i][index].wPoisonID;
- if (w == 0)
- {
- break;
- }
- if (w == wPoisonID)
- {
- return; // already poisoned
- }
- }
- if (i < MAX_POISONS)
- {
- gpGlobals->rgPoisonStatus[i][index].wPoisonID = wPoisonID;
- gpGlobals->rgPoisonStatus[i][index].wPoisonScript =
- gpGlobals->g.rgObject[wPoisonID].poison.wPlayerScript;
- }
- }
- VOID
- PAL_CurePoisonByKind(
- WORD wPlayerRole,
- WORD wPoisonID
- )
- /*++
- Purpose:
- Remove the specified poison from the player.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wPoisonID - the poison to be removed.
- Return value:
- None.
- --*/
- {
- int i, index;
- for (index = 0; index <= gpGlobals->wMaxPartyMemberIndex; index++)
- {
- if (gpGlobals->rgParty[index].wPlayerRole == wPlayerRole)
- {
- break;
- }
- }
- if (index > gpGlobals->wMaxPartyMemberIndex)
- {
- return; // don't go further
- }
- for (i = 0; i < MAX_POISONS; i++)
- {
- if (gpGlobals->rgPoisonStatus[i][index].wPoisonID == wPoisonID)
- {
- gpGlobals->rgPoisonStatus[i][index].wPoisonID = 0;
- gpGlobals->rgPoisonStatus[i][index].wPoisonScript = 0;
- }
- }
- }
- VOID
- PAL_CurePoisonByLevel(
- WORD wPlayerRole,
- WORD wMaxLevel
- )
- /*++
- Purpose:
- Remove the poisons which have a maximum level of wMaxLevel from the player.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wMaxLevel - the maximum level of poisons to be removed.
- Return value:
- None.
- --*/
- {
- int i, index;
- WORD w;
- for (index = 0; index <= gpGlobals->wMaxPartyMemberIndex; index++)
- {
- if (gpGlobals->rgParty[index].wPlayerRole == wPlayerRole)
- {
- break;
- }
- }
- if (index > gpGlobals->wMaxPartyMemberIndex)
- {
- return; // don't go further
- }
- for (i = 0; i < MAX_POISONS; i++)
- {
- w = gpGlobals->rgPoisonStatus[i][index].wPoisonID;
- if (gpGlobals->g.rgObject[w].poison.wPoisonLevel <= wMaxLevel)
- {
- gpGlobals->rgPoisonStatus[i][index].wPoisonID = 0;
- gpGlobals->rgPoisonStatus[i][index].wPoisonScript = 0;
- }
- }
- }
- BOOL
- PAL_IsPlayerPoisonedByLevel(
- WORD wPlayerRole,
- WORD wMinLevel
- )
- /*++
- Purpose:
- Check if the player is poisoned by poisons at a minimum level of wMinLevel.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wMinLevel - the minimum level of poison.
- Return value:
- TRUE if the player is poisoned by poisons at a minimum level of wMinLevel;
- FALSE if not.
- --*/
- {
- int i, index;
- WORD w;
- for (index = 0; index <= gpGlobals->wMaxPartyMemberIndex; index++)
- {
- if (gpGlobals->rgParty[index].wPlayerRole == wPlayerRole)
- {
- break;
- }
- }
- if (index > gpGlobals->wMaxPartyMemberIndex)
- {
- return FALSE; // don't go further
- }
- for (i = 0; i < MAX_POISONS; i++)
- {
- w = gpGlobals->rgPoisonStatus[i][index].wPoisonID;
- w = gpGlobals->g.rgObject[w].poison.wPoisonLevel;
- if (w >= 99)
- {
- //
- // Ignore poisons which has a level of 99 (usually effect of equipment)
- //
- continue;
- }
- if (w >= wMinLevel)
- {
- return TRUE;
- }
- }
- return FALSE;
- }
- BOOL
- PAL_IsPlayerPoisonedByKind(
- WORD wPlayerRole,
- WORD wPoisonID
- )
- /*++
- Purpose:
- Check if the player is poisoned by the specified poison.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wPoisonID - the poison to be checked.
- Return value:
- TRUE if player is poisoned by the specified poison;
- FALSE if not.
- --*/
- {
- int i, index;
- for (index = 0; index <= gpGlobals->wMaxPartyMemberIndex; index++)
- {
- if (gpGlobals->rgParty[index].wPlayerRole == wPlayerRole)
- {
- break;
- }
- }
- if (index > gpGlobals->wMaxPartyMemberIndex)
- {
- return FALSE; // don't go further
- }
- for (i = 0; i < MAX_POISONS; i++)
- {
- if (gpGlobals->rgPoisonStatus[i][index].wPoisonID == wPoisonID)
- {
- return TRUE;
- }
- }
- return FALSE;
- }
- WORD
- PAL_GetPlayerAttackStrength(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get the player's attack strength, count in the effect of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- The total attack strength of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwAttackStrength[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwAttackStrength[wPlayerRole];
- }
- return w;
- }
- WORD
- PAL_GetPlayerMagicStrength(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get the player's magic strength, count in the effect of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- The total magic strength of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwMagicStrength[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwMagicStrength[wPlayerRole];
- }
- return w;
- }
- WORD
- PAL_GetPlayerDefense(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get the player's defense value, count in the effect of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- The total defense value of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwDefense[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwDefense[wPlayerRole];
- }
- return w;
- }
- WORD
- PAL_GetPlayerDexterity(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get the player's dexterity, count in the effect of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- The total dexterity of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwDexterity[wPlayerRole];
- #ifdef PAL_CLASSIC
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- #else
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS - 1; i++)
- #endif
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwDexterity[wPlayerRole];
- }
- return w;
- }
- WORD
- PAL_GetPlayerFleeRate(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get the player's flee rate, count in the effect of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- The total flee rate of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwFleeRate[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwFleeRate[wPlayerRole];
- }
- return w;
- }
- WORD
- PAL_GetPlayerPoisonResistance(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get the player's resistance to poisons, count in the effect of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- The total resistance to poisons of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwPoisonResistance[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwPoisonResistance[wPlayerRole];
- }
- if (w > 100)
- {
- w = 100;
- }
- return w;
- }
- WORD
- PAL_GetPlayerElementalResistance(
- WORD wPlayerRole,
- INT iAttrib
- )
- /*++
- Purpose:
- Get the player's resistance to attributed magics, count in the effect
- of equipments.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] iAttrib - the attribute of magics.
- Return value:
- The total resistance to the attributed magics of the player.
- --*/
- {
- WORD w;
- int i;
- w = gpGlobals->g.PlayerRoles.rgwElementalResistance[iAttrib][wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- w += gpGlobals->rgEquipmentEffect[i].rgwElementalResistance[iAttrib][wPlayerRole];
- }
- if (w > 100)
- {
- w = 100;
- }
- return w;
- }
- WORD
- PAL_GetPlayerBattleSprite(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get player's battle sprite.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- Number of the player's battle sprite.
- --*/
- {
- int i;
- WORD w;
- w = gpGlobals->g.PlayerRoles.rgwSpriteNumInBattle[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- if (gpGlobals->rgEquipmentEffect[i].rgwSpriteNumInBattle[wPlayerRole] != 0)
- {
- w = gpGlobals->rgEquipmentEffect[i].rgwSpriteNumInBattle[wPlayerRole];
- }
- }
- return w;
- }
- WORD
- PAL_GetPlayerCooperativeMagic(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Get player's cooperative magic.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- Object ID of the player's cooperative magic.
- --*/
- {
- int i;
- WORD w;
- w = gpGlobals->g.PlayerRoles.rgwCooperativeMagic[wPlayerRole];
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- if (gpGlobals->rgEquipmentEffect[i].rgwCooperativeMagic[wPlayerRole] != 0)
- {
- w = gpGlobals->rgEquipmentEffect[i].rgwCooperativeMagic[wPlayerRole];
- }
- }
- return w;
- }
- BOOL
- PAL_PlayerCanAttackAll(
- WORD wPlayerRole
- )
- /*++
- Purpose:
- Check if the player can attack all of the enemies in one move.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- Return value:
- TRUE if player can attack all of the enemies in one move, FALSE if not.
- --*/
- {
- int i;
- BOOL f;
- f = FALSE;
- for (i = 0; i <= MAX_PLAYER_EQUIPMENTS; i++)
- {
- if (gpGlobals->rgEquipmentEffect[i].rgwAttackAll[wPlayerRole] != 0)
- {
- f = TRUE;
- break;
- }
- }
- return f;
- }
- BOOL
- PAL_AddMagic(
- WORD wPlayerRole,
- WORD wMagic
- )
- /*++
- Purpose:
- Add a magic to the player.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wMagic - the object ID of the magic.
- Return value:
- TRUE if succeeded, FALSE if failed.
- --*/
- {
- int i;
- for (i = 0; i < MAX_PLAYER_MAGICS; i++)
- {
- if (gpGlobals->g.PlayerRoles.rgwMagic[i][wPlayerRole] == wMagic)
- {
- //
- // already have this magic
- //
- return FALSE;
- }
- }
- for (i = 0; i < MAX_PLAYER_MAGICS; i++)
- {
- if (gpGlobals->g.PlayerRoles.rgwMagic[i][wPlayerRole] == 0)
- {
- break;
- }
- }
- if (i >= MAX_PLAYER_MAGICS)
- {
- //
- // Not enough slots
- //
- return FALSE;
- }
- gpGlobals->g.PlayerRoles.rgwMagic[i][wPlayerRole] = wMagic;
- return TRUE;
- }
- VOID
- PAL_RemoveMagic(
- WORD wPlayerRole,
- WORD wMagic
- )
- /*++
- Purpose:
- Remove a magic to the player.
- Parameters:
- [IN] wPlayerRole - the player role ID.
- [IN] wMagic - the object ID of the magic.
- Return value:
- None.
- --*/
- {
- int i;
- for (i = 0; i < MAX_PLAYER_MAGICS; i++)
- {
- if (gpGlobals->g.PlayerRoles.rgwMagic[i][wPlayerRole] == wMagic)
- {
- gpGlobals->g.PlayerRoles.rgwMagic[i][wPlayerRole] = 0;
- break;
- }
- }
- }
- VOID
- PAL_SetPlayerStatus(
- WORD wPlayerRole,
- WORD wStatusID,
- WORD wNumRound
- )
- /*++
- Purpose:
- Set one of the statuses for the player.
- Parameters:
- [IN] wPlayerRole - the player ID.
- [IN] wStatusID - the status to be set.
- [IN] wNumRound - the effective rounds of the status.
- Return value:
- None.
- --*/
- {
- #ifndef PAL_CLASSIC
- if (wStatusID == kStatusSlow &&
- gpGlobals->rgPlayerStatus[wPlayerRole][kStatusHaste] > 0)
- {
- //
- // Remove the haste status
- //
- PAL_RemovePlayerStatus(wPlayerRole, kStatusHaste);
- return;
- }
- if (wStatusID == kStatusHaste &&
- gpGlobals->rgPlayerStatus[wPlayerRole][kStatusSlow] > 0)
- {
- //
- // Remove the slow status
- //
- PAL_RemovePlayerStatus(wPlayerRole, kStatusSlow);
- return;
- }
- #endif
- switch (wStatusID)
- {
- case kStatusConfused:
- case kStatusSleep:
- case kStatusSilence:
- #ifdef PAL_CLASSIC
- case kStatusParalyzed:
- #else
- case kStatusSlow:
- #endif
- //
- // for "bad" statuses, don't set the status when we already have it
- //
- if (gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] != 0 &&
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] == 0)
- {
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] = wNumRound;
- }
- break;
- case kStatusPuppet:
- //
- // only allow dead players for "puppet" status
- //
- if (gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] == 0 &&
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] < wNumRound)
- {
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] = wNumRound;
- }
- break;
- case kStatusBravery:
- case kStatusProtect:
- case kStatusDualAttack:
- case kStatusHaste:
- //
- // for "good" statuses, reset the status if the status to be set lasts longer
- //
- if (gpGlobals->g.PlayerRoles.rgwHP[wPlayerRole] != 0 &&
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] < wNumRound)
- {
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] = wNumRound;
- }
- break;
- default:
- assert(FALSE);
- break;
- }
- }
- VOID
- PAL_RemovePlayerStatus(
- WORD wPlayerRole,
- WORD wStatusID
- )
- /*++
- Purpose:
- Remove one of the status for player.
- Parameters:
- [IN] wPlayerRole - the player ID.
- [IN] wStatusID - the status to be set.
- Return value:
- None.
- --*/
- {
- //
- // Don't remove effects of equipments
- //
- if (gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] <= 999)
- {
- gpGlobals->rgPlayerStatus[wPlayerRole][wStatusID] = 0;
- }
- }
- VOID
- PAL_ClearAllPlayerStatus(
- VOID
- )
- /*++
- Purpose:
- Clear all player status.
- Parameters:
- None.
- Return value:
- None.
- --*/
- {
- int i, j;
- for (i = 0; i < MAX_PLAYER_ROLES; i++)
- {
- for (j = 0; j < kStatusAll; j++)
- {
- //
- // Don't remove effects of equipments
- //
- if (gpGlobals->rgPlayerStatus[i][j] <= 999)
- {
- gpGlobals->rgPlayerStatus[i][j] = 0;
- }
- }
- }
- }
- VOID
- PAL_PlayerLevelUp(
- WORD wPlayerRole,
- WORD wNumLevel
- )
- /*++
- Purpose:
- Increase the player's level by wLevels.
- Parameters:
- [IN] wPlayerRole - player role ID.
- [IN] wNumLevel - number of levels to be increased.
- Return value:
- None.
- --*/
- {
- WORD i;
- //
- // Add the level
- //
- gpGlobals->g.PlayerRoles.rgwLevel[wPlayerRole] += wNumLevel;
- if (gpGlobals->g.PlayerRoles.rgwLevel[wPlayerRole] > MAX_LEVELS)
- {
- gpGlobals->g.PlayerRoles.rgwLevel[wPlayerRole] = MAX_LEVELS;
- }
- for (i = 0; i < wNumLevel; i++)
- {
- //
- // Increase player's stats
- //
- gpGlobals->g.PlayerRoles.rgwMaxHP[wPlayerRole] += 10 + RandomLong(0, 8);
- gpGlobals->g.PlayerRoles.rgwMaxMP[wPlayerRole] += 8 + RandomLong(0, 6);
- gpGlobals->g.PlayerRoles.rgwAttackStrength[wPlayerRole] += 4 + RandomLong(0, 1);
- gpGlobals->g.PlayerRoles.rgwMagicStrength[wPlayerRole] += 4 + RandomLong(0, 1);
- gpGlobals->g.PlayerRoles.rgwDefense[wPlayerRole] += 2 + RandomLong(0, 1);
- gpGlobals->g.PlayerRoles.rgwDexterity[wPlayerRole] += 2 + RandomLong(0, 1);
- gpGlobals->g.PlayerRoles.rgwFleeRate[wPlayerRole] += 2;
- }
- #define STAT_LIMIT(t) { if ((t) > 999) (t) = 999; }
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwMaxHP[wPlayerRole]);
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwMaxMP[wPlayerRole]);
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwAttackStrength[wPlayerRole]);
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwMagicStrength[wPlayerRole]);
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwDefense[wPlayerRole]);
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwDexterity[wPlayerRole]);
- STAT_LIMIT(gpGlobals->g.PlayerRoles.rgwFleeRate[wPlayerRole]);
- #undef STAT_LIMIT
- //
- // Reset experience points to zero
- //
- gpGlobals->Exp.rgPrimaryExp[wPlayerRole].wExp = 0;
- gpGlobals->Exp.rgPrimaryExp[wPlayerRole].wLevel =
- gpGlobals->g.PlayerRoles.rgwLevel[wPlayerRole];
- }
|