CHANSERV TCL Script

stevegarbz · Post by **stevegarbz** » Sat Dec 04, 2004 8:24 pm

Does anyone have a remake of ChanServ, except in TCL? I need it for channels without ChanServ on GameSurge and need it to be very secure. Thanks

demond · Post by **demond** » Sat Dec 04, 2004 8:36 pm

why not simply use a real ChanServ?

stevegarbz · Post by **stevegarbz** » Sat Dec 04, 2004 8:37 pm

its an illegal channel ( meaning gamesurge won't register it )

demond · Post by **demond** » Sat Dec 04, 2004 8:42 pm

then what would you want your "ChanServ" to do? it couldn't register channels, and for ops/user list management you can use plain old eggdrop, no scripts are needed for that

TurboChicken · Post by **TurboChicken** » Sat Dec 04, 2004 9:50 pm

i think he would want is some way of maintaining eggdrops user list via PM rather than partyline

so basically something for adding users to op halfop and voice and removing

listing who has op halfop and voice
mode locking
flooding

atleast that's what i would expect

stevegarbz · Post by **stevegarbz** » Sun Dec 05, 2004 6:28 pm

I'm looking for something that I can add like !addop, !addban, !mode +m, !kick, a script like that so I don't have to do it through the party line. I want users to have access, etc. So it's just like a chanserv except ran through my eggdrop.

Alchera · Post by **Alchera** » Sun Dec 05, 2004 6:38 pm

The Search button (above) really is a handy tool.

stevegarbz · Post by **stevegarbz** » Sun Dec 05, 2004 6:45 pm

i've tried that. and I haven't found anything.

---

either that or all the topics were so dumb I didn't even read them

Alchera · Post by **Alchera** » Sun Dec 05, 2004 6:50 pm

Woops! I pasted the wrong Search link; anyway try this. I got 10 pages of results by simply typing in "chan" (TCL Archive). What was so hard about that?

stevegarbz · Post by **stevegarbz** » Sun Dec 05, 2004 6:53 pm

none of them are a full chanserv script either.

demond · Post by **demond** » Sun Dec 05, 2004 7:29 pm

stevegarbz wrote:none of them are a full chanserv script either.

then learn TCL & eggdrop and write one

I doubt someone here will have the time & the will to implement a full-fledged ChanServ emulation suiting your particular needs

stevegarbz · Post by **stevegarbz** » Sun Dec 05, 2004 8:33 pm

i'm just wondering if anyone knows of one / has one. not asking for anyone to code one.

awyeah · Post by **awyeah** » Sun Dec 05, 2004 9:35 pm

Its not that complicated. However the ChanServ, part you would have to make the bot operup and defining different accesses for users, adding lots of flags, hosts could be a rain pain.

The easiest way is to, download a pub cmd tcl from the egghelp tcl archive.
You can have an idea from that; there are plenty availiable which have variations of commands.

There are many simple commands such as !op, !deop, !kick, !ban which are very basic and easy to code in tcl.

You can bind them to dcc for them to work in private, or on a channel as in binding pub, or even in notices, its all upto you.

Example:

Code: Select all

#This code will op a user with flag "+o", when !op is triggered.
#If there are nicks specified, it will op those nicks.
#Triggers on channels only.

#Usage:

!op #ops person triggered
!op <nicks> #ops nicks mentioned
 |
 |_ <nick1 nick2 nick3.........nick6>
  

bind pub o !op op:user

proc op:user {nick uhost hand chan text} {
 if {([lindex $text 0] == "")} {
  putserv "MODE $chan +o $nick"
  }
 if {([lindex $text 0] != "")} {
  putserv "MODE $chan +oooooo [lindex $text 0] [lindext $text 1] [lindex $text 2] [lindex $text 3] [lindext $text 4] [lindex $text 5]"
 }
}

We can make it check lots of things in this way. For example make the bot check if its op before opping the person or those people. [botisop $chan].

Even if the bot is not a channel op and is a services/server admin (ircoper) with +a, +A flag, it could use /samode to op the person or those people.

Similarly, the bot be more user friendly, if we make the bot check for ops, if it is opered up, if the user is already opped and asking for ops ([isop $nick $chan]), or not to opped the nicks mentioned which are already opped.

Suppose if the bot is not opered up or opped in the channel and some one requests this trigger then the bot can check if its not opered up, operup and use the command.

I would recommend you keep your bot a services admin atleast +a mode, since you would want your bot to join everychannel as ChanServ doesn't join every network chan. Then you can use bind msg, private message chanserv for help or even bind notc, private notice for the triggers.

We can make the bot check if that person or any of those people are on the channel ([onchan [lindex $text 0] $chan]), before oping and we can even limit the command say to be triggered on the channels you want etc. We can check that user's channel or global flags, even if that user has a specific uhost etc before triggering.

There are many things we would do with just this simple piece of code.

demond · Post by **demond** » Sun Dec 05, 2004 9:54 pm

awyeah wrote:There are many things we would do with just this simple piece of code.

one of them being fixing its bugs

metroid · Post by **metroid** » Mon Dec 06, 2004 2:21 am

demond wrote:
stevegarbz wrote:none of them are a full chanserv script either.
then learn TCL & eggdrop and write one

I doubt someone here will have the time & the will to implement a full-fledged ChanServ emulation suiting your particular needs

And ChanServ can do things normal users thus an eggdrop can't do.
I'm on Quakenet which doesn't use chanserv but from what i do know, chanserv sets modes like +a and normal users can't do that?