23 Aralık 2017, 13:43
|
#1 |
| Çevrimdışı | Sondakika bulten bildirim
mIRC 'te Son dakika haberlerini görmek için yapabilmiş bir codedir.
Calisma Sekli: oto sistemdir, codu mircinize ekleyip /bulten yazmaniz gerekir bir kereye mahsus, diger seferlerde mirc'i her actıgınızda otomotik kendi kendine sistem caliscaktir.
Gerekli seyler: mIRC SSL oto onay gereklidir. Buradan Bulabilirsiniz. ve mIRC 6.35 ustu surumlerde calisir. Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:start:sondakika
on *:sockopen:sondakika*: {
var %komut sockwrite -nt $sockname
%komut GET / HTTP/1.1
%komut Host: $sock($sockname).addr
%komut $crlf
}
on *:sockread:sondakika*: {
var %x | sockread %x | tokenize 32 %x
if $regex($1-,<a title="(.+)" href="(.+)/") {
hadd -m sondakika link $+(https://,$sock($sockname).addr,$regml(2))
hadd -m sondakika baslik $regml(1)
if !$hget(sondakika,$hget(sondakika,link)) {
$iif(!$window(@Sondakika),window -a @Sondakika)
hadd -mu16000 sondakika $hget(sondakika,link) aeg
echo @Sondakika [4Son Dakika]2 $hget(sondakika,baslik) -4 Haberin devami:14 $hget(sondakika,link)
}
}
}
alias sondakika {
if !$timer(sondakika) { .timersondakika 0 10 sondakika }
var %rand $rand(0,9999999)
sockopen -e $+(sondakika,%rand) www.sondakika.com 443
}
mIRC 'te Son dakika haberlerini görmek için yapabilmiş bir codedir.
Calisma Sekli: oto sistemdir, codu mircinize ekleyip /bulten yazmaniz gerekir bir kereye mahsus, diger seferlerde mirc'i her actıgınızda otomotik kendi kendine sistem caliscaktir.
Gerekli seyler: mIRC SSL oto onay gereklidir. Buradan Bulabilirsiniz. ve mIRC 6.35 ustu surumlerde calisir. Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:start:sondakika
on *:sockopen:sondakika*: {
var %komut sockwrite -nt $sockname
%komut GET / HTTP/1.1
%komut Host: $sock($sockname).addr
%komut $crlf
}
on *:sockread:sondakika*: {
var %x | sockread %x | tokenize 32 %x
if $regex($1-,<a title="(.+)" href="(.+)/") {
hadd -m sondakika link $+(https://,$sock($sockname).addr,$regml(2))
hadd -m sondakika baslik $regml(1)
if !$hget(sondakika,$hget(sondakika,link)) {
$iif(!$window(@Sondakika),window -a @Sondakika)
hadd -mu16000 sondakika $hget(sondakika,link) aeg
echo @Sondakika [4Son Dakika]2 $hget(sondakika,baslik) -4 Haberin devami:14 $hget(sondakika,link)
}
}
}
alias sondakika {
if !$timer(sondakika) { .timersondakika 0 10 sondakika }
var %rand $rand(0,9999999)
sockopen -e $+(sondakika,%rand) www.sondakika.com 443
}
|
|
|  |
| IRCForumu.Net - Reklam Alanı |
| |
Normal
