mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
|
Seçenekler | Stil |
11 Ocak 2024, 13:17 | #1 |
Günlük yemek kodu socket
Hergün farklı farklı yemekler ve kalorileri yazılmaktadır.
Komut: !yemek Örnek; Kod[13:13]» <Atom> !yemek [13:13]» <Forbidden> [Gunun Yemegi] Tarhana Corba (150-kcaL) Tavuk Sote (315-kcaL) Garniturlu Pirinc Pilavi (300-kcaL) Kakaolu Puding (335-kcaL) Kodon $*:text:/^[.!]yemek$/i:#: { if %yemekchan { return } | set -eu10 %yemekchan $chan | nextdatess | yemek } alias yemek { if $sock(yemek) { .sockclose yemek } | .sockopen yemek $sit 80 } on *:sockopen:yemek: { $m GET / HTTP/1.0 | $m Host: $sit | $m Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 | $m Accept-Encoding: * | $m $crlf } on *:sockread:yemek:{ var %yemek sockread -f %yemek var %pattern = /"endDate"\:" $+ $nextdate 18\:30\:00","type":1\}, $+ \{"foodName"\:\[(.+)\],"startDate"\:" $+ $bdate $+ / if $regex(%yemek,%pattern) { msg %yemekchan [Gunun Yemegi] $karaktertemizle($karakterduzelt($regml(1)))) } } alias -l m return sockwrite -n $sockname alias -l sit return yemek.comu.edu.tr alias -l bdate return $date(yyyy-mm-dd) alias -l nextdate return $asctime($calc($ctime + %tatil__),yyyy-mm-dd) alias -l nextdatess { var %ll = $asctime($calc($ctime + 86400),dddd), %zz = set -eu5 % $+ tatil__ | if (%ll == Sunday) { %zz $calc(86400 *2) } | if (%ll == Saturday) { %zz $calc(86400 *3) } | else { %zz 86400 } } alias -l karakterduzelt return $replacex($$1-,$+($chr(41),"),-kcaL $+ $chr(41) $chr(32),$chr(44),$chr(32),\u00c7,C,\u0130,i,\u00e7,c,\u0131,i,\u015f,s,\u00f6,o,\u011f,g,\u015e,S,\u00fc,u) alias -l karaktertemizle { return $remove($1-,$chr(34)) } |
|
|
11 Ocak 2024, 14:44 | #2 |
emeğine sağlık
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________
|
|
|
11 Ocak 2024, 15:08 | #3 |
Emeğine sağlık
________________
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
|
|
|
12 Ocak 2024, 20:48 | #4 |
emeğine sağlık olsun
________________
Çekme, Cennetimin Pencerelerine perde.
Kaldır! Göz kapaklarını |
|
|
13 Ocak 2024, 06:18 | #5 |
Emeğinize sağlık
|
|
|
14 Ocak 2024, 14:07 | #6 |
Emeğinize sağlık
________________
Seviyorum içimdeki alıngan ama haylaz çocuğu.. Sever, kırılır, küser.. Ama göz ucuyla hep bir gülücük bekler... |
|
|
16 Ocak 2024, 11:21 | #7 |
Eline sağlık
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
________________
Edep; aklın Tercümanıdır. İnsan edebi kadar akıllı, Aklı kadar şerefli, Şerefi kadar Kıymetlidir. Massive.. ~ E & B ~ |
|
|
16 Ocak 2024, 11:32 | #8 |
Emeğinize sağlık
________________
.İ𝒛𝒍𝒆𝒓 𝒌𝒂𝑳ı𝒓, 𝑺𝒂𝒅𝒆𝒄𝒆 İ𝒛𝒍𝒆𝒓 𝒌𝒂𝑳ı𝒓𝒔ı𝑵
|
|
|
Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
|
|