IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu sekershell
bizimkiler sosyalchat


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 10 Haziran 2016, 20:15   #1
Çevrimdışı
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
Radio Player / Mircten Radyo Dinleyin.


Reklam

mIRC üzerinden radyo dinlemenize olanak sağlayan bir dialog. Ekle bölümüne Radyonuzun adresini yazmanı yeterli olacaktır.
Örneğin: https://185.9.37.60:7088/listen.pls


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog enes { title "Radio Player @ESohbet.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 @radyo } } alias oynat { window -c @radyo write -c enes.html if !$window(@radyo) { 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="https://mixstreamflashplayer.net/v1.3.js"></script> $& </body> $& </html> .timer 1 2 rdy } } alias rdy { if !$window(@radyo) { window -hne @radyo noop $dll(nHTMLn_2.95.dll,attach,$window(@radyo).hwnd) noop $dll(nHTMLn_2.95.dll,navigate,$mircdirenes.html) } } alias rdydinle { dialog -m enes enes } menu * { Radio Player: rdydinle }


Alıntı.
mIRC üzerinden radyo dinlemenize olanak sağlayan bir dialog. Ekle bölümüne Radyonuzun adresini yazmanı yeterli olacaktır.
Örneğin: https://185.9.37.60:7088/listen.pls


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog enes { title "Radio Player @ESohbet.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 @radyo } } alias oynat { window -c @radyo write -c enes.html if !$window(@radyo) { 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="https://mixstreamflashplayer.net/v1.3.js"></script> $& </body> $& </html> .timer 1 2 rdy } } alias rdy { if !$window(@radyo) { window -hne @radyo noop $dll(nHTMLn_2.95.dll,attach,$window(@radyo).hwnd) noop $dll(nHTMLn_2.95.dll,navigate,$mircdirenes.html) } } alias rdydinle { dialog -m enes enes } menu * { Radio Player: rdydinle }


Alıntı.
  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
dinleyin, mircten, player, radio, radyo
IRCForumu.Net - Sponsor Bağlantılar


Seçenekler Arama
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık