[Lua] Nützliche Codeschnippsel

[Vio]Zipper · 20. März 2010

Gibts ja schon im SAMP-Bereich, denke es wäre auch für MTA angebracht:
Einfach kleinere Codeschnippsel, die euch nützlich erscheinen,
UND IN LUA VERFASST SIND ( Einige scheinens nicht ganz zu raffen - s.h. Vorstellungen ), posten.

_______________________________

Sucht nach einem Text ( lookingFor ) in einem zweiten,
z.b. nach "a" in "Hallo" oder "mag Schrimps" in "Ich mag Schrimps".
Gibt den Wert true zurück, wenn der die zweite Variabel, die übergeben wird,
die erste beinhaltet ( also wenn z.b. "a" in "Hallo" vorkommt ).

Code

function containsText ( lookingFor, text )


	if lookingFor and text then
		if #lookingFor >= #text then
			if lookingFor == text then
				return true
			else
				return false
			end
		else
			for i = 0, #text - #lookingFor + 1 do
				local switch = false
				for k = 1, #lookingFor do
					if string.sub ( text, i+k, i+k ) == string.sub ( lookingFor, k, k ) then
						switch = true
					else
						switch = false
						break
					end
				end
				if switch then
					return true
				end
			end
		end
	else
		return false
	end
end

Alles anzeigen

Jason_Gregory · 20. März 2010

Geht auch einfacher...

Code

s_find = {}
s_find["s_Start#1"], s_find["s_Ende#1"] = string.find(text, "Schrimps")
if(s_find["s_Start#1"] and s_find["s_Ende#1"] ~= false)then
   return s_find["s_Start#1"]
else
    return false
end

Gibt die genaue Startposition von "Ich mag Schrimps" in einem Text an, falls es weder Start noch Ende des Strings
erfassen kann, gibt es false zurück.

Multidimensionale Datengruppen/Arrays in Lua

Code

MaxPlayers = 128


Infoinput = {
 "Name",
 "Level",
 "Password",
 "Ip"
 }


local PlayerInfo = {}
   for key, i_Word in pairs(Infoinput) do
      PlayerInfo[i_Word ] = {}
      for Playerslots=1, MaxPlayers do
        PlayerInfo[Infoinput][Playerslots] = 0
      end
    end

Alles anzeigen

Jason_Gregory · 23. März 2010

Ccmd - by Jason
__________________________________________________________
http://wiki.multitheftauto.com/wiki/Ccmd

Struktur/Aufbau von Chatcommands in Mta 1.0 +

Code

c_cmds = {
 "kick", "k_player",
 "ban", "b_player"
 }

Code

function c_CommandHandler( message, messageType )
	local arg2
	if(message == 0)then
		nBeginn["c_Start"], nEnd["c_End"] = string.find(message, "!")
		if(nBeginn["c_Start"] ~= false and nBeginn["c_Start"] == 1)then
			message = string.lower(message) -- for accepting chatcommands like /KIcK or /kICK
			if(string.len(string.sub(message, 2)) > 0)then
				l_pos = 1
				for key, c_cmd in pairs(c_cmds), 2 do
					nBeginn["c_Arg"] = string.sub(message, 2, #c_cmds[l_pos]+2)
					-- Word Symbols
					arg2 = #c_cmd[l_pos]+3 -- +1 next arg tab
					l_pos=l_pos+2
					if(nBeginn["c_Arg"] == c_cmd)then
						--c_cmd[l_pos+1]
						l_pos=l_pos-1
						local c_Playa = getElementsByType( "player" )
						for theKey, c_Target in ipairs(c_Playa) do
							nBeginn["c_Target"], nEnd["c_Target"] = string.find(message, c_Target)
							if(nBeginn["c_Target"] == arg2 and nEnd["c_Target"] == #getPlayerName(c_Target)+arg2)then
								if(c_Target ~= source)then
									executeCommandHandler ( c_cmds[l_pos], source, c_Target )
								else
									return outputChatBox("* You are targeting yourself, Retard!", source)
								end
							else
								return outputChatBox("* Player "..string.sub(message,arg2).." not found!", source)
							end
						break -- playerloop
						end
					break -- arg1 loop
					else
						return outputChatBox("* Command !"..nBeginn["c_Arg"].." not found in tha Resource :o", source)
					end
				end
			end
		end
	end
 end
 addEventHandler( "onPlayerChat", getRootElement(), c_CommandHandler)

Alles anzeigen