mircxreklam mircxreklam mircxreklam mircxreklam
Sohbet muhabbet sohbet, sohbet odası
Sohbet, Sohbet Odası mircx
mircx mircx

  • Konu İçeriğini Görebilmek İçin Lütfen Üye Olun. Aksi Takdirde İçeriği Göremezsiniz.

Covid19 TCL

[mIRCX] Konu Bilgileri

Konu Hakkında Merhaba, tarihinde TCL Scriptler kategorisinde admin tarafından oluşturulan Covid19 TCL başlıklı konuyu okuyorsunuz. Bu konu şimdiye dek 337 kez görüntülenmiş, 0 yorum ve 0 tepki puanı almıştır...
Kategori Adı TCL Scriptler
Konu Başlığı Covid19 TCL
Konbuyu başlatan admin
Başlangıç tarihi
Cevaplar
Görüntüleme
İlk mesaj tepki puanı
Son Mesaj Yazan admin

admin

Mustafa Kemal ATATÜRK
Administrator
Katılım
16 Kas 2019
Mesajlar
505
Tepkime puanı
0
Puanları
16
Konum
public_html
Cinsiyet
Erkek
İlgi Alanı
Xenforo
IRC
irc.superalem.org

İtibar:

Tcl-TLS 1.7 Sürümlerden Birine, En Azından Tcl 8.5 Veya Üstü Sürüme, tcllib/JSON Paketine İhtiyacınız Olacak!

Kod:
set url {https://testsite2.saglik.gov.tr/covid19/covid19api?getir=liste}

setudef flag korona

package require http
package require tls 1.7
package require json
package present Tcl 8.5

::http::register https 443 [list tls::socket -autoservername 1]

bind pub - .cov covid_pubs

proc covid_pubs {nick uhost hand chan text} {
    if {![channel get $chan korona]} { return 0 }
    set token [http::geturl $::url]
    set data [json::json2dict [http::data $token]]
    ::http::cleanup $token
    set cov [lindex $data 0]
    dict with cov {
        puthelp "privmsg $chan :\00312$tarih\003 \00314T?rkiye'deki G?ncel Durum\003 \00303T?RK?YE G?NL?K KORONAV?R?S TABLOSU\003 :"
        puthelp "privmsg $chan :\002BUG?NK? TEST SAYISI\002 : \00304$gunluk_test\003 \002BUG?NK? HASTA SAYISI\002 : \00304$gunluk_vaka\003\
            \002BUG?NK? VEFAT SAYISI\002 : \00304$gunluk_vefat\003 \002BUG?NK? ?Y?LE?EN SAYISI\002 : \00304$gunluk_iyilesen\003"
        puthelp "privmsg $chan :\002TOPLAM TEST SAYISI\002 : \00304$toplam_test\003 \002TOPLAM HASTA SAYISI\002 : \00304$toplam_vaka\003\
            \002TOPLAM VEFAT SAYISI\002 : \00304$toplam_vefat\003"
        puthelp "privmsg $chan :\002HASTALARDA ZAT?RRE ORANI (%)\002 : \00304$hastalarda_zaturre_oran\003\
            \002A?IR HASTA SAYISI\002 : \00304$agir_hasta_sayisi\003  \002TOPLAM ?Y?LE?EN HASTA SAYISI\002 : \00304$toplam_iyilesen\003"
    }
    return 0
}

Kod sahibi: Heartbroken

Kullanımı;

set covidKnl "#Kanal" bilgileri verecek kanal adını yazın.
.cov komutuyla botu kullanabilirsiniz.

cov.png
 

Aynı Kategoriden Daha Fazla Konu

Üst Alt