alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,,$chr(9)) | return %x }

on *:sockopen:_corona: { 
  sockwrite -nt $sockname GET /korona.php HTTP/1.0
  sockwrite -nt $sockname Host: $sock($sockname).addr | sockwrite -nt $sockname $crlf
}
on *:sockread:_corona:{
  var %i | sockread %i | if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]na) { window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]na } 
  if span isin %i { echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]na $htmlfree(%i) }
}
alias corona { if $window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]na) { clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]na } | sockclose _corona | sockopen _corona api.teknolobi.net 80 }