mirror of
https://github.com/ENSL/NS.git
synced 2025-06-02 01:51:17 +00:00
Branched for the performance test.
git-svn-id: https://unknownworlds.svn.cloudforge.com/ns1@219 67975925-1194-0748-b3d5-c16f83f1a3a1
This commit is contained in:
tankefugl
parent
410d1ea62f
commit
3e025675b3
2811 changed files with 370563 additions and 0 deletions
472
dev/performance/source/mod/AvHScriptClient.cpp
Normal file
472
dev/performance/source/mod/AvHScriptClient.cpp
Normal file
|
|
@ -0,0 +1,472 @@
|
|||
//======== (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);
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue