on $*:text:/^[\*](\S+)$/i:#:{ set %knl #
  var %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 $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
  msg # 6 %1 2ili bilgileri alinyor..
}
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 $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ı) $free($gettok(%63,7,34)))
    $iif($free($gettok(%63,9,34)),msg %knl $qt(6Kıple Gunes Yönü) $free($gettok(%63,9,34)))
    $iif($free($gettok(%63,11,34)),msg %knl $qt(6Ogle Namazı) $free($gettok(%63,11,34)))
    $iif($free($gettok(%63,13,34)),msg %knl $qt(6Ikindi Namazı) $free($gettok(%63,13,34)))
    $iif($free($gettok(%63,15,34)),msg %knl $qt(6Aksam Namazı) $free($gettok(%63,15,34)))
    $iif($free($gettok(%63,17,34)),msg %knl $qt(6Yatsi Namazı) $free($gettok(%63,17,34)))
  }
}
alias free {
  var %x, %i =  $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x),  %x = $remove(%x,&nbsp;,    )
  return %x
}