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/)
-   -   Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim (https://www.ircforumlari.net/mirc-scripting-sorunlari/544474-bu-remoteye-nasil-menu-olarak-ac-kapa-yapabilirim.html)

Tinba 26 Ağustos 2013 23:18
Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
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 ($chan == #cinsellik) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end


S.a Yukardaki Remoteye Menü olarak Ac / Kapa yapamadım yardımcı olursanız şimdiden Teşekür ederim.

Krieq 26 Ağustos 2013 23:26
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
popups kısmına eklersiniz remoteye değil.
Remoteye ekleme yapacağım diyorsanız aşağıdaki şekilde yapın.

Kod:
menu * {
  Koruma
  .Aç:.enable #bd | echo -a Açıldı
  .Kapat:.disable #bd | echo -a Kapatıldı
  .Durum< $iif($group(#bd) = on, Açık , Kapalı ) > :.
}

Tinba 26 Ağustos 2013 23:30
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Hocam Cok Sagolun Acemiyim idare Edin Şimdi verdiğim kodu Remoteye Sizin verdiğiniz kodu popups 'a Ekleyeceğim Deyilmi ?

Feragat 26 Ağustos 2013 23:35
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Alıntı:
Tinba Nickli Üyeden Alıntı (Mesaj 1041331634)
Hocam Cok Sagolun Acemiyim idare Edin Şimdi verdiğim kodu Remoteye Sizin verdiğiniz kodu popups 'a Ekleyeceğim Deyilmi ?
Krieq'in verdiği kodu, yukarda vermiş olduğun kodun en altına ekleyebilirsin.

Tinba 26 Ağustos 2013 23:45
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
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 ($chan == #cinsellik) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end
menu * { Koruma .Aç:.enable #bd | echo -a Açıldı .Kapat:.disable #bd | echo -a Kapatıldı .Durum< $iif($group(#bd) = on, Açık , Kapalı ) > :. }

Hocam Sizi'de yoruyorum Hakkınızı Helal Edin Dediğim Gibi Acemiyim Sizin Dediğiniz Gibi Tam olarak Böylemi olacak Kod Hocam

Toprak 26 Ağustos 2013 23:46
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Kod:
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 ($chan == #cinsellik) { halt }
  mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end
menu status,menubar,channel {
  .» Bad Nick Koruması
  .» Bad nick Aç:.enable #bd | .echo -a Bad nick koruması acıldı.
  .» Bad nick Kapat:.disable #bd | .echo -a Bad nick koruması kapatıldı.
}
Popus kısmına
Kod:
Bad nick
.Ac :.enable #bd | echo -a Bad nick koruması acıldı.
.Kapat :.disable bd | echo -a Bad nick koruması kapatıldı.
Böyle birşey ekliye bilirsiniz..

Feragat 26 Ağustos 2013 23:49
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Kod:
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 ($chan == #cinsellik) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end

menu * {
  Koruma
  .Aç:.enable #bd | echo -a Açıldı
  .Kapat:.disable #bd | echo -a Kapatıldı
  .Durum< $iif($group(#bd) = on, Açık , Kapalı ) > :.
}
Bu şekilde yapabilirsin.

Krieq 26 Ağustos 2013 23:53
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Ama onu da tek satıra indirgeyip ekleme sakın sevgili Tinba :)
Feragat yada Toprak vermiş.Verdikleri gibi ekleyebilirsin.

Tinba 26 Ağustos 2013 23:58
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Hepinizden ALLAH Razı olsun peki Buna Alias ile nasıl Bad nick ekleyip Bad nick Taraması yapabiliriz Acaba ?

Toprak 27 Ağustos 2013 00:03
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Alıntı:
Tinba Nickli Üyeden Alıntı (Mesaj 1041331672)
Hepinizden ALLAH Razı olsun peki Buna Alias ile nasıl Bad nick ekleyip Bad nick Taraması yapabiliriz Acaba ?

Böyle birşey yapabilirsin;

Kod:
alias ekle { if $1 { .auser blacklist $1 } }
alias sil { if $1 { .ruser blacklist $1 } }
Tarama içinde forumda arama yap.

Prens 30 Ağustos 2013 21:04
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
REMOTE kısmına eklediklerim;


Alıntı:
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 ($chan == #cinsellik) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end

menu * {
Koruma
.Aç:.enable #bd | echo -a Açıldı
.Kapat:.disable #bd | echo -a Kapatıldı
.Durum< $iif($group(#bd) = on, Açık , Kapalı ) > :.
}
Fakat buna rağmen MENU olarak açılmıyor sizce neden olabilir?
MENU olarak açılmadığı için, Badnickleri ekle/sil/list kontrolü yapamadım.

uFuK 30 Ağustos 2013 21:33
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Alıntı:
kvcist Nickli Üyeden Alıntı (Mesaj 1041333405)
REMOTE kısmına eklediklerim;




Fakat buna rağmen MENU olarak açılmıyor sizce neden olabilir?
MENU olarak açılmadığı için, Badnickleri ekle/sil/list kontrolü yapamadım.

Menü olarak açilsa bile mevcut kod sistemi menü seçeneğinden badnick ekleme,silme vs. yapmana olanak sağlayacak şekilde yazılmamış. menu * { içeriğinde bu mevcut değil sadece aç,kapat ve durum içerikleri var.

Herhangi bir pencerede sağ tıkladıgında koruma adlı yana doğru açılabilen bir menü seçeneği karşına cıkmamışsa popups ile ilgili bir remote kodu söz konusu olabilir. Genelde ikonlu popupslarda olur bu sorun.

Krieq 30 Ağustos 2013 21:33
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Menuden nick ekleme silme zaten yapamazdın o şekilde.Sadece korumayı açıp kapatırdın.Aşağıdaki şekilde remotede boş bir sayfaya ekler misin?
Dialog aç diyerek dialogu açacaksın.

Kod:
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 ($chan == #cinsellik) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end

menu * {
  Koruma
  .Dialog Aç:/karaliste
  .Aç:.enable #bd | echo -a Açıldı
  .Kapat:.disable #bd | echo -a Kapatıldı
  .Durum< $iif($group(#bd) = on, Açık , Kapalı ) > :.
}

Prens 30 Ağustos 2013 22:11
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Alıntı:
Krieq Nickli Üyeden Alıntı (Mesaj 1041333417)
Menuden nick ekleme silme zaten yapamazdın o şekilde.Sadece korumayı açıp kapatırdın.Aşağıdaki şekilde remotede boş bir sayfaya ekler misin?
Dialog aç diyerek dialogu açacaksın.

Kod:
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 ($chan == #cinsellik) { halt }
mode $chan +b $nick $+ *!*@* | kick $chan $nick 0,2 ßad Nick Enfocer ßan Detected..!

}
#bd end

menu * {
  Koruma
  .Dialog Aç:/karaliste
  .Aç:.enable #bd | echo -a Açıldı
  .Kapat:.disable #bd | echo -a Kapatıldı
  .Durum< $iif($group(#bd) = on, Açık , Kapalı ) > :.
}
Teşekkür ederim Krieq. Sorunsuz Diyalog/Menü açıldı badnick belirlenip test edildi. Eklediğimiz badnick'leri mIRC nereye kayıt etmektedir? Bu eklenen nicklerin silinmesi söz konusu olabilir mi? Kodun çok sağlıklı çalışması açısından baya badnick ekleyeceğim silinirse bir şeye yaramaz diye düşünüyorum.

Krieq 30 Ağustos 2013 22:33
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Alt + R yaptığınızda çıkan ekranda Kullanıcı bölümüne ekler.Silmez durduk yere.

Prens 30 Ağustos 2013 23:17
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Sanıyorum OP olmadığım kanallara BADNICK giriş yaptığından dolayı sürekli echo olarak OP Değilsin! diye uyarı alıyorum. Bunu nasıl aşabiliriz?

En önemlisi de, esasında hangi badnick'i algılayıp attığını örnek olarak; mask: *terbiyesiz* olarak ban sebebinde belirte biliriz?

Tinba 30 Ağustos 2013 23:27
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
peki Bu Korumaya nasıl muaf listesi Ekleyebiliriz Coder Arkadaşlar ?

Krieq 31 Ağustos 2013 00:32
Cevap: Bu Remoteye nasıl Menü olarak Ac kapa yapabilirim
 
Muaf nick için
if ($chan == cinsellik) { halt }
olan kısmı
if ($chan == cinsellik) || $istok(muaf1 muaf2 muaf3,$nick,32) || ($me !isop $chan) { halt }

yapabilirsiniz.Op olmadığınız kanallarda işlem yapmaz ayrıca bu şekilde.

Cepten girdiğimden kodları düzenleyemedim.


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

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