;- Ayarlar..
alias _sunucu1 return irc.sohbetyeri.org:7003
alias _sunucu2 return irc.sohbetyeri.org:7003
alias _nick return $read(nick.txt)
alias _ident return $read(ident.txt)


;Bot'ların sayısı lütfen belirleyiniz
-
;Gece 1'den saat 9'a kadar girecek bot sayısı
alias _sabah return 250

;Sabah 9'dan öglen 12'ye kadar girecek bot sayısı
alias _öglen return 400

;Öglen 12'den akşam 8'e kadar girecek bot sayısı
alias _aksam return 450

;Akşam 8'den gece 1'e kadar girecek bot sayısı
alias _gece return 600
;-
alias sw if ($sock($1).status == active) sockwrite -nt $1-
###################### Ayarlancak Bolum Ust Kısım Sadece! ######################

alias clone {
  if $lines(proxy.txt) == 0 { .timercycle off | unset %* | _al | return }
  var %:proxy $read(proxy.txt), %:rnd $+($md5($ticks),$r(10,999))
  if $read(proxy.txt,w,$+(*,%:proxy,*)) { .write $+(-,dl,$readn) proxy.txt }
  sw $+(cycle,%:rnd) quit | $+(.timer,%:rnd,¿*) off
  $iif(!$sock($+(cycle,%:rnd)),.sockopen $+(cycle,%:rnd) $gettok(%:proxy,1,58) $gettok(%:proxy,2,58))
}
on *:start:{
  _al
}

alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
alias _güncel { echo -a Proxy list güncellendi toplam4 $lines(proxy.txt) | sockclose _proxy* | unset %* | .timercycle 1 5 kontrol }
alias _ekle {
  if $regex($1,/(\d+\.\d+\.\d+\.\d+)) {
    if !$read(proxy.txt,w,$1) { .write proxy.txt $+($1,:,$2) }
  }
}
alias _al { 
  .remove proxy.txt 
  sockclose links 
  sockopen links 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 
  $+(.timer,qproxy) 1 60 _güncel 
}
on *:sockopen:links:{ 
  sockwrite -nt $sockname GET / HTTP/1.1 
  sockwrite -nt $sockname Host: $sock($sockname).addr
  sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */*
  sockwrite -nt $sockname Accept-Language: tr-TR
  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)
  sockwrite -nt $sockname Connection: Keep-Alive
  sockwrite -nt $sockname $crlf
}
on *:sockread:links:{ 
  var %links | sockread %links | .tokenize 32 %links 
  if (*#more* iswm %links) { return }
  if (*timestamp-link*.html* iswm %links) {
    var %rand $rand(10,999999)
    .sockopen $+(ipal,%rand) $sock($sockname).addr 80
    .sockmark $+(ipal,%rand) $token($token(%links,3-5,47),1,39)
  }
}
on *:sockopen:ipal*:{ 
  sockwrite -nt $sockname GET $+(/,$sock($sockname).mark) HTTP/1.1 
  sockwrite -nt $sockname Host: $sock($sockname).addr
  sockwrite -nt $sockname Accept: image/jpeg, application/x-ms-application, image/gif, application/xaml+xml, image/pjpeg, application/x-ms-xbap, */*
  sockwrite -nt $sockname Accept-Language: tr-TR
  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)
  sockwrite -nt $sockname Connection: Keep-Alive
  sockwrite -nt $sockname $crlf
}
on *:sockread:ipal*:{ 
  var %ipal | sockread %ipal | .tokenize 32 %ipal 
  if (*.*.*:* iswm %ipal) && (*a* !iswm %ipal) { 
    _ekle $token(%ipal,1,58) $token(%ipal,2,58) 
  }
}

on *:start:_al
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
alias _güncel {
  if $lines(proxy.txt) == 0 { _al | return } 
  echo -a Proxy list güncellendi toplam4 $lines(proxy.txt) 
  sockclose *proxy* 
  unset %* 
  .timercycle 1 5 kontrol 
}
alias _al {
  .remove proxy.txt
  .timercycle off
  var %::rand $md5($ticks)
  sockopen $+(_proxy6,%::rand) proxyserverlist24.blogspot.com.tr 80
  ipal
  $+(.timer,qproxy) 1 20 _güncel 
}
alias _ekle {
  if !$read(proxy.txt,w,$1) { 
    .write proxy.txt $1
  }
}

alias ipal { .remove proxy.txt | sockclose 12proxytext | sockopen 12proxytext 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:sockopen:12proxytext*:{
  var %s sockwrite -n $sockname
  %s GET / HTTP/1.1 
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf

}
on *:sockread:12proxytext*:{
  var %63 | sockread %63
  if (*timestamp-link*.html* iswm %63) {
    3ekproxyal $+(/,$token($token(%63,4,39),3-,47))
  }
}
alias 3ekproxyal {
  var %rand $rand(0,999999999)
  sockopen $+(3ekproxytext,%rand) 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80
  sockmark $+(3ekproxytext,%rand) $1
}

on *:sockopen:3ekproxytext*:{
  var %s sockwrite -n $sockname
  %s GET $+(/,$sock($sockname).mark) HTTP/1.1 
  %s Accept: image/jpeg, image/gif, image/pjpeg, application/x-ms-application, application/xaml+xml, application/x-ms-xbap, */*
  %s Accept-Language: tr-TR
  %s User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727)
  %s Host: $sock($sockname).addr
  %s Connection: Keep-Alive
  %s $crlf
}
on *:sockread:3ekproxytext*:{
  var %63 | sockread %63
  if (*.*:* iswm %63) && (*a* !iswm %63) {
    var %ip $token($htmlfree(%63),1,32)
    _ekle %ip
  }
}