IRCRehberi.Net- Türkiyenin En iyi IRC ve Genel Forum Sitesi  
 Sohbet Türkiye
Eylül Sohbet


mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz.

17Beğeni(ler)


 
 
Seçenekler Stil
Alt 10 Mart 2023, 22:11   #1
Set
QBilisim Güvenlik
Set - ait Kullanıcı Resmi (Avatar)

Standart Ramazan Imsakiye 2023

Merhabalar, ramazan dönemi geldigi için imsakiye codlamasıyla insanlar daha rahat vakitleri takip edebilir, hayırlı forumlar dilerim.



[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


Kod

on *:text:*:#: {
  tokenize 32 $strip($1-)
  if $regex($1,/[!.][ıi]ftar$/i)  {
    .hfree -sw verial
    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) qbilisim.net 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
  echo -a  %komut GET $+(/ssl.php?web=,$sock($sockname).mark) HTTP/1.1
  %komut GET $+(/ssl.php?web=,$sock($sockname).mark) HTTP/1.1
  %komut Host: $sock($sockname).addr
  %komut Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.7
  %komut Accept-Encoding: gzip, deflate
  %komut Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7,sq;q=0.6
  %komut Cache-Control: max-age=0
  %komut Connection: keep-alive
  %komut Cookie: _skrc=aaf747cb89b1463e8570b17c49463918; _skbid=eccd7375a05f470fb1156f4f73d7e88b; _n_did=06188963-0617-4075-80fa-e62d9f0846e1; _n_iid=gkhTcPMgvsK; _n_uid=rkzP1NHXYOc; hcatFrom=ramazan; hrp_gb=gb.638135789817290187-fb9b518d-cce1-4c70-9dcf-ba16089e9f6f; _fbp=fb.1.1677971357014.1662238130; _ga=GA1.1.1658678619.1677971357; __gads=ID=6733b7cd8526f9e8-220ba88f44dd00e8:T=1677971360:S=ALNI_MZS9Zyw0cBoXlNms3Fh0txvUVvr7Q; cto_bundle=Jv7aAl92enllSHI0TDNid2pMOVpHSkJhRXV6JTJGTlJnNDJoZ3NJcEJoZkN4UzFrJTJGMjhUd0QlMkJmJTJGJTJCd3FpMGpEN2dQUGdjMnpRNkF0YlRZdHlubFhobmlBQTBQbGNpM2VIUmNoaVVIJTJCbHRLNGtjUjF6RGhUSlN6bEhsNTNBYWJuc2slMkJTYUMlMkI1VmtQc3JSUnJjT3QyM0pxandkVnJ3JTNEJTNE; _sksid=4ff5dafc2260415dbea5dc68f4749d86; _skulp=05.03.2023-11.03.2023; _skou=direct; _skouu=http%3A%2F%2Fqbilisim.net%2Fssl.php%3Fweb%3Dhttps%3A%2F%2Fwww.hurriyet.com.tr%2Framazan%2Fsanliurfa-imsakiye%2F; _sksl=%5B%22_sksid%22%2C%22js_skinit_id%22%2C%22_skou%22%2C%22_skouu%22%5D; __gpi=UID=00000bbf2c1c4602:T=1677971360:RT=1678485085:S=ALNI_MYWA97zRUXX5MeLZ5hkjZe0NT0W5g; AMP_TOKEN=%24NOT_FOUND; js_skinit_id=a796da480be449529ce99db780676edc; _ga_6RJDJJ7YKC=GS1.1.1678485102.6.1.1678485202.0.0.0
  %komut Upgrade-Insecure-Requests: 1
  %komut  User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/110.0.0.0 Safari/537.36
  %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
    }
  }
}
 
Alt 11 Mart 2023, 04:51   #2
Standart

Emeğinize sağlık, paylaşım için teşekkür ederiz.

________________

https://megaresim.com/upload/5c3562ce.gif
 
Alt 11 Mart 2023, 11:33   #3
No MoRe DramA
WildCat - ait Kullanıcı Resmi (Avatar)

Standart

Emeginize saglik

________________


A
 
Alt 11 Mart 2023, 11:44   #4
I'm thinking of you..
Aykut - ait Kullanıcı Resmi (Avatar)

Standart

Emeğinize sağlık.

________________

Zorluğu kаlmаz yollаrın sonundа seni sаrаbilirse kollаrım,
Yaşаmаyа hаzırım sonlаrı,ne düşündüğünün önemi yok onlаrın...


A
 
Alt 11 Mart 2023, 12:14   #5
She
✰ ÖzeL..
She - ait Kullanıcı Resmi (Avatar)

Standart

Çok güzel olmuş, emeğinize sağlık.

________________

~ E & B ~
 
Alt 11 Mart 2023, 15:52   #6
Standart

Emeginize saglik

________________

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
 
Alt 12 Mart 2023, 07:19   #7
Co Admin
BuKLe - ait Kullanıcı Resmi (Avatar)

Standart

emeğinize sağlık

________________

Bilgi size güç verir; ancak saygıyı karakterinizle kazanırsınız...
 
Alt 12 Mart 2023, 16:52   #8
www.Samyeli.net
Gururum - ait Kullanıcı Resmi (Avatar)

Standart

@Set kardeşim güzel bir düşünce emeğine sağlık.

________________

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

HerŞeyi Sana Yazdım, HerŞeye Seni YazdIm...
 
Alt 13 Mart 2023, 21:11   #9
hepSi bir yaLan . . .
ZaLim - ait Kullanıcı Resmi (Avatar)

Standart

güzel bir paylaşım, emeğine sağlık, teşekkürler.

________________

Fuego, sonrisas, realidad y dolor . . .
Bırak elinde ki kalemi diyorlar,
bırak şeytan doldurur.
Ve bugün imge dediğin her şey,
bir anda bizim gibi bir katil olur.
.
 
Alt 17 Mart 2023, 20:17   #10
Cumhuriyet Kadını
Reyhan - ait Kullanıcı Resmi (Avatar)

Standart

Emeğinize sağlık, paylaşımınız için teşekkürler

________________


𝓘𝓯 𝔂𝓸𝓾 𝓬𝓪𝓷 𝓭𝓻𝓮𝓪𝓶 𝓲𝓽,
𝔂𝓸𝓾 𝓬𝓪𝓷 𝓭𝓸 𝓲𝓽



 

Bookmarks


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Kapalı
Refbacks are Kapalı





Tüm Zamanlar GMT Olarak Ayarlanmış. Şuanki Zaman: 13:02.