mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
|
Seçenekler | Stil |
10 Mart 2022, 20:20 | #1 |
Güncel iddaa Kodu ( Canlı Sonuçlar )
Komut: /iddaa İşlev: com object ile web üzerindeki verileri çeker. Kodalias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,,$chr(9)) | return %x } alias iddaa { var %cek $+(iddaa,$r(1,9999)) | .comopen %cek Msxml2.ServerXMLHTTP.6.0 noop $com(%cek, open, 2, bstr, GET, bstr, $+(http://www.teknolobi.net/api/iddaa/canli.php?tarih=,$date)) noop $com(%cek, send, 1) $com(%cek, responseText, 2) var %y1 $len($com(%cek).result) if %y1 > 4141 { var %y $mid($com(%cek).result,1,4141) } else { var %i $mid($com(%cek).result,1,4141) } .comclose %cek | var %q $token($htmlfree(%i),0,63) ,%u 1 while %u <= %q { echo -s 12Kod:1 $token($token($htmlfree(%i),%u,63),1,42) 12Dakika:1 $token($token($htmlfree(%i),%u,63),2,42) 12Ev Sah:1 $token($token($htmlfree(%i),%u,63),3,42) 12Dep:1 $token($token($htmlfree(%i),%u,63),4,42) 12Skor:4 $token($token($htmlfree(%i),%u,63),5,42) inc %u } } [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kod ; youmycare
________________
"Fark etmek acıydı ama gerekliydi." |
|
|
10 Mart 2022, 20:24 | #2 |
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
paylaşım için teşekkürler.
|
|
|
10 Mart 2022, 23:35 | #3 |
Emeğinize sağlık, paylaşımınız için teşekkürler.
________________
ellerinde bir güldüm ,
soldum . |
|
|
10 Mart 2022, 23:40 | #4 |
emeginize saglik
________________
Hope. . . ✨
|
|
|
10 Mart 2022, 23:54 | #5 |
Paylaşım için teşekkürler emeğinize sağlık
________________
|
|
|
11 Mart 2022, 00:01 | #6 |
Dakika da veriyor güzel.
Kayan yazı şeklinde olursa da olurmuş. |
|
|
11 Mart 2022, 00:03 | #7 |
Paylaşım İçin Teşekkürler Emeğine Sağlık.
|
|
|
24 Eylül 2022, 22:34 | #8 |
Statüse yansıtıyor bunu kanala yansıtması için en yapabilirim?
|
|
|
25 Eylül 2022, 04:39 | #9 |
Sadece sen kullanırsın kanaldaki herkes görür.
Kodalias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,,$chr(9)) | return %x } alias iddaa { var %cek $+(iddaa,$r(1,9999)) | .comopen %cek Msxml2.ServerXMLHTTP.6.0 noop $com(%cek, open, 2, bstr, GET, bstr, $+(http://www.teknolobi.net/api/iddaa/canli.php?tarih=,$date)) noop $com(%cek, send, 1) $com(%cek, responseText, 2) var %y1 $len($com(%cek).result) if %y1 > 4141 { var %y $mid($com(%cek).result,1,4141) } else { var %i $mid($com(%cek).result,1,4141) } .comclose %cek | var %q $token($htmlfree(%i),0,63) ,%u 1 while %u <= %q { msg $chan 12Kod:1 $token($token($htmlfree(%i),%u,63),1,42) 12Dakika:1 $token($token($htmlfree(%i),%u,63),2,42) 12Ev Sah:1 $token($token($htmlfree(%i),%u,63),3,42) 12Dep:1 $token($token($htmlfree(%i),%u,63),4,42) 12Skor:4 $token($token($htmlfree(%i),%u,63),5,42) inc %u } } Kodalias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,,$chr(9)) | return %x } alias iddaa { var %cek $+(iddaa,$r(1,9999)) | .comopen %cek Msxml2.ServerXMLHTTP.6.0 noop $com(%cek, open, 2, bstr, GET, bstr, $+(http://www.teknolobi.net/api/iddaa/canli.php?tarih=,$date)) noop $com(%cek, send, 1) $com(%cek, responseText, 2) var %y1 $len($com(%cek).result) if %y1 > 4141 { var %y $mid($com(%cek).result,1,4141) } else { var %i $mid($com(%cek).result,1,4141) } .comclose %cek | var %q $token($htmlfree(%i),0,63) ,%u 1 while %u <= %q { echo -a 12Kod:1 $token($token($htmlfree(%i),%u,63),1,42) 12Dakika:1 $token($token($htmlfree(%i),%u,63),2,42) 12Ev Sah:1 $token($token($htmlfree(%i),%u,63),3,42) 12Dep:1 $token($token($htmlfree(%i),%u,63),4,42) 12Skor:4 $token($token($htmlfree(%i),%u,63),5,42) inc %u } } Kodon *:text:*:#*: { if $regex($1,/^[.!][ıiIİ]ddaa$/Si) { /iddaa } } alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,,$chr(9)) | return %x } alias iddaa { var %cek $+(iddaa,$r(1,9999)) | .comopen %cek Msxml2.ServerXMLHTTP.6.0 noop $com(%cek, open, 2, bstr, GET, bstr, $+(http://www.teknolobi.net/api/iddaa/canli.php?tarih=,$date)) noop $com(%cek, send, 1) $com(%cek, responseText, 2) var %y1 $len($com(%cek).result) if %y1 > 4141 { var %y $mid($com(%cek).result,1,4141) } else { var %i $mid($com(%cek).result,1,4141) } .comclose %cek | var %q $token($htmlfree(%i),0,63) ,%u 1 while %u <= %q { msg $chan 12Kod:1 $token($token($htmlfree(%i),%u,63),1,42) 12Dakika:1 $token($token($htmlfree(%i),%u,63),2,42) 12Ev Sah:1 $token($token($htmlfree(%i),%u,63),3,42) 12Dep:1 $token($token($htmlfree(%i),%u,63),4,42) 12Skor:4 $token($token($htmlfree(%i),%u,63),5,42) inc %u } } |
|
|
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
Seçenekler | |
Stil | |
|
|