on *:sockopen:puan:{
  sockwrite -n $sockname GET /LigPuanDurumu.aspx?l=2 HTTP/1.1
  sockwrite -n $sockname Host: 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.ligtv.com.tr $+ $crlf $+ $crlf
  sockwrite -n $sockname $clrf
}
on *:sockread:puan:{
  if ($sockerr) { echo 4 -a Veri alımında Hata oluştu... | halt }
  else {   
    var %difi 
    sockread %difi 
    if (*LblSiraNo* iswm %difi) { %puans = $addtok(%puans ~,$htmlfree(%difi),126) }
    if (*PuanTablosu_ctl*LinkTakim* iswm %difi) { %puant = $addtok(%puant,$replace($htmlfree(%difi),ÅŸ,ş,$+($chr(38),#231,$chr(59)),ç,Ä°,İ,$+($chr(38),#252,$chr(59)),ü,ÄŸ,ğ,Å?,Ş),126) }
    if (*LblOynadigi* iswm %difi) { %puano = $addtok(%puano ~,$htmlfree(%difi),126) }
    if (*LblGalibiyet* iswm %difi) { %puang = $addtok(%puang ~,$htmlfree(%difi),126) }
    if (*LblBeraberlik* iswm %difi) { %puanb = $addtok(%puanb ~,$htmlfree(%difi),126) }
    if (*LblMalubiyet* iswm %difi) { %puanm = $addtok(%puanm ~,$htmlfree(%difi),126) }
    if (*LblAttigi* iswm %difi) { %puana = $addtok(%puana ~,$htmlfree(%difi),126) }
    if (*LblYedigi* iswm %difi) { %puany = $addtok(%puany ~,$htmlfree(%difi),126) }
    if (*LblAveraj* iswm %difi) { %puanavr = $addtok(%puanavr ~,$htmlfree(%difi),126) }
    if (*PuanTablosu_*LblPuan* iswm %difi) { %puanp = $addtok(%puanp ~,$htmlfree(%difi),126) }
  }
}
on *:text:!ligpuan:*:{
  sockclose puan
  .set %ligkanalı $chan
  msg $chan 12** 4Liste alınıyor...
  sockopen puan 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.ligtv.com.tr 80
  $iif($dialog(PuanCetveli),dialog -x PuanCetveli)
  .timer 1 5 puanlar
  .timer 1 8 sockclose puan
  .timer 1 9 unset %puan*
}
alias puanlar {
  sockclose puan
  sockopen puan 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.ligtv.com.tr 80
  msg %ligkanalı TAKIM0,0takımc  .   1,0O  0,0.         1,0G          B          M            A           Y          Avr        P 
  msg %ligkanalı $puanteam(1) $puantaj(1)
  msg %ligkanalı $puanteam(2) $puantaj(2)
  msg %ligkanalı  $puanteam(3) $puantaj(3)
  msg %ligkanalı  $puanteam(4) $puantaj(4)
  msg %ligkanalı $puanteam(5) $puantaj(5)
  msg %ligkanalı $puanteam(6) $puantaj(6)
  msg %ligkanalı $puanteam(7) $puantaj(7)
  msg %ligkanalı $puanteam(8) $puantaj(8)
  msg %ligkanalı   $puanteam(9) $puantaj(9)
  msg %ligkanalı   $puanteam(10) $puantaj(10)
  msg %ligkanalı   $puanteam(11) $puantaj(11)
  msg %ligkanalı    $puanteam(12) $puantaj(12)
  msg %ligkanalı $puanteam(13) $puantaj(13)
  msg %ligkanalı $puanteam(14) $puantaj(14)
  msg %ligkanalı  $puanteam(15) $puantaj(15)
  msg %ligkanalı $puanteam(16) $puantaj(16)
  msg %ligkanalı $puanteam(17) $puantaj(17)
  msg %ligkanalı  $puanteam(18) $puantaj(18)
}

on *:dialog:PuanCetveli:sclick:3:url 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.ircforumlari.net 
alias puantaj {
  return  $+($token(%puano,$1,126),$chr(9),$token(%puang,$1,126),$chr(9),$token(%puanb,$1,126),$chr(9),$token(%puanm,$1,126),$chr(9),$token(%puana,$1,126),$chr(9),$token(%puany,$1,126),$chr(9),$token(%puanavr,$1,126),$chr(9),$token(%puanp,$1,126))
}
alias puanteam {
  return $+($remove($token(%puans,$1,126),$chr(32)),.) $token(%puant,$1,126)
}
alias htmlfree {
  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
return %x }