Ramazan Imsakiye (2021)
Merhabalar, ramazan dönem'imiz yaklaştı, imsakiye codumuz olmadan olmaz'dı, ins işinize yarar hayırlı IR'ler.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Kod:
on *:text:*:#: {
tokenize 32 $strip($1-)
if $regex($1,/[!.][ıi]ftar$/i) {
if !$2 { msg # il belirtmediniz! | return }
hadd -m verial kanal $chan
iftar $lower($2)
}
}
alias tr_ return $replacex($1-,ç,c,ı,i,ğ,g,ü,u,ş,s,ö,o)
alias iftar {
var %rand = $rand(1,999)
sockopen $+(ssl,%rand) ajan.tk 80
sockmark $+(ssl,%rand) $+(https://www.hurriyet.com.tr/ramazan/,$tr_($1),-imsakiye/)
hadd -m verial sehir $upper($1)
}
on *:sockopen:ssl*:{
var %komut = sockwrite -n $sockname
%komut GET $+(/ssl.php?web=,$sock($sockname).mark) HTTP/1.1
%komut Host: $sock($sockname).addr
%komut Connection: keep-alive
%komut $crlf
}
alias iftarkalan {
var %zaman $duration($calc($duration($+($1,:00)) - $duration($time)))
if - isin %zaman {
var %zaman $duration($calc($duration($time) - $duration($+($1,:00))))
return 3Geçen: $replace(%zaman,mins,dakika,secs,saniye,hrs,saat)
}
return 4Kalan: $replace(%zaman,mins,dakika,secs,saniye,hrs,saat)
}
on *:sockread:ssl*:{
var %63 | sockread %63
if $regex(%63,<div class="hata">404</div>) {
.hfree -sw verial
msg $hget(verial,kanal) **4 $hget(verial,sehir) ** adında il bulunamadi.
sockclose $sockname
}
if $regex(%63,<span class="pray-time">(.*?)</span>) {
hinc -m verial inc 1
if $hget(verial,inc) = 1 {
msg $hget(verial,kanal) **4 $hget(verial,sehir) **4 $date tarih verisi.
msg $hget(verial,kanal) -
msg $hget(verial,kanal) Imsak(Sahur): $regml(1)
}
if $hget(verial,inc) = 2 { msg $hget(verial,kanal) Güneş: $regml(1) }
if $hget(verial,inc) = 3 { msg $hget(verial,kanal) Öğle: $regml(1) }
if $hget(verial,inc) = 4 { msg $hget(verial,kanal) Ikindi: $regml(1) }
if $hget(verial,inc) = 5 { msg $hget(verial,kanal) Akşam(Iftar): $regml(1) ( $iftarkalan($regml(1)) ) }
if $hget(verial,inc) = 6 {
msg $hget(verial,kanal) Yatsı (Teravih): $regml(1)
msg $hget(verial,kanal) -
.hfree -sw verial
sockclose $sockname
}
}
}
|