Türkiye Covid19(Korona) Genel Durum Remotesi
Kod Yazarı : pCKopat
Kullanım: .covid veya !covid
Kod Yazarı : pCKopat
Kullanım: .covid veya !covid
Kod:
on $*:text:/^[.!]covid$/Si:#: { .covid }
alias kdzlt return $replace($1-,":",$+(:,$chr(32),$chr(3),04),tarih,Tarih,gunluk_test,Günlük Test,gunluk_vaka,Günlük Vaka,gunluk_vefat,Günlük Vefat,gunluk_iyilesen,Günlük İyileşen,toplam_test,Toplam Test,toplam_vefat,Toplam Vefat,toplam_vaka,Toplam Vaka,toplam_iyilesen,Toplan İyileşen,hastalarda_zaturre_oran,Hastalarda Zatürre Oranı,agir_hasta_sayisi,Ağır Hasta Sayısı,yatak_doluluk_orani,Yatak Doluluk Oranı,eriskin_yogun_bakim_doluluk_orani,Erişkin Yoğun Bakım Doluluk Oranı,ventilator_doluluk_orani,Ventilator Doluluk Oranı,ortalama_temasli_tespit_suresi,Ortalama Temaslı Tespit Süresi,filyasyon_orani,Filyasyon Oranı)
alias tdzlt return $replace($1-,01,Ocak,02,Şubat,03,Mart,04,Nisan,05,Mayıs,06,Haziran,07,Temmuz,08,Ağustos,09,Eylül,10,Ekim,11,Kasım,12,Aralık)
alias covid {
if $sock(covid) { sockclose $ifmatch }
sockopen -e covid covid19.saglik.gov.tr 443
sockmark covid $active
}
on *:sockopen:covid: {
if $sockerr {
echo -a 12Bağlantı hatası $sock($sockname).wsmsg
return
}
sockwrite -nt $sockname GET /TR-66935/genel-koronavirus-tablosu.html HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: covid19.saglik.gov.tr
sockwrite -nt $sockname
}
on *:sockread:covid: {
var %f | sockread -f %f
if (*var geneldurumjson*[{"tarih"* iswm %f) {
if $regex(%f,/"(\w+":"[\d+\.]+)/Sgi) { var %r = 1
msg $sock($sockname).mark 06 $+ $token($token($regml(1),3,34),1,46) $tdzlt($token($regml(1),2,46)) $token($regml(1),3,46) 02TÜRKİYE Genel Koronavirüs Tablosu
while %r <= $regml(0) {
msg $sock($sockname).mark $kdzlt($regml(%r))
inc %r
if ($token($regml($calc(%r +1)),1,34) == tarih) { break }
}
}
}
}
Detaylı Kurulum
Kod:
ESKİ SÜRÜM MİRÇLERDE SLL BUTTON TIKLANMIYOR AÇILMASI İÇİN
DİL DOSYASI VAR 2 TANE ALLTAKİ ŞEKİLDE EKLEYİP SONRA MİRC KAPAT AÇ TEKRAR
AYARLAR GİR VE SLL BOLUMUNE GEL ORADA OTOMATİK KABUL ET DİYORSUN
PC veya VPS 32 bit ise ; C:\Windows\System32 klasorunun içine dosyaları atsın.(libeay32.dll,ssleay32.dll)
PC veya VPS 64 bit ise ; C:\Windows\SysWOW64 klasorunun içine dosyaları atsın.(libeay32.dll,ssleay32.dll)
Bunlari yapmakla bitmedi.Dosyaları attıktan sonra;
mIRC Scripti açarak alt + o basıyoruz.
Karşımıza aşağıdaki gibi ekran önümüze gelmektedir.
O kısımda Ayarlar sekmesine tıklıyoruz.
Orda kırmızı içine aldığım ssl butonu tıklıyoruz.(Ekteki dosyaları atmadıysanız ssl butonu aktif olmaz.)
SSL Butona tıkladığımızda aşağıdaki gibi ekran önümüze gelmektedir.
Resimde gördüğünüz gibi karşımıza 3 seneçek çıkıyor.
O seçeneklerden Geçersiz Sertifikaları Otomatik Kabul et seçip ok diyoruz.
Böylelikle mIRC SSL aktif olmuş oluyo
ssl.mirc Dosyaları
İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!