Guncel Tanitim Ve İRC Toplulugu   sohbet



Yeni Konu Aç Cevapla
 
LinkBack Seçenekler Stil
Alt 12-06-18, 00:31   #1
Çevrimdışı

DelikaN - ait Kullanıcı Resmi (Avatar)

Profilim
Üyelik tarihi: 12-06-18
Mesajlar: 1
WEB Sitesi:
IRC Sunucusu:
İlgi Alanı:
Alınan Beğeni: 0
CF Puanı: 0
Mirc Seslenme Addonu


-- Sponsor Baglantı --
Reklam Alanı

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.
Kod:
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. 
    } 
  } 
}
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.
Kod:
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. 
    } 
  } 
}
  Alıntı ile Cevapla

ChatForumlari.NET Reklamlar
Alt 17-07-18, 03:15   #2
Çevrimdışı

zekirdek - ait Kullanıcı Resmi (Avatar)

Profilim
Üyelik tarihi: 17-07-18
Mesajlar: 3
WEB Sitesi:
IRC Sunucusu:
İlgi Alanı:
Alınan Beğeni: 0
CF Puanı: 0
Cevap: Mirc Seslenme Addonu




basit ama yararlı bir şey sade mirc kullananlar için iyi ama denemek gerek

saygılarımla...

  Alıntı ile Cevapla

Cevapla

Etiketler
, 12, 12yazdığı, 4, $+, $1-, $active, $chan, $devent, $did, $diduyar, $nick, $ulist$nick, %fuyar, %i, %nuyar, %renks, %suyar, %yiuyar, -, .did, 0, 1, =, ==, @whois, aç/kapat, bahsediyor, button, check, echo, edit, flash, halt, mesaj1, mirc, muaf, nick, return, senden, ses, sesleniyor, seslenme, set, size, sus, uyar, uyarı, window, |

Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık