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/)
-   -   Socket temizleme sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/702394-socket-temizleme-sorunu.html)

Beatle 08 Ekim 2015 23:10
Socket temizleme sorunu
 
Kod:
on *:text:!temizle:#: {
if ($nick isop $chan) {
 if $read(takim.txt,w,$+($2,$chr(11),*)) {
if be* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlebjk }
elseif *fe* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlefb }
elseif *ga* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlegs }
elseif *tra* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlets }
else { .timer 50 0 msg $chan $chr(3) | .timer 1 2 msg $chan Kanal temizlenmistir. }
  }
 }
}
Selam bu üsteki kod mirc botlar için çalışıyor ben socket için yapmaya çalıştım acaba nerde yanlışlık yapıyorum benim yapmaya çalıştıgım kod aşagıdaki gibi dir.Bu kodu nasıl calıstırabilirim.

Kod:
if $right($4,-1) == !temizle || $right($4,-1) == .temizle || $right($4,-1) == .clear || $right($4,-1) == !clear || $right($4,-1) == !sil || $right($4,-1) == .sil {
  if ($ybul($3,$_nick($1)) == $true) {
    if $read(hash/takim.sr,w,$+($2,$chr(11),*)) {
      if be* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlebjk }
      elseif *fe* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlefb }
      elseif *ga* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlegs }
      elseif *tra* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlets }
      else { .timer 50 0 swbot privmsg $chan $chr(3) | .timer 1 2 swbot privmsg $chan Kanal temizlenmistir. }
  }
 }
}

alias temizlets {
  .timer 50 00 swbot privmsg %temizchan 5,5Trabzonn
}
alias temizlefb {
  .timer 50 00 swbot privmsg %temizchan 2,2Fenerbahçe
} 

alias temizlebjk  {
  .timer 50 00 swbot privmsg %temizchan 1,1Beşiktaş
} 

alias temizlegs {
  .timer 50 00 swbot privmsg %temizchan 4,4Galatasaray
}

alias temizlenormal {
  .timer 50 00 swbot privmsg %temizchan 
}

Toprak 09 Ekim 2015 10:09
Cevap: Socket temizleme sorunu
 
Alıntı:
Beatle Nickli Üyeden Alıntı (Mesaj 1041687541)
Kod:
on *:text:!temizle:#: {
if ($nick isop $chan) {
 if $read(takim.txt,w,$+($2,$chr(11),*)) {
if be* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlebjk }
elseif *fe* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlefb }
elseif *ga* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlegs }
elseif *tra* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlets }
else { .timer 50 0 msg $chan $chr(3) | .timer 1 2 msg $chan Kanal temizlenmistir. }
  }
 }
}
Selam bu üsteki kod mirc botlar için çalışıyor ben socket için yapmaya çalıştım acaba nerde yanlışlık yapıyorum benim yapmaya çalıştıgım kod aşagıdaki gibi dir.Bu kodu nasıl calıstırabilirim.

Kod:
if $right($4,-1) == !temizle || $right($4,-1) == .temizle || $right($4,-1) == .clear || $right($4,-1) == !clear || $right($4,-1) == !sil || $right($4,-1) == .sil {
  if ($ybul($3,$_nick($1)) == $true) {
    if $read(hash/takim.sr,w,$+($2,$chr(11),*)) {
      if be* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlebjk }
      elseif *fe* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlefb }
      elseif *ga* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlegs }
      elseif *tra* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlets }
      else { .timer 50 0 swbot privmsg $chan $chr(3) | .timer 1 2 swbot privmsg $chan Kanal temizlenmistir. }
  }
 }
}

alias temizlets {
  .timer 50 00 swbot privmsg %temizchan 5,5Trabzonn
}
alias temizlefb {
  .timer 50 00 swbot privmsg %temizchan 2,2Fenerbahçe
} 

alias temizlebjk  {
  .timer 50 00 swbot privmsg %temizchan 1,1Beşiktaş
} 

alias temizlegs {
  .timer 50 00 swbot privmsg %temizchan 4,4Galatasaray
}

alias temizlenormal {
  .timer 50 00 swbot privmsg %temizchan
}
Böyle bir denermisin.

Kod:
if $regex($right($4,-1),/^[!.&](tem[ıiİ]zle|clear|s[ıiİ]l)$/Si) && ($ybul($3,$_nick($1)) == $true) {
  if $read(Hash/takim.sr,w,$+($_nick($1),$chr(11),*)) {
    if be* iswm $gettok($read(Hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 0,1 Beşiktaş  }
    elseif *fe* iswm $gettok($read(hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 2,8 Fenerbahçe  }
    elseif *ga* iswm $gettok($read(hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 4,8 Galatasaray  }
    elseif *tra* iswm $gettok($read(hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 2,5 Trabzon  }
  }
  else { .timer 50 0 swbot privmsg $3 $chr(3) | .timer 1 2 swbot privmsg $3 Kanal temizlenmistir. }
}

alias _temtak {
  var %t = 1 | while %t <= 60 { swbot privmsg $1 : $2 | inc %t }
}
Hoşuma gitmedi ama :( dilersen takım ekleme silme kodlarını da pastelle komple ayarlayım veriyim.

Beatle 09 Ekim 2015 12:35
Cevap: Socket temizleme sorunu
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] pardon hocam yanlıs bilgi vermişim. Nomercy botundan alıntı yapmısım kodlar böyle ;


Botun özeli Takim ekleme kodu ;

Kod:
if ($2 = privmsg && $left($3,1) != $chr(35)) {
    if $right($4,-1) == !takim || $right($4,-1) == .takim {
      if $hget(takim,$_nick($1)) >= 1 { return }
      .hinc -msu10 takim $_nick($1)
      if !$istok(Fb Gs Normal Bjk Trb,$5,32) { swbot privmsg $_nick($1) Lütfen 4 büyük takim kisaltmalarini yaziniz, !Takim FB / GS / BJK / TRB / Normal  | return } 
      .Cle add $_nick($1) $5
      swbot privmsg $_nick($1) Takiminiz degistirildi.
      swbot privmsg #Opers $_nick($1) > $4-         
    }
  }

Aliaslar eklenen kodlar ;

Kod:
alias Cle {
  if $1 == add {
    hadd -m Cle $2 $3-
    hsave Cle Hash/takim.sr
  }
  if $1 == get {
    if $hget(Cle,$2) {
      return $ifmatch
    }
    else {
      return Normal
    }
  }
}

alias yetkilitkm {
  if *SOHBET-* iswm $1- { return }
  if $1 == Fb { swbot os raw svsjoin $2 :#fenerbahçe | return [Takim] ~ 2,8Fener8,2bahçe!  }
  if $1 == Gs { swbot os raw svsjoin $2 :#Galatasaray | return [Takim] ~ 4,8Galata8,4saray!  }
  if $1 == Bjk { swbot os raw svsjoin $2 :#Besiktas | return [Takim] ~ 1,0Be$ik0,1ta$!    }
  if $1 == Trb { swbot os raw svsjoin $2 :#Trabzon | return [Takim] ~ 11,5Trabzon5,11spor!  |  }
  if $1 == Normal { return 4* [Takim] ~ 4,0Tür0,4kiye! }
}
Nomercy botundaki silme komutları şöyle ;
Bu kodu sockete ceviremiyom.

Kod:
      if $gettok(%::text,1,32) == !clear || $gettok(%::text,1,32) == !temizle {
        if $read(txt/Globl.txt,w,%::chan) || *Fener* iswm %::chan {
          if !%clearkont. [ $+ [ %::nick ] ] {
            inc -u5 %clearkont. [ $+ [ %::nick ] ] 2
            if $cle(get,%::Nick) == FB {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 2,2FENERBAHÇE FENERBAHÇE  8,8FENERBAHÇE FENERBAHÇE
            }
            if $cle(get,%::Nick) == GS {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 4,4GALATASARAYGALATASARAY8,8GALATASARAYGALATASARAY
            }
            if $cle(get,%::Nick) == Bjk {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 1,1BEŞİKTAŞBEŞİKTAŞ 0,0BEŞİKTAŞBEŞİKTAŞ
            }
            if $cle(get,%::Nick) == Trb {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 5,5TRABZONTRABZON 11,11TRABZONTRABZON
            }
            if $cle(get,%::Nick) == normal {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 
            }
            .timer 1 2 sockwrite -nt $sockname privmsg %::chan Kanal temizlenmistir, Ekran temizlenmiştir.
          }
          else {
            ;sw $sockname kick %::chan %::nick !clear flood yapmayiniz!
          }
        }
      }

Toprak 09 Ekim 2015 13:11
Cevap: Socket temizleme sorunu
 
Alıntı:
Beatle Nickli Üyeden Alıntı (Mesaj 1041687616)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] pardon hocam yanlıs bilgi vermişim. Nomercy botundan alıntı yapmısım kodlar böyle ;


Botun özeli Takim ekleme kodu ;

Kod:
if ($2 = privmsg && $left($3,1) != $chr(35)) {
    if $right($4,-1) == !takim || $right($4,-1) == .takim {
      if $hget(takim,$_nick($1)) >= 1 { return }
      .hinc -msu10 takim $_nick($1)
      if !$istok(Fb Gs Normal Bjk Trb,$5,32) { swbot privmsg $_nick($1) Lütfen 4 büyük takim kisaltmalarini yaziniz, !Takim FB / GS / BJK / TRB / Normal  | return } 
      .Cle add $_nick($1) $5
      swbot privmsg $_nick($1) Takiminiz degistirildi.
      swbot privmsg #Opers $_nick($1) > $4-         
    }
  }

Aliaslar eklenen kodlar ;

Kod:
alias Cle {
  if $1 == add {
    hadd -m Cle $2 $3-
    hsave Cle Hash/takim.sr
  }
  if $1 == get {
    if $hget(Cle,$2) {
      return $ifmatch
    }
    else {
      return Normal
    }
  }
}

alias yetkilitkm {
  if *SOHBET-* iswm $1- { return }
  if $1 == Fb { swbot os raw svsjoin $2 :#fenerbahçe | return [Takim] ~ 2,8Fener8,2bahçe!  }
  if $1 == Gs { swbot os raw svsjoin $2 :#Galatasaray | return [Takim] ~ 4,8Galata8,4saray!  }
  if $1 == Bjk { swbot os raw svsjoin $2 :#Besiktas | return [Takim] ~ 1,0Be$ik0,1ta$!    }
  if $1 == Trb { swbot os raw svsjoin $2 :#Trabzon | return [Takim] ~ 11,5Trabzon5,11spor!  |  }
  if $1 == Normal { return 4* [Takim] ~ 4,0Tür0,4kiye! }
}
Nomercy botundaki silme komutları şöyle ;
Bu kodu sockete ceviremiyom.

Kod:
      if $gettok(%::text,1,32) == !clear || $gettok(%::text,1,32) == !temizle {
        if $read(txt/Globl.txt,w,$3) || *Fener* iswm $3 {
          if !%clearkont. [ $+ [ %::nick ] ] {
            inc -u5 %clearkont. [ $+ [ %::nick ] ] 2
            if $cle(get,%::Nick) == FB {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 2,2FENERBAHÇE FENERBAHÇE  8,8FENERBAHÇE FENERBAHÇE
            }
            if $cle(get,%::Nick) == GS {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 4,4GALATASARAYGALATASARAY8,8GALATASARAYGALATASARAY
            }
            if $cle(get,%::Nick) == Bjk {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 1,1BEŞİKTAŞBEŞİKTAŞ 0,0BEŞİKTAŞBEŞİKTAŞ
            }
            if $cle(get,%::Nick) == Trb {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan 5,5TRABZONTRABZON 11,11TRABZONTRABZON
            }
            if $cle(get,%::Nick) == normal {
              .timer 50 00 sockwrite -nt $sockname privmsg %::chan
            }
            .timer 1 2 sockwrite -nt $sockname privmsg %::chan Kanal temizlenmistir, Ekran temizlenmiştir.
          }
          else {
            ;sw $sockname kick %::chan %::nick !clear flood yapmayiniz!
          }
        }
      }

Buyur denemedim ben denersin sorun varsa yaz bakalım;

Kod:
if ($2 = privmsg && $left($3,1) != $chr(35)) {
  if $regex($right($4,-1),/^[!.&]tak[ıiİ]m$/Si) {
    if $hget(takim,$_nick($1)) >= 1 { return }
    .hinc -msu10 takim $_nick($1)
    if !$regex($5,/^(FB|GS|BJK|TRB|KONYA|NORMAL)$/Si) { swbot privmsg $_nick($1) Lütfen 5 büyük takim kisaltmalarini yaziniz, [!.]takim FB / GS / BJK / TRB / KONYA / NORMAL | return } 
    .hadd -m Takim $_nick($1) $5
    .hsave Takim Hash/takim.tprk
    swbot privmsg $_nick($1) Takiminiz degistirildi.
    swbot privmsg #Opers $_nick($1) > $5         
  }
}
on *:start:if !$hget(Takim) { .hmake Takim | .hload Takim Hash/Takim.tprk }
alias yetkilitkm {
  if *SOHBET-* iswm $1- { return }
  if $1 == Fb { swbot os raw svsjoin $2 #fenerbahçe | return [Takim] ~ 2,8 Fener8,2Bahçe!  }
  if $1 == Gs { swbot os raw svsjoin $2 #Galatasaray | return [Takim] ~ 4,8 Galata8,4Saray!  }
  if $1 == Bjk { swbot os raw svsjoin $2 #Besiktas | return [Takim] ~ 1,0 Be$ik0,1ta$(K)!  }
  if $1 == Trb { swbot os raw svsjoin $2 #Trabzon | return [Takim] ~ 11,5 Trabzon5,11spor!  }
  if $1 == Konya { swbot os raw svsjoin $2 #KonyaSpor | return [Takim] ~ 0,3 Konya Spor  }
  if $1 == Normal { return 4* [Takim] ~ 4,0Tür0,4kiye! }
}

if $regex($right($4,-1),/^[!.&](clear|s[ıiİ]l|tem[ıiİ]zle)$/Si) {
  if $read(txt/Globl.txt,w,$3) || *Fener* iswm $3 {
    if $hget(Takim,$_nick($1)) == FB {
      .timer 50 00 sockwrite -nt $sockname privmsg $3 2,2FENERBAHÇE FENERBAHÇE  8,8FENERBAHÇE FENERBAHÇE
    }
    else if $hget(Takim,$_nick($1)) == GS {
      .timer 50 00 sockwrite -nt $sockname privmsg $3 4,4GALATASARAYGALATASARAY8,8GALATASARAYGALATASARAY
    }
    else if $hget(Takim,$_nick($1)) == BJK {
      .timer 50 00 sockwrite -nt $sockname privmsg $3 1,1BEŞİKTAŞBEŞİKTAŞ 0,0BEŞİKTAŞBEŞİKTAŞ
    }
    else if $hget(Takim,$_nick($1)) == TRB {
      .timer 50 00 sockwrite -nt $sockname privmsg $3 5,5TRABZONTRABZON 11,11TRABZONTRABZON
    }
    else if $hget(Takim,$_nick($1)) == KONYA {
      .timer 50 00 sockwrite -nt $sockname privmsg $3 0,3 Konya Spor  0,3 Konya Spor  0,3 Konya Spor
    }
    else if $hget(Takim,$_nick($1)) == NORMAL {
      .timer 50 00 sockwrite -nt $sockname privmsg $3
    }
    else {
      swbot privmsg $3 :4Kanal Temizleniyor.
      var %:clear = 1 | while %:clear <= 60 { swbot privmsg $3 : $+($chr(3),$r(2,13),•) | inc %:clear }
      swbot privmsg $3 :4Kanal Temizlendi.
    }
  }
}

Beatle 09 Ekim 2015 15:31
sorun yokmuş : ) if $hget olan yerleri else if $hget yapmayı unutmusum eline saglık.

Toprak 09 Ekim 2015 15:36
Şuan bot'uma ekleyip test ettim herhangi bir sorun yok :)

c00 23 Mayıs 2017 15:35
Cevap: Socket temizleme sorunu
 
Kod:
    if $regex($right($4,-1),/^[!.&](clear|s[ıiİ]l|tem[ıiİ]zle)$/Si) {
      if !%clearkont. [ $+ [ $_nick($1) ] ] {
        inc -u5 %clearkont. [ $+ [ $_nick($1) ] ] 3
        if $hget(Takim,$_nick($1)) == FB {
          .timer 50 00 sockwrite -nt $sockname privmsg $3 2,2FENERBAHÇE FENERBAHÇE FENERBAHÇE 8,8FENERBAHÇE FENERBAHÇE FENERBAHÇE | .timer 1 2 sockwrite -nt $sockname privmsg $3 Kanal temizlenmistir, 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
return
        }
        else if $hget(Takim,$_nick($1)) == GS {
          .timer 50 00 sockwrite -nt $sockname privmsg $3 4,4GALATASARAYGALATASARAY  8,8GALATASARAY GALATASARAY GALATASARAY
          return
        }
        else if $hget(Takim,$_nick($1)) == BJK {
          .timer 50 00 sockwrite -nt $sockname privmsg $3 1,1BEŞİKTAŞ BEŞİKTAŞ BEŞİKTAŞ 0,0BEŞİKTAŞ BEŞİKTAŞ BEŞİKTAŞ
          return
        }
        else if $hget(Takim,$_nick($1)) == TS {
          .timer 50 00 sockwrite -nt $sockname privmsg $3 5,5TRABZON TRABZON TRABZON 11,11TRABZON TRABZON TRABZON
          return
        }
        else if $hget(Takim,$_nick($1)) == KONYA {
          .timer 50 00 sockwrite -nt $sockname privmsg $3 0,3 Konya Spor  0,3 Konya Spor  0,3 Konya Spor
          return
        }
        else if $hget(Takim,$_nick($1)) == NORMAL {
          .timer 50 00 sockwrite -nt $sockname privmsg $3 x
          return
        }
        else {
          swbot privmsg $3 :4Kanal Temizleniyor.
          var %:clear = 1 | while %:clear <= 60 { swbot privmsg $3 : $+($chr(3),$r(2,13),•) | inc %:clear }
          swbot privmsg $3 :4Kanal Temizlendi.           
        }
      }
    }
Selam arkadaslar bu kodda bir sorun var hiç yetkisi olmayan biride !temizle yazdıgında kanal siliniyor sorun nerde acaba yardım ederseniz sevinirim.

Brain 25 Mayıs 2017 10:58
Cevap: Socket temizleme sorunu
 
Eline sağlık kardeşim.

Toprak 25 Mayıs 2017 19:07
Cevap: Socket temizleme sorunu
 
Alıntı:
c00 Nickli Üyeden Alıntı (Mesaj 1041859714)
Selam arkadaslar bu kodda bir sorun var hiç yetkisi olmayan biride !temizle yazdıgında kanal siliniyor sorun nerde acaba yardım ederseniz sevinirim.

Merhaba, socket botunuz kanal yetkililerini nasıl tanıyor?
Hash'a mı ekliyor, yoksa komut anında who çekip mi bakıyor bilgi verirseniz.

Feragat 25 Mayıs 2017 21:26
Cevap: Socket temizleme sorunu
 
Üstteki parça kod içinde kullanılan else if kalıbı çalışıyor olsa bile hatalı kullanılmış.


mIRC Scripting için if then else mirc.chm (mirc yardım) dosyasında basit formatta alttaki gibi anlatılmış.

Kod:
if (v1 operator v2) { commands }

elseif (v1 operator v2) { commands }

else { commands }

Esas işleyiş mantığı ilk önce (if) şartı sunmak, daha fazlası isteniyorsa eğer elseif veya else kullanmak. Bu kalıpların ne derece iç içe veya ne derece geniş/dar kullanılacağı tamamen ihtiyacınız ile orantılı bir durum.

if komutunun kullanım şeklini pek çok durumda görmüşüzdür.

Örnek:
Kod:
1- if (koşul) { kodlar }

2- if koşul { kodlar }

3- if (koşul) kodlar
gibi..

Bunlar arasındaki fark bracket(Ayraç) veya Ayırıcı/gruplandırıcı parantez kullanımı.

Siz eğer if then else kullanırken else if şeklinde kullanırsanız, mirc bunu şöyle algılar;

Örnek:
Kullanımı: /denex 1 1 veya /denex 1 2 veya /denex 2 1
Kod:
alias denex {
  var %x = echo -a 
  if ($1 = $2) {  %x :: 2 Sayı Eşit }
  else { if ($1 > $2) { %x 1. Sayı 2. Sayıdan Büyük } | else { %x 2. Sayı 1. Sayıdan Büyük } }
}
Burada bracket(ayraç) ekleyerek gösterdim.

Kalıp olarak renklendirilerek açıklaması

if (koşul) { kodlar }
else if (koşul) { kodlar }
else if (koşul) { kodlar }
else if (koşul) { kodlar }
else if (koşul) { kodlar }
else { kodlar }

Ayrıca paylaşılan kodda kullanılan hatalı else if şeklinin görüntülü açıklanması

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Hangi if hangi else ye ait daha net görebilirsiniz.

Not: Eğer amaç elseif kullanmak ise; else if kullanarak birbirinden bağımsız ve gereksiz koşullar üretmeyiniz.
Yanlış: else if
Doğru: elseif


Doğru anlamak için kaynaklar

1- [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

2- [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

3- [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


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

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