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/)
-   -   komut düzetme (https://www.ircforumlari.net/mirc-scripting-sorunlari/500171-komut-duzetme.html)

Zalimsin 12 Ağustos 2012 01:37

komut düzetme
 
alias -l _buser { .guser bad $1 3 }
alias -l _rbuser { .ruser bad $1 3 }
alias -l _luser { dialog -m _blacklist _blacklist }
alias -l _blist {
did -r _ulist 11
var %_btotal = $ulist(*,bad,0) , %_b = 0
while (%_b < %_btotal) {
inc %_b
did -a _blacklist 11 $ulist(*,bad,%_b)
}
}
menu * {
.bad listesi
..ekle:.enable #rumuz | ./dialog -m _blacklist _blacklist
}
alias karaliste /dialog -m _blacklist _blacklist
dialog _blacklist {
title "Bad NicK List"
size -1 -1 150 110
option dbu
text "Nicki YazIp Ekleyin:" , 10 , 10 5 95 10 , left
combo 11 , 10 15 95 85 , extsel sort autohs autovs
edit "" , 12 , 10 95 95 10 , read autohs
button "&Ekle" , 20 , 115 35 30 20 ,flat
button "&Sil" , 30 , 115 60 30 20 , flat
button "O.K." , 40 , 115 85 30 20 , ok, flat
}
on *:dialog:_blacklist:init:*: {
_blist
}
on *:dialog:_ulist:sclick:*: {
if ($did == 20) {
if ($did(11).text != $null && $level($did(11).text) != bad ) {
var %_badd = $did(11).text
.auser bad %_badd
_blist
did -o $dname 12 1 %_badd Bad Nick Listesine ekLendi...
}
}
if ($did == 30) {
if ($did(11).text != $null && $level($did(11).text) == bad ) {
var %_brem = $did(11).text
.ruser bad %_brem
_blist
did -o $dname 12 1 %_brem Bad Nick Listesinden SiLindi...
}
}
}
#bd on
on ulist:join:#:{
if (%bd == off) { halt }
if ($me !ishop $chan) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 2Badnick 4Yasaktır./Nick yeninick
}
#bd end


ulist göre ayarlamaya çalıştım ama olmadı neden açaba (blacklist:azgın) olarak ekliyordu ben bunu ( Bad:azgın* ) yaptım ama çalışmadı neden ola bilir

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 01:37 -->-> Daha önceki mesaj 01:34 --

alias -l _buser { .guser blacklist $1 3 }
alias -l _rbuser { .ruser blacklist $1 3 }
alias -l _luser { dialog -m _blacklist _blacklist }
alias -l _blist {
did -r _blacklist 11
var %_btotal = $ulist(*,blacklist,0) , %_b = 0
while (%_b < %_btotal) {
inc %_b
did -a _blacklist 11 $ulist(*,blacklist,%_b)
}
}
alias karaliste /dialog -m _blacklist _blacklist
dialog _blacklist {
title "Bad NicK List"
size -1 -1 150 110
option dbu
text "Nicki YazIp Ekleyin:" , 10 , 10 5 95 10 , left
combo 11 , 10 15 95 85 , extsel sort autohs autovs
edit "" , 12 , 10 95 95 10 , read autohs
button "&Ekle" , 20 , 115 35 30 20 ,flat
button "&Sil" , 30 , 115 60 30 20 , flat
button "O.K." , 40 , 115 85 30 20 , ok, flat
}
on *:dialog:_blacklist:init:*: {
_blist
}
on *:dialog:_blacklist:sclick:*: {
if ($did == 20) {
if ($did(11).text != $null && $level($did(11).text) != blacklist) {
var %_badd = $did(11).text
.auser blacklist %_badd
_blist
did -o $dname 12 1 %_badd Bad Nick Listesine ekLendi...
}
}
if ($did == 30) {
if ($did(11).text != $null && $level($did(11).text) == blacklist) {
var %_brem = $did(11).text
.ruser blacklist %_brem
_blist
did -o $dname 12 1 %_brem Bad Nick Listesinden SiLindi...
}
}
}
#bd on
on blacklist:join:#:{
if (%bd == off) { halt }
if ($me !isop $chan) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick Uygunsuz Nick4!
}
#bd end


Orjinali bu kod ama eklerken ( bad:azgın ) olarak eklesin istiyorum

ScorpioN 12 Ağustos 2012 02:18

Cevap: komut düzetme
 
Anlamıyorum ki orda blacklist i text ten bad olarak değişemiyor musunuz ki; daha önce aynı konu varken ve size cevap yazılmışken gene başka konu açıyorsunuz.Ona bile zahmet edemiyoruz diyorsanız peki


Kod:


alias -l _buser { .guser bad $1 3 }
alias -l _rbuser { .ruser bad $1 3 }
alias -l _luser { dialog -m _bad _bad }
alias -l _blist {
  did -r _bad 11
  var %_btotal = $ulist(*,bad,0) , %_b = 0
  while (%_b < %_btotal) {
    inc %_b
    did -a _bad 11 $ulist(*,bad,%_b)
  }
}
alias karaliste /dialog -m _bad _bad
dialog _bad {
  title "Bad NicK List"
  size -1 -1 150 110
  option dbu
  text "Nicki YazIp Ekleyin:" , 10 , 10 5 95 10 , left
  combo 11 , 10 15 95 85 , extsel sort autohs autovs
  edit "" , 12 , 10 95 95 10 , read autohs
  button "&Ekle" , 20 , 115 35 30 20 ,flat
  button "&Sil" , 30 , 115 60 30 20 , flat
  button "O.K." , 40 , 115 85 30 20 , ok, flat
}
on *:dialog:_bad:init:*: {
  _blist
}
on *:dialog:_bad:sclick:*: {
  if ($did == 20) {
    if ($did(11).text != $null && $level($did(11).text) != bad) {
      var %_badd = $did(11).text
      .auser bad %_badd
      _blist
      did -o $dname 12 1 %_badd Bad Nick Listesine ekLendi...
    }
  }
  if ($did == 30) {
    if ($did(11).text != $null && $level($did(11).text) == bad) {
      var %_brem = $did(11).text
      .ruser bad %_brem
      _blist
      did -o $dname 12 1 %_brem Bad Nick Listesinden SiLindi...
    }
  }
}
#bd on
on bad:join:#:{
  if (%bd == off) { halt }
  if ($me !isop $chan) { halt }
  mode $chan +b $nick $+ *!*@* | kick $chan $nick Uygunsuz Nick4!
}
#bd end


Feragat 12 Ağustos 2012 02:19

Cevap: komut düzetme
 
Kod:

alias -l _buser { .guser bad $1 3 }
alias -l _rbuser { .ruser bad $1 3 }
alias -l _luser { dialog -m _blacklist _blacklist }
alias -l _blist {
  did -r _blacklist 11
  var %_btotal = $ulist(*,bad,0) , %_b = 0
  while (%_b < %_btotal) {
    inc %_b
    did -a _blacklist 11 $ulist(*,bad,%_b)
  }
}
alias karaliste /dialog -m _blacklist _blacklist
dialog _blacklist {
  title "Bad NicK List"
  size -1 -1 150 110
  option dbu
  text "Nicki YazIp Ekleyin:" , 10 , 10 5 95 10 , left
  combo 11 , 10 15 95 85 , extsel sort autohs autovs
  edit "" , 12 , 10 95 95 10 , read autohs
  button "&Ekle" , 20 , 115 35 30 20 ,flat
  button "&Sil" , 30 , 115 60 30 20 , flat
  button "O.K." , 40 , 115 85 30 20 , ok, flat
}
on *:dialog:_blacklist:init:*: {
  _blist
}
on *:dialog:_blacklist:sclick:*: {
  if ($did == 20) {
    if ($did(11).text != $null && $level($did(11).text) != bad) {
      var %_badd = $did(11).text
      .auser bad %_badd
      _blist
      did -o $dname 12 1 %_badd Bad Nick Listesine ekLendi...
    }
  }
  if ($did == 30) {
    if ($did(11).text != $null && $level($did(11).text) == bad) {
      var %_brem = $did(11).text
      .ruser bad %_brem
      _blist
      did -o $dname 12 1 %_brem Bad Nick Listesinden SiLindi...
    }
  }
}
#bd on
on bad:join:#:{
  if (%bd == off) { halt }
  if ($me !isop $chan) { halt }
  mode $chan +b $nick $+ *!*@* | kick $chan $nick Uygunsuz Nick4!
}
#bd end


Zalimsin 12 Ağustos 2012 12:42

Cevap: komut düzetme
 
birde bunu halfop iken yanı çalıştıra biliriz ishop yazıyorum olmuyor

Entrance 12 Ağustos 2012 16:44

Cevap: komut düzetme
 
Alıntı:

off Nickli Üyeden Alıntı (Mesaj 1041193431)
birde bunu halfop iken yanı çalıştıra biliriz ishop yazıyorum olmuyor

şuanki hâli ile hem halfop iken işlem yapar hemde Aop olduğun zaman.

Kod:

on bad:join:#:{  if (%bd == off) { return }  if ($me ishop $chan) && ($me isop $chan) {      mode $chan +b $nick $+ *!*@* | kick $chan $nick Uygunsuz Nick4!  } }

Toprak 12 Ağustos 2012 16:47

Cevap: komut düzetme
 
Kod:

on bad:join:#:{
  if (%bd == off) { halt }
  if ($me !isop $chan) { halt }
  mode $chan +b $nick $+ *!*@* | kick $chan $nick Uygunsuz Nick4!
}

Olan kısmı;

Kod:

on bad:join:#:{
  if (%bd == off) { return }
  if ($me ishop $chan) {
    mode $chan +b $nick $+ *!*@* | kick $chan $nick Uygunsuz Nick4!
  }
}

Degişdir.

Zalimsin 17 Ağustos 2012 20:14

Cevap: komut düzetme
 
ishop yazınca çalışmıyor kod neden olabilir arkadaşlar


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

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