alias ezan { set %knl #
  set %1 $replace($1,ı,i,İ,i,ş,s,Ş,s,Ö,o,ö,o,Ü,u,ü,u,ç,c,Ç,c,ğ,g,Ğ,g,ç,c)
  if ($sock($+(ramazan,*,%1))) { msg # 4 $regml(1) 6ili zaten kontrol ediliyor.. | halt }
  if mersin isin $1 { var %1 $lower(icel) } 
  if $regex($1-, /[bcçdfgğhjklmnprsştvyzaeuioüÜÖöİı:;]/gi) == 0 { msg # 7Hatalı Kullanım 6*il şeklinse Sorgunuzu Yapınız Örnek:    6*ordu  | halt }
  sockopen $+(ramazan,*,%1) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
  sockmark $+(ramazan,*,%1) %1 
}
on $*:text:/^[\*](\S+)$/i:#:{  set %knl #
  set %1 $lower($replace($regml(1),ı,i,İ,i,ş,s,Ş,s,Ö,o,ö,o,Ü,u,ü,u,ç,c,Ç,c,ğ,g,Ğ,g,ç,c)) 
  if ($sock($+(ramazan,*,%1))) { msg # 4 $regml(1) 6ili zaten kontrol ediliyor.. | halt }
  if mersin isin $1 { var %1 $lower(icel) } |   if ** == $left($1-,2) { halt }
  if * == $left($1-,1) { if $regex($1-, /[bcçdfgğhjklmnprsştvyzaeuioüÜÖöİı:;]/gi) == 0 { msg # 7Hatalı Kullanım 6*il şeklinse Sorgunuzu Yapınız Örnek:    6*ordu  | halt } }
  sockopen $+(ramazan,*,%1) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
  sockmark $+(ramazan,*,%1) %1
}
on *:sockopen:ramazan*: { 
  sockwrite -nt $sockname GET $+(/turkiye/,$sock($sockname).mark,-ezan-vakti.html) HTTP/1.1
  sockwrite -nt $sockname HOST: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
  sockwrite -nt $sockname $crlf
}
on *:sockread:ramazan*: {
  var %63 | sockread %63
  if ($regex(%63,onmouseout=)) && ($regex($gettok($date,1,47),$gettok($free($gettok(%63,5,34)),1,32))) {
    $iif($free($gettok(%63,5,34)),msg %knl 6 %1 2ili bilgileri alinyor..)
    $iif($free($gettok(%63,5,34)),msg %knl $qt(Tarih) $replace($free($gettok(%63,5,34)),pa,Pazar,pt,Pazartesi,sa,Salı,ca,Çarşamba,pe,Perşembe,cu,Cuma,Ct,Cumartesi))
    $iif($free($gettok(%63,7,34)),msg %knl $qt(6Sabah Namazı1) $free($gettok(%63,7,34)))
    $iif($free($gettok(%63,9,34)),msg %knl $qt(6Kıple Gunes Yönü1) $free($gettok(%63,9,34)))
    $iif($free($gettok(%63,11,34)),msg %knl $qt(6Ogle Namazı1) $free($gettok(%63,11,34)))
    $iif($free($gettok(%63,13,34)),msg %knl $qt(6Ikindi Namazı1) $free($gettok(%63,13,34)))
    $iif($free($gettok(%63,15,34)),msg %knl $qt(6Aksam Namazı1) $free($gettok(%63,15,34)))
    $iif($free($gettok(%63,17,34)),msg %knl $qt(6Yatsi Namazı1) $free($gettok(%63,17,34)))
  }
}
alias free {
  var %x, %i =  $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x),  %x = $remove(%x,&nbsp;,    )
  return %x
}