on $*:text:/^[!.]iftar/Si:#:{
  if !$2 { msg # Lütfen şehir belirtiniz. Örn: !iftar Konya | return }
  if ($sock(iftar)) sockclose iftar 
  sockopen iftar www.namaztakvimi.com 80 
  sockmark iftar $+($2,¿,#)
}
on *:sockopen:iftar:{ 
  sockwrite -nt $sockname GET $+(/turkiye/,$token($sock($sockname).mark,1,191),-ezan-vakti.html) 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:iftar:{  
  if ($sockerr) { .sockclose $sockname | return }
  var %_i | sockread -f %_i | tokenize 32 %_i
  if $regex($1-,/\<td align=left class=\"im3\"\>(.+)/i) {
    msg $token($sock($sockname).mark,2,191) $token($regml(1),1-3,32) $replace($day,Sunday,Pazar,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi) $upper($token($sock($sockname).mark,1,191)) 
    msg $token($sock($sockname).mark,2,191) İmsak vakti: $token($token($regml(1),3,62),1,60) İftar vakti: $token($token($regml(1),11,62),1,60)
    sockclose $sockname 
  }  	
}

[18:16:52] <ChanServ> !iftar konya
[18:16:53] <Toprak> 09 Haziran 2016 Perşembe KONYA
[18:16:53] <Toprak> İmsak vakti: 03:32 İftar vakti: 20:19