############################################ # Name : aNC.tcl # Desc : Just simple tCL to change $botnick / time # Owner : computersvirus@hotmail.com # Auth : eggoez # Email : eggoez@about.me # WebBlog : eggoez.com # /irc.allnetwork.org -j:#ciut (g0eZ) ############################################ # konfigurasi notice yang ingin di respon bot bind notc - "*Please identify via*" autoident # konfigurasi respon / aksi yang akan dilakukan bot proc autoident {nick uhost hand text dest} { putserv "PRIVMSG NickServ :identify $masterpass" } # konfigurasi yang ingin dikabarkan bot ketika berhasil mengeksekusi respon proc compautoident {nick uhost hand text dest} { putquick "PRIVMSG #ciut :Identifikasi nick berhasil.." }
Mudah bukan ? :D anda bisa menambah pada blind notc jika anda ingin bot juga merespon jika ada kalimat lain, :) contoh:
bind notc - "*This nickname is registered*" autoident bind notc - "*Please identify via*" autoidentJangan lupa untuk menambah tanda * sebelum dan sesudah kalimat yang anda ingin respon, karena ini akan membuat reaksi pada bot ketika kalimat yang di respon lebih atau kurang dari yang anda buat
Semoga bermanfaat
Regards eggoez(irc.allnetwork.org)