ETPro:Lua Sample Code - Revision history

=FF=im2good4u: Added link to toturals page

2006-08-28T20:03:30Z

Added link to toturals page

=FF=im2good4u: i forgot to color 1 if

2006-04-27T20:24:12Z

i forgot to color 1 if

WeblionX: wiki link fix

2006-04-27T20:22:34Z

wiki link fix

=FF=im2good4u: syntax highlight part 2 + removed old et_ClientSay

2006-04-27T14:33:14Z

syntax highlight part 2 + removed old et_ClientSay

=FF=im2good4u: connected into 1 block

2006-04-27T13:19:55Z

connected into 1 block

=FF=im2good4u: syntax highlighting part 1

2006-04-27T13:11:26Z

syntax highlighting part 1

Rookie One: Made a silly mistake, sorry. :blush:

2005-11-11T18:00:35Z

Made a silly mistake, sorry. :blush:

Rookie One: There's no such thing as et.G_Printf. Changed everything to et.G_Print. Also fixed various typos.

2005-11-11T17:59:20Z

There's no such thing as et.G_Printf. Changed everything to et.G_Print. Also fixed various typos.

Bani at 10:31, 3 November 2005

2005-11-03T10:31:33Z

Bani at 10:29, 3 November 2005

2005-11-03T10:29:40Z

← Older revision		Revision as of 20:03, 28 August 2006
Line 1:		Line 1:
	This code does nothing useful besides demonstrate and exercise the [[Lua Mod API]]		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 48: @@
   <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>) )
-         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>
                  <font color="blue">repeat</font>

← Older revision		Revision as of 20:22, 27 April 2006
Line 1:		Line 1:
−	This code does nothing useful besides demonstrate and exercise the [[~~ETPro:~~Lua Mod API]]	+	This code does nothing useful besides demonstrate and exercise the [[Lua Mod API]]

	<font color="green">-- printf wrapper</font>		<font color="green">-- printf wrapper</font>

@@ Line 24: / Line 24: @@
          et.G_Printf( <font color="darkblue">"et_InitGame [%d] [%d] [%d]\n"</font>, levelTime, randomSeed, restart )
          et.RegisterModname( <font color="darkblue">"bani qagame "</font> .. et.FindSelf() )
-  <font color="green">--      test_lua_functions()</font>
+  <font color="green">--     test_lua_functions()</font>
   <font color="blue">end</font>
@@ Line 31: / Line 31: @@
   <font color="blue">function</font> et_RunFrame( levelTime )
          <font color="blue">if</font> math.mod( levelTime, <font color="blue">1000</font> ) == <font color="blue">0 then</font>
-  <font color="green">--              et.G_Printf( et_RunFrame [%d]\n", levelTime )</font>
+  <font color="green">--             et.G_Printf( et_RunFrame [%d]\n", levelTime )</font>
          <font color="blue">end</font>
   <font color="blue">end</font>
@@ Line 40: / Line 40: @@
   <font color="blue">function</font> et_ClientCommand( clientNum, cmd )
          et.G_Printf( <font color="darkblue">"et_ClientCommand: [%d] [%s]\n"</font>, et.trap_Argc(), cmd )
-         return <font color="blue">0</font>
+         <font color="blue">return</font> <font color="blue">0</font>
   <font color="blue">end</font>
-−
-<pre>
--- called for every consolecommand
+ <font color="green">-- called for every consolecommand</font>
--- return 1 if intercepted, 0 if passthrough
+ <font color="green">-- return 1 if intercepted, 0 if passthrough</font>
-function et_ConsoleCommand()
+ <font color="blue">function</font> et_ConsoleCommand()
-         et.G_Printf( "et_ConsoleCommand: [%s] [%s]\n", et.trap_Argc(), et.trap_Argv(0) )
+         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(0) == "listmods" then
+         if et.trap_Argv(<font color="blue">0</font>) == <font color="darkblue">"listmods"</font> <font color="blue">then</font>
-                 i = 1
+                 i = <font color="blue">1</font>
-                 repeat
+                 <font color="blue">repeat</font>
                          modname, signature = et.FindMod( i )
-                         if modname and signature then
+                         <font color="blue">if</font> modname <font color="blue">and</font> signature <font color="blue">then</font>
-                                 et.G_Printf( "vm slot [%d] name [%s] signature [%s]\n", i, modname, signature )
+                                 et.G_Printf( <font color="darkblue">"vm slot [%d] name [%s] signature [%s]\n"</font>, i, modname, signature )
-                                 et.IPCSend( i, "hello" )
+                                 et.IPCSend( i, <font color="darkblue">"hello"</font> )
-                         end
+                         <font color="blue">end</font>
-                         i = i + 1
+                         i = i + <font color="blue">1</font>
-                 until modname == nil or signature == nil
+                 <font color="blue">until</font> modname == <font color="blue">nil</font> <font color="blue">or</font> signature == <font color="blue">nil</font>
-                 return 1
+                 <font color="blue">return</font> <font color="blue">1</font>
-         end
+         <font color="blue">end</font>
-         return 0
+         <font color="blue">return</font> <font color="blue">0</font>
-end
+  <font color="blue">end</font>
-−
 -- called when we receive an IPC from another VM
-function et_IPCReceive( vmnumber, message )
+ <font color="green">-- called when we receive an IPC from another VM</font>
-         et.G_Printf( "IPCReceive [%d] from [%d] message [%s]\n", et.FindSelf(), vmnumber, message )
+ <font color="blue">function</font> et_IPCReceive( vmnumber, message )
-end
+         et.G_Printf( <font color="darkblue">"IPCReceive [%d] from [%d] message [%s]\n"</font>, et.FindSelf(), vmnumber, message )
+ <font color="blue">end</font>
 -- called for every ClientConnect
 function et_ClientConnect( clientNum, firstTime, isBot )
-         et.G_Printf( "et_ClientConnect: [%d] [%d] [%d]\n", clientNum, firstTime, isBot )
+ <font color="green">-- called for every ClientConnect</font>
---      return "go away"
+ <font color="blue">function</font> et_ClientConnect( clientNum, firstTime, isBot )
-         return nil
+         et.G_Printf( <font color="darkblue">"et_ClientConnect: [%d] [%d] [%d]\n"</font>, clientNum, firstTime, isBot )
-end
+ <font color="green">--     return "go away"</font>
+         <font color="blue">return</font> <font color="blue">nil</font>
--- called for every ClientDisconnect
+ <font color="blue">end</font>
 function et_ClientDisconnect( clientNum )
          et.G_Printf( "et_ClientDisconnect: [%d]\n", clientNum )
-end
+ <font color="green">-- called for every ClientDisconnect</font>
+ <font color="blue">function</font> et_ClientDisconnect( clientNum )
--- called for every ClientBegin
+         et.G_Printf( <font color="darkblue">"et_ClientDisconnect: [%d]\n"</font>, clientNum )
-function et_ClientBegin( clientNum )
+ <font color="blue">end</font>
          et.G_Printf( "et_ClientBegin: [%d]\n", clientNum )
 end
+ <font color="green">-- called for every ClientBegin</font>
--- called for every ClientUserinfoChanged
+ <font color="blue">function</font> et_ClientBegin( clientNum )
-function et_ClientUserinfoChanged( clientNum )
+         et.G_Printf( <font color="darkblue">"et_ClientBegin: [%d]\n"</font>, clientNum )
-         et.G_Printf( "et_ClientUserinfoChanged: [%d] = [%s]\n", clientNum, et.trap_GetUserinfo( clientNum ) )
+ <font color="blue">end</font>
 end
-−
--- called for every trap_Printf
+ <font color="green">-- called for every ClientUserinfoChanged</font>
-function et_Print( text )
+ <font color="blue">function</font> et_ClientUserinfoChanged( clientNum )
---      et.G_Printf( "et_Print [%s]", text )
+         et.G_Printf( <font color="darkblue">"et_ClientUserinfoChanged: [%d] = [%s]\n"</font>, clientNum, et.trap_GetUserinfo( clientNum ) )
-end
+ <font color="blue">end</font>
 [[Category:ETPro]]

@@ Line 5: / Line 5: @@
          et.G_Print(string.format(unpack(arg)))
   <font color="blue">end</font>
-−
   <font color="green">-- test some of the supported etpro lua functions</font>
   <font color="blue">function</font> test_lua_functions()
@@ Line 17: / Line 18: @@
          et.G_Printf( <font color="darkblue">"gentity[1022].classname = [%s]"</font>, et.gentity_get( <font color="blue">1022</font>, <font color="darkblue">"classname"</font> ) )
   <font color="blue">end</font>
-−
-−
   <font color="green">-- called when game inits</font>
   <font color="blue">function</font> et_InitGame( levelTime, randomSeed, restart )
@@ Line 25: / Line 26: @@
   <font color="green">--      test_lua_functions()</font>
   <font color="blue">end</font>
-−
   <font color="green">-- called every server frame</font>
   <font color="blue">function</font> et_RunFrame( levelTime )
@@ Line 32: / Line 34: @@
          <font color="blue">end</font>
   <font color="blue">end</font>
-−
   <font color="green">-- called for every clientcommand</font>
   <font color="green">-- return 1 if intercepted, 0 if passthrough</font>

@@ Line 1: / Line 1: @@
 This code does nothing useful besides demonstrate and exercise the [[ETPro:Lua Mod API]]
-<pre>
+ <font color="green">-- printf wrapper</font>
--- printf wrapper
+ <font color="blue">function</font> et.G_Printf(...)
 function et.G_Printf(...)
          et.G_Print(string.format(unpack(arg)))
-end
+ <font color="blue">end</font>
--- test some of the supported etpro lua functions
+ <font color="green">-- test some of the supported etpro lua functions</font>
-function test_lua_functions()
+ <font color="blue">function</font> test_lua_functions()
-         et.trap_Cvar_Set( "bla1", "bla2" )
+         et.trap_Cvar_Set( <font color="darkblue">"bla1"</font>, <font color="darkblue">"bla2"</font> )
-         et.G_Printf( "sv_hostname [%s]\n", et.trap_Cvar_Get( "sv_hostname" ) )
+         et.G_Printf( <font color="darkblue">"sv_hostname [%s]\n"</font>, et.trap_Cvar_Get( <font color="darkblue">"sv_hostname"</font> ) )
-         et.G_Printf( "configstring 1 [%s]\n", et.trap_GetConfigstring( 1 ) )
+         et.G_Printf( <font color="darkblue">"configstring 1 [%s] \n"</font>, et.trap_GetConfigstring( <font color="blue">1</font> ) )
-         et.trap_SetConfigstring( 4, "yadda test" )
+         et.trap_SetConfigstring( <font color="blue">4</font>, <font color="darkblue">"yadda test"</font> )
-         et.G_Printf( "configstring 4 [%s]\n", et.trap_GetConfigstring( 4 ) )
+         et.G_Printf( <font color="darkblue">"configstring 4 [%s]\n"</font>, et.trap_GetConfigstring( <font color="blue">4</font> ) )
-         et.trap_SendConsoleCommand( et.EXEC_APPEND, "cvarlist *charge*\n" )
+         et.trap_SendConsoleCommand( et.EXEC_APPEND, <font color="darkblue">"cvarlist *charge*\n"</font> )
-         et.trap_SendServerCommand( -1, "print \"Yadda yadda\"" )
+         et.trap_SendServerCommand( -<font color="blue">1</font>, <font color="darkblue">"print \"Yadda yadda\""</font> )
-         et.G_Printf( "gentity[1022].classname = [%s]", et.gentity_get( 1022, "classname" ) )
+         et.G_Printf( <font color="darkblue">"gentity[1022].classname = [%s]"</font>, et.gentity_get( <font color="blue">1022</font>, <font color="darkblue">"classname"</font> ) )
-end
+ <font color="blue">end</font>
--- called every server frame
+ <font color="green">-- called when game inits</font>
-function et_RunFrame( levelTime )
+ <font color="blue">function</font> et_InitGame( levelTime, randomSeed, restart )
-        if math.mod( levelTime, 1000 ) == 0 then
+        et.G_Printf( <font color="darkblue">"et_InitGame [%d] [%d] [%d]\n"</font>, levelTime, randomSeed, restart )
---              et.G_Printf( "et_RunFrame [%d]\n", levelTime )
+         et.RegisterModname( <font color="darkblue">"bani qagame "</font> .. et.FindSelf() )
-         end
+ <font color="green">--      test_lua_functions()</font>
-end
+ <font color="blue">end</font>
--- called for every clientcommand
+ <font color="green">-- called every server frame</font>
--- return 1 if intercepted, 0 if passthrough
+ <font color="blue">function</font> et_RunFrame( levelTime )
-function et_ClientCommand( clientNum, cmd )
+         <font color="blue">if</font> math.mod( levelTime, <font color="blue">1000</font> ) == <font color="blue">0 then</font>
-         et.G_Printf( "et_ClientCommand: [%d] [%s]\n", et.trap_Argc(), cmd )
+ <font color="green">--              et.G_Printf( et_RunFrame [%d]\n", levelTime )</font>
-         return 0
+         <font color="blue">end</font>
-end
+ <font color="blue">end</font>
 -- called for every consolecommand
 -- return 1 if intercepted, 0 if passthrough
@@ Line 97: / Line 98: @@
 end
 </pre>
 [[Category:ETPro]]

← Older revision		Revision as of 10:31, 3 November 2005
Line 97:		Line 97:
	end		end
	</pre>		</pre>
		+
		+	[[Category:ETPro]]

← Older revision		Revision as of 10:29, 3 November 2005
Line 1:		Line 1:
		+	This code does nothing useful besides demonstrate and exercise the [[ETPro:Lua Mod API]]
		+
	<pre>		<pre>
	-- printf wrapper		-- printf wrapper