helloo can i find help with this tcl, :P

[Bader]

exmp: when user join channel
(Fri)(02،40،pm) * Joins: sc2004- (blhab@dyn92.pir3.nas.panafonet.gr)

i am add on userban .+ban *!*@*.gr Flooding ip
i need the bot make:
(02،40،pm) * Bot sets mode: +MR
when he kickban the user:
(02،40،pm) * Bot sets mode: +b *!*@*.gr
(02،40،pm) * sc2004- was kicked by Bot (Flooding ip)
the after he kickban him he open the mode
(02،40،pm) * Bot sets mode: -MR
if any one can help me with this tcl

[avilon]

Code: Select all

bind join -|- * whatever
proc whatever {nick host hand chan} {
	if {[matchban $nick!$host]} {
		putquick "MODE $chan +MR"
		utimer 10 [list puthelp "MODE $chan -MR"]
	}
}

[Bader]

Code: Select all

bind join -|- * whatever
proc whatever {nick host hand chan} {
	if {[matchban $nick!$host]} {
		putquick "MODE $chan +MR"
		utimer 10 [list puthelp "MODE $chan -MR"}
	}
}

when i make like that i`ll working?

bind join -|- * *!*@200.*
proc whatever {nick host hand chan} {
if {[matchban $nick!$host]} {
putquick "MODE $chan +MR"
utimer 10 [list puthelp "MODE $chan -MR"}
}
}

[avilon]

Code: Select all

bind join -|- "*!*@200.*" whatever

[Bader]

thanks

[Bader]

bind join -|- "*!*@*.verizon-gni.com" whatever
proc whatever {nick host hand chan} {
if {[matchban $nick!$host]} {
putquick "MODE $chan +MR"
utimer 10 [list puthelp "MODE $chan -MR"}
}
}

[16:00] Tcl error in file 'eggdrop.conf':
[16:00] invalid command name "}"
while executing
"} "
(file "scripts/test.tcl" line 7)
invoked from within
"source scripts/test.tcl"
(file "eggdrop.conf" line 1223)
[16:00] * CONFIG FILE NOT LOADED (NOT FOUND, OR ERROR)

[avilon]

just a typo..
Replace

Code: Select all

utimer 10 [list puthelp "MODE $chan -MR"}

with

Code: Select all

utimer 10 [list puthelp "MODE $chan -MR"]

[Bader]

just a typo..
Replace

Code: Select all

utimer 10 [list puthelp "MODE $chan -MR"}

with

Code: Select all

utimer 10 [list puthelp "MODE $chan -MR"]

dosn`t working

see

bind join -|- *!*@62.150.* whatever
proc whatever {nick host hand chan} {
if {[matchban $nick!$host]} {
putquick "MODE $chan +MR"
utimer 10 [list puthelp "MODE $chan -MR"]
}
}

-----

(Sat)(02،19،am) * Shjon sets mode: +v ffffff
(Sat)(02،20،am) * Parts: +ffffff (Kw@62.150.203.141)
(Sat)(02،20،am) * Joins: ffffff (Kw@62.150.203.141)

[Sir_Fz]

Code: Select all

bind join -|- * whatever 
proc whatever {nick host hand chan} { 
   if {[matchban $nick!$host $chan]} { 
      putquick "MODE $chan +MR" 
      utimer 10 [list puthelp "MODE $chan -MR"]
   } 
}

Use this and don't change anything (i.e. leave * as it is) and it should set the channel MR if the user is in the bot's channel banlist.

[Bader]

Code: Select all

bind join -|- * whatever 
proc whatever {nick host hand chan} { 
   if {[matchban $nick!$host $chan]} { 
      putquick "MODE $chan +MR" 
      utimer 10 [list puthelp "MODE $chan -MR"]
   } 
}

Use this and don't change anything (i.e. leave * as it is) and it should set the channel MR if the user is in the bot's channel banlist.

ok i test it but there some prb see plz

(Sat)(03،04،pm) * Joins: ffffff (Kw@62.150.203.141)
(Sat)(03،04،pm) * Reema sets mode: +MR
(Sat)(03،04،pm) * Reema sets mode: +MR
(Sat)(03،04،pm) * Reema sets mode: +MR
(Sat)(03،04،pm) * Reema sets mode: +b *!*Kw@62.150.*
the bot close channel mode more tnan 2 i want to close it once only

[^DooM^]

That script shouldn't do that. the only thing i can think of is if more than 1 user on channel matches the ban. try this

Code: Select all

bind join -|- * whatever
set modemr 0
proc whatever {nick host hand chan} {
   if {[matchban $nick!$host $chan] && $::modemr == 0} {
      putquick "MODE $chan +MR"
      set modemr 1
      utimer 10 [list puthelp "MODE $chan -MR"]
      utimer 11 "set modemr 0"
   }
}

not tested

Edit: oops forgot the quotes thanks sir_fz

[Sir_Fz]

utimer 11 set modemr 0

you might want to change that to

Code: Select all

utimer 11 "set modemr 0"

[Bader]

utimer 11 set modemr 0

you might want to change that to

Code: Select all

utimer 11 "set modemr 0"

the bot he still close channel mode more tnan 2 i want to close it once only

[Bader]

utimer 11 set modemr 0

you might want to change that to

Code: Select all

utimer 11 "set modemr 0"

the bot he still close channel mode more tnan 2 i want to close it once only

i change and test it bot he still

Code: Select all

bind join -|- * whatever 
set modemr 0 
proc whatever {nick host hand chan} { 
   if {[matchban $nick!$host $chan] && $::modemr == 0} { 
      putquick "MODE $chan +MR" 
      set modemr 1 
      utimer 10 [list puthelp "MODE $chan -MR"] 
      utimer 11 "set modemr 0"
   } 
}

---
see thats its
and he  still close channel mode more tnan 2 i want to close it once only

(Sat)(04،41،pm) -> [Reema] CHAT
(Sat)(04،42،pm) * Joins: ffffff (Kw@62.150.203.141)
(Sat)(04،42،pm) * Reema sets mode: +MR
(Sat)(04،42،pm) * Reema sets mode: +MR
(Sat)(04،42،pm) * Reema sets mode: +MR
(Sat)(04،42،pm) * Reema sets mode: +b *!*Kw@62.150.*
------

[^DooM^]

That should not be possible. Did you rehash your bot after making the code changes? If it still does it on a rehash try restarting it completely just to save our sanity