Hit me BUT
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

Hit me BUT

Started by B@B?, 13 February, 2004, 19:03:09

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

B@B?

I need an simple script 4 "Neo-Modus" wich contains an

simple stand alone >>> #redirect me...

It should redirect an user by the given command.

Plz excuce me if i ask 4 it @ this place but i didn?t find

something like this @ any place in the net... ;(

Maybe someone can help for this (ONCE) time, it?s realy

importend for me... :))

Please HELP!

Thx 4 now  ;)

*********************************************

It should look like this (don?t LOL!) :D

*********************************************

'=====================================
' This script redirects users
'=====================================

Sub Main()

botname="RED-Bot"

RedirectIP = "ABC-Hub.no-ip.de"

Sub DataArival(curUser, sCurData)

if (cmd=="#redme") then
Curuser.PrivateMessage cstr(" Umleitung nach... ;)" & frmHub.txtRedirect
else
frmHub.DoEventsForMe
curUser.ForceMove frmHub.txtRedirect

end if
End Sub
THE DAY AFTER...  

...is >>>>>>>> NOW!




Btw:
Plz excuse my english...
It?s not the best, i?m sure...but it?s funny...isn?t it?

B@B?

I?d helped myself; AS EVERY TIME!

Thx! Men...
THE DAY AFTER...  

...is >>>>>>>> NOW!




Btw:
Plz excuse my english...
It?s not the best, i?m sure...but it?s funny...isn?t it?

DorianG

try that ;)

BotName = "RedirectMySelf"	--//BotName

redirectme = "!redme"		--//Set Command name

redirectaddress = "address.no-ip.org"	--//SetRedirectAddres

function Main()
	frmHub:RegBot(BotName)
end

function DataArrival(user, data)
	if (strsub(data,1,1) == "<") then
		data = strsub(data,1,strlen(data)-1)
		local s,e,cmd = nil
		s,e,cmd = strfind( data, "%b<>%s+(%S+)" )
		if cmd == redirectme then
			user:SendPM(BotName, "You are redirected to " ..redirectaddress)
			user:SendData("$ForceMove "..redirectaddress)
		end
	end
end

Event_Horizon

QuoteOriginally posted by DorianG
try that ;)

BotName = "RedirectMySelf"	--//BotName

redirectme = "!redme"		--//Set Command name

redirectaddress = "address.no-ip.org"	--//SetRedirectAddres

function Main()
	frmHub:RegBot(BotName)
end

function DataArrival(user, data)
	if (strsub(data,1,1) == "<") then
		data = strsub(data,1,strlen(data)-1)
		local s,e,cmd = nil
		s,e,cmd = strfind( data, "%b<>%s+(%S+)" )
		if cmd == redirectme then
			user:SendPM(BotName, "You are redirected to " ..redirectaddress)
			user:SendData("$ForceMove "..redirectaddress)
		end
	end
end

sorry, but seems to be for PX - B@B? was searching for a Neo-Script .......  

does that Hubsoft still exist ?(  ?(  ?(
Greez ????_H???z??
??????????????????

??/v\\ \'?\' ?@?? ???? is Secured by RoboCop? Created by Optimus?

[NL]Pur

QuoteI?d helped myself; AS EVERY TIME!

Thx! Men...

maby posting at the right section whould help :)

DorianG

I had not read well :)

Troubadour

that many posts and searching for *Neo-Modus* ????
Can't figure it out!
Regards,

Troubadour

** Guardian Forum **

hubaddy:   nederfun.no-ip.com

B@B?

#7
First:

I?m Owner of 3 Hubs, one of them is an NEO.
The NEO-Hub is an ONLY Chat & Game Fun-Hub.

He has the best Scripts Collection ever seen 4 NEO, a lot of work
(from me and a lot of very good scripters) is in it and it?s realyy heavy
2 cut the workin from years...so i never close this one... ;)

Than:

@ DorianG & Horizon
>>>>>>> Thx a lot!  :P

@ [NL]Pur & Troubadour
Where should i post an NEO-Mode-Script, you beleave?

I did it in OffTopic because of it?s NEO, not LUA -
so i thought- it?s the right area...isn?t it? ;)

However: How i said: Prob is fixed... :]
THE DAY AFTER...  

...is >>>>>>>> NOW!




Btw:
Plz excuse my english...
It?s not the best, i?m sure...but it?s funny...isn?t it?

nErBoS

Hi,

B@B?

This forum is only for LUA scripts, NMDCH is in VB scripts there is another forum to that....
try this...

HERE

Best regards, nErBoS
--## nErBoS Spot ##--

B@B?

Thx a lot!

That?s a nice one... ;)

But 4 the other 2 hubs i?ll need this place.

They are PtoKax/LUA...

However: Thx! 8)
THE DAY AFTER...  

...is >>>>>>>> NOW!




Btw:
Plz excuse my english...
It?s not the best, i?m sure...but it?s funny...isn?t it?

SMF spam blocked by CleanTalk