Scrip Kodu Tcl Cevirmek
on *:text:*:#helper: { if $1 == !onay && $2 { set %k # | ns getpass $2 } }
on *:text:*:?: { if $1 == !onay && $2 { set %k $nick | ns getpass $2 } }
on *:notice:*:?: { if $nick == nickserv { msg %k $3 nick'inin onay kodu: $5 } }
bu şekilde kullandığım bir ailas var bunun işlevi !onay nick dediğimde belirtilen nicke getpass çekip çıkan komudu #helper kanalına vericek bu alias kodu çalışıor ama tclsi lazım yapan bilen arkadaşlara şimdiden tşk ederim. |