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/)
-   -   Koda eklenti (https://www.ircforumlari.net/mirc-scripting-sorunlari/378281-koda-eklenti.html)

TİGeR 21 Ocak 2011 23:27
Koda eklenti
 
SeLam arkadaslar.
Cocorico arkadasımızın bi codesi var elimde kullanıslı bir code oncelikle kodu göstereyim

PHP- Kodu:
;;@Giris/Cikis Penceresinde veya menual pencerede görünen 
;[23:36] *** Notice -- Client connecting on port 6669: Auth (Pure@85.96.78.210) [clients]
;[23:36] *** Notice -- Client exiting: Auth (Pure@85.96.78.210) [Quit]
; giriş ve cıkışlar gibi ip lere tek tık ile Z:line atar.. 
on ^1:SNOTICE:*:{ 
  if (exiting isin $1-) { 
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis } 
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt 
  } 
  if (Connecting isin $1-) { 
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis } 
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt 
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt } 
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1 
    }
  } 
  halt 
}
on *:HOTLINK:*.*.*:*:{ 
  if ($active = #) { halt } 
  else { 
    if (@ isin $1) {
      $x:CoCoRiCo($1,1)
    }
  }
}
alias -l X:CoCoRiCo { 
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
    ;S:ban secenegi (Kline) 
    .zline $+(*,$left(%q,%x)) 4 sunucu.com
    echo 4:lined ip $+(*,$left(%q,%x))
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  } 
Yukarda vermis olduğum kod @giris cıkıs penceresinde gösteriyor giris cıkısları ve isterseniz ip adresine cift tıklayarak zline atabilioruz kisi sunucudan cıkmıs olsa bile.. Şimdi benim istediğim buna zline + sqline eklemek
eminim cogu operin işine cok yarıcak bu istediğim
yanlız nereye nasıl eklicez onu beceremedim ustalar bi bakıverin size zahmet

TİGeR 22 Ocak 2011 15:49
Cevap: Koda eklenti
 
Yokmu kise yardım edicek ;frown

muratt_aziz 22 Ocak 2011 17:49
Cevap: Koda eklenti
 
Alıntı:
TİGeR Nickli Üyeden Alıntı (Mesaj 1040656237)
SeLam arkadaslar.
Cocorico arkadasımızın bi codesi var elimde kullanıslı bir code oncelikle kodu göstereyim

PHP- Kodu:
;;@Giris/Cikis Penceresinde veya menual pencerede görünen 
;[23:36] *** Notice -- Client connecting on port 6669: Auth (Pure@85.96.78.210) [clients]
;[23:36] *** Notice -- Client exiting: Auth (Pure@85.96.78.210) [Quit]
; giriş ve cıkışlar gibi ip lere tek tık ile Z:line atar.. 
on ^1:SNOTICE:*:{ 
  if (exiting isin $1-) { 
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis } 
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt 
  } 
  if (Connecting isin $1-) { 
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis } 
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt 
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt } 
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1 
    }
  } 
  halt 
}
on *:HOTLINK:*.*.*:*:{ 
  if ($active = #) { halt } 
  else { 
    if (@ isin $1) {
      $x:CoCoRiCo($1,1)
    }
  }
}
alias -l X:CoCoRiCo { 
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
    ;S:ban secenegi (Kline) 
    .zline $+(*,$left(%q,%x)) 4 sunucu.com
    .sqline  $+(*,$left(%q,%x)) 4 sunucu.com
    echo 4:lined ip $+(*,$left(%q,%x))
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  } 
Yukarda vermis olduğum kod @giris cıkıs penceresinde gösteriyor giris cıkısları ve isterseniz ip adresine cift tıklayarak zline atabilioruz kisi sunucudan cıkmıs olsa bile.. Şimdi benim istediğim buna zline + sqline eklemek
eminim cogu operin işine cok yarıcak bu istediğim
yanlız nereye nasıl eklicez onu beceremedim ustalar bi bakıverin size zahmet
.zline $+(*,$left(%q,%x)) 4 sunucu.com
.sqline $+(*,$left(%q,%x)) 4 sunucu.com

bu sekılde denermısın kırmızı şişaretle belirtim komutun bulundugu yer

TİGeR 22 Ocak 2011 19:29
Cevap: Koda eklenti
 
Alıntı:
muratt_aziz Nickli Üyeden Alıntı (Mesaj 1040657238)
.zline $+(*,$left(%q,%x)) 4 sunucu.com
.sqline $+(*,$left(%q,%x)) 4 sunucu.com

bu sekılde denermısın kırmızı şişaretle belirtim komutun bulundugu yer
arkadasım sen sadece zlineyi sqlineye cevirmişsin ;frown

zlineyle sqline aynı sey deil parametre ile eklersin sqline ama bu kodda nasıl nereye eklicemi bilmiorm

muratt_aziz 22 Ocak 2011 20:41
Cevap: Koda eklenti
 
msg operserv sqline add $nick komutu nıck yasaklama komutuymus senın verdıgın kod ıp e zline o koda baska duzenek gerekiyor vaktım olunca yaparım senın komuta uydururuz

TİGeR 26 Ocak 2011 01:54
Cevap: Koda eklenti
 
CoCoRiCo ya ait bu code kendisi bekleniyor
tabi diğer coderler ustat lar bakarmısınız ;frown

XcLusive 26 Ocak 2011 16:08
Cevap: Koda eklenti
 
Kod:
on ^1:SNOTICE:*:{
  if (exiting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt
  }
  if (Connecting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      ayıkla $hotline
      $x:CoCoRiCo($1-,1)
    }
  }
}
alias -l X:CoCoRiCo {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1)
    ;S:ban secenegi (Kline)
    .zline $+(*,$left(%q,%x))  sebep
    .sqline add +süre %sqlinenick sebep
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  }
}
alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $9 }
  if (*connecting on* iswm $1-) { set %sqlinenick $10 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($9,1,33) }
}
[16:04:01] *** Notice -- Client connecting on port 6667: XXXXX (IF@192.168.1.1) [clients]
[16:04:03] *** Notice -- Client connecting at irc.kelebek.org: YYYYY (IF@192.168.1.1)
[16:04:38] *** Notice -- Client exiting: XYXYX (IF@192.168.1.1) [Ayrildi]
-
Değerlerine göre ayarlanmıştır. Muhtemelen bu değerler seninki ile aynı.
Belirtilen yerleri kendine göre düzenle.

TİGeR 26 Ocak 2011 23:57
Cevap: Koda eklenti
 
şimdi bu code ile @Giris-Cıkıs penceresinde iplere cift tıklayarak zline atıyoruz sunucudan cıkmıs olsa bile
Sunda yapılan eklenti ile ipe cift tıklatıqımda sqline işlicekmi? extra bişey yapmıorz demi?
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

XcLusive 27 Ocak 2011 09:59
Cevap: Koda eklenti
 
Evet " .sqline add +süre %sqlinenick sebep " satırını kendine göre düzenlediğinde her tıklatmanda zline'nin yanı sıra nickleride sqline eklemiş olursun.

TİGeR 28 Ocak 2011 00:03
Cevap: Koda eklenti
 
Alıntı:
XcLusive Nickli Üyeden Alıntı (Mesaj 1040661980)
Evet " .sqline add +süre %sqlinenick sebep " satırını kendine göre düzenlediğinde her tıklatmanda zline'nin yanı sıra nickleride sqline eklemiş olursun.
.sqline add +süre %sqlinenick sebep
bu kısmdaki değişiklik ne sekilde olucak tam anlayamadım gene
.sqline add +0 %sqlinenick Kaybol! yapsam işlermi kod yani koda karsılık gelicek olan baska bisey eklencekmi yoksa şu kısım "%sqlinenick" olarakmı kalıcak $,(,q gibi falan bişiler koycazmı ;frown
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] habide su var sqline eklerken bildiğiniz gibi /os sqline add nick sebeb seklinde eklenior
yani /zline nick gibi değil farklı oysa yukarda verdiğiniz kod
.sqline add +süre %sqlinenick sebep
bu sekilde eklenirmi burda basına /os koymamız gerekmezmi?

ecoll 28 Ocak 2011 09:55
Cevap: Koda eklenti
 
Alıntı:
TİGeR Nickli Üyeden Alıntı (Mesaj 1040662644)
.sqline add +süre %sqlinenick sebep
bu kısmdaki değişiklik ne sekilde olucak tam anlayamadım gene
.sqline add +0 %sqlinenick Kaybol! yapsam işlermi kod yani koda karsılık gelicek olan baska bisey eklencekmi yoksa şu kısım "%sqlinenick" olarakmı kalıcak $,(,q gibi falan bişiler koycazmı ;frown
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] habide su var sqline eklerken bildiğiniz gibi /os sqline add nick sebeb seklinde eklenior
yani /zline nick gibi değil farklı oysa yukarda verdiğiniz kod
.sqline add +süre %sqlinenick sebep
bu sekilde eklenirmi burda basına /os koymamız gerekmezmi?
Kod:

on ^1:SNOTICE:*:{
  if (exiting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt
  }
  if (Connecting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      ayıkla $hotline
      $x:CoCoRiCo($1-,1)
    }
  }
}
alias -l X:CoCoRiCo {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1)
    ;S:ban secenegi (Kline)
    .zline $+(*,$left(%q,%x)) Get Out!
    .os sqline add %sqlinenick Get Out!
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  }
}
alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $13 }
  if (*connecting on* iswm $1-) { set %sqlinenick $14 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($13,1,33) }
}
Bu Şekilde Denedim Çalıştı...

[ 09:39:53 ] Giriş : *** Notice -- Client connecting on port 6667: Deneme12 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]
[ 09:40:11 ] Çıkış : *** Notice -- Client exiting: Deneme12 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [Z:lined (Sebep: Out!)]

[ 09:54:45 ] -OperServ- Deneme12 SQLINE listesine eklendi.

Deneme12 Kullanmak istediginiz rumuz yasakli konumda veya bir ***** yetkilisine ait: Get Out!

XcLusive 28 Ocak 2011 10:11
Cevap: Koda eklenti
 
evet /os ile çalışmalı doğru diyorsun :)
.os sqline add +0 %sqlinenick Get Out!
gibi olabilir.

TİGeR 28 Ocak 2011 14:22
Cevap: Koda eklenti
 
Alıntı:
ecoll Nickli Üyeden Alıntı (Mesaj 1040662929)
Kod:

on ^1:SNOTICE:*:{
  if (exiting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt
  }
  if (Connecting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      ayıkla $hotline
      $x:CoCoRiCo($1-,1)
    }
  }
}
alias -l X:CoCoRiCo {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1)
    ;S:ban secenegi (Kline)
    .zline $+(*,$left(%q,%x)) Get Out!
    .os sqline add %sqlinenick Get Out!
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  }
}
alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $13 }
  if (*connecting on* iswm $1-) { set %sqlinenick $14 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($13,1,33) }
}
Bu Şekilde Denedim Çalıştı...

[ 09:39:53 ] Giriş : *** Notice -- Client connecting on port 6667: Deneme12 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]
[ 09:40:11 ] Çıkış : *** Notice -- Client exiting: Deneme12 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [Z:lined (Sebep: Out!)]

[ 09:54:45 ] -OperServ- Deneme12 SQLINE listesine eklendi.

Deneme12 Kullanmak istediginiz rumuz yasakli konumda veya bir ***** yetkilisine ait: Get Out!
Dostum sqline nasıl eklettin nicke bende denedim ama @Giris-cıkıs penceresinde ipe tıklayınca
[14:15] -OperServ- port SQLINE listesine eklendi.

port kelimesini eklemis halbuki nick deneme123 tü
nerde hata yaptım acaba?

ecoll 28 Ocak 2011 15:34
Cevap: Koda eklenti
 
Alıntı:
TİGeR Nickli Üyeden Alıntı (Mesaj 1040663019)
Dostum sqline nasıl eklettin nicke bende denedim ama @Giris-cıkıs penceresinde ipe tıklayınca
[14:15] -OperServ- port SQLINE listesine eklendi.

port kelimesini eklemis halbuki nick deneme123 tü
nerde hata yaptım acaba?
Kod:

alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $13 }
  if (*connecting on* iswm $1-) { set %sqlinenick $14 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($13,1,33) }
}
Bu Şekilde mi?

Öncekinde $9 $10 Olarak Vermişti Bende Connecting i Alıordu ona Göre AyarLadım Eğer Sende $9 $10 ken Portu Alıorsa

Kod:

alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $11 }
  if (*connecting on* iswm $1-) { set %sqlinenick $12 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
}
Olarak Dene Bi

Eğer Benim Verdiğim Gibi Eklediysen

Kod:

alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $15 }
  if (*connecting on* iswm $1-) { set %sqlinenick $16 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($15,1,33) }
}
Olarak Dene

Ben Pek Anlamam Mantık Yürüterek Yaptım.

TİGeR 28 Ocak 2011 17:07
Cevap: Koda eklenti
 
Tamam ecoll kardesim
alias ayıkla {
if (*connecting at* iswm $1-) { set %sqlinenick $11 }
if (*connecting on* iswm $1-) { set %sqlinenick $12 }
if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }

sağol bu sekilde düzelttim nicki eklior yanlız sunu merak ediorm
kendi ipimle yani hem zline hemde sqline eklediğim nick
deneme123 tü
aynı iple nick değişip geldim deneme1234 yaptım
[16:51] -OperServ- deneme123 SQLINE listesinde zaten var. eski sqline eklediği nicki gösteriyor zaten var diye ip adresi aynı diye olabilirmi?

----------

vaLLa ip aynı diye bu sorunu yapıor sandım ama farklı bi ip adresiyle denedik bi user sunucudan cıktı

[17:02] Çıkış : *** Notice -- Client exiting: xyz ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [Client exited]

@Giris/Cıkıs penceresinde ipe cift tıkladım ve
[17:01] -IRC.Sunucu.Net- *** Permanent Z:Line added for [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] on Fri Jan 28 15:01:43 2011 GMT (from nickim[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]: Dışarı ! yani zline işledi fakat nick deişik olduğu halde gene statuste şu yazdı
[17:01] -OperServ- deneme123 SQLINE listesine eklendi. yani 1 kez eklediği nicki eklior surekli nasıl iş anlamadım ;frown

XcLusive 28 Ocak 2011 17:18
Cevap: Koda eklenti
 
@Giris/Cıkıs
Penceresine gelen noticedeki kelime sayısı önemli
Kod:
alias ayıkla {
if (*connecting at* iswm $1-) { set %sqlinenick $11 }
if (*connecting on* iswm $1-) { set %sqlinenick $12 }
if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
}
Kısımlarını nicke gelecek şekilde ayarlaman gerek.

ecoll 28 Ocak 2011 17:42
Cevap: Koda eklenti
 
Alıntı:
TİGeR Nickli Üyeden Alıntı (Mesaj 1040663079)
Tamam ecoll kardesim
alias ayıkla {
if (*connecting at* iswm $1-) { set %sqlinenick $11 }
if (*connecting on* iswm $1-) { set %sqlinenick $12 }
if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }

sağol bu sekilde düzelttim nicki eklior yanlız sunu merak ediorm
kendi ipimle yani hem zline hemde sqline eklediğim nick
deneme123 tü
aynı iple nick değişip geldim deneme1234 yaptım
[16:51] -OperServ- deneme123 SQLINE listesinde zaten var. eski sqline eklediği nicki gösteriyor zaten var diye ip adresi aynı diye olabilirmi?

----------

vaLLa ip aynı diye bu sorunu yapıor sandım ama farklı bi ip adresiyle denedik bi user sunucudan cıktı

[17:02] Çıkış : *** Notice -- Client exiting: xyz ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [Client exited]

@Giris/Cıkıs penceresinde ipe cift tıkladım ve
[17:01] -IRC.Sunucu.Net- *** Permanent Z:Line added for [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] on Fri Jan 28 15:01:43 2011 GMT (from nickim[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]: Dışarı ! yani zline işledi fakat nick deişik olduğu halde gene statuste şu yazdı
[17:01] -OperServ- deneme123 SQLINE listesine eklendi. yani 1 kez eklediği nicki eklior surekli nasıl iş anlamadım ;frown
O kadar Fazlası Beni Aşar ben anlamam yani.Belki Set e ekLediği için öLe kalıor olabilir genelde böle kodların sonuna unset ekliyorlardı :)

TİGeR 28 Ocak 2011 19:29
Cevap: Koda eklenti
 
Alıntı:
XcLusive Nickli Üyeden Alıntı (Mesaj 1040663105)
@Giris/Cıkıs
Penceresine gelen noticedeki kelime sayısı önemli
Kod:
alias ayıkla {
if (*connecting at* iswm $1-) { set %sqlinenick $11 }
if (*connecting on* iswm $1-) { set %sqlinenick $12 }
if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
}
Kısımlarını nicke gelecek şekilde ayarlaman gerek.
Suan nicke gelicek sekilde ayarlı yukardaki haliyle ama en basta bi kere deneme123 nickini sqline ekledim artık baska eklemek istediğimdede onu eklemeye calısıor ve sqline listesinde ztn var diyor ;frown

TİGeR 29 Ocak 2011 03:25
Cevap: Koda eklenti
 
Konu güncel CoCorico bizi gorüyorsan el at su konuya;cryin

XcLusive 29 Ocak 2011 12:33
Cevap: Koda eklenti
 
Kod:
on ^1:SNOTICE:*:{
  if (exiting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt
  }
  if (Connecting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      ayıkla $hotline
      $x:CoCoRiCo($1-,1)
    }
  }
}
alias -l X:CoCoRiCo {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1)
    ;S:ban secenegi (Kline)
    .zline $+(*,$left(%q,%x))  sebep
    .os sqline add +0 %sqlinenick sebep
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  }
}
alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $11 }
  if (*connecting on* iswm $1-) { set %sqlinenick $12 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
}
Var olan eski kod sil, yeni bir sayfa aç ve bu kodu ekle.
Bendeki SNOTICE ile bu koddaki SNOTICE değerleri farklıymış ve o yüzden çalışmıyordu.
Ama sende neden ilk alınan nicki sürekli ekleme çabasında onu bilmiyorum.
Muhtemelen senden kaynaklanan bir sorun.
----------
.zline *@88.251.55.20 sebep
.sqline add +süre AySeL sebep
.zline *@78.188.200.24 sebep
.sqline add +süre aktif_jocuk_ist sebep
.zline *@78.187.90.128 sebep
.sqline add +süre 6667: sebep
.zline *@94.122.128.198 sebep
.sqline add +süre batmn72 sebep
.zline *@78.187.90.128 sebep
.sqline add +süre çavuş sebep
.zline *@95.9.68.12 sebep
.sqline add +süre erzrmaaaaaa sebep
----------
Buda deneme sonucu.

TİGeR 29 Ocak 2011 14:02
Cevap: Koda eklenti
 
Alıntı:
XcLusive Nickli Üyeden Alıntı (Mesaj 1040663752)
Kod:
on ^1:SNOTICE:*:{
  if (exiting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 4 -t @Giris/Cikis Çıkış : $1- | halt
  }
  if (Connecting isin $1-) {
    if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
    echo 3 -t @Giris/Cikis Giriş : $1- | halt
  }
  halt
}
on ^1:HOTLINK:*.*.*:*:{
  if ( $active = #) { halt }
  else {
    if (@ isin $1) {
      $x:CoCoRiCo($1,2)
      return $1
    }
  }
  halt
}
on *:HOTLINK:*.*.*:*:{
  if ($active = #) { halt }
  else {
    if (@ isin $1) {
      ayıkla $hotline
      $x:CoCoRiCo($1-,1)
    }
  }
}
alias -l X:CoCoRiCo {
  if ($2 = 1 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1)
    ;S:ban secenegi (Kline)
    .zline $+(*,$left(%q,%x))  sebep
    .sqline add +0 %sqlinenick sebep
  }
  if ($2 = 2 ) {
    var %q $mid($1,$pos($1,@),$len($1))
    var %x $calc($len(%q) - 1 )
  }
}
alias  ayıkla {
  if (*connecting at* iswm $1-) { set %sqlinenick $11 }
  if (*connecting on* iswm $1-) { set %sqlinenick $12 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
}
Var olan eski kod sil, yeni bir sayfa aç ve bu kodu ekle.
Bendeki SNOTICE ile bu koddaki SNOTICE değerleri farklıymış ve o yüzden çalışmıyordu.
Ama sende neden ilk alınan nicki sürekli ekleme çabasında onu bilmiyorum.
Muhtemelen senden kaynaklanan bir sorun.
----------
.zline *@88.251.55.20 sebep
.sqline add +süre AySeL sebep
.zline *@78.188.200.24 sebep
.sqline add +süre aktif_jocuk_ist sebep
.zline *@78.187.90.128 sebep
.sqline add +süre 6667: sebep
.zline *@94.122.128.198 sebep
.sqline add +süre batmn72 sebep
.zline *@78.187.90.128 sebep
.sqline add +süre çavuş sebep
.zline *@95.9.68.12 sebep
.sqline add +süre erzrmaaaaaa sebep
----------
Buda deneme sonucu.
bu kodda gene sqline eklerken başında /os yok
nasıl ekledi aşşadaki nickleri ilginc..

iilk basta eklediğim sqline hala devam edior kimi denersem deneyim gene en bastaki nicki eklior veya ztn listede dior fıtık oldum ya ;frown

XcLusive 29 Ocak 2011 21:11
Cevap: Koda eklenti
 
Başona os koy sorun olmaz :)
O denemede ekleme yapmıyor echo olarak yansıtıyor.
.sqline add +0 %sqlinenick sebep Kısmını
.os sqline add +0 %sqlinenick sebep Yapacaksın :)

TİGeR 30 Ocak 2011 21:19
Cevap: Koda eklenti
 
on ^1:SNOTICE:*:{
if (exiting isin $1-) {
if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
echo 4 -t @Giris/Cikis Çıkış : $1- | halt
}
if (Connecting isin $1-) {
if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
echo 3 -t @Giris/Cikis Giriş : $1- | halt
}
}
on ^1:HOTLINK:*.*.*:*:{
if ( $active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,2)
return $1
}
}
}
on *:HOTLINK:*.*.*:*:{
if ($active = #) { halt }
else {
if (@ isin $1) {
ayıkla $hotline
$x:CoCoRiCo($1-,1)
}
}
}
alias -l X:CoCoRiCo {
if ($2 = 1 ) {
var %q $mid($1,$pos($1,@),$len($1))
var %x $calc($len(%q) - 1)
;S:ban secenegi (Kline)
.zline $+(*,$left(%q,%x)) 4 KayboL Lamer yavrusu
.os sqline add +0 %sqlinenick 4 KayboL Lamer yavrusu
}
if ($2 = 2 ) {
var %q $mid($1,$pos($1,@),$len($1))
var %x $calc($len(%q) - 1 )
}
}
alias ayıkla {
if (*connecting at* iswm $1-) { set %sqlinenick $11 }
if (*connecting on* iswm $1-) { set %sqlinenick $12 }
if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
}
Degerli coder arkadaslar :) haLa sorunuma 1 çözüm bulamadım.
Snotice penceresinde ki iplere cift tıkla zline atabiliyoruz
yanlız 1turlu sqline ekleyemedim eklior ama 1kere nick ekledim sadece artık devamlı aynı nicki eklior mutlaka cok ufak bi hata var bi bakıverin suna iş su kısımda sanırım

Kod:
if (*connecting at* iswm $1-) { set %sqlinenick $11 }
  if (*connecting on* iswm $1-) { set %sqlinenick $12 }
  if (*exiting at* iswm $1-) { set %sqlinenick $gettok($11,1,33) }
burdaki %sqlinenick $11
%sqlinenick $12
%sqlinenick $gettok $11,1,33

olan kısımda sanırım tek sorun;frown
yardımlarınızı bekliorm saldırılardaki anlık nickleri yasaklamak için coğu arkadasında işine yarıcaktır bu eminim

TİGeR 31 Ocak 2011 16:15
Cevap: Koda eklenti
 
GünceLLLLL


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

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