Reg Chat

[DerWahre]

Hello guy?s   
i?m a german hub owner.
i search a reg chat for my users  i will be made an addition main.

sorry but my english is very terrible

[Samantha]

--// Simple VipChat by NightLitch 2005-03-05
--// Fixed bug with some profile not recieving chat - Blondie? 15/10/2006
--// Added Leviathan support - Blondie? 19/10/2006
--// converted to reg chat -  Blondie? 12/12/2006

RegChatName = "?Reg-Chat?"

function Main()
	frmHub:RegBot(RegChatName)
end


function ToArrival(user,data)
	local s,e,to,from,msg = string.find(data,"%$To:%s+(%S+)%s+From:%s+(%S+)%s+%$%b<>%s+(.*)%|")
	if to == RegChatName then
		if user.iProfile == 2 or user.iProfile == 3 or user.iProfile == 4 or user.iProfile == 5 or user.iProfile == 6 or user.bOperator then
			RegChat(user,msg)
		else
			SendPmToNick(user.sName,RegChatName, "*** You don't have the privileges to talk in this chat.")
			return 1
		end
	end
end

function RegChat(user,msg)
	for _,profile in pairs(GetProfiles()) do
		for _,users in pairs(GetUsersByProfile(profile)) do
			if GetItemByName(users) then
				if GetItemByName(users).iProfile == 2 or GetItemByName(users).iProfile == 3 or GetItemByName(users).iProfile == 4 or GetItemByName(users).iProfile == 5 GetItemByName(users).iProfile == 6 or GetItemByName(users).bOperator then
					if GetItemByName(users).sName ~= user.sName then
						GetItemByName(users):SendData("$To: "..GetItemByName(users).sName.." From: "..RegChatName.." $<"..user.sName.."> "..msg)
					end
				end
			end
		end
	end
end

there you go

[jack_port1000]

some error here


[03:35] Syntax ... and Settings\SWAGAT.JAGIRDAR\Desktop\Hub\terminator\scripts\regchat.lua:29: 'then' expected near 'GetItemByName'

[Snooze]

Hate to say it, but looks like Terminator has been Terminated.

Snooze