Neler yeni
MEGAForum - Teknoloji Forumu

Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı yada giriş yapmalısınız. Forum üye olmak tamamen ücretsizdir.

Kick Sayacı

diShy

~ یơυℓℓεss ..
Onursal Üye
  • Üyelik Tarihi
    27 Kas 2009
  • Mesajlar
    24,120
  • MFC Puanı
    79
kod:
Kick Sayacı:

alias kick { kick $1- %kicksayac | kicksayac }

alias kicksayac {
if (%kicksayac == ) {
set %kicksayac 1
}
%kicksayac = %kicksayac + 1
halt
}

Kline Sayacı:

alias kline { kline $1- %klinesayac | klinesayac }

alias klinesayac {
if (%klinesayac == ) {
set %klinesayac 1
}
%klinesayac = %klinesayac + 1
halt
}

Memo Bilgi kutusu

;Memo geldiğinde uyaran bir dialog.
dialog ms {
title \"MemoServ Bilgi Kutusu\"
size -1 -1 220 85
text \"*** Yeni bir notunuz var.\"210 10 220 200
text \"*** Okumak için tamam butonuna basınız.\"310 30 220 200
button \"&Tamam\"470 50 85 25ok
}
on ^*:notice:*yeni bir notunuz*:*:{
if ($nick == MemoServ) {
dialog -ma ms ms
halt
}
}
on 1:ACTIVE:*:{
if ($dialog(idrqm)) { dialog -v ms }
}
on 1:dialog:ms:sclick:4:/ms read last
}


 
Üst Alt