egghelp/eggheads community

Limit Restrictet script problem

2003-06-26T21:00:49-04:00

This script Restrict users (no bots and owners) they change +l or -l on a chan. but the dont works i would the script to adjust on the partyline but the bot doing nothing after the edit please help me Papillon i have no idea.

This script Boot the user on the partyline and kick him on the chan and add. a 24 h globalban sticky its good wenn the user is not adding . than change the flags -fp and give him +k and than +d.
The Boot from partyline must automatic always whatever LIMITCHECK is on or off. other settings can be edit on the partyline.

for all edits is the +LIMITCHECK flag assumption.

Partyline edit:

Code:

# Für wie viele Minuten möchtest du den Channel auf Invite lassen?# For how many minutes whould you like chan invite?#     (default : 20)set chan(invitetime) 20# Für wie vielen Minuten möchtest du den Globalban Sticky laufen lassen?# Clones [T-Online] und andere Dialin haben max. 24h login (24h Trennung) !# For how many minutes whould you like the Globalban Sticky?# Clones [T-Online] and other Dialin have max. 24h login (24h breakup)#     (default: 1440 = 24h)set glb(sticky) 1440# ---------------------- code - nicht verändern - don´t change - code ------------------------#setudef flag LIMITCHECKsetudef flag linvitesetudef flag ldeopsetudef flag lkicksetudef flag limitbacksetudef flag lglobbansetudef flag lautodeinviteproc majonas_limit_restrict {nick uhost hand chan mode victim} {    set chaninfo [channel info $chan]    if {![string match "*+LIMITCHECK*" $chaninfo]} {       return    if {$mode == "+l" || $mode == "-l"} {    if {![botisop $chan] || [matchattr $hand b] || [matchattr $hand n]} {      return    if {[onchan $nick $chan] && $nick != $::botnick} {    set delflagfp "chattr [nick2hand $nick] -fp"    set bootpl "boot [nick2hand $nick] 12limitabuse0.5.tcl"    set kick "putkick $chan $nick"    set chlimit "pushmode $chan +l [expr [llength [chanlist $chan]] + 4]"    set hostban "*!*[string range $uhost [string first "@" $uhost] end]"    set addflagk "chattr [nick2hand $nick] +k"    set globban "newban $hostban 7Majonas 12limitabuse0.4.tcl $::glb(sticky) sticky"    set deinvite "pushmode $chan -i"    set globdeop "chattr [nick2hand $nick] +d"    if {[string match "*+linvite*" $chaninfo]} { pushmode $chan +i }     if {[string match "*+ldeop*" $chaninfo]} { pushmode $chan -o $nick }        if {[string match "*+lkick*" $chaninfo]} { list putkick $chan $kick }          if {[string match "*+limitback*" $chaninfo]} { utimer 3 $chlimit }    if {[string match "*+lglobban*" $chaninfo]} { utimer 4 $globban }              if {[string match "*+lautodeinvite*" $chaninfo]} { timer $::chan(invitetime) $deinvite }    utimer 1 $delflagfp    utimer 1 $bootpl    utimer 2 $addflagk    utimer 5 $globdeop         }}return 0} }}

Originalscript that works great but is not edit on partyline:

Code:

# Für wie viele Minuten möchtest du den Channel auf Invite lassen?# For how many minutes whould you like chan invite?#     (default : 20)set chan(invite) 20# Für wie vielen Minuten möchtest du den Globalban Sticky laufen lassen?# Clones [T-Online] und andere Dialin haben max. 24h login (24h Trennung) !# For how many minutes whould you like the Globalban Sticky?# Clones [T-Online] and other Dialin have max. 24h login (24h breakup)#     (default: 1440 = 24h)set glb(sticky) 1440# ---------------------- code - nicht verändern - don´t change - code ------------------------#bind mode - * majonas_limit_restrictproc majonas_limit_restrict {nick uhost hand chan mode victim} {    if {$mode == "+l" || $mode == "-l"} {    if {[matchattr $hand b] || [matchattr $hand n]} {    return 0    } else {        if {[onchan $nick $chan]} {      pushmode $chan +i      pushmode $chan -o $nick      set kick "putkick $chan $nick"      utimer 1 $kick          set delflagfp "chattr [nick2hand $nick] -fp"          utimer 1 $delflagfp          set bootpl "boot [nick2hand $nick] 12limitabuse0.5.tcl"          utimer 1 $bootpl          set addflagk "chattr [nick2hand $nick] +k"          utimer 2 $addflagk      set chlimit "pushmode $chan +l [expr [llength [chanlist $chan]] + 4]"      utimer 3 $chlimit          set hostban "*!*[string range $uhost [string first "@" $uhost] end]"          set globban "newban $hostban 7Majonas 12limitabuse0.4.tcl $::glb(sticky) sticky"          utimer 4 $globban          set globdeop "chattr [nick2hand $nick] +d"          utimer 5 $globdeop      set deinvite "pushmode $chan -i"      timer $::chan(invite) $deinvite}}return 0}}

Statistics: Posted by Volume — Thu Jun 26, 2003 9:00 pm

@Papillon

2003-06-13T13:37:42-04:00

ah.. sorry.. little typo there
hmmm
[21:24:53] * Ralfos sets mode: +t <<--- Ralfos wouldn't happen to have the +n userflag would he?
Ralfos have non flags is a handop login

thank you very mutch for your greate help

i have edit this line:

Code:

if {![string match "+topiccheck" $chaninfo]} {

Code:

if {![string match "*+topiccheck*" $chaninfo]} {

and the scripts works perfectly

Statistics: Posted by Volume — Fri Jun 13, 2003 1:37 pm

Automatic undo +t and -o nick and kick with setudef flag

2003-06-13T05:45:49-04:00

ah.. sorry.. little typo there
hmmm
[21:24:53] * Ralfos sets mode: +t <<--- Ralfos wouldn't happen to have the +n userflag would he?

Ralfos have non flags is a handop login

Statistics: Posted by Volume — Fri Jun 13, 2003 5:45 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T17:52:24-04:00

ah.. sorry.. little typo there
hmmm
[21:24:53] * Ralfos sets mode: +t <<--- Ralfos wouldn't happen to have the +n userflag would he?

Statistics: Posted by Papillon — Thu Jun 12, 2003 5:52 pm

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T15:31:41-04:00

Code:

setudef flag topicchecksetudef flag undotopicmode setudef flag deop setudef flag kick bind mode - "* +t" chan:topic proc chan:topic {nick uhost hand chan mode victim} {   set chaninfo [channel info $chan]  if {![string match "+topiccheck" $chaninfo]} {     return   }   if {![botisop $chan] || [matchattr $hand b] || [matchattr $hand n]} {     return   }   if {[onchan $nick $chan] && $nick != $::botnick} {     if {[string match "*+undotopicmode*" $chaninfo]} { pushmode $chan -t }    if {[string match "*+deop"* $chaninfo]} { pushmode $chan -o $nick }    if {[string match "*+kick*" $chaninfo]} { utimer 5 [list putkick $chan $nick] }  } }

hello, thank you for your help , but the script dont work i have correct this line:

Code:

if {[string match "*+deop"* $chaninfo]} { pushmode $chan -o $nick }

Code:

if {[string match "*+deop*" $chaninfo]} { pushmode $chan -o $nick }

but the bots dont restrict user. the bot dont change back to -t

[21:22:33] * Ralfos sets mode: +t
[21:24:53] * Ralfos sets mode: +t
[21:25:05] * Ralfos sets mode: -t
[21:25:25] * Ralfos sets mode: +t
[21:25:43] * Ralfos sets mode: -t
[21:26:16] * Ralfos sets mode: +t

[21:29:26] User defined channel flags:
[21:29:26] +topiccheck +undotopicmode +deop +kick

Statistics: Posted by Volume — Thu Jun 12, 2003 3:31 pm

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T12:17:55-04:00

Code:

setudef flag topicchecksetudef flag undotopicmode setudef flag deop setudef flag kick bind mode - "* +t" chan:topic proc chan:topic {nick uhost hand chan mode victim} {   set chaninfo [channel info $chan]  if {![string match "+topiccheck" $chaninfo]} {     return   }   if {![botisop $chan] || [matchattr $hand b] || [matchattr $hand n]} {     return   }   if {[onchan $nick $chan] && $nick != $::botnick} {     if {[string match "*+undotopicmode*" $chaninfo]} { pushmode $chan -t }    if {[string match "*+deop"* $chaninfo]} { pushmode $chan -o $nick }    if {[string match "*+kick*" $chaninfo]} { utimer 5 [list putkick $chan $nick] }  } }

Statistics: Posted by Papillon — Thu Jun 12, 2003 12:17 pm

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T12:07:34-04:00

I would give you an answer if I could understand anything of what you are trying to say...

User defined channel flags:
-TOPICCHECK -undotopicmode -deop
-kick

TOPICCHECK: is for set the script on ore off for a channel
undotopicmode: set -t in the chan where the user set +t
deop: deop the user that sets +t in the chan
kick: kick the user that sets +t in the chan

all user definded channel flags are unload !
the script doing nothing !

.chanset #chan +undotopicmode
the flag undotopicmode is on now, but the bot doing nothing as the TOPICCHECK flag is off

.chanset #chan +TOPICCHECK
TOPICCHECK and undotopicmode is on now, the bot set mode -t on the chan

.chanset #chan +deop
TOPICCHECK and undotopicmode and deop is on now, the bot set mode -t on the chan and deop the user this have set +t

.chanset #chan +kick
TOPICCHECK and undotopicmode and deop and kick is on now, the bot set mode -t on the chan , deop the user and kick him

.chanset #chan -deop
TOPICCHECK and undotopicmode and kick is on now, the bot set mode -t on the chan , and kick the user

.chanset #chan -TOPICCHECK
undotopicmode and kick is on now, the bot doing nothing because the TOPICCHECK flag is off !
this is the on ore off flag for the script !!!

i hope you can understand me

Statistics: Posted by Volume — Thu Jun 12, 2003 12:07 pm

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T11:28:04-04:00

I would give you an answer if I could understand anything of what you are trying to say...

Statistics: Posted by Papillon — Thu Jun 12, 2003 11:28 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T11:25:46-04:00

Well, yes, if the channel is not +topiccheck then nothing will happen there if someone dose the +t mode. By default it's -topiccheck for each channel.

but your script can only change on change off.
wenn i will the bots set -t and deop no kick this funkton can not edit with the partyline.
or
wenn i will the bots set -t and kick but no deop, this can not edit with pl too

if i will have the script off must i turn off the TOPICCHECK
if i will have the scripts do not kick i turn off the kick
and the other pl chan flags are on.

Statistics: Posted by Volume — Thu Jun 12, 2003 11:25 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-12T01:13:07-04:00

Well, yes, if the channel is not +topiccheck then nothing will happen there if someone dose the +t mode. By default it's -topiccheck for each channel.

Statistics: Posted by caesar — Thu Jun 12, 2003 1:13 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-11T16:02:49-04:00

Oups.. instead of "topickeep" should be "topiccheck" as you wanted. The "topiccheck" channel flag tells it to react only on the channels that have the flag, that's all. To add or remove the flag just .chanset #channel +topiccheck because by default it's -topiccheck so that's why is not working..

i would that topiccheck is the root button an and alliance so i can this script with this button on ore off switching.

the readout buttons are undotopicmode - deop - kick
if the kick flag is on and the deop flag is on and the undotopicmode is on
but the TOPICCHECK is of the script doing nothing.
is the TOPICCHECK is on the script do all the flags have a + .

the flags with - is not to do i hope you can understand me thank you for the time. iam a newbi in tcl , i hope will better ... its difficult with my english.

Statistics: Posted by Volume — Wed Jun 11, 2003 4:02 pm

Automatic undo +t and -o nick and kick with setudef flag

2003-06-11T11:02:32-04:00

Oups.. instead of "topickeep" should be "topiccheck" as you wanted. The "topiccheck" channel flag tells it to react only on the channels that have the flag, that's all. To add or remove the flag just .chanset #channel +topiccheck because by default it's -topiccheck so that's why is not working..

Statistics: Posted by caesar — Wed Jun 11, 2003 11:02 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-11T10:53:12-04:00

Code:

setudef flag topickeepbind mode - "* +t" chan:topicproc chan:topic {nick uhost hand chan mode victim} {   if {![channel get $chan topiccheck]} {    return  }  if {![botisop $chan] || [matchattr $hand b] || [matchattr $hand n]} {    return  }  if {[onchan $nick $chan] && $nick != $::botnick} {    pushmode $chan -t    pushmode $chan -o $nick    utimer 5 [list putkick $chan $nick]  }}

looks a lot nicer.. hehe

Btw, what exactly do you want to do with this? I fail to understand exactly what this is ment to do..

sorry for my bad english
but i would -op and -t with userflags too
the topickeep flag must always on
is topickeep off and userflag op on the script not working (this is easyer to change the settings for owner the came into the shell !

Statistics: Posted by Volume — Wed Jun 11, 2003 10:53 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-11T10:41:42-04:00

Code:

setudef flag topickeepbind mode - "* +t" chan:topicproc chan:topic {nick uhost hand chan mode victim} {   if {![channel get $chan topiccheck]} {    return  }  if {![botisop $chan] || [matchattr $hand b] || [matchattr $hand n]} {    return  }  if {[onchan $nick $chan] && $nick != $::botnick} {    pushmode $chan -t    pushmode $chan -o $nick    utimer 5 [list putkick $chan $nick]  }}

looks a lot nicer.. hehe

Btw, what exactly do you want to do with this? I fail to understand exactly what this is ment to do..

Statistics: Posted by caesar — Wed Jun 11, 2003 10:41 am

Automatic undo +t and -o nick and kick with setudef flag

2003-06-11T10:20:31-04:00

pushmode [channel get $chan TOPICCHECK && undotopicmode] $chan -t

this is not the way it's used.. go see the tcl-commands.doc file.

Ps: Also, please don't post the same thing twice.

Statistics: Posted by caesar — Wed Jun 11, 2003 10:20 am