egghelp/eggheads community

hello I need a script that will remove access when

2003-09-08T11:06:08-04:00

It's impossible to send more than 1 msg to a single "user" on a line. With channel or user modes is something else.

Statistics: Posted by caesar — Mon Sep 08, 2003 11:06 am

hello I need a script that will remove access when

2003-09-08T01:07:39-04:00

Code:

set thechannel "#channel"bind kick - * kick:remove proc kick:remove { nick uhost hand chan targ rsn } { if {$targ == $::botnick && [string tolower $chan] == [string tolower $::thechannel]} { putserv "PRIVMSG X :verify $nick"  } } bind notc - "* logged in as *" check_verify proc check_verify {nick host hand arg dest} { if {[string equal $dest $::botnick]} { putserv "PRIVMSG X :remuser $::thechannel [lindex [split $arg] end]"  } }

this should do fine.

Hi Sir_Fz Thank You it works
last question how can I put multiple x commands in this script
PRIVMSG X :verify $nick <-- I wanna add 2 more x command like
"PRIVMSG X :ban $channel $nick" and
"PRIVMSG X :unban $channel $botname"

my point here is that after I verify the username then remove the access, at the same time I can ban the op that kick/ban the my bot using "PRIVMSG X :ban $channel $nick"
and unban the bot if it is banned from the channel using "PRIVMSG X :unban $channel $botname".

Thank You

Statistics: Posted by laynuks — Mon Sep 08, 2003 1:07 am

hello I need a script that will remove access when

2003-09-06T06:03:46-04:00

Code:

set thechannel "#channel"bind kick - * kick:remove proc kick:remove { nick uhost hand chan targ rsn } { if {$targ == $::botnick && [string tolower $chan] == [string tolower $::thechannel]} { putserv "PRIVMSG X :verify $nick"  } } bind notc - "* logged in as *" check_verify proc check_verify {nick host hand arg dest} { if {[string equal $dest $::botnick]} { putserv "PRIVMSG X :remuser $::thechannel [lindex [split $arg] end]"  } }

this should do fine.

Statistics: Posted by Sir_Fz — Sat Sep 06, 2003 6:03 am

hello I need a script that will remove access when

2003-09-06T03:42:50-04:00

also, you do a /msg X :verify nick or whatever to check what X replies to you (notice) so we can create a notice bind based on that reply.

<-- hello here it is

notice reply in Mirc
/msg x verify Johnny
[00:49] -X- Johhny!who@aol.com is logged in as secret89

notice reply in eggdrop via telnet
.msg x verify Johhny
Msg to x: verify Johhny
[00:49] -X (cservice@undernet.org)- Johhny!who@aol.com is logged in as secret89

/whois johhny
Johnny is who@aol.com
Johnny on #love

"the 2nd line is the reply from x when i do the /msg s verify nick"
So we need a notice bind for the 2nd stage of the scriptto work i guess

Thank You

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

#first stage
bind kick - * kick:remove

proc kick:remove { nick uhost hand chan targ rsn } {
if {$targ == $::botnick} {
putserv "PRIVMSG X :verify $nick"
}
}

#2nd stage
bind notc - "* logged in as *" check_verify

proc check_verify {nick host hand arg dest} {
if {[string equal $dest $::botnick]} {
putserv "PRIVMSG X :remuser $::thechannel [lindex [split $arg] end]"
}
}

Statistics: Posted by laynuks — Sat Sep 06, 2003 3:42 am

hello I need a script that will remove access when

2003-09-06T03:32:21-04:00

bot script will execute the line putserv "PRIVMSG X :kick $nick" and kick the op right?
X will do the kicking, not the bot (:P), and it needs to know what channel you want to kick the person from (/msg X KICK <#channel> )

<-- i tested this nd put a #channel and it works

Statistics: Posted by laynuks — Sat Sep 06, 2003 3:32 am

hello I need a script that will remove access when

2003-08-29T07:52:45-04:00

also, you do a /msg X :verify nick or whatever to check what X replies to you (notice) so we can create a notice bind based on that reply.

Statistics: Posted by Sir_Fz — Fri Aug 29, 2003 7:52 am

hello I need a script that will remove access when

2003-08-29T02:47:00-04:00

bot script will execute the line putserv "PRIVMSG X :kick $nick" and kick the op right?

X will do the kicking, not the bot (:P), and it needs to know what channel you want to kick the person from (/msg X KICK <#channel> )

Statistics: Posted by user — Fri Aug 29, 2003 2:47 am

hello I need a script that will remove access when

2003-08-29T02:38:05-04:00

bind kick - * kick:remove
proc kick:remove { nick uhost hand chan targ rsn } {
if {$targ == $::botnick} {
putserv "PRIVMSG X :kick $nick"
}
}

Hello Sir_Fz, i thought this script once loaded to my bot, and if any channel op kicks the bot using /kick #channel BotName then the bot script will execute the line putserv "PRIVMSG X :kick $nick" and kick the op right? sorry for the confusion

"when you test use putlog "Script is working" for example (so it shows this message in partyline if you kicked the bot" would you paste the notice from X when you msg it verify $nick ? <--hmmm I used telnet to connect to the eggdrop and i dont see any message from X, i guess i am missing some options or switch so I will be able to see message from X to the bot.

Thank You

Statistics: Posted by laynuks — Fri Aug 29, 2003 2:38 am

hello I need a script that will remove access when

2003-08-25T05:44:39-04:00

how do you expect it to kick you if you already kicked the bot out of the channel ?

when you test use putlog "Script is working" for example (so it shows this message in partyline if you kicked the bot"

would you paste the notice from X when you msg it verify $nick ?

P.S.: my nick is pronounced "Sir - aF Zee" Sir-Fz

Statistics: Posted by Sir_Fz — Mon Aug 25, 2003 5:44 am

hello I need a script that will remove access when

2003-08-25T05:00:51-04:00

man, u said u want it to work when someone does /mode #channel kick botname.
anyway add this code to make the bot work on /kick #channel botname.
Code:
bind kick - * kick:removeproc kick:remove { nick uhost hand chan targ rsn } {  if {$targ == $::botnick} {   putserv "PRIVMSG X :verify $nick"   }}
note:do not remove Papillon's code, leave it and add this one into it.

Hi again Sir Finz

this script
......

bind kick - * kick:remove

proc kick:remove { nick uhost hand chan targ rsn } {
if {$targ == $::botnick} {
putserv "PRIVMSG X :verify $nick"
}
}

bind notc - "* logged in as *" check_verify

proc check_verify {nick host hand arg dest} {
if {[string equal $dest $::botnick]} {
putserv "PRIVMSG X :remuser $::thechannel [lindex [split $arg] end]"
}
}
.......
I tried the script but for some reason it did not work still....
so when i did /kick #channel BotName it did not do anything
.....

I tried the first block of the script to test if it works like
note: to test the script I changed verify to kick

bind kick - * kick:remove
proc kick:remove { nick uhost hand chan targ rsn } {
if {$targ == $::botnick} {
putserv "PRIVMSG X :kick $nick"
}
}

I loaded this script but it did not kick me then I did
/kick #channel BotName

Maybe the reason the whole script did not work because the first block dont work to feed to the 2nd block of the script.

Thank You

Laynuks

Statistics: Posted by laynuks — Mon Aug 25, 2003 5:00 am

hello I need a script that will remove access when

2003-08-18T06:30:27-04:00

well done I didn't realize that the AOp was not being stripped off control characters. nice notice.

Statistics: Posted by Sir_Fz — Mon Aug 18, 2003 6:30 am

I got it working.. finally!

2003-08-17T23:08:28-04:00

Hi,

A bit more patience, a bit more reading, a little re-working and I have what I wanted still working after 4 days.....

bind notc - "*Identification to the nickname *" check:verify

proc check:verify {nick host hand arg {dest ""}} {
set msg [ctrl:filter $arg]
if {[string equal $dest $::botnick]} {
# Parse ChanServ's message.
set offender [lindex [split $msg] 0]
set aop [string tolower [lindex [split $msg] 2]]
set chan [string trim [lindex [split $msg] 5] .]
set opnick [string trim [lindex [split $msg] end] .]
# Only an AOp can be punished.
if {![string match $aop "aop"]} {return}
# Delete access, remove op & kick with appropriate message.
putquick "PRIVMSG $::chanserv :aop $chan del $opnick"
putquick "MODE $chan -o $offender"
puthelp "notice $offender :You tit head, you just lost access!"

# Check and see if the offender is in the bots' user list
# If so, delete them!
set thehand [findhand $offender [getchanhost $offender]]

if {$offender != "" && $thehand != "*"} {
deluser $thehand
putcmdlog "Deleted !$offender! from the user database."
save
}
}
}

The bind is the major difference. It's not looking for any formatted text. The "AOp" part of the bind is returned in bold and caused the bot to totally ignore it in previous efforts. I also reverted back to Ppslim's proc for removing formatting and added a conditional statement to determine that the offender is indeed an aop and not a sop. Founder's are ignored as the why command returns a different message. Except for the above, the script is as it was and works perfectly.

Many thanks for all the help, very much appreciated

Statistics: Posted by Alchera — Sun Aug 17, 2003 11:08 pm

hello I need a script that will remove access when

2003-08-14T14:18:27-04:00

Thank you very much again Sir_Fz, and thanks to caesar also, I will try it again and see if it I get more than 24hrs use out of it (now that's the confusing bit). Someone suggested I e-mail DALnet and ask that they remove their stupid formatting but, as they never respond to e-mails I'd be wastng my time. LOL

My frustration has been somewhat enhanced by an inability to concentrate fully due to virul bronchitis but, as someone once said, "S..t happens!"

PS: I'm well overdue for new reading glasses too.

Statistics: Posted by Alchera — Thu Aug 14, 2003 2:18 pm

hello I need a script that will remove access when

2003-08-14T05:25:18-04:00

this should make it work:

Code:

# Full name of channel services set chanserv "chanserv@Services.dal.net" # Channel *not* to function in set nogo "#channelname" bind kick - * kick:remove bind notc - "* has AOp access to *" check:verify proc kick:remove {nick uhost hand chan targ rsn} { if {$targ == $::botnick} { if {![string match $chan $::nogo]} { putserv "PRIVMSG $::chanserv :why $chan $nick" } } } proc check:verify {nick host hand arg {dest ""}} { regexp -all {\002} $argif {[string equal $dest $::botnick]} { set offender [lindex [split $arg] 0] set chan [string trim [lindex [split $arg] 5] .] set opnick [string trim [lindex [split $arg] end] .] set thehand [findhand $offender [getchanhost $offender]] if {$offender != "" && $thehand != "*"} { deluser $thehand } putquick "PRIVMSG $::chanserv :aop $chan del $opnick" putquick "MODE $chan -o $offender" putkick $chan $offender "You tit head, you just lost access!" } } # findhand - tries to find a handle proc findhand {nick host} { if {[validuser $nick]} { return $nick } else { set thehand [nick2hand $nick] if {[validuser $thehand]} { return $thehand } set thehand [finduser $host] return $thehand } } ### End ### putlog "TCL \002loaded\002: Kick Remove."

Statistics: Posted by Sir_Fz — Thu Aug 14, 2003 5:25 am

hello I need a script that will remove access when

2003-08-14T00:44:56-04:00

You should see this topic.

Statistics: Posted by caesar — Thu Aug 14, 2003 12:44 am