IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   bad nick koruması (https://www.ircforumlari.net/mirc-scripting-sorunlari/691460-bad-nick-korumasi.html)

ahmetsivas 10 Nisan 2015 21:04
bad nick koruması
 
arkadaşlar bad nick koruması ama ben txt okumasını istiyorum yardımcı olabilirmisiniz ?








Kod:
alias karaliste { if ($dialog(karaliste)) { dialog -c karaliste } | dialog -ma karaliste karaliste }
dialog karaliste {
  title "Kötü Nick Listesi"
  size -1 -1 266 310
  option pixels
  icon icon\olumsuz.ico, 0 
  combo 1, 16 21 181 250, vsbar
  button "&Ekle", 2, 199 20 50 22, flat
  button "&Sil", 3, 199 49 50 22, flat
  button "&Tamam", 4, 200 234 49 31, ok flat
  check "Korumayı Aktif Et", 5, 16 272 182 20, flat
  box "Kötü Nick Ekleme", 6, 7 2 251 296
}

on *:dialog:karaliste:*:*: {
  if ($devent == init) { karaliste.init }
  if ($devent == sclick) {
    if ($did == 2) { if ($did(1) != $null) { /.auser 10 $did(1) | karaliste.init } }
    if ($did == 3) { if ($did(1) != $null) { /.ruser $did(1) | karaliste.init } }
    if ($did == 5) {
      if ($did(5).state == 1) { writeini " $+ $mircini $+ " karaliste karaliste on }
      if ($did(5).state == 0) { writeini " $+ $mircini $+ " karaliste karaliste off }
    }
  }
}

alias karaliste.init {
  did -r karaliste 1
  if ($readini " $+ $mircini $+ " karaliste karaliste == on) { did -c karaliste 5 }
  set %ul 1
  while (%ul <= $ulist(*,0)) {
    if ($level($ulist(*,%ul)) == 10) { did -a karaliste 1 $ulist(*,%ul) }
    inc %ul 1
  }
  unset %ul
}

#karaliste on
on 10:join:#: {
  if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
    /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
    { Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »2 4Suç : 2Kötü Nick 4Nick : 2 $nick 4KaNaL : 2 # }
  }
}
}

on 10:part:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
  { Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »2 4Suç : 2Kötü Nick 4Nick : 2 $nick 4KaNaL : 2 # }
}
}
}
on 10:nick: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
  { Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »2 4Suç : 2Kötü Nick 4Nick : 2 $nick 4KaNaL : 2 # }

}
}
}
on 10:text:*:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
  { Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »2 4Suç : 2Kötü Nick 4Nick : 2 $nick 4KaNaL : 2 # }
}
}
}
on 10:notice:*:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
on 10:action:*:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
  { Window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] | titlebar @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanal Korumalarından gelen suc ve ceza raporları | echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] »2 4Suç : 2Kötü Nick 4Nick : 2 $nick 4KaNaL : 2 # }
}
}
}
on 10:op:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
on 10:deop:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
on 10:voice:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
on 10:devoice:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
on 10:help:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
on 10:dehelp:#: {
if ($readini " $+ $mircini $+ " karaliste karaliste == on) {
  /qline  $nick  4 $+ $chan 12Kanalında (4 Bad2/4Kötü Nick12 ) Kullandığınızdan Dolayı Uzaklaştırıldınız. %logo
}
}
}
#karaliste end

Feragat 11 Nisan 2015 04:07
Cevap: bad nick koruması
 
Konuyu yanlış yere açmışsın. Doğru kategori burasıdır. İyi forumlar.

uFuK 11 Nisan 2015 06:12
Cevap: bad nick koruması
 
karaliste.init dosyasini karaliste.txt olarak değiştir kodlardaki ilgili alandan.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 06:40.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk