mirror of
https://github.com/kevinbentley/Descent3.git
synced 2025-01-22 11:28:56 +00:00
315 lines
8.4 KiB
C++
315 lines
8.4 KiB
C++
/*
|
|
* Descent 3
|
|
* Copyright (C) 2024 Parallax Software
|
|
*
|
|
* 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 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/>.
|
|
*/
|
|
|
|
// testscript.cpp
|
|
// 0.1
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include "osiris_import.h"
|
|
#include "osiris_common.h"
|
|
|
|
#include "module.h"
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
DLLEXPORT char STDCALL InitializeDLL(tOSIRISModuleInit *func_list);
|
|
DLLEXPORT void STDCALL ShutdownDLL(void);
|
|
DLLEXPORT int STDCALL GetGOScriptID(const char *name, uint8_t isdoor);
|
|
DLLEXPORT void STDCALLPTR CreateInstance(int id);
|
|
DLLEXPORT void STDCALL DestroyInstance(int id, void *ptr);
|
|
DLLEXPORT int16_t STDCALL CallInstanceEvent(int id, void *ptr, int event, tOSIRISEventInfo *data);
|
|
DLLEXPORT int STDCALL SaveRestoreState(void *file_ptr, uint8_t saving_state);
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
// ==========================
|
|
// Script class definitions//
|
|
// ==========================
|
|
#define ID_SHIELD_ORB 0x00 // shield id
|
|
#define ID_ENERGY_ORB 0x01 // energy id
|
|
#define MAX_IDS 0x02 // maximum number of IDs
|
|
struct tScriptInfo {
|
|
int id;
|
|
const char *name;
|
|
};
|
|
|
|
tScriptInfo ScriptInfo[MAX_IDS] = {{ID_SHIELD_ORB, "Shield"}, {ID_ENERGY_ORB, "Energy"}};
|
|
|
|
class BaseObjScript {
|
|
public:
|
|
virtual ~BaseObjScript() = default;
|
|
virtual int16_t CallEvent(int event, tOSIRISEventInfo *data);
|
|
|
|
protected:
|
|
bool called = false;
|
|
};
|
|
|
|
struct tShieldOrbInfo {
|
|
int hitcount;
|
|
};
|
|
//------------------
|
|
// Shield orb script
|
|
//------------------
|
|
class ShieldOrb final : public BaseObjScript {
|
|
public:
|
|
ShieldOrb() { info = NULL; }
|
|
int16_t CallEvent(int event, tOSIRISEventInfo *data);
|
|
|
|
private:
|
|
tShieldOrbInfo *info;
|
|
};
|
|
|
|
//------------------
|
|
// Energy orb script
|
|
//------------------
|
|
class EnergyOrb final : public BaseObjScript {
|
|
public:
|
|
int16_t CallEvent(int event, tOSIRISEventInfo *data);
|
|
};
|
|
|
|
char STDCALL InitializeDLL(tOSIRISModuleInit *func_list) {
|
|
osicommon_Initialize((tOSIRISModuleInit *)func_list);
|
|
|
|
return 1;
|
|
}
|
|
|
|
void STDCALL ShutdownDLL(void) {}
|
|
|
|
int STDCALL GetGOScriptID(const char *name, uint8_t isdoor) {
|
|
for (int i = 0; i < MAX_IDS; i++) {
|
|
if (!stricmp(name, ScriptInfo[i].name)) {
|
|
return ScriptInfo[i].id;
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
void STDCALLPTR CreateInstance(int id) {
|
|
switch (id) {
|
|
case ID_SHIELD_ORB:
|
|
return new ShieldOrb;
|
|
break;
|
|
case ID_ENERGY_ORB:
|
|
return new EnergyOrb;
|
|
break;
|
|
default:
|
|
mprintf(0, "SCRIPT: Illegal ID (%d)\n", id);
|
|
break;
|
|
};
|
|
return NULL;
|
|
}
|
|
|
|
void STDCALL DestroyInstance(int id, void *ptr) {
|
|
switch (id) {
|
|
case ID_SHIELD_ORB:
|
|
delete ((ShieldOrb *)ptr);
|
|
break;
|
|
case ID_ENERGY_ORB:
|
|
delete ((EnergyOrb *)ptr);
|
|
break;
|
|
default:
|
|
mprintf(0, "SCRIPT: Illegal ID (%d)\n", id);
|
|
break;
|
|
};
|
|
}
|
|
|
|
int16_t STDCALL CallInstanceEvent(int id, void *ptr, int event, tOSIRISEventInfo *data) {
|
|
switch (id) {
|
|
case ID_SHIELD_ORB:
|
|
case ID_ENERGY_ORB:
|
|
return ((BaseObjScript *)ptr)->CallEvent(event, data);
|
|
break;
|
|
default:
|
|
mprintf(0, "SCRIPT: Illegal ID (%d)\n", id);
|
|
break;
|
|
};
|
|
|
|
return CONTINUE_CHAIN | CONTINUE_DEFAULT;
|
|
}
|
|
|
|
// SaveRestoreState
|
|
// Purpose:
|
|
// This function is called when Descent 3 is saving or restoring the game state. In this function
|
|
// you should save/restore any global data that you want preserved through load/save (which includes
|
|
// demos). You must be very careful with this function, corrupting the file (reading or writing too
|
|
// much or too little) may be hazardous to the game (possibly making it impossible to restore the
|
|
// state). It would be best to use version information to keep older versions of saved states still
|
|
// able to be used. IT IS VERY IMPORTANT WHEN SAVING THE STATE TO RETURN THE NUMBER OF _BYTES_ WROTE
|
|
// TO THE FILE. When restoring the data, the return value is ignored. saving_state is 1 when you should
|
|
// write data to the file_ptr, 0 when you should read in the data.
|
|
int STDCALL SaveRestoreState(void *file_ptr, uint8_t saving_state) { return 0; }
|
|
|
|
//============================================
|
|
// Script Implementation
|
|
//============================================
|
|
int16_t BaseObjScript::CallEvent(int event, tOSIRISEventInfo *data) {
|
|
switch (event) {
|
|
case EVT_INTERVAL:
|
|
mprintf(0, ".");
|
|
break;
|
|
case EVT_AI_FRAME:
|
|
mprintf(0, "*");
|
|
break;
|
|
case EVT_DAMAGED:
|
|
mprintf(0, "EVT_DAMAGED ");
|
|
break;
|
|
case EVT_COLLIDE:
|
|
mprintf(0, "EVT_COLLIDE ");
|
|
break;
|
|
case EVT_CREATED:
|
|
mprintf(0, "EVT_CREATED ");
|
|
break;
|
|
case EVT_DESTROY:
|
|
mprintf(0, "EVT_DESTROY ");
|
|
break;
|
|
case EVT_TIMER:
|
|
mprintf(0, "EVT_TIMER ");
|
|
break;
|
|
case EVT_USE:
|
|
mprintf(0, "EVT_USE ");
|
|
break;
|
|
case EVT_AI_NOTIFY:
|
|
mprintf(0, "EVT_AI_NOTIFY ");
|
|
break;
|
|
case EVT_AI_INIT:
|
|
mprintf(0, "EVT_AI_INIT ");
|
|
break;
|
|
case EVT_CHANGESEG:
|
|
mprintf(0, "EVT_CHANGESEG ");
|
|
break;
|
|
};
|
|
|
|
return CONTINUE_CHAIN | CONTINUE_DEFAULT;
|
|
}
|
|
|
|
// --------------
|
|
// Shield orb
|
|
// --------------
|
|
int16_t ShieldOrb::CallEvent(int event, tOSIRISEventInfo *data) {
|
|
switch (event) {
|
|
case EVT_COLLIDE:
|
|
if (!called) {
|
|
mprintf(0, "Collide with shield\n");
|
|
msafe_struct mo;
|
|
|
|
mo.objhandle = data->evt_collide.it_handle;
|
|
MSafe_GetValue(MSAFE_OBJECT_TYPE, &mo);
|
|
MSafe_GetValue(MSAFE_OBJECT_ID, &mo);
|
|
|
|
if (mo.type == OBJ_PLAYER) {
|
|
|
|
MSafe_GetValue(MSAFE_OBJECT_SHIELDS, &mo);
|
|
if (mo.shields < 200) {
|
|
mo.shields += 15;
|
|
if (mo.shields > 200)
|
|
mo.shields = 200;
|
|
MSafe_CallFunction(MSAFE_OBJECT_SHIELDS, &mo);
|
|
|
|
mo.slot = mo.id;
|
|
mo.color = GR_RGB(0, 255, 0);
|
|
snprintf(mo.message, sizeof(mo.message), "Shields boosted to %d", (int)mo.shields);
|
|
MSafe_CallFunction(MSAFE_MISC_HUD_MESSAGE, &mo);
|
|
called = true;
|
|
}
|
|
|
|
tOSIRISTIMER ti;
|
|
ti.flags = 0;
|
|
ti.id = 0;
|
|
ti.repeat_count = -1;
|
|
ti.object_handle = data->me_handle;
|
|
ti.timer_interval = 10.0f;
|
|
Scrpt_CreateTimer(&ti);
|
|
}
|
|
|
|
tOSIRISMEMCHUNK ch;
|
|
ch.id = 4;
|
|
ch.size = sizeof(tShieldOrbInfo);
|
|
ch.my_id.type = OBJECT_SCRIPT;
|
|
ch.my_id.objhandle = data->me_handle;
|
|
info = (tShieldOrbInfo *)Scrpt_MemAlloc(&ch);
|
|
if (info) {
|
|
info->hitcount = 1;
|
|
}
|
|
} else {
|
|
if (info) {
|
|
info->hitcount++;
|
|
}
|
|
}
|
|
|
|
if (info) {
|
|
mprintf(0, "HIT(%d)\n", info->hitcount);
|
|
}
|
|
break;
|
|
|
|
case EVT_MEMRESTORE: {
|
|
info = (tShieldOrbInfo *)data->evt_memrestore.memory_ptr;
|
|
mprintf(0, "MEM RESTORE!!! -- %d(%d)\n", data->evt_memrestore.id, info->hitcount);
|
|
} break;
|
|
|
|
case EVT_TIMER: {
|
|
msafe_struct mo;
|
|
mo.objhandle = data->me_handle;
|
|
MSafe_GetValue(MSAFE_OBJECT_ID, &mo);
|
|
mo.slot = mo.id;
|
|
mo.color = GR_RGB(0, 255, 0);
|
|
snprintf(mo.message, sizeof(mo.message), "TIMER: HIT COUNT %d", (info) ? info->hitcount : -1);
|
|
MSafe_CallFunction(MSAFE_MISC_HUD_MESSAGE, &mo);
|
|
} break;
|
|
}
|
|
return CONTINUE_CHAIN | CONTINUE_DEFAULT; // BaseObjScript::CallEvent(event,data);
|
|
}
|
|
|
|
// --------------
|
|
// Energy orb
|
|
// --------------
|
|
int16_t EnergyOrb::CallEvent(int event, tOSIRISEventInfo *data) {
|
|
switch (event) {
|
|
case EVT_COLLIDE:
|
|
if (!called) {
|
|
mprintf(0, "Collide with energy\n");
|
|
msafe_struct mo;
|
|
|
|
mo.objhandle = data->evt_collide.it_handle;
|
|
MSafe_GetValue(MSAFE_OBJECT_TYPE, &mo);
|
|
MSafe_GetValue(MSAFE_OBJECT_ID, &mo);
|
|
|
|
if (mo.type == OBJ_PLAYER) {
|
|
|
|
MSafe_GetValue(MSAFE_OBJECT_ENERGY, &mo);
|
|
if (mo.energy < 200) {
|
|
mo.energy += 15;
|
|
if (mo.energy > 200)
|
|
mo.energy = 200;
|
|
MSafe_CallFunction(MSAFE_OBJECT_ENERGY, &mo);
|
|
|
|
mo.slot = mo.id;
|
|
mo.color = GR_RGB(0, 255, 0);
|
|
snprintf(mo.message, sizeof(mo.message), "Energy boosted to %d", (int)mo.energy);
|
|
MSafe_CallFunction(MSAFE_MISC_HUD_MESSAGE, &mo);
|
|
called = true;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return CONTINUE_CHAIN | CONTINUE_DEFAULT;
|
|
}
|