mirror of
https://github.com/unknownworlds/NS.git
synced 2024-11-15 17:21:25 +00:00
60007652a3
git-svn-id: https://unknownworlds.svn.cloudforge.com/ns1@21 67975925-1194-0748-b3d5-c16f83f1a3a1
472 lines
No EOL
12 KiB
C++
472 lines
No EOL
12 KiB
C++
//======== (C) Copyright 2002 Charles G. Cleveland All rights reserved. =========
|
|
//
|
|
// The copyright to the contents herein is the property of Charles G. Cleveland.
|
|
// The contents may be used and/or copied only with the written permission of
|
|
// Charles G. Cleveland, or in accordance with the terms and conditions stipulated in
|
|
// the agreement/contract under which the contents have been supplied.
|
|
//
|
|
// Purpose:
|
|
//
|
|
// $Workfile: AvHScriptClient.cpp $
|
|
// $Date: 2002/06/10 20:01:24 $
|
|
//
|
|
//-------------------------------------------------------------------------------
|
|
// $Log: AvHScriptClient.cpp,v $
|
|
// Revision 1.2 2002/06/10 20:01:24 Flayra
|
|
// - Updated extern references to drawing code (ugh)
|
|
//
|
|
// Revision 1.1 2002/05/23 02:33:20 Flayra
|
|
// - Post-crash checkin. Restored @Backup from around 4/16. Contains changes for last four weeks of development.
|
|
//
|
|
// Revision 1.1 2002/05/14 18:54:48 Charlie
|
|
//===============================================================================
|
|
#include "mod/AvHHud.h"
|
|
#include "cl_dll/hud.h"
|
|
#include "cl_dll/cl_util.h"
|
|
#include "mod/AvHConstants.h"
|
|
#include "mod/AvHClientVariables.h"
|
|
#include "mod/AvHSpecials.h"
|
|
#include "common/cl_entity.h"
|
|
#include "mod/AvHTitles.h"
|
|
#include "pm_shared/pm_debug.h"
|
|
#include "util/MathUtil.h"
|
|
#include "common/r_efx.h"
|
|
#include "cl_dll/eventscripts.h"
|
|
#include "mod/AvHSprites.h"
|
|
#include "ui/UIUtil.h"
|
|
#include "types.h"
|
|
#include <signal.h>
|
|
#include "common/com_model.h"
|
|
#include "cl_dll/studio_util.h"
|
|
#include "cl_dll/r_studioint.h"
|
|
#include "mod/AvHMiniMap.h"
|
|
#include "mod/AvHActionButtons.h"
|
|
#include "util/STLUtil.h"
|
|
#include "mod/AvHSharedUtil.h"
|
|
#include "common/event_api.h"
|
|
#include "mod/AvHScriptManager.h"
|
|
|
|
extern "C" {
|
|
#include <lua.h>
|
|
}
|
|
|
|
extern void DrawScaledHUDSprite(int inSpriteHandle, int inMode, int inRowsInSprite = 1, int inX = 0, int inY = 0, int inWidth = ScreenWidth(), int inHeight = ScreenHeight(), int inForceSpriteFrame = -1, float inStartU = 0.0f, float inStartV = 0.0f, float inEndU = 1.0f, float inEndV = 1.0f, float inRotateUVRadians = 0.0f, bool inUVWrapsOverFrames = false);
|
|
extern vec3_t v_origin;
|
|
|
|
static int errormessage(lua_State* inState)
|
|
{
|
|
const char *s = lua_tostring(inState, 1);
|
|
if (s == NULL) s = "(no message)";
|
|
char theErrorMessage[2048];
|
|
sprintf(theErrorMessage, "Script error: %s\n", s);
|
|
|
|
// Print the message
|
|
//gEngfuncs.Con_Printf("%s", theErrorMessage);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int print(lua_State* inState)
|
|
{
|
|
int n = lua_gettop(inState);
|
|
int i;
|
|
string theString;
|
|
|
|
for (i=1; i<=n; i++)
|
|
{
|
|
if (i>1) theString = "\t";
|
|
if (lua_isstring(inState, i))
|
|
theString += string(lua_tostring(inState, i));
|
|
else
|
|
{
|
|
char theBuffer[512];
|
|
sprintf(theBuffer, "%s:%p",lua_typename(inState, lua_type(inState, i)),lua_topointer(inState,i));
|
|
theString += string(theBuffer);
|
|
}
|
|
}
|
|
//theString += string("\n");
|
|
|
|
// TODO: Print message
|
|
//UTIL_ClientPrintAll(HUD_PRINTNOTIFY, theString.c_str());
|
|
gEngfuncs.Con_Printf("%s", theString.c_str());
|
|
|
|
return 0;
|
|
}
|
|
|
|
// Runs a client command, returns success
|
|
static int clientCommand(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 1)
|
|
{
|
|
string theConsoleCommandString = lua_tostring(inState, 1);
|
|
|
|
char theConsoleCommand[1024];
|
|
strcpy(theConsoleCommand, theConsoleCommandString.c_str());
|
|
ClientCmd(theConsoleCommand);
|
|
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Returns xyz
|
|
static int getViewOrigin(lua_State* inState)
|
|
{
|
|
lua_pushnumber(inState, v_origin.x);
|
|
lua_pushnumber(inState, v_origin.y);
|
|
lua_pushnumber(inState, v_origin.z);
|
|
|
|
return 3;
|
|
}
|
|
|
|
static int getScreenWidth(lua_State* inState)
|
|
{
|
|
int theScreenWidth = ScreenWidth();
|
|
lua_pushnumber(inState, theScreenWidth);
|
|
return 1;
|
|
}
|
|
|
|
static int getScreenHeight(lua_State* inState)
|
|
{
|
|
int theScreenHeight = ScreenHeight();
|
|
lua_pushnumber(inState, theScreenHeight);
|
|
return 1;
|
|
}
|
|
|
|
// string spriteName, int inMode, int x0, int y0, int theWidth, int theHeight, optional frame
|
|
static int drawScaledHUDSprite(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 6)
|
|
{
|
|
string theSpriteName = lua_tostring(inState, 1);
|
|
int theRenderMode = lua_tonumber(inState, 2);
|
|
int theStartX = lua_tonumber(inState, 3);
|
|
int theStartY = lua_tonumber(inState, 4);
|
|
int theWidth = lua_tonumber(inState, 5);
|
|
int theHeight = lua_tonumber(inState, 6);
|
|
int theFrame = 0;
|
|
|
|
// Read optional frame
|
|
if(theNumArgs >= 7)
|
|
{
|
|
theFrame = lua_tonumber(inState, 7);
|
|
}
|
|
|
|
int theSpriteHandle = Safe_SPR_Load(theSpriteName.c_str());
|
|
if(theSpriteHandle)
|
|
{
|
|
DrawScaledHUDSprite(theSpriteHandle, theRenderMode, 1, theStartX, theStartY, theWidth, theHeight, theFrame);
|
|
theSuccess = true;
|
|
}
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Returns success if a valid mode is passed in
|
|
static int triRenderMode(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 1)
|
|
{
|
|
int theRenderMode = lua_tonumber(inState, 1);
|
|
if((theRenderMode >= kRenderNormal) && (theRenderMode <= kRenderTransAdd))
|
|
{
|
|
gEngfuncs.pTriAPI->RenderMode(theRenderMode);
|
|
theSuccess = true;
|
|
}
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Pass in primitive code, returns success
|
|
static int triBegin(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 1)
|
|
{
|
|
int thePrimitiveCode = lua_tonumber(inState, 1);
|
|
if((thePrimitiveCode >= TRI_TRIANGLES) && (thePrimitiveCode <= TRI_QUAD_STRIP))
|
|
{
|
|
gEngfuncs.pTriAPI->Begin(thePrimitiveCode);
|
|
theSuccess = true;
|
|
}
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes and returns nothing
|
|
static int triEnd(lua_State* inState)
|
|
{
|
|
gEngfuncs.pTriAPI->End();
|
|
|
|
return 0;
|
|
}
|
|
|
|
// Takes four floats (rgba), returns success
|
|
static int triColor4f(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 4)
|
|
{
|
|
float theR = lua_tonumber(inState, 1);
|
|
float theG = lua_tonumber(inState, 2);
|
|
float theB = lua_tonumber(inState, 3);
|
|
float theA = lua_tonumber(inState, 4);
|
|
|
|
gEngfuncs.pTriAPI->Color4f(theR, theG, theB, theA);
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes four ints (rgba), returns success
|
|
static int triColor4ub(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 4)
|
|
{
|
|
int theR = lua_tonumber(inState, 1);
|
|
int theG = lua_tonumber(inState, 2);
|
|
int theB = lua_tonumber(inState, 3);
|
|
int theA = lua_tonumber(inState, 4);
|
|
|
|
gEngfuncs.pTriAPI->Color4ub(theR, theG, theB, theA);
|
|
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes two floats (0 to 1), returns success
|
|
static int triTexCoord2f(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 2)
|
|
{
|
|
float theU = lua_tonumber(inState, 1);
|
|
float theV = lua_tonumber(inState, 2);
|
|
|
|
gEngfuncs.pTriAPI->TexCoord2f(theU, theV);
|
|
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes three floats, returns success
|
|
static int triVertex3f(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 3)
|
|
{
|
|
float theX = lua_tonumber(inState, 1);
|
|
float theY = lua_tonumber(inState, 2);
|
|
float theZ = lua_tonumber(inState, 3);
|
|
|
|
gEngfuncs.pTriAPI->Vertex3f(theX, theY, theZ);
|
|
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes float (0-1), returns success
|
|
static int triBrightness(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 1)
|
|
{
|
|
float theBrightness = lua_tonumber(inState, 1);
|
|
|
|
gEngfuncs.pTriAPI->Brightness(theBrightness);
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes cullstyle int (0 or 1), returns success
|
|
static int triCullFace(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 1)
|
|
{
|
|
int theCullStyleInt = lua_tonumber(inState, 1);
|
|
TRICULLSTYLE theCullStyle = TRICULLSTYLE(theCullStyleInt);
|
|
if((theCullStyle == TRI_FRONT) || (theCullStyle == TRI_NONE))
|
|
{
|
|
gEngfuncs.pTriAPI->CullFace(theCullStyle);
|
|
theSuccess = true;
|
|
}
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes texture name, and optional frame, sets the current texture. Returns true or false.
|
|
static int triSpriteTexture(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 1)
|
|
{
|
|
string theSpriteName = lua_tostring(inState, 1);
|
|
int theSpriteHandle = Safe_SPR_Load(theSpriteName.c_str());
|
|
if(theSpriteHandle)
|
|
{
|
|
int theSpriteFrame = 0;
|
|
if(theNumArgs >= 2)
|
|
{
|
|
theSpriteFrame = lua_tonumber(inState, 2);
|
|
}
|
|
|
|
if(gEngfuncs.pTriAPI->SpriteTexture((struct model_s *)gEngfuncs.GetSpritePointer(theSpriteHandle), theSpriteFrame))
|
|
{
|
|
theSuccess = true;
|
|
}
|
|
}
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Takes xyz, returns success, xy
|
|
static int triWorldToScreen(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
float theScreenPos[3];
|
|
memset(theScreenPos, 0, sizeof(float)*3);
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 3)
|
|
{
|
|
float theWorldPos[3];
|
|
theWorldPos[0] = lua_tonumber(inState, 1);
|
|
theWorldPos[1] = lua_tonumber(inState, 2);
|
|
theWorldPos[2] = lua_tonumber(inState, 3);
|
|
|
|
gEngfuncs.pTriAPI->WorldToScreen(theWorldPos, theScreenPos);
|
|
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
lua_pushnumber(inState, theScreenPos[0]);
|
|
lua_pushnumber(inState, theScreenPos[1]);
|
|
|
|
return 3;
|
|
}
|
|
|
|
// 3 floats for fog color, float fogStart, float fogEnd, int 0/1 for fog on or off. Returns true if correct parameters were passed in
|
|
static int triFog(lua_State* inState)
|
|
{
|
|
bool theSuccess = false;
|
|
|
|
int theNumArgs = lua_gettop(inState);
|
|
if(theNumArgs >= 6)
|
|
{
|
|
float theFogColor[3];
|
|
theFogColor[0] = lua_tonumber(inState, 1);
|
|
theFogColor[1] = lua_tonumber(inState, 2);
|
|
theFogColor[2] = lua_tonumber(inState, 3);
|
|
|
|
float theFogStart = lua_tonumber(inState, 4);
|
|
float theFogEnd = lua_tonumber(inState, 5);
|
|
int theFogOn = lua_tonumber(inState, 6);
|
|
|
|
gEngfuncs.pTriAPI->Fog(theFogColor, theFogStart, theFogEnd, theFogOn);
|
|
|
|
theSuccess = true;
|
|
}
|
|
|
|
lua_pushnumber(inState, theSuccess);
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
void AvHScriptInstance::InitClient()
|
|
{
|
|
//lua_register(this->mState, LUA_ERRORMESSAGE, errormessage);
|
|
lua_register(this->mState, "print", print);
|
|
lua_register(this->mState, "clientCommand", clientCommand);
|
|
lua_register(this->mState, "getViewOrigin", getViewOrigin);
|
|
|
|
// Drawing utility functions
|
|
lua_register(this->mState, "getScreenWidth", getScreenWidth);
|
|
lua_register(this->mState, "getScreenHeight", getScreenHeight);
|
|
lua_register(this->mState, "drawScaledHUDSprite", drawScaledHUDSprite);
|
|
|
|
// Tri API hooks
|
|
lua_register(this->mState, "triRenderMode", triRenderMode);
|
|
lua_register(this->mState, "triBegin", triBegin);
|
|
lua_register(this->mState, "triEnd", triEnd);
|
|
lua_register(this->mState, "triColor4f", triColor4f);
|
|
lua_register(this->mState, "triColor4ub", triColor4ub);
|
|
lua_register(this->mState, "triTexCoord2f", triTexCoord2f);
|
|
lua_register(this->mState, "triVertex3f", triVertex3f);
|
|
lua_register(this->mState, "triBrightness", triBrightness);
|
|
lua_register(this->mState, "triCullFace", triCullFace);
|
|
lua_register(this->mState, "triSpriteTexture", triSpriteTexture);
|
|
lua_register(this->mState, "triWorldToScreen", triWorldToScreen);
|
|
lua_register(this->mState, "triFog", triFog);
|
|
|
|
// Input hooks
|
|
|
|
//lua_register(this->mState, "drawScaledHUDSprite", drawScaledHUDSpriteUV);
|
|
//lua_register(this->mState, "drawScaledTiledHUDSprite", drawScaledTiledHUDSprite);
|
|
} |