[TCL] Auto Act if Have Notice Respons

Senin, 28 Juni 2010

[TCL] Auto Act if Have Notice Respons

TCL ini walau simple tapi sangat bermafaat, khususnya adalah untuk bot yang mempunyai nick registered dan pengaturan enforce pada nick di aktifkan dengan tidak menambah access pada vHost, yang di khawatirkan, ketika bot rejump server, atau bot mengalami Time Out atau apapun itu yang mengakibatkan bot DC (Disconnect) dari server atau bisa juga *spilit server, yang mengakibatkan service down, dan ketika service UP kembali service NickServ akan meminta identifikasi, nah, awalnya hanya terpikir ketika *spilit karena NickBot mendadak menjadi Guest**** yang sebagian dari channel mengatur akick untuk nick ini bahkan @Bot Guard yang sudah memblacklicst nick Guest** tersebut, langsung saja, cara kerja scripts ini sangat simple, ketika bot mendapat notice (dari siapapun) yang *mengandung kata* dari isi scripts yang telak terkonfigurasi, maka bot akan menjalankan sebuah action yang kita sudah menentukan konfigurasinya... ini dia TCL nya... saya memberi contoh untuk mengidentifikasi nick ya, anda bisa merubah dan mengedit sesuka anda :)

############################################
# 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*" autoident
Jangan 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)

Tulisan yang banyak dilihat bulan ini