Mean_Machine

[Snowman]

Hooliganx:
The only way for this to be possible is that NMDC reports a TAG for the script to read and accept OR simply allow all clients...
The problem is not the script but the client TAG in this case. Sorry...


Snowman

[Herodes]

What follows is Me trying to get Mean_Machine a rightclick [sic.](or should I say sick?) Cheers for the amazing script, I've spend two whole nights looking at it ... (talk about learning... :)

As your can see ..

--      [part1-start]

-- Mean_RightClicker for Mean_Machine by Herodes ...    v.(75%)
-- made for Mean_Machine v2.4.27.1
-- #extensively based on :
-- #	-- RightClickBot v1.0CB by Late@421 - Feb 7,2004
-- > - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
--  support in PtokaX Hub for the $UserCommand Extension
--  for details on this please visit the DC++ wiki pages
--  [URL]http://dcplusplus.sourceforge.net/wiki/index.php/UserCommand%20command[/URL]
--  Function for changing the settings of a Mean_Machine scripted Hub can be loaded by Admins and Masters...
--  Just try clicking on the "set's on rightclicker" / type !setright

rcBot = "MeanRC"
Hubowner = "HubOwner"

function NewUserConnected(user)
	GuestCommands(user)
	user:SendData(" we just happened to have underway the Rightclick menu for Mean_Machine..|")
end

function OpConnected(user)
	if (user.iProfile) == 1 then OpCommands(user)
	elseif (user.iProfile) == 5 then AdminCommands(user)
	elseif (user.iProfile) == 0 then MasterCommands(user)
	elseif ((user.iProfile) == 0 and (user.sNick) == "Hubowner") then OwnerCommands(user)
	else NewUserConnected(user)
	end
	user:SendData("<"..rcBot.."> we just happened to have underway the priviledged Rightclick menu for Mean_Machine..|")
end

function DataArrival(user,data)
	if user.bOperator then
		if (user.iProfile) == 0 then
			if (strsub(data,1,1) == "<" ) then 
				data=strsub(data,1,strlen(data)-1) 
				s,e,cmd = strfind( data,"%b<>%s+(%S+)" ) 
					if (cmd=="!setright") then
						SettingCommands(user)
						user:SendData("<"..rcBot.."-( private )>  now you may change the hub settings with your right click")
					end
			end
		elseif (user.iProfile) == 5 then
			if (strsub(data,1,1) == "<" ) then 
				data=strsub(data,1,strlen(data)-1) 
				s,e,cmd = strfind( data,"%b<>%s+(%S+)" ) 
					if (cmd=="!setright") then
						AdminSetCommands(user)
						user:SendData("<"..rcBot.."-( private )>  now you may change the hub settings with your right click")
					end

			end
		end

	end
end

function GuestCommands(user)
	user:SendData("$UserCommand  255 7|") 						-- clear everything , everywhere...
	user:SendData("$UserCommand 0 3 |") 							-- separator
	user:SendData("$UserCommand 1 3 "..frmHub:GetHubName().."- rules -$<%[mynick]> !rules||")
	user:SendData("$UserCommand 0 3 |") 							-- separator
	user:SendData("$UserCommand 1 3 - cmds help -$<%[mynick]> !help||")
	user:SendData("$UserCommand 1 3 - e-mote -$<%[mynick]> !me %[line:what do you want to say?]||")
	user:SendData("$UserCommand 1 3 - info -\\- hub -\\hub name$<%[mynick]> !gethubname||")
	user:SendData("$UserCommand 1 3 - info -\\- hub -\\min share$<%[mynick]> !getshare||")
	user:SendData("$UserCommand 1 3 - info -\\- hub -\\max users$<%[mynick]> !getmaxusers||")
	user:SendData("$UserCommand 1 3 - info -\\- hub -\\redirect address$<%[mynick]> !getred||")
	user:SendData("$UserCommand 1 3 - info -\\- hitlist -$<%[mynick]> !hitlist||")
	user:SendData("$UserCommand 1 3 - info -\\- releases -$<%[mynick]> !relread %[line:what to search for? (empty, shows all)]||")
	user:SendData("$UserCommand 1 3 - info -\\help specific$<%[mynick]> !help %[line:on what do you require help?]||")
	user:SendData("$UserCommand 1 3 - info -\\network$<%[mynick]> !network||")
	user:SendData("$UserCommand 1 3 - info -\\hublists$<%[mynick]> !hublists||")
	user:SendData("$UserCommand 1 3 - info -\\your ip$<%[mynick]> !getmyip||")
	user:SendData("$UserCommand 1 3 - info -\\faq$<%[mynick]> !faq||")
	user:SendData("$UserCommand 1 3 - info -\\web$<%[mynick]> !web||")
	user:SendData("$UserCommand 1 3 - info -\\- script -$<%[mynick]> !scriptinfo||")
	user:SendData("$UserCommand 1 3 - guestbook -\\read guestbook$<%[mynick]> !tag|")
	user:SendData("$UserCommand 1 3 - guestbook -\\write guestbook$<%[mynick]> !tagwrite %[line:what note to leave in the guestbook?]||")
	user:SendData("$UserCommand 1 3 - guestbook -\\delete guestbook entry$<%[mynick]> !tagdel %[line:please give me date and time of note to proceed] %[line:under the nick?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- free slots -$<%[mynick]> !slots||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- away -\\go away$<%[mynick]> !away %[line:optional away message:]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- away -\\come back$<%[mynick]> !back||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- seen -$<%[mynick]> !lastseen %[line:which nick to search for? (empty, shows all)]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\hub time$<%[mynick]> !gettime||")
end

function OpCommands(user)
	user:SendData("$UserCommand 255 7|") 							-- clear everything , everywhere...
	user:SendData("$UserCommand 0 7 |") 							-- separator
	user:SendData("$UserCommand 1 3 .:"..frmHub:GetHubName().." - rules - :.$<%[mynick]> !rules||")
	user:SendData("$UserCommand 0 3 |") 							-- separator
	user:SendData("$UserCommand 1 3 - guestbook -\\read guestbook$<%[mynick]> !tag|")
	user:SendData("$UserCommand 1 3 - guestbook -\\write guestbook$<%[mynick]> !tagwrite %[line:what note to leave in the guestbook?]||")
	user:SendData("$UserCommand 1 3 - guestbook -\\delete guestbook entry$<%[mynick]> !tagdel %[line:please give me date and time of note to proceed] %[line:under the nick?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- bot window -$<%[mynick]> !!||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- away -\\go away$<%[mynick]> !away %[line:optional away message:]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- away -\\come back$<%[mynick]> !back||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- seen -$<%[mynick]> !lastseen %[line:which nick to search for? (empty, shows all)]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- free slots -$<%[mynick]> !slots||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\  e-mote$<%[mynick]> !me %[line:what do you want to say?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\  your ip$<%[mynick]> !getmyip||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show hub team -$<%[mynick]> !getuserlist all||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show guests -$<%[mynick]> !getuserlist g||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show regs$<%[mynick]> !getuserlist r||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show vips$<%[mynick]> !getuserlist v||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show ops$<%[mynick]> !getuserlist o||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show admins$<%[mynick]> !getuserlist a||")
	user:SendData("$UserCommand 1 3 - info -\\members display\\show masters$<%[mynick]> !getuserlist m||")
	user:SendData("$UserCommand 1 3 - info -\\'bout the hub\\hub name$<%[mynick]> !gethubname||")
	user:SendData("$UserCommand 1 3 - info -\\'bout the hub\\min share$<%[mynick]> !getshare||")
	user:SendData("$UserCommand 1 3 - info -\\'bout the hub\\max users$<%[mynick]> !getmaxusers||")
	user:SendData("$UserCommand 1 3 - info -\\'bout the hub\\redirect address$<%[mynick]> !getred||")
	user:SendData("$UserCommand 1 3 - info -\\'bout the hub\\hub time$<%[mynick]> !gettime||")
	user:SendData("$UserCommand 1 3 - info -\\- releases -\\read$<%[mynick]> !relread %[line:what to search for? (empty, shows all)]||")
	user:SendData("$UserCommand 1 3 - info -\\- releases -\\write$<%[mynick]> !relwrite %[line:what's new?]||")
	user:SendData("$UserCommand 1 3 - info -\\- hitlist -\\view$<%[mynick]> !hitlist||")
	user:SendData("$UserCommand 1 3 - info -\\- hitlist -\\write$<%[mynick]> !hitlistwrite %[line:title of hit?]||")
	user:SendData("$UserCommand 1 3 - info -\\- hitlist -\\delete$<%[mynick]> !hitlistdel %[line:exact title to delete?]||")
	user:SendData("$UserCommand 1 3 - info -\\- ip info -\\ip info$<%[mynick]> !ipinfo %[line:give ip to return info:]||")
	user:SendData("$UserCommand 1 3 - info -\\- ip info -\\ip range info$<%[mynick]> !iprangeinfo %[line:give iprange to return info:]||")
	user:SendData("$UserCommand 1 3 - info -\\- faq -$<%[mynick]> !faq||")
	user:SendData("$UserCommand 1 3 - info -\\- hublists -$<%[mynick]> !hublists||")
	user:SendData("$UserCommand 1 3 - info -\\- network -$<%[mynick]> !network||")
	user:SendData("$UserCommand 1 3 - info -\\- web -$<%[mynick]> !web||")
	user:SendData("$UserCommand 1 3 - info -\\- script -$<%[mynick]> !scriptinfo||")
	user:SendData("$UserCommand 1 3 - the register -\\get password$<%[mynick]> !getuserpass %[line:who's pass do you need?]||")
	user:SendData("$UserCommand 1 3 - the register -\\change your pass$<%[mynick]> !getuserpass %[line:and your new pass shall be....?]||")
	user:SendData("$UserCommand 1 3 - the register -\\rename user$<%[mynick]> !renameuser %[line:who shall we rename?] %[line:..and the new nick is....?] (%[line:do you require a new pass as well?])||")
	user:SendData("$UserCommand 1 3 - the register -\\delete reg$<%[mynick]> !deluser %[line:what's the nick to erase?]||")
	user:SendData("$UserCommand 1 3 - the register -\\promote user$<%[mynick]> !promoteuser %[line:who do we promote?]||")
	user:SendData("$UserCommand 1 3 - the register -\\add a guest$<%[mynick]> !addguest %[line:the nick shall be....?] %[line:..and the pass shall be....?]||")
	user:SendData("$UserCommand 1 3 - the register -\\add a reg$<%[mynick]> !adduser %[line:the nick shall be....?] %[line:..and the pass shall be....?]||")
	user:SendData("$UserCommand 1 3 - the register -\\add a vip$<%[mynick]> !addvip %[line:the nick shall be....?] %[line:..and the pass shall be....?]||")
	user:SendData("$UserCommand 1 3 - selected user -\\userinfo$<%[mynick]> !userinfo %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\kick him&,%mynick> !kick %[nick] %[line:reason for kicking him?]||")
	user:SendData("$UserCommand 1 3 - selected user -\\ban$<%[mynick]> !ban %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\drop$<%[mynick]> !drop %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\get info$<%[mynick]> !getinfo %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\gag\\yes$<%[mynick]> !gag %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\gag\\no$<%[mynick]> !ungag %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\get ip$<%[mynick]> !getuserip %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\timeban$<%[mynick]> !timeban %[nick] %[line:how long (number now, next letters..)] %[line:in what? (minutes / hours / months / years)||")
	user:SendData("$UserCommand 1 3 - selected user -\\kick&ban him&,%mynick> !kickban %[nick] %[line:reason for kicking him?]||")
	user:SendData("$UserCommand 1 3 - selected user -\\warn him$<%[mynick]> !warn %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\wanted\\add$<%[mynick]> !wanted %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\wanted\\delete$<%[mynick]> !wanteddel %[nick]||")
end

--      [part1 - end]

[Herodes]

--      [part2 - start]

function AdminCommands(user)
	OpCommands(user)
	user:SendData("$UserCommand 1 3 - the register -\\add an op$<%[mynick]> !addop %[line:the nick shall be....?] %[line:..and the pass shall be....?]||")
	user:SendData("$UserCommand 1 3 - the register -\\add an admin$<%[mynick]> !addadmin %[line:the nick shall be....?] %[line:..and the pass shall be....?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- bans -\\unban nick/ip$<%[mynick]> !unban %[line:type nick or IP to unban:]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- bans -\\view bans$<%[mynick]> !getbanlist||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- bans -\\clear tempban$<%[mynick]> !clrtempban||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- bans -\\clear permban$<%[mynick]> !clrpermban||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- ip exceptions -\\view list$<%[mynick]> !ipexlist||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- ip exceptions -\\add ip$<%[mynick]> !ipexadd %[line:ip or hostname to add to ip exc. list?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- ip exceptions -\\delete ip$<%[mynick]> !ipexdel %[line:ip or hostname to delete from ip exc. list?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- mass msg -\\pure$<%[mynick]> !pure %[line:what to send? ( to users )]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\- forbiden words -\\add words$<%[mynick]> !adadd %[line:forbid what?]||")
	user:SendData("$UserCommand 1 3 - mean cmds -\\set's on rightclicker$<%[mynick]> !setright||")
	user:SendData("$UserCommand 1 3 - selected user -\\temporary op$<%[mynick]> !op %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\flood \\100 times$<%[mynick]> !flood %[nick] 100 %[line:flood message?]||")
	user:SendData("$UserCommand 1 3 - selected user -\\flood \\500 times$<%[mynick]> !flood %[nick] 500 %[line:flood message?]||")
	user:SendData("$UserCommand 1 3 - selected user -\\flood \\1000 times$<%[mynick]> !flood %[nick] 1000 %[line:flood message?]||")
end

function MasterCommands(user)
	AdminCommands(user)
	user:SendData("$UserCommand 1 3 remove bot<%[mynick]> !rembot %[line:which bot to remove?]||")
	user:SendData("$UserCommand 1 3 restart scripts$<%[mynick]> !restartscripts||")
	user:SendData("$UserCommand 1 3 restart hub$<%[mynick]> !restart||")
	user:SendData("$UserCommand 1 3 redirect all\\yes$<%[mynick]> !redirectallnow||")
	user:SendData("$UserCommand 1 3 - selected user -\\spy\\spy list$<%[mynick]> !spylist||")
	user:SendData("$UserCommand 1 3 - selected user -\\spy\\selected$<%[mynick]> !spy %[nick]||")
	user:SendData("$UserCommand 1 3 - selected user -\\spy\\stop spying<%[mynick]> !spystop %[line:stop spying who?]||")
end

function OwnerCommands(user)

	MasterCommands(user)
	user:SendData("$UserCommand 1 3 - the register -\\add a master$<%[mynick]> !addmaster %[line:the nick shall be....?] %[line:..and the pass shall be....?]||")
end

function AdminSetCommands(user)
	user:SendData("$UserCommand 1 3 - settings -\\general\\max hubs$<%[mynick]> !sethubmax %[line:what's the maximum hubs...?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub name$<%[mynick]> !sethubname %[line:new hub name .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub description$<%[mynick]> !sethubdesc %[line:new hub description .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\full hub\\off$<%[mynick]> !setredirectfull 0]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\full hub\\on$<%[mynick]> !setredirectfull 1||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\all\\off$<%[mynick]> !setredirectall 0]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\all\\on\\yes$<%[mynick]> !setredirectall 1]||")
end

function SettingCommands(user)
	user:SendData("$UserCommand 1 3 - settings -\\review\\part one$<%[mynick]> !settings 0||")
	user:SendData("$UserCommand 1 3 - settings -\\review\\part two$<%[mynick]> !settings2 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\advertisment\\off$<%[mynick]> !setads 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\advertisment\\warning$<%[mynick]> !setads 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\advertisment\\kick$<%[mynick]> !setads 2||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\advertisment\\ban$<%[mynick]> !setads 3||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\bad client\\off$<%[mynick]> !setnoclients 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\bad client\\warning$<%[mynick]> !setnoclients 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\bad client\\kick$<%[mynick]> !setnoclients 2||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\bad client\\ban$<%[mynick]> !setnoclients 3||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\dc check\\off$<%[mynick]> !setdccheck 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\dc check\\on$<%[mynick]> !setdccheck 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\dcgui check\\off$<%[mynick]> !setdcgui 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\dcgui check\\on$<%[mynick]> !setdcgui 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\min version\\dcgui$<%[mynick]> !setmingui %[line:set the minimum DC++ ver. allowed.]||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\min version\\dc++$<%[mynick]> !setmindc %[line:only 0.1 & 0.2 possible !!!]||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\min version\\odc$<%[mynick]> !setminodc %[line:set the minimum oDC ver. allowed.]||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\double ip check\\off$<%[mynick]> !setipcheck 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\double ip check\\on$<%[mynick]> !setipcheck 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\ip guard\\on$<%[mynick]> !setipguard 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\ip guard\\off$<%[mynick]> !setipguard 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\passive connection\\on$<%[mynick]> !setnopassive 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\passive connection\\off$<%[mynick]> !setnopassive 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\op clients\\on$<%[mynick]> !setopclients 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\op clients\\off$<%[mynick]> !setopclients 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\reg first\\users\\on$<%[mynick]> !setregfirst 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\reg first\\users\\off$<%[mynick]> !setregfirst 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\reg first\\guests\\on$<%[mynick]> !setreggfirst 1||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\reg first\\guests\\off$<%[mynick]> !setreggfirst 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\lock limit\\no check$<%[mynick]> !settaglimit 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\lock limit\\set value$<%[mynick]> !settaglimit %[line:speedlock limit? (0-999999=allowed, 1000000=not allowed)||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\lock limit\\no speed lockers$<%[mynick]> !settaglimit 1000000||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\log\\off$<%[mynick]> !setlog 0||")
	user:SendData("$UserCommand 1 3 - settings -\\actions\\log\\set$<%[mynick]> !setlog %[line:how many logoffs to log? (values=1-1000)]||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\guest\\off$<%[mynick]> !setjpguest 0||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\guest\\on$<%[mynick]> !setjpguest 1||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\regs\\off$<%[mynick]> !setjpreg 0||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\regs\\on$<%[mynick]> !setjpreg 1||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\vips\\off$<%[mynick]> !setjpvip 0||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\vips\\on$<%[mynick]> !setjpvip 1||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\ops\\off$<%[mynick]> !setjpops 0||")
	user:SendData("$UserCommand 1 3 - settings -\\announce\\ops\\on$<%[mynick]> !setjpops 1||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\users$<%[mynick]> !setshareu %[line:how much does a normal user need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\guest$<%[mynick]> !setshareg %[line:how much does a guest need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\reg$<%[mynick]> !setsharer %[line:how much does a reg need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\vip$<%[mynick]> !setsharev %[line:how much does an vip need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\op$<%[mynick]> !setshareo %[line:how much does an op need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\admin$<%[mynick]> !setsharea %[line:how much does an admin need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min share\\master & owner$<%[mynick]> !setsharea %[line:how much does an admin need to have? (in gb)] gb||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\max hubs$<%[mynick]> !sethubmax %[line:what's the maximum hubs...?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub/slots ratio$<%[mynick]> !setslotshub %[line:what's the hub/slots ratio here?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\max slots$<%[mynick]> !setslotmax %[line:how many should be the maximum slots  .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\min slots$<%[mynick]> !setslotmin %[line:how many should be the minimum slots  .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub advert\\interval$<%[mynick]> !setadvert %[line:how long should it wait before looping? (in mins)]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub advert\\off$<%[mynick]> !setadvert 0||")

--      [part2 - end]

[Herodes]

--                [part3 - start]

user:SendData("$UserCommand 1 3 - settings -\\general\\hub clock\\interval$<%[mynick]> !setclock %[line:how long should it wait before looping? (in mins)]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub clock\\off$<%[mynick]> !setclock 0 %[line:user limit to what .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub owner$<%[mynick]> !setowner %[line:hub owner nick.. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub name$<%[mynick]> !sethubname %[line:new hub name .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\hub description$<%[mynick]> !sethubdesc %[line:new hub description .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\max users$<%[mynick]> !setusermax %[line:user limit to what .. ?]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\rules on login\\on$<%[mynick]> !setruleson 1||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\rules on login\\off$<%[mynick]> !setruleson 0||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\pm to ops\\on$<%[mynick]> !setpm2ops 1||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\pm to ops\\off$<%[mynick]> !setpm2ops 0||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\bad clients$<%[mynick]> !setredir %[line:where to redirect a bad client? (ip or hostname)]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\full hub\\set address$<%[mynick]> !setredirect %[line:where to redirect if we are full? (ip or hostname)]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\full hub\\off$<%[mynick]> !setredirectfull 0||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\full hub\\on$<%[mynick]> !setredirectfull 1||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\full hub\\on$<%[mynick]> !setwhoredir %[line:who can redirect? (Master(0)/Admin(5)/OP/(1)/VIP(2)]||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\all\\off$<%[mynick]> !setredirectall 0||")
	user:SendData("$UserCommand 1 3 - settings -\\general\\redirects\\all\\on\\yes$<%[mynick]> !setredirectall 1||")
end

--              [part3 - end]

Sorry for spaming the thread but i thought it would ok ...
If it is a problem with this pls remove it ... I didn't mean it .. :)

 ** Three little edits, had a spare ] 's

[MrZ]

Hiaaa :))

jesus man this is just to mutch, , hehe

damn u did a great job on this,, tnx trying it out..

have all been tested ??

Z ya :)

[Herodes]

thanks a lot mrZ, although we all know this is "lame" code ... there is nothing new in this ... :) Just like Solitaire ...
All the credits should be going to Snowman ... very comprehensible script ... ;) (Snowman change ur nick to TeachAlot ... lol )

as i say in the first three line of the code ..

-- Mean_RightClicker for Mean_Machine by Herodes ...    >>>---- v.(75%) ---- <<<  [*I thought this was clear sorry]

-- made for Mean_Machine v2.4.27.1

-- #extensively based on :

* Sorry for the confusion, I can't have it completed today ... to much to do ...  and please, if somebody finishes this gimme a pm pls  ....

[MrZ]

Hia again :))

Yess i know that we should be thankfull to Snowman,, and WE are :))

I tying to figure out how to add something in the right klicks.... this :

user:SendData("$UserCommand 1 3 - warnings -\\warn f**k$To: %[nick] From: %[mynick] $<%[mynick]>Read The Rules !! Pls remove the exe files, and dont forget to type  

/refresh  in main chat afterwards||")

it dont work..hehe

btw what did u meant by "I can't have it completed today"  isnt it complete ?? thought so.. anyway a nice piece of work

Z ya

[Snowman]

Herodes:
I haven't tested it but I must admit that I'm quite impressed by your work )
If all goes well with the development of the next generation of the script then I think your work will be a great improvement. Altough every command have been redesigned and renamed in the next version to make more sense your idea is great
Never thought of it...


Snowman

[Snowman]

MrZ:
Just forgot... I wonder if it's the ** signs in the line that causes your problem... Guessing )


Snowman

[Herodes]

Thanks for your good words Snowman, I really needed something like that today ...

* I did some edits in the third part of my post  *
* Grab'n'go, prove this works,... pls ...          *

Let's code ...  )

[MrZ]

Hia

Any news to rerport Snowman??

Z ya

[Snowman]

Hi there...

I am sorry to admit that I haven't been doing much on the script for about a month now.

Partly due to my taking those MCP exams AND that I have got my self hooked on a wonderful woman.
This woman also has 3 children that I am taking just as much care of as if they were my own and THAT is a fulltime job

Due to these circumstances I simply don't have much time in front of my computers these days. 2-5 hours a week at best.

I have been thinking about the possibility of releasing my work for Mean-Machine 3.x and then let someone else pick it up but I don't know yet.

Hope you all are okay with this for now.


Snowman

[Herodes]

All your news are very nice to hear Snowman,...

Keep it up and enjoy it ...

[Snowman]

Thanks mate )


Snowman

[MrZ]

hehe

Hiaa... yes i bet u have a fultime now then Snowy.
God to hear from u anyway.

ok wel just wait and see then :))

take care dude

Z ya

[CuT-KiLLeR]

hi all...

i am speak not english.. ( not much )


i am will the Mass Messege change.....

============================================================
============================================================

-------------------------------------------------
-------------------------------------------
---------------------------------------
-------------------------------------   Mass Messege
---------------------------------------
-------------------------------------------
-------------------------------------------------

( Here commes the messege...)


============================================================
============================================================

ca.


like can i make this ????


can me help ??

==

the Original is now:

function domm(user,data)
   s,e,arg = strfind( data, "%b<>%s+%S+%s+(.+)" )
   SendPmToAll(Bot, "USER MASS-MESSAGE :\r\n\r\n"..arg)
   lang = rawget(LangList,65)
   SendPmToNick(user.sName, Bot, " "..lang)
end

...................................................................

pls.. help me..


thanks to all..

mfg cut-killer


ps: Mean_Machine is the best ..... very good work....

[Snowman]

This SHOULD do the trick:

function domm(user,data)
s,e,arg = strfind( data, "%b<>%s+%S+%s+(.+)" )
arg2 = "============================================================\r\n============================================================\r\n\r\n-------------------------------------------------\r\n-------------------------------------------\r\n---------------------------------------\r\n------------------------------------- Mass Message\r\n---------------------------------------\r\n-------------------------------------------\r\n-------------------------------------------------\r\n\r\n"
arg3 = "\r\n\r\n============================================================ \r\n============================================================\r\n"
SendPmToAll(Bot, "\r\n\r\n"..arg2.." "..arg.." "..arg3)
lang = rawget(LangList,65)
SendPmToNick(user.sName, Bot, " "..lang)
end

[/SIZE]  


Snowman

[REBEL]

Hi Snowman ....yes im still about

dont know if you can help me , having trouble with the redirect on the right click
dont know if its in Mean_Machine or Ptokax.
When i redirect to one off my other hubs they leave 1 and do not arrive at 2
i am useing version 2.4.27.1 unless ive missed a update on this one

ok thanks in advanced

hope things are going well with you these days
REBEL

[Snowman]

REBEL:
You are using the latest version of Mean-Machine
The problem is usually that people set their clients to deny redirects which in turn makes them disconnect from hub 1 but the client won't try to connect to hub 2.
It is my GUESS that is the problem.


Snowman

[MrZ]

Hiaa :))

My guess is that Reb tries to redirect from one hub to another on the same PC (or 2 PC's behind a router)... dont think that works, at least i newer made it.......

Z ya

[REBEL]

yep hehehe MrZ

I have 3 Ptokax hubs running
1 with Mean_Machine  2 with robocop
redirecting from Robo to MM works but from
MM to Robo not all the redirects work.

So Snowman has is right as ive now looked into the 401, 403 and yes they can stop the redirects .

Thank You Snowman  :D

[MrZ]

k :))

did't see that u wrote "not all the redirects work"...


Z ya

[Snowman]

Hehe )


Snowman

[Mikey]

Hi Snowman ! I have a problem. Everytime i update the peer guardian list i get a nil error any idea why? I wanna convert back to mean machine and see if I can get a good right click script for it but i need two things. I need the peer guardian problem solved and a good mean machine right click script.

[Herodes]

Originally posted by Mikey
Hi Snowman ! I have a problem. Everytime i update the peer guardian list i get a nil error any idea why? I wanna convert back to mean machine and see if I can get a good right click script for it but i need two things. I need the peer guardian problem solved and a good mean machine right click script.

I think there is a format change between the guarding.p2p provided in the Mean_Machine and the later ones, this is the reason for having those ... << I think, not absolutely sure ...

as far as the right click it would be nice to know what the problems are so that someone can fix it ...