Welcome to IRCForumLarı®

Join us now to get access to all our features. Once registered and logged in, you will be able to create topics, post replies to existing threads, give reputation to your fellow members, get your own private messenger, and so, so much more. It's also quick and totally free, so what are you waiting for?
📌 Bilgilendirme: IRCForumlari.Web.Tr Online Skype destek hattı aktif edilmiştir. Online Skype destek adresi; sales@ircforumlari.web.tr

Konu Bilgileri

Konu Hakkında Merhaba, tarihinde mIRC Scripting Hazır Kodlar kategorisinde AshaBi tarafından oluşturulan Mirc Seslenme Addonu başlıklı konuyu okuyorsunuz. Bu konu şimdiye dek 78 kez görüntülenmiş, 0 yorum ve 0 tepki puanı almıştır...
Kategori Adı mIRC Scripting Hazır Kodlar
Konu Başlığı Mirc Seslenme Addonu
Konuyu Başlatan AshaBi
Start date
Replies
Views
First message reaction score
Son Mesaj Yazan AshaBi

AshaBi

Sunucu Sahibi
Oct 20, 2023
10,180
18
38
İstanbul
www.ircforumlari.web.tr
Mirc scriptinize ekleyebileceğiniz seslenme remotesi, mickinize seslenenleri size echo olarak bildirir, seslenilmiş satırı istediğin renkde belirtir, istediğiniz nicki muaf tutabilirsiniz ve ayrıca ses çalma ve flash uyarı entegre edebilme özelliği.

Code:
menu menubar {
  -
  Nick Uyari Menüsü:/uyar
  -
}
alias uyar { .dialog -m uyar uyar }
dialog uyar {
  title "Nick uyarı menüsü ayarları by kralaz"
  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.
    }
  }
}
 

Users who are viewing this thread

Top Bottom