🔔 Çevrimdışı bildirim almak ister misiniz?
Bir konuya etiketlendiğinizde, özel mesaj aldığınızda, bir mesajınız alıntılandığında forumda olmasanız bile anlık bildirim almak için lütfen izni verin.
mIRC üzerinden radyo dinlemenize olanak sağlayan bir dialog. Ekle bölümüne Radyonuzun adresini yazmanı yeterli olacaktır. Örneğin: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog enes {
title "Radio Player @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...].Net"
size -1 -1 153 118
option dbu
button "Oynat", 1, 2 13 23 25
button "Sil", 2, 128 28 22 24
button "Ekle", 3, 1 78 24 16
list 4, 26 13 99 53, size
edit "", 5, 26 78 99 16, autohs autovs
button "Kapat", 6, 35 103 78 12,ok
button "Durdur", 7, 2 42 23 23
}
alias dlls if $1 = mdx { return mdx.dll } | if $1 = bars { return bars.mdx }
on *:dialog:enes:init:*: {
var %bs 1
while (%bs <= $lines(radyolar.txt)) {
did -a enes 4 $read(radyolar.txt,%bs)
inc %bs
}
dll $dlls(mdx) MarkDialog $dname
dll $dlls(mdx) SetDialog $dname bgcolor $rgb(5,0,0)
dll $dlls(mdx) SetFont 1,2,3,4,5 +a default 13 1200 Tahoma
dll $dlls(mdx) SetColor 1,2 text $rgb(2,255,255)
dll $dlls(mdx) SetColor 1,2 textbg $rgb(0,0,0)
dll $dlls(mdx) SetColor 1,2 background $rgb(0,0,0)
dll $dlls(mdx) SetColor 10 background $rgb(5,255,255)
}
on *:dialog:enes:sclick:*: {
if ($did == 3) {
if $did(5) == $null { echo -a Lutfen bir link giriniz. }
else { write radyolar.txt $did(5) | echo -a $did(5) linki eklendi. | did -a enes 4 $did(5) }
}
if ($did == 2) { write -d radyolar.txt $did(4).sel | echo -a $did(4).seltext silindi. | did -d enes 4 $did(4).sel }
if ($did == 1) { set %link $did(4).seltext | oynat | Echo -a 1,7 $did(4).seltext Linki Calmaya Basliyor. $server Sunucusundasiniz. }
if ($did == 7) { window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
}
alias oynat {
window -c @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
write -c enes.html
if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) {
write enes.html <html> $&
<body> <script> var flashvars = {};flashvars.serverHost = " $+ $remove(%link,/,http:,listen.pls) $+ /;";flashvars.getStats = "0";flashvars.autoStart = "1";flashvars.textColour = "";flashvars.buttonColour = "";var params = {};params.bgcolor= "";params.wmode="transparent"; </script> $&
<script type="text/javascript" src="http://mixstreamflashplayer.net/v1.3.js"></script> $&
</body> $&
</html>
.timer 1 2 rdy
}
}
alias rdy {
if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) {
window -hne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
noop $dll(nHTMLn_2.95.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd)
noop $dll(nHTMLn_2.95.dll,navigate,$mircdirenes.html)
}
}
alias rdydinle { dialog -m enes enes }
menu * {
Radio Player: rdydinle
}
Playerin çalışması için gerekli olan nHTMLn_2.95.dll eklentide mevcuttur. Ana dizine atınız.