alias haber {
  sockclose dify
  .remove haber.txt
  sockopen dify sondakika.hurriyet.com.tr 80
}
on *:sockopen:dify:{
  sockwrite -n $sockname GET / HTTP/1.1
  sockwrite -n $sockname Host: sondakika.hurriyet.com.tr $+ $crlf $+ $crlf
}
on *:sockread:dify:{
  if ($sockerr) { echo 4 -s Hata meydana geldi | halt }
  else {
    var %yok 
    sockread %yok
    if $regex(%yok,/("sondakika_saat"><strong>)/i) { write haber.txt $regsubex(%yok,/(<strong>)/gi,~) | sockclose dify | göster #KANAL }
  }
}
alias -l göster {
  var %dify 1 | while %dify <= $token($read(haber.txt,1),0,126) { 
    if $left($token($read(haber.txt,1),%dify,126),5) > $asctime($calc($ctime -300),HH:nn) {
      msg $1 $regsubex($token($read(haber.txt,1),%dify,126),/(</strong><\/td><td width="100%" valign="top"><a href="|" class="sondakika_haberlink" target="_blank">|</a></td></tr><tr><td width="40" valign="top" class="sondakika_saat">)/ig,$chr(32))
    }
    inc %dify
  }
}
menu * {
  Haberler:.timerdify 0 300 haber
}