egghelp/eggheads community

need help

2003-11-09T23:56:29-04:00

Code:

proc dcc:enfer {hand idx arg} {   set victim [lindex [split $arg] 0]   set victimidx [hand2idx $victim]   if {[valididx $victimidx]} {      chattr $victim +E      setchan $victimidx 666      return 1   } else {      putdcc $idx "$victim is not a valid partyline user."      return 0   }}

Try that for starters. At least it sets +E.

Also, did you test the code with a normal user (without +m)?

Statistics: Posted by stdragon — Sun Nov 09, 2003 11:56 pm

need help

2003-11-09T15:28:46-04:00

sorry to say that it doesnt work either with ou without the " else"

i dont know where to look now i`m totally confused

thanks for your help

Pitchat

Statistics: Posted by Pitchat — Sun Nov 09, 2003 3:28 pm

never

2003-11-09T14:13:29-04:00

i have never seen that in a tcl Sir_Fz. maybe i did not notice that
i learn everyday something new

Statistics: Posted by TALES — Sun Nov 09, 2003 2:13 pm

need help

2003-11-09T11:36:02-04:00

} { same as } else {

Statistics: Posted by Sir_Fz — Sun Nov 09, 2003 11:36 am

need help

2003-11-09T08:54:22-04:00

Should there be any else between } { ??

this:

Code:

 return    } {       putdcc $idx "nice try !"

to this:

Code:

 return    } else {       putdcc $idx "nice try !"

and this:

Code:

 return 1    } {       putdcc $idx "[lindex $arg 0] is not a valid partyline user."

to this:

Code:

 return 1    } else {       putdcc $idx "[lindex $arg 0] is not a valid partyline user."

not shure but could be

Statistics: Posted by TALES — Sun Nov 09, 2003 8:54 am

need help

2003-11-02T16:23:03-04:00

still dont work

Statistics: Posted by Pitchat — Sun Nov 02, 2003 4:23 pm

need help

2003-11-02T13:03:08-04:00

Code:

if {![matchattr $hand m]} {chattr [idx2hand $idx]  +E}

you have two blank spaces between [idx2hand $idx] and +E
remove one of them and try again

Statistics: Posted by Papillon — Sun Nov 02, 2003 1:03 pm

need help

2003-11-02T01:49:31-04:00

i did a little script , when an owner type .enfer (nick ) it suppose to give the user the flag +E then send the user in chan 666 on the partyline and lock him in until he say a certain sentence after that the +E is remove and the user send back to the partyline .

heres the problem the script doesnt set the +E flag so the user can escape anytime

Code:

# BINDS# -----bind filt E * filt:enferbind chjn - * chjn:enferbind chon E * chon:enferbind dcc m enfer dcc:enfer# CODE# ----proc filt:enfer {idx text} {if {[string tolower $text] == "i will not do bad things"} {chattr [idx2hand $idx] -Eputdcc $idx "so soon? ok, youre back on the partyline"setchan $idx 0return} {putdcc $idx "nice try !"return}}proc chjn:enfer {bot hand chan flag idx from} {if {$chan == "666"} {if {![matchattr $hand m]} {chattr [idx2hand $idx]  +E}putdcc $idx "welcome in hell bad boy?"putdcc $idx "you have two choices , you stay here with me or you say \"i will not do bad things\"... the choice is yours!"}}proc chon:enfer {hand idx} {setchan $idx 666return}proc dcc:enfer {hand idx arg} {set idx [hand2idx [lindex $arg 0] ]if {[valididx $idx]} {setchan $idx 666return 1} {putdcc $idx "[lindex $arg 0] is not a valid partyline user."return 0}}

any help welcome

Pitchat

Statistics: Posted by Pitchat — Sun Nov 02, 2003 1:49 am