Ramazan İmsakiye 2015

[Feragat]

Geleneksel mIRC Ramazan İmsakiyemiz. Geçen seneki db'ler uçtuğu için yenisini paylaşıyorum. Hayırlı ramazanlar.

Kullanımı: *şehir
Örnek: *istanbul - *ankara

on $*:text:/^\*\S+$/S:#:{
  if ($sock(oruc)) sockclose oruc 

  sockopen oruc www.orucvakti.com 80 
  set %. $right($1,-1)
  set %c #
}

on *:sockopen:oruc:{
  if $sockerr {
    sockclose oruc
    return
  }
  %_ = sockwrite -n $sockname
  %_ GET /turkiye/ $+ %. $+ -imsakiye.html HTTP/1.1
  %_ Host: www.orucvakti.com
  %_ Connection: keep-alive
  %_ Cache-Control: max-age=0
  %_ Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
  %_ User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/43.0.2357.124 Safari/537.36
  %_ Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
  %_ Cookie: _gat=1; _ga=GA1.2.444130787.1434734932
  %_ $crlf
}

on *:sockread:oruc:{
  %l = sockclose oruc
  if $sockerr {
    %l
    return
  }
  %- =
  sockread %-
  if (*<p align=center>* iswm %-) || (*<big>*</big>* iswm %-) msg %c $regsubex(sub,%-,/<.+>/Ug,)
  if (*</b>*</p>*<style>* iswm %-) %l

}

Örnek Görüntü:

[20:59] <Feragat> *istanbul
[20:59] <deneme10> 19 Haziran 2015 Cu ISTANBUL imsak vakti: 03:22 ISTANBUL iftar vakti: 20:48

[POSOFxPOWER]

Yurtdisi icin nasil olacak ?

[Feragat]

Yurt dışı için de düzenleme yapılabilir. Ben yapmadım.