same one can to convert to lua 5?

[(-=TrIp-iN-SuN=-)]

same one can to help me convert this script to lua 5?

--==NewCommand==--
if cmd == "!pull" then
SendToAll("*** " ..curUser.sName.. " is pulling faces at you .. :P ")
return 1
end
--==NewCommand==--
if cmd == "!mood" then
SendToAll("*** " ..curUser.sName.. " is in a good mood...HURRAY ")
return 1
end
--==NewCommand==--
if cmd == "!relax" then
SendToAll("*** " ..curUser.sName.. " is kicking back,relaxing for a change ")
return 1
end
--==NewCommand==--
if cmd == "!murder" then
SendToAll("*** " ..curUser.sName.. " is about to murder you ... haha ")
return 1
end
--==NewCommand==--
if cmd == "!scream" then
SendToAll("*** " ..curUser.sName.. " wants to scream out .... AAARRRRGGGGHHHHH ")
return 1
end
--==NewCommand==--
if cmd == "!tv" then
SendToAll("*** " ..curUser.sName.. " is watching television ")
return 1
end
--==NewCommand==--
if cmd == "!ignore" then
SendToAll("*** " ..curUser.sName.. " is ignoring you,so leave alone ")
return 1
end
--==NewCommand==--
if cmd == "!bed" then
SendToAll("*** " ..curUser.sName.. " night night all, ZZZZZZZzzzzzzzzz ")
return 1
end
--==NewCommand==--
if cmd == "!bad" then
SendToAll("*** " ..curUser.sName.. " is having a bad day ... so sod off ")
return 1
end


--==NewVictimCommand==--
if cmd == "!machine-gun" then
local s,e,victim = strfind(data, "%b<>%s+%S+%s+(%S+)")
if victim == nil then
curUser:SendData(Bot, "Syntax: "..cmd.." nick")
return 1
end
vUser = GetItemByName(victim)
if not vUser then
curUser:SendData(Bot, " *** " ..victim.." is not online or wrong name...")
return 1
end
SendToAll("*** "..curUser.sName.." picks up a AK47 and shoots "..vUser.sName.." in the ASS!")
return 1
end
--==NewVictimCommand==--
if cmd == "!spy" then --//The Command...
local s,e,victim = strfind(data, "%b<>%s+%S+%s+(%S+)")
if victim == nil then --//Forgot Nick?
curUser:SendData(Bot, "Syntax: "..cmd.." nick") --//If So Send This
return 1
end
vUser = GetItemByName(victim) --//vUser And Victim Is The Same
if not vUser then
curUser:SendData(Bot, " *** " ..victim.." is not online or wrong name...") --//Wrong Name
return 1
end
SendToAll("*** "..curUser.sName.." spies on "..vUser.sName.." so watch your step.")--//Do To A User
return 1
end
--==NewVictimCommand==--
if cmd == "!snog" then --//The Command...
local s,e,victim = strfind(data, "%b<>%s+%S+%s+(%S+)")
if victim == nil then --//Forgot Nick?
curUser:SendData(Bot, "Syntax: "..cmd.." nick") --//If So Send This
return 1
end
vUser = GetItemByName(victim) --//vUser And Victim Is The Same
if not vUser then
curUser:SendData(Bot, " *** " ..victim.." is not online or wrong name...") --//Wrong Name
return 1
end
SendToAll("*** "..curUser.sName.." is snogging the face off "..vUser.sName.." ")--//Do To A User
return 1
end
--==NewCommand==--
if cmd == "!suicide" or cmd == "!suicide" then
curUser:SendData(Bot, "Run's out the front door screaming and jumps infront of bus!!!!")
curUser:Disconnect()
return 1
end

curUser:SendData("$UserCommand 1 2 FunScript\\Do To A User\\Snog User$<%[mynick]> !snog %[nick]||")
curUser:SendData("$UserCommand 1 2 FunScript\\Do To A User\\Machine-gun$<%[mynick]> !machine-gun %[nick]||")
curUser:SendData("$UserCommand 1 2 FunScript\\Do To A User\\Spy$<%[mynick]> !spy %[nick]||")

curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Tv$<%[mynick]> !tv||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Ignore$<%[mynick]> !ignore||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Bed$<%[mynick]> !bed||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Murder$<%[mynick]> !murder||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Mood$<%[mynick]> !mood||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Pull$<%[mynick]> !pull||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Relax$<%[mynick]> !relax||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Scream$<%[mynick]> !scream||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Bad$<%[mynick]> !bad||")
curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Suicide$<%[mynick]> !suicide||")

[Madman]

Thats a part of my FunScript
See this  thread

[(-=TrIp-iN-SuN=-)]

Any One Know How To Convert Lua4 To Lua5?

[Tw?sT?d-d?v]

Originally posted by madman
Thats a part of my FunScript
See this  thread

Try there ^^^^^

has all those commands in  plus much more Version 7 is lua 5

[(-=TrIp-iN-SuN=-)]

i want to used only script "zFunRightClick.lua" but it's not work i want all users to can use this script only this script i need not more in "FunScriptV7.rar".
what i need to do to only used "zFunRightClick.lua"?

[(-=TrIp-iN-SuN=-)]

?

[Madman]

The code you gave cant be every thing in the lua file, it's missing alot of stuff...
but i added it...

function ChatArrival(curUser, data)
	data = string.sub(data,1,string.len(data)-1)
	s,e,cmd = string.find(data,"%b<>%s+(%S+)")
	--==NewCommand==--
	if cmd == "!pull" then
		SendToAll("*** " ..curUser.sName.. " is pulling faces at you .. :P ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!mood" then
		SendToAll("*** " ..curUser.sName.. " is in a good mood...HURRAY ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!relax" then
		SendToAll("*** " ..curUser.sName.. " is kicking back,relaxing for a change ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!murder" then
		SendToAll("*** " ..curUser.sName.. " is about to murder you ... haha ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!scream" then
		SendToAll("*** " ..curUser.sName.. " wants to scream out .... AAARRRRGGGGHHHHH ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!tv" then
		SendToAll("*** " ..curUser.sName.. " is watching television ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!ignore" then
		SendToAll("*** " ..curUser.sName.. " is ignoring you,so leave alone ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!bed" then
		SendToAll("*** " ..curUser.sName.. " night night all, ZZZZZZZzzzzzzzzz ")
		return 1
	end
	--==NewCommand==--
	if cmd == "!bad" then
		SendToAll("*** " ..curUser.sName.. " is having a bad day ... so sod off ")
		return 1
	end
	--==NewVictimCommand==--
	if cmd == "!machine-gun" then
	local s,e,victim = string.find(data, "%b<>%s+%S+%s+(%S+)")
		if victim == nil then
			curUser:SendData(Bot, "Syntax: "..cmd.." nick")
			return 1
		end
		vUser = GetItemByName(victim)
		if not vUser then
			curUser:SendData(Bot, " *** " ..victim.." is not online or wrong name...")
			return 1
		end
		SendToAll("*** "..curUser.sName.." picks up a AK47 and shoots "..vUser.sName.." in the ASS!")
		return 1
	end
	--==NewVictimCommand==--
	if cmd == "!spy" then --//The Command...
	local s,e,victim = string.find(data, "%b<>%s+%S+%s+(%S+)")
		if victim == nil then --//Forgot Nick?
			curUser:SendData(Bot, "Syntax: "..cmd.." nick") --//If So Send This
			return 1
		end
		vUser = GetItemByName(victim) --//vUser And Victim Is The Same
		if not vUser then
			curUser:SendData(Bot, " *** " ..victim.." is not online or wrong name...") --//Wrong Name
			return 1
		end
		SendToAll("*** "..curUser.sName.." spies on "..vUser.sName.." so watch your step.")--//Do To A User
		return 1
	end
	--==NewVictimCommand==--
	if cmd == "!snog" then --//The Command...
	local s,e,victim = string.find(data, "%b<>%s+%S+%s+(%S+)")
		if victim == nil then --//Forgot Nick?
			curUser:SendData(Bot, "Syntax: "..cmd.." nick") --//If So Send This
			return 1
		end
		vUser = GetItemByName(victim) --//vUser And Victim Is The Same
		if not vUser then
			curUser:SendData(Bot, " *** " ..victim.." is not online or wrong name...") --//Wrong Name
			return 1
		end
		SendToAll("*** "..curUser.sName.." is snogging the face off "..vUser.sName.." ")--//Do To A User
		return 1
	end
	--==NewCommand==--
	if cmd == "!suicide" then
		curUser:SendData(Bot, "Run's out the front door screaming and jumps infront of bus!!!!")
		curUser:Disconnect()
		return 1
	end
end


function NewUserConnected(curUser)
	if curUser.bUserCommand then
		curUser:SendData("$UserCommand 1 2 FunScript\\Do To A User\\Snog User$<%[mynick]> !snog %[nick]||")
		curUser:SendData("$UserCommand 1 2 FunScript\\Do To A User\\Machine-gun$<%[mynick]> !machine-gun %[nick]||")
		curUser:SendData("$UserCommand 1 2 FunScript\\Do To A User\\Spy$<%[mynick]> !spy %[nick]||")

		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Tv$<%[mynick]> !tv||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Ignore$<%[mynick]> !ignore||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Bed$<%[mynick]> !bed||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Murder$<%[mynick]> !murder||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Mood$<%[mynick]> !mood||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Pull$<%[mynick]> !pull||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Relax$<%[mynick]> !relax||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Scream$<%[mynick]> !scream||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Bad$<%[mynick]> !bad||")
		curUser:SendData("$UserCommand 1 3 FunScript\\You Do\\Suicide$<%[mynick]> !suicide||")
	end
end

OpConnected = NewUserConnected

[(-=TrIp-iN-SuN=-)]

how i can to do spy bot only to netfounder and hubowner can only used this becose i don't want all users use this?