IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 3 Toplam 6 Sayfadan 12 3 456
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   Koruma kodunda Sorun (https://www.ircforumlari.net/mirc-scripting-sorunlari/442523-koruma-kodunda-sorun.html)

XDie 11 Ocak 2012 22:27
Cevap: Koruma kodunda Sorun
 
yok sanırım yapacak kişiler :(

OperServ 11 Ocak 2012 22:57
Cevap: Koruma kodunda Sorun
 
Kod:
else if !$istok(isimsiz ,$1,32) { return $false }
bunu dene

XDie 11 Ocak 2012 23:07
Cevap: Koruma kodunda Sorun
 
if !$istok(isimsiz ,$1,32) { return $false }

zaten var idi
bana yeni bir kod lazim dedigim gibi

kod.txt diye metin belgesi açacam içinde şu korumalar olacak
1) küfür edenler kick+ban atılacak kufur.txt den
2) halfop,voice ve op olanlar atılmayacak
3) atılan banlar 5 dakika sonra açılacak
4) ban atıldıktan sonra kanalda küfür ettiği icin banlandı yazacak Nomercy gibi
yalnız kufur.txt e şu şekilde küfürler ekliyorum
kufur*
*kufur*
* kufur *
* k u f u r *
*k.ü.f.ü.r*


uyacak şekilde

OperServ 11 Ocak 2012 23:15
Cevap: Koruma kodunda Sorun
 
basa donuyorum
Kod:
on @*:join:#:{ else if $HebeLe(isimsiz,$nick,badnick.txt) { .kick $chan $nick 2Yasak nick }
 }
dene sunu lutfen

not badnick.txt listesine kufurleri sen olustur. Kolay gelsin

XDie 11 Ocak 2012 23:17
Cevap: Koruma kodunda Sorun
 
badnicke kafayı taktınız ya harbi fitil oldum arkadaş

kod.txt diye metin belgesi açacam içinde şu korumalar olacak
1) küfür edenler kick+ban atılacak kufur.txt den
2) halfop,voice ve op olanlar atılmayacak
3) atılan banlar 5 dakika sonra açılacak
4) ban atıldıktan sonra kanalda küfür ettiği icin banlandı yazacak Nomercy gibi
yalnız kufur.txt e şu şekilde küfürler ekliyorum
kufur*
*kufur*
* kufur *
* k u f u r *
*k.ü.f.ü.r*


uyacak şekilde


diosunuzki aynı seyleri yazip durma yahu ben ne öğrenmeye calisiyorum sizler bana neyi gösteriyosunuz :(((

XDie 11 Ocak 2012 23:41
Cevap: Koruma kodunda Sorun
 
yok hocam yok 2 gündür bu soruya cevap veren yok ....

KuL 11 Ocak 2012 23:43
Cevap: Koruma kodunda Sorun
 
Sunu bir denermisin

Kod:
on *:text:*:#: {
var %< = 1 | while (%< <= $lines(küfür.txt)) {
if $read(küfür.txt,%<) iswm $1- {
ban -ku900 # $nick 2 küfür ettin 5 dakika ban  }
inc %<
}
}

XDie 11 Ocak 2012 23:57
Cevap: Koruma kodunda Sorun
 
:))) hocam ya anlatamiyorum ben yaa fitttirdim iice

ban atiyor tamam verdigin kod zamanlı ban atıyor onada eyvallah

ama %,+,@ olanlarıda atıyor bunları atmıyacak opları,halfopları ve voicesi olanları..

ve kanaldan attıgı zaman kanal geneline ban sebebini msg olarak yazacak

diyelimki ali #a kanalında küfür etti ve atıldı

Şöyle Mesaj yazacak Ali Küfür Ettiği için 5 Dakika Banlandı

XDie 12 Ocak 2012 00:02
Cevap: Koruma kodunda Sorun
 
Alıntı:
XDie Nickli Üyeden Alıntı (Mesaj 1040992359)
:))) hocam ya anlatamiyorum ben yaa fitttirdim iice

ban atiyor tamam verdigin kod zamanlı ban atıyor onada eyvallah

ama %,+,@ olanlarıda atıyor bunları atmıyacak opları,halfopları ve voicesi olanları..

ve kanaldan attıgı zaman kanal geneline ban sebebini msg olarak yazacak

diyelimki ali #a kanalında küfür etti ve atıldı

Şöyle Mesaj yazacak Ali Küfür Ettiği için 5 Dakika Banlandı
on *:text:*:#: {
var %< = 1 | while (%< <= $lines(küfür.txt)) {
if $read(küfür.txt,%<) iswm $1- {
ban -ku900 # $nick 2 küfür ettin 5 dakika ban }
inc %<
}
}


bu kodun icine eklemek iyi olur dedigimi

OperServ 12 Ocak 2012 00:18
Cevap: Koruma kodunda Sorun
 
Kod:
#kufuruniq on
Dialog kufur {
  Title Küfür Koruması [ Coder ßy ZaiL]
  Size -1 -1 138 186
  Option dbu
  Edit , 1, 7 10 61 10
  List 2, 7 22 60 50, size
  Button Ekle, 3, 7 74 27 12, flat
  Button Sil, 4, 39 74 27 12, flat
  Check Opları (@), 5, 85 21 41 10, flat
  Check Voiceler (@), 6, 85 10 42 10, flat
  Combo 7, 7 102 52 51, size
  Button Ekle, 8, 7 154 24 9, flat
  Button Sil, 9, 35 154 23 9, flat
  Box Küfür listesi, 13, 3 2 71 88
  Box Ayrılan Nickler, 14, 3 92 63 76
  Box Ayrılan Kanallar, 15, 73 92 62 76
  Box Ayır, 16, 78 2 56 33
  Button Sil, 10, 106 154 23 9, flat
  Button Ekle, 11, 78 154 24 9, flat
  Combo 12, 78 102 52 51, size
  Box İşlemler, 17, 78 37 56 53
  Radio Opersem Kline, 18, 83 47 47 10, flat
  Radio Opersem Kill, 19, 83 57 47 10, flat
  Radio Opsam Kick, 20, 83 67 47 10, flat
  Check Banla, 21, 83 77 27 10, flat
  Button Kapat, 22, 97 171 37 12, flat ok
}
Alias kufur { /alias kufur /dialog -m kufur kufur }
On *:dialog:kufur:init:*: {
  If ($isfile(kufur.txt) == $false) { write -c kufur.txt } | else { loadbuf -o $dname 2 kufur.txt }
  If (%knickler) .didtok $dname 7 32 $ifmatch
  If (%kufkanal) .didtok $dname 12 32 $ifmatch
  If (%klineat) { .did -c $dname 18 }
  If (%killat) { .did -c $dname 19 }
  If (%kickat) { .did -c $dname 20 }
  If (%banla) { .did -c $dname 21 }
  If (%oplar) { .did -c $dname 5 }
  If (%vlar) { .did -c $dname 6 }
}
On *:dialog:kufur:sclick:*: {
  If ($did == 18) { if ($did(18).state == 1) { .set %klineat on | .unset %killat | .unset %kickat } | else { .unset %klineat } }
  If ($did == 19) { if ($did(19).state == 1) { .set %killat on | .unset %klineat | .unset %kickat } | else { .unset %killat } }
  If ($did == 20) { if ($did(20).state == 1) { .set %kickat on | .unset %killat | .unset %klineat } | else { .unset %kickat } }
  If ($did == 21) { if ($did(21).state == 1) { .set %banla on } | else { .unset %banla } }
  If ($did == 3) { write kufur.txt $did(1) | did -a $dname 2 $did(1) | did -r $dname 1 }
  If ($did == 4) { write -dl $+ $did(2).sel kufur.txt | did -d $dname 2 $did(2).sel }
  If ($did == 8 ) { if ($did(7) != $null) { set -u %sk $did(7) | if (%sk) && (!$istok(%knickler,%sk,32)) { .set %knickler $addtok(%knickler,%sk,32) | did -a $dname 7 %sk } } }
  If ($did == 9) { if ($did(7).sel > 0) { .set %knickler $remtok(%knickler,$did(7).seltext,1,32) | did -d $dname 7 $did(7).sel | did -c $dname 7 1 } }
  If ($did == 11) { if ($did(12) != $null) { set -u %ek $did(12) | if (%ek) && (!$istok(%kufkanal,%ek,32)) { .set %kufkanal $addtok(%kufkanal,%ek,32) | did -a $dname 12 %ek } } }
  If ($did == 10) { if ($did(12).sel > 0) { .set %kufkanal $remtok(%kufkanal,$did(12).seltext,1,32) | did -d $dname 12 $did(12).sel | did -c $dname 12 1 } }
  If ($did == 5) { if ($did(5).state == 1) { .set %oplar on } | else { .unset %oplar } }
  If ($did == 6) { if ($did(6).state == 1) { .set %vlar on } | else { .unset %vlar } }
}
On *:text:*:#: {
  If $istok(%kufkanal,#,32) == $true { halt }
  If $istok(%knickler,$nick,32) == $true { halt }
  If ($nick isop #) && (%oplar == on) { return }
  If ($nick isvo #) && (%vlar == on) { return }
  Korukufurden $1-
}
Alias korukufurden {
  Var %HR $strip($1-) , %_: $lines(kufur.txt)
  While (%_:) {
    If $read(kufur.txt,%_:) iswm %HR iswm %HR {
      If (%banla == on) { .mode $chan +b $wildsite }
      If (%klineat == on) { .gline $nick 5h :  $nick Sunucu Sizi LAMER olarak algıladı. [ $server ]  | .echo -a  $chan Kanalından $nick atıldı..  $1- }
      If (%killat == on) { .kill $nick Lutfen kufur etmeyin }
      If (%kickat == on) { .kick $chan $nick Kanal genelinde uygunsuz hareket }
      Return
    }
    Dec %_:
  }
}
#kufuruniq end
bu tam istedigin gibi kodu denedim sorunsuz calismamaktadir. Alintidir


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 01:37.
Sayfa 3 Toplam 6 Sayfadan 12 3 456
Konuya ait 40 Mesajı başka Sayfada göster

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