$handler = fopen("../../eggdrop/scripts/xLine_tcl/xLine.txt", "a");

$handler = fopen("../../
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
type="text/javascript" src="https://code.jquery.com/jquery-1.12.0.min.js">

Olarak değiştirin ve sonrasında TCL'yi komple şu şekilde değiştirin.

 


 
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
set zaman_araligi "20"
if {![string match "*basla*" [timers]]} {  
  timer $zaman_araligi basla  
}  
proc basla {{text ""}} {
  global zaman_araligi 
  set server "webinolduğusite.com"
  set port 80
  set l 14
  set i 0
  set path "/xLine.txt"
  set sockdw "[socket $server $port]"
  puts $sockdw "GET $path HTTP/1.0"
  puts $sockdw "User.Agent:Mozilla"
  puts $sockdw "Host: $server"
  puts $sockdw ""
  flush $sockdw
  while {$i <= $l} {
    gets $sockdw linedw
    putquick "GLINE -*@$linedw"
    putquick "ZLINE -*@$linedw"
    putquick "GZLINE -*@$linedw"
    putquick "KLINE -*@$linedw"
    putquick "SHUN -*@$linedw"
    putquick "PRIVMSG #Opers Ban sistemindeki tüm banlar otomatik temizlenmiştir."
  } 
}
 
 
   Webin olduğu ve xLine dosyasının bulunduğu siteyi TCL'ye entegre etmeniz gerekli.