mIRC Home    About    Download    Register    News    Help

Print Thread
#234635 05/11/11 01:50 PM
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
Hello ! could someone help me?
How can I change this script!that if more than one bot in the Request list and all available?I think of that! type:! bots
ZeroCoDe: bots available : ZeroCoDe | UT2004 | APUG | MainBordB !!
!request UT2004 #channel etc...
this is possible?
Code:
alias request.reply return 15
alias request.status return o
alias request.time return 15

on *:text:!request *:#: {
  if ($left($2,1) == $chr(35)) { 
    if (!$3) $iif(!%request*,$iif($me ison $2,msg # I am already on that channel $+($nick,.),request.confirm $nick $2),msg # Hello $+($nick,$chr(44)) I am currently doing a request. Please try again soon.)
    elseif ($3 == yes && $($+(%,request,$nick,$2),2)) { msg # Ok $+($nick,$chr(44)) I will join your channel and you will have $+(,$request.time,) seconds to give me $+(,$request.status,,.) | request.join $2 }
    elseif ($3 == no) { msg # I am sorry to hear that $+($nick,.) Maybe next time. }
    else { msg # *** Syntax: !request <channel> }
  }
}
alias request.confirm msg # Hello $+($1,$chr(44)) for me to join $2 I will need $request.status or higher. If you can guarantee this, you have $+(,$request.reply,) seconds to type type !request $2 yes | set $+(-u,$request.reply) $+(%,request,$1,$2) active
alias request.join hadd -m request $network $iif($hget(request,$network),$hget(request,$network) $1) | hsave -o request request.hsh | join $1 | .timer 1 $request.time request.check $1
alias request.check $iif($nick($1,$me,$request.status),,request.part $1)
alias request.part msg $1 I have not been given $+(,$request.status,,) status, now parting. | part $1
on *:connect: .timer 1 5 join $iif($chr(32) isin $hget(request,$network),$replace($hget(request,$network),$chr(32),$chr(44)),$hget(request,$network))
on *:start:{
  if !$hget(request) { hmake request 20 }
  if $exists(request.hsh) { .hload request request.hsh }
} 


Thank you very much


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
hmm maybe someone dont understand what i want smile :$

i tyred this bot dosent work it frown

Code:
on *:TEXT:!botlist:#: { msg $chan Avaible bots : bot1 bot2 bot3 bot4 To Request Me Type !request APUG #yourchan
}

on *:TEXT:!request *:#:{ msg # $nick $+ , bot1 bot2 bot3 bot4 Should Join #$3 Soon
  /join #$3
  /ns ajoin add $2
  msg #$2 #$2 Has Been Added To My Ajoin List
}
on *:TEXT:!remove *:#:{ msg $chan $nick $+ , APUG Has Left #$2
  /part $2 I Was Requested To Leave By $nick
  /ns ajoin del $2
  msg $chan I Have Now Left $2 And $2 Has Been Deleted From My Ajoin List. :(
}



(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
Joined: Jan 2010
Posts: 51
L
Lenooox Offline OP
Babel fish
OP Offline
Babel fish
L
Joined: Jan 2010
Posts: 51
nobody? frown


(\__/)
(='.'=)
(")_(")
Bunny Hopp

QuakeNet@ #Lenoox <> visit http://www.insaneboard.comeze.com
Joined: Jul 2007
Posts: 1,129
T
Hoopy frood
Offline
Hoopy frood
T
Joined: Jul 2007
Posts: 1,129
Maybe you can start by explaining what you try to do exactly, so people can get an idea to follow up on you and, if they're nice enough, write a script for you. The current code you have doesn't make much sense, to say the least.


Link Copied to Clipboard