Domovská stránka Prehľadávať Pomoc
Prihlásiť sa
LBP
/
hwipl-eggdrop-scripts
zrkadlo https://github.com/hwipl/eggdrop-scripts.git
4
0
Fork 0
Súbory Issues 0 Wiki
Strom: d0b8f91e6d
Branche Tagy
hwipl-eggdrop-s...
/
scripts
/
greetings.tcl

greetings.tcl 207 B
História Raw

12345678910 
  1. # greetings tcl
    2. 

  2. 

  3. proc join_greeting { nick host hand chan } {
    4. 

  4. 	set $greetInChannel ""
    5. 

  5. 	if { [lsearch $greetInChannel $chan] != "-1" } {
    6. 

  6. 	puthelp "NOTICE $nick :Hi ${nick}!"
    7. 

  7. 	}
    8. 

  8. }
    9. 

  9. 

  10. bind join - * join_greeting
    11.