joinsms

Help for those learning Tcl or writing their own scripts.
Post Reply
A
AlIt0
Voice
Posts: 11
Joined: Wed Apr 14, 2010 8:09 am

joinsms

Post by AlIt0 »

Code: Select all

set memo " -> Is on IRC !"
set num "+number@sms.globul.bg"
bind join - * join:on_join
proc join:on_join {nick uhost hand chan} {
if {$nick == "Ronin"} {
global num memo
exec echo $uhost $memo | mail $num
}
return 0
}
Hi, this is the code I use for this tcl but Unfortunately I do not send sms. sms.globul.bg it's Bulgarian GSM operator.
Post Reply