Print Page - I look script for car register

Title: I look script for car register
Post by: shepo on 20 November, 2004, 18:15:13

Hi I am new here and look for the scripts of car register ..!Regme if someone of you to help myself very grateful good good-bye

Title:
Post by: enema on 20 November, 2004, 18:40:44

I believe, this is what u are looking for...

Code Select

sBot = frmHub:GetHubBotName()
prefix = "!"

function DataArrival(user,data)
	if (strsub(data,1,1) == "<" or strsub(data,1,5+strlen(sBot)) == "$To: "..sBot) then
		data = strsub(data,1,strlen(data)-1)
		s,e,cmd = strfind(data, "%b<>%s+(%S+)")
		if (cmd == "!regme" or cmd =="!reg") then
			local s,e,pass = strfind(data, "%b<>%s+%S+%s+(%S+)")
			if (pass == nil) then
				user:SendPM(sBot, "Syntax Error, !regme  or !reg , you must write a password.")
			elseif (strfind(pass, "[%c|\n\r]")) then
				user:SendPM(sBot, "Invalid Password. Try Again.")
			elseif (strfind(user.sName, "[%c|\n\r]")) then 
				user:SendPM(sBot, "Your nick is invalid. Please choose a new one.")
			else
				AddRegUser(user.sName, pass, 3)
				SendToOps(sBot, "The user "..user.sName.." has regiter himself.")
				user:SendPM(sBot, "You have been successufly registered with the pass: "..pass)
				user:SendPM(sBot, "Please reconnect and type your password.")
			end
			return 1
		end
	end
end

But what does it have to do with car register.... im not sure :)

Title:
Post by: shepo on 21 November, 2004, 00:04:17

Ok it is grateful

PtokaX forum

Archive => Archived 4.0 boards => Request for Lua 4 scripts => Topic started by: shepo on 20 November, 2004, 18:15:13