Difference between revisions of "ETPro:Lua Sample Code"
From WolfWiki
(syntax highlight part 2 + removed old et_ClientSay) |
m (Added link to toturals page) |
||
(2 intermediate revisions by 2 users not shown) | |||
Line 1: | Line 1: | ||
− | This code does nothing useful besides demonstrate and exercise the [[ | + | This code does nothing useful besides demonstrate and exercise the [[Lua Mod API]] |
+ | |||
+ | Real tutorials about ETPro Lua scripting can be found [[Lua Tutorials|here]]. | ||
<font color="green">-- printf wrapper</font> | <font color="green">-- printf wrapper</font> | ||
Line 48: | Line 50: | ||
<font color="blue">function</font> et_ConsoleCommand() | <font color="blue">function</font> et_ConsoleCommand() | ||
et.G_Printf( <font color="darkblue">"et_ConsoleCommand: [%s] [%s]\n"</font>, et.trap_Argc(), et.trap_Argv(<font color="blue">0</font>) ) | et.G_Printf( <font color="darkblue">"et_ConsoleCommand: [%s] [%s]\n"</font>, et.trap_Argc(), et.trap_Argv(<font color="blue">0</font>) ) | ||
− | if et.trap_Argv(<font color="blue">0</font>) == <font color="darkblue">"listmods"</font> <font color="blue">then</font> | + | <font color="blue">if</font> et.trap_Argv(<font color="blue">0</font>) == <font color="darkblue">"listmods"</font> <font color="blue">then</font> |
i = <font color="blue">1</font> | i = <font color="blue">1</font> | ||
<font color="blue">repeat</font> | <font color="blue">repeat</font> |
Latest revision as of 20:03, 28 August 2006
This code does nothing useful besides demonstrate and exercise the Lua Mod API
Real tutorials about ETPro Lua scripting can be found here.
-- printf wrapper function et.G_Printf(...) et.G_Print(string.format(unpack(arg))) end -- test some of the supported etpro lua functions function test_lua_functions() et.trap_Cvar_Set( "bla1", "bla2" ) et.G_Printf( "sv_hostname [%s]\n", et.trap_Cvar_Get( "sv_hostname" ) ) et.G_Printf( "configstring 1 [%s] \n", et.trap_GetConfigstring( 1 ) ) et.trap_SetConfigstring( 4, "yadda test" ) et.G_Printf( "configstring 4 [%s]\n", et.trap_GetConfigstring( 4 ) ) et.trap_SendConsoleCommand( et.EXEC_APPEND, "cvarlist *charge*\n" ) et.trap_SendServerCommand( -1, "print \"Yadda yadda\"" ) et.G_Printf( "gentity[1022].classname = [%s]", et.gentity_get( 1022, "classname" ) ) end -- called when game inits function et_InitGame( levelTime, randomSeed, restart ) et.G_Printf( "et_InitGame [%d] [%d] [%d]\n", levelTime, randomSeed, restart ) et.RegisterModname( "bani qagame " .. et.FindSelf() ) -- test_lua_functions() end -- called every server frame function et_RunFrame( levelTime ) if math.mod( levelTime, 1000 ) == 0 then -- et.G_Printf( et_RunFrame [%d]\n", levelTime ) end end -- called for every clientcommand -- return 1 if intercepted, 0 if passthrough function et_ClientCommand( clientNum, cmd ) et.G_Printf( "et_ClientCommand: [%d] [%s]\n", et.trap_Argc(), cmd ) return 0 end -- called for every consolecommand -- return 1 if intercepted, 0 if passthrough function et_ConsoleCommand() et.G_Printf( "et_ConsoleCommand: [%s] [%s]\n", et.trap_Argc(), et.trap_Argv(0) ) if et.trap_Argv(0) == "listmods" then i = 1 repeat modname, signature = et.FindMod( i ) if modname and signature then et.G_Printf( "vm slot [%d] name [%s] signature [%s]\n", i, modname, signature ) et.IPCSend( i, "hello" ) end i = i + 1 until modname == nil or signature == nil return 1 end return 0 end -- called when we receive an IPC from another VM function et_IPCReceive( vmnumber, message ) et.G_Printf( "IPCReceive [%d] from [%d] message [%s]\n", et.FindSelf(), vmnumber, message ) end -- called for every ClientConnect function et_ClientConnect( clientNum, firstTime, isBot ) et.G_Printf( "et_ClientConnect: [%d] [%d] [%d]\n", clientNum, firstTime, isBot ) -- return "go away" return nil end -- called for every ClientDisconnect function et_ClientDisconnect( clientNum ) et.G_Printf( "et_ClientDisconnect: [%d]\n", clientNum ) end -- called for every ClientBegin function et_ClientBegin( clientNum ) et.G_Printf( "et_ClientBegin: [%d]\n", clientNum ) end -- called for every ClientUserinfoChanged function et_ClientUserinfoChanged( clientNum ) et.G_Printf( "et_ClientUserinfoChanged: [%d] = [%s]\n", clientNum, et.trap_GetUserinfo( clientNum ) ) end -- called for every trap_Printf function et_Print( text ) -- et.G_Printf( "et_Print [%s]", text ) end