ausführen eines scripts per pub cmd

[BeSSeRwUeRzEl]

HI ,
ich wollt fragen wie ich nen cmd machen kann wenn ich z.B.
!tcl muh.tcl
eingebe, das dann dieses tcl script ausgeführt wird und durch dieses ausführen soll
.chanset #chan chanmode +nt-imklps
gemacht werden! pls help


mFg BeSSeR

[spock]

ich forsteht nicht

Sie Muß gesprechen english, bitte

[spock]

something like that

[BeSSeRwUeRzEl]

HI ,
i will write in english . i want to make a script where i can write in a channe:
!tcl muh.tcl
and then my eggdrop exec this tcl script and in this tcl script i want to put in
.chanset #chan chanmode +nt-imklps

can u help me ?

i hope u understand it

[GodOfSuicide]

found this somewhere on my hdd..

Code: Select all

#Usage /msg <bot> assist <#channel> 

bind msg - assist pub:assist 

proc pub:assist {nick uhost handle text} { 

set channame [lindex [split $text] 0] 

# here you can do some test to determine if the channel is valid ect... If you really need it. 

channel set $channame -inactive 

}

just rewrite it to public trigger and it should work

[BeSSeRwUeRzEl]

thx but i have found another way:

bind pub m !tcl besser
proc besser {n u h c a} {source scripts/besser.tcl}

but now i must fill in every scritpt! how can i make this that i hat to write
!tcl script.tcl
pls help thx

[GodOfSuicide]

didn't test, but should work..

Code: Select all

bind pub m !tcl mytcl

proc mytcl {nick hand uhost chan text } {
	source scripts/$text
}

you could expand it with an file-exists function etc, this is just how it basicly would (should) work..

[Deflex]

oder du nimmst das !tcl public script ( falls du sowas meinst )

beispiele mit diesem script:

!tcl channel add #channel

!tcl chattr Handle flag|flag #channel

!tcl return Dieses Script ist cool!

sowie
!tcl exec ...

und der link:

http://tcl.b0rk.de/files/tcldebug.tcl