IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar mIRC Seslenme Addonu
mIRC Seslenme Addonu
Aytac
mIRC Seslenme Addonu
0
161
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
addonu mirc seslenme

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular335
  • Mesajlar341
  • Beğenileri:15 in 12 posts
  • Beğendiği:7
  • Rep puanı 4

Kod :
menu menubar {
  -
  Nick Uyari Menüsü:/uyar
  -
}
alias uyar { .dialog -m uyar uyar }
dialog uyar {
  title "Nick uyarı menüsü ayarları by Aytac"
  size -1 -1 145 144
  option dbu
  edit "", 2, 10 15 60 10, return autohs
  list 3, 10 28 60 68, sort size
  button "Ekle", 4, 78 15 33 10
  button "SiL", 5, 78 28 33 10
  check "Uyarıyı Aç/Kapat", 10, 78 60 60 10
  check "Flash Aç/Kapat", 13, 78 72 60 10
  check "Yesil isik Aç/Kapat", 14, 78 84 60 10
  box "Muaf Nick Listesi", 9, 6 4 134 110
  text " Eklenen nick size seslenince uyarı vermeyecektir", 11, 6 120 134 8
  button "Tamam", 12, 6 132 134 10, ok
  check "Ses Çal Aç/Kapat", 6, 78 48 60 10
  edit "", 7, 10 100 20 10, return autohs
  Text "Ctrl + Kod Kullanarak nick satırına Renk ver", 8, 34 101 104 8
}
on *:dialog:uyar:*:*:{
  if ($devent == edit) {
    if ($did == 7) { set %renks $did(7) }
  }
  if ($devent == sclick) {
    if ($did($dname,10).state == 1) { set %nuyar 1 } | else { set %nuyar 0 }
    if ($did($dname,13).state == 1) { set %fuyar 1 } | else { set %fuyar 0 }
    if ($did($dname,14).state == 1) { set %yiuyar 1 } | else { set %yiuyar 0 }
    if ($did($dname,6).state == 1) { set %suyar 1 } | else { set %suyar 0 }
    if ($did == 4) { .did -a uyar 3 $did(uyar,2) | .auser sus $did(uyar,2) | .did -r uyar 2 }
    if ($did == 5) { .ruser sus $did(uyar,3).seltext | .did -d uyar 3 $did(uyar,3).sel }
  }
  if ($devent == init) {
    if (%nuyar == 1) { did -c uyar 10 }
    if (%fuyar == 1) { did -c uyar 13 }
    if (%yiuyar == 1) { did -c uyar 14 }
    if (%suyar == 1) { did -c uyar 6 }
    did -ra $dname 7 %renks
    if $ulist(*,sus,0) > 0 {
      var %i 1
      while %i <= $ulist(*,sus,0) {
        .did -a uyar 3 $ulist(*,sus,%i)
        inc %i  
      }
    }
  }
}
on ^*:TEXT:$(* $+ $me $+ *):#:{  
  if (%nuyar == 1) {
    if ($ulist($nick,sus,0) >= 1) { return }
    if ($active != $chan) {
      echo -a -----------------------------------------------------------------------------
      echo -a  4,1<15,1 $timestamp 4,1> 12 $chan  Kanalında 12 $nick  senden bahsediyor. 12Yazdığı mesaj:1 " $+ $1- $+ "
      ;echo -a  4,1<15,1 $timestamp 4,1> 12Yazdığı mesaj:1 " $+ $1- $+ "
      ;notice $nick Şuan bu ekrana bakmiyorum.
      echo -a -----------------------------------------------------------------------------
      echo $chan $timestamp 14< $+ $nick $+ > %renks $1-
      window -e @whois
      echo @whois 4,1<15,1 $timestamp 4,1> 12 $chan  Kanalında 12 $nick  senden bahsediyor. 12Yazdığı mesaj:1 " $+ $1- $+ "
      haltdef
    }  
    if (%suyar == 1) {
      if ($ulist($nick,sus,0) >= 1) { halt }
      if ($active != $chan) {
        ; .splay sounds\seniseviyorum.wav  
      }
    }
    if (%fuyar == 1) {
      if ($ulist($nick,sus,0) >= 1) { halt }
      else {
        flash $chan kanalından $nick size sesleniyor.
      }
    }
    if (%yiuyar == 1) {
      if ($ulist($nick,sus,0) >= 1) { halt }
      else {
        window -g2 #
      }
    }
  }
}
;-
on *:TEXT:$(* $+ $me $+ *):?:{  
  if (%nuyar == 1) {
    if ($ulist($nick,sus,0) >= 1) { return }
    if ($active != $nick) {
      echo -a 4,1<15,1 $timestamp 4,1> 12 $nick 1 Özelde senden bahsediyor. 12Yazdığı mesaj:1 " $+ $1- $+ "
      window -e @whois
      echo @whois 4,1<15,1 $timestamp 4,1> 1Özelinizde 12 $nick  senden bahsediyor. 12Yazdığı mesaj:1 " $+ $1- $+ "  
    }  
  }
  if (%fuyar == 1) {
    if ($ulist($nick,sus,0) >= 1) { halt }
    else {
      flash $nick özelden size sesleniyor.
    }
  }
}

Mirc seslenme addonu;

Nick seslenince ses uyarısı versin diyorsanız;

; .splay sounds\seniseviyorum.wav bu kodu aratın.Başındaki ; bu işareti kaldırın.

Sounds klasorunun içine seniseviyorum.wav ses dosyası atarak sesli nick uyarısı verdirebilirsiniz.
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.



Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  mIRC Ozele Gelen Saldırıları Engelleme Aytac 1 153 12.10.2020, 21:41
Son Mesaj: Core
  mIRC Küfür Koruması (Hotlink) Aytac 0 430 07.07.2020, 22:38
Son Mesaj: Aytac
  mIRC Not kayıt etme remotesi Aytac 0 209 07.07.2020, 22:35
Son Mesaj: Aytac
  mIRC Bütün kelimelerin ilk harfi büyük harfle başlama yazı stili Aytac 0 507 10.05.2020, 15:53
Son Mesaj: Aytac
  mIRC !iftar Şehir kodu Aytac 0 321 10.05.2020, 01:14
Son Mesaj: Aytac

Foruma Git: