İmsak/İftar vakitleri

Eylül 19, 2008 at 10:50 am Yorum bırakın

Seçilen ilin imsak ve iftar vakitlerini gösterir.

<pre>/*
=======================
Boþ vakitleri deðerlendirmek lazým...

SeRDaR406

mIRCdb.com
=======================
*/
alias -l wrt did -a imif 3 $1
dialog imif {
  title "Ýmsak/Ýftar Vakitleri"
  size -1 -1 130 67
  option dbu
  box "", 1, 2 1 126 64
  text "Bulunduðunuz ili seçin:", 2, 6 10 54 8
  combo 3, 62 8 60 132, size drop
  text "Ýmsak:", 4, 7 24 16 8
  edit "", 5, 24 23 101 10, read
  edit "", 6, 24 36 101 10, read
  text "Ýftar:", 7, 10 37 13 8
  button "Öðren", 8, 49 48 37 12
  button "Kapat", 9, 88 48 37 12, cancel
}
alias ifvakit if (!$dialog(imif)) dialog -m imif imif
on *:dialog:imif:sclick:8: {
  if (!$did(3).seltext) return $input(Bir il seçiniz!,ohud,Hata)
  else {
    did -ra $dname 5,6 Bekleyiniz...
    set %il $did(3).seltext
    sockclose imif
    sockopen imif www.mynet.com 80
  }
}
on *:sockopen:imif: {
  sockwrite -n imif GET $+(/ramazan/iftar_vakitleri.asp?c=,%il) HTTP/1.1
  sockwrite -n imif Host: www.mynet.com
  sockwrite -n imif $crlf
  ;unset %il
}
on *:sockread:imif: {
  var %s
  sockread %s
  if ($replace($date,/,.) isin %s) {
    did -ra imif 5 $remove($gettok($htmlfree($replace(%s,&lt;div,$chr(191))),2,32),class=i_msak&gt;,$chr(191))
    did -ra imif 6 $remove($gettok($htmlfree($replace(%s,&lt;div,$chr(191))),-3,32),class=aksam&gt;,$chr(191))
    sockclose imif
  }
}
on *:dialog:imif:init:*: {
  wrt Adana
  wrt Adiyaman
  wrt Afyon
  wrt Agri
  wrt Aksaray
  wrt Amasya
  wrt Ankara
  wrt Antalya
  wrt Ardahan
  wrt Artvin
  wrt Aydin
  wrt Balikesir
  wrt Bartin
  wrt Batman
  wrt Bayburt
  wrt Bilecik
  wrt Bingol
  wrt Bitlis
  wrt Bolu
  wrt Burdur
  wrt Bursa
  wrt Çanakkale
  wrt Çankiri
  wrt Çorum
  wrt Denizli
  wrt Diyarbakir
  wrt Duzce
  wrt Edirne
  wrt Elazig
  wrt Erzincan
  wrt Erzurum
  wrt Eskisehir
  wrt Gaziantep
  wrt Giresun
  wrt Gumushane
  wrt Hakkari
  wrt Hatay
  wrt Igdir
  wrt Isparta
  wrt Ýstanbul
  wrt Ýzmir
  wrt Karabuk
  wrt Karaman
  wrt Kars
  wrt Kastamonu
  wrt Kayseri
  wrt Kirikkale
  wrt Kirklareli
  wrt Kirsehir
  wrt Kilis
  wrt Kocaeli
  wrt Konya
  wrt Kutahya
  wrt Lefkosa
  wrt Malatya
  wrt Manisa
  wrt Maras
  wrt Mardin
  wrt Mersin
  wrt Mugla
  wrt Mus
  wrt Nevsehir
  wrt Nigde
  wrt Ordu
  wrt Osmaniye
  wrt Rize
  wrt Sakarya
  wrt Samsun
  wrt Siirt
  wrt Sinop
  wrt Sivas
  wrt Þanliurfa
  wrt Þirnak
  wrt Tekirdag
  wrt Tokat
  wrt Trabzon
  wrt Tunceli
  wrt Usak
  wrt Van
  wrt Yalova
  wrt Yozgat
  wrt Zonguldak
}
on *:load: echo -a Imsak/İftar vakitleri yüklendi.Açmak için /ifvakit yazin.

Entry filed under: mIRC Hazır Kodlar. Tags: .

Notify Addonu Internet Explorer Giriş Sayfasını Değiştirme

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

Trackback this post  |  Subscribe to the comments via RSS Feed


Takvim

Eylül 2008
P S Ç P C C P
    Eki »
1234567
891011121314
15161718192021
22232425262728
2930  

Most Recent Posts


%d blogcu bunu beğendi: