IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Siteniz için Hit (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/23481-siteniz-icin-hit.html)

Siteniz için Hit

PHP- Kodu:

   alias indir {
  if $hget(indirt) {
    .hfree -s indirt
  }
  unset %indir*
  set %sitem $$?"Lütfen Kendi Sitenizi Yazınız ornek: sohbetce.net"
  if %sitem == $null {
    :r
    set %sitem $$?"Lütfen Kendi Sitenizi Yazınız ornek: sohbetce.net"
    if %sitem == $chr(32) {
      goto r
    }
  }
  sockopen indir 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.hayta.net 80
}
on 1:sockopen:*: {
  if $sockname == indir {
    if $hget(indirt) {
      .hfree -s indirt
    }
    unset %indir*
    sw $sockname GET /index.html HTTP/1.1
    sw $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.hayta.net
    sw $sockname $crlf
  }
  elseif indir isin $sockname {
    write -c $shortfn(download/ $+ $nopath($gettok($sockname,1,900)))
    sw $sockname GET / $+ $gettok($gettok($sockname,1,900),2-,47) HTTP/1.1
    sw $sockname Host: $gettok($gettok($sockname,1,900),1,47)
    sw $sockname $crlf
  }
}
alias _sockopen {
  if $sock($1).status != active && $sock($1).status !== connecting {
    sockopen $1-
  }
}
on 1:sockread:*: {
  if $sockname == indir {
    var %r
    sockread %r
    if color="#cccccc" isin %r && <A HREF=" isin %r && .htm isin %r {
      _sockopen 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">$remove($gettok($mid(%r,- $pos(%r,htm,1),59),2,34),http://,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">$chr(900) $+ indir 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">$sockname {
    if $hget(indirt,$hash($sockname,32)) != 1 {
      sockread %indir [ $+ [ $hash($sockname,32) ] ]
      if %indir [ $+ [ $hash($sockname,32) ] ] == $null {
        hadd -m indirt $hash($sockname,32) 1
      }
    }
    else {
      sockread 800 &r
      var %i 1 , %lin $numtok($bvar(&r,1,$bvar(&r,0).long).text,10)
      while %i <= %lin {
        var %r = $gettok($bvar(&r,1,$bvar(&r,0).long).text,%i,10)
        if title=" isin %r && <a href=" isin %r {
          _sockopen 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">$remove($gettok($mid(%r,- $pos(%r,htm,1),59),2,34),http://,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">$chr(900) $+ indir 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">$nopath($gettok($sockname,1,900)) -1 -1 $replace($bvar(&r,1,$bvar(&r,0).long).text,hayta.net,%sitem)
    }
  }
}
on 1:sockclose:*: {
  if $sockname != indir && indir isin $sockname {
    if $sock(*indir,0) == 0 {
      if $hget(indirt) {
        .hfree -s indirt
      }
      unset %indir*
      echo -s Download Tamamlandı.
    }
  }
}

Bu addon Site Hit için tasarlanmıstır by KO2AY Tarafından kodlanmıs olup [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] adresi göze alınıp yazılmıstır.. umarım begenırsınız..

Yanıt: Siteniz için Hit

-
SW Unknown command
-
SW Unknown command
-
SW Unknown command
-

Yanıt: Siteniz için Hit

Kod:

alias indir {

  if $hget(indirt) {

    .hfree -s indirt

  }

  unset %indir*

  set %sitem $$?"Lütfen Kendi Sitenizi Yazınız ornek: sohbetce.net"

  if %sitem == $null {

    :r

    set %sitem $$?"Lütfen Kendi Sitenizi Yazınız ornek: sohbetce.net"

    if %sitem == $chr(32) {

      goto r

    }

  }

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

}

on 1:sockopen:*: {

  if $sockname == indir {

    if $hget(indirt) {

      .hfree -s indirt

    }

    unset %indir*

    sw $sockname GET /index.html HTTP/1.1

    sw $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

    sw $sockname $crlf

  }

  elseif indir isin $sockname {

    write -c $shortfn(download/ $+ $nopath($gettok($sockname,1,900)))

    sw $sockname GET / $+ $gettok($gettok($sockname,1,900),2-,47) HTTP/1.1

    sw $sockname Host: $gettok($gettok($sockname,1,900),1,47)

    sw $sockname $crlf

  }

}

alias _sockopen {

  if $sock($1).status != active && $sock($1).status !== connecting {

    sockopen $1-

  }

}

on 1:sockread:*: {

  if $sockname == indir {

    var %r

    sockread %r

    if color="#cccccc" isin %r && <A HREF=" isin %r && .htm isin %r {

      _sockopen [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ $remove($gettok($mid(%r,- $pos(%r,htm,1),59),2,34),[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) $+ $chr(900) $+ indir [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80

    }

  }

  elseif indir isin $sockname {

    if $hget(indirt,$hash($sockname,32)) != 1 {

      sockread %indir [ $+ [ $hash($sockname,32) ] ]

      if %indir [ $+ [ $hash($sockname,32) ] ] == $null {

        hadd -m indirt $hash($sockname,32) 1

      }

    }

    else {

      sockread 800 &r

      var %i 1 , %lin $numtok($bvar(&r,1,$bvar(&r,0).long).text,10)

      while %i <= %lin {

        var %r = $gettok($bvar(&r,1,$bvar(&r,0).long).text,%i,10)

        if title=" isin %r && <a href=" isin %r {

          _sockopen [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $+ $remove($gettok($mid(%r,- $pos(%r,htm,1),59),2,34),[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) $+ $chr(900) $+ indir [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80

        }        

        inc %i

      }

      .bwrite download/ $+ $nopath($gettok($sockname,1,900)) -1 -1 $replace($bvar(&r,1,$bvar(&r,0).long).text,hayta.net,%sitem)

    }

  }

}

on 1:sockclose:*: {

  if $sockname != indir && indir isin $sockname {

    if $sock(*indir,0) == 0 {

      if $hget(indirt) {

        .hfree -s indirt

      }

      unset %indir*

      echo -s Download Tamamlandı.

    }

  }

}  

alias sw {

  if $sock($1).status == active {

    sockwrite -nt $1-

  }

}

Kodun tamamı . Fakat ßi yerden aLıntı sanırım . ßelirtmesi gerekir arkadaşın ki verdiği kodda eksiklikler var.

Yanıt: Siteniz için Hit

Tamamen kendi kodlama sistemimdir ve artı o sw ise yanlıslıkla eklenmemıs kusura bakmayın..

Yanıt: Siteniz için Hit

peki bu kodu ekleyince nasıl bi hit kazandırıyor servere giren direkt olarak kişi anlamadan belirtilen siteyede mi girmiş oluyor çünkü kodu ekledim ayrıyetten bir explorer falan açmadı ?

Cevap: Siteniz için Hit

bu kodları nereye eklıyoruz birazdaha acıklayıcı anlatırmısınız

Yanıt: Siteniz için Hit

alt+r ye bas oraya yapıstır sonrada /remote on yaz status e tamamdır

Yanıt: Siteniz için Hit

Demek bu kod hit çekiyor:)
o zaman baclink pr vs olayları sallama oluyor herkes bu kodu eklesin ve hit akmaya başlasın bizde kasmıyalım sırtımızı arkaya yaslayıp yatalım:)

inandirici gelmedi.

Yanıt: Siteniz için Hit

Su Haytalar Ne İse Yarİyor

Yanıt: Siteniz için Hit

kendi webin mi cıksın ?

Yanıt: Siteniz için Hit

hayta.net yazan hiçbişeye itibar etmem.

Cevap: Siteniz için Hit

Jpg biri anlatsin anlıyalım tam olarak ?