mIRCForumlari.Net

mIRCForumlari.Net (https://www.mircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.mircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Radio Player / Mircten Radyo Dinleyin (https://www.mircforumlari.net/mirc-scripting-hazir-kodlar/20241-radio-player-mircten-radyo-dinleyin.html)

RahmetLi 26 Nisan 2023 02:43

Radio Player / Mircten Radyo Dinleyin
 
Toplam 1 Eklenti bulunuyor.
mIRC üzerinden radyo dinlemenize olanak sağlayan bir dialog. Ekle bölümüne Radyonuzun adresini yazmanı yeterli olacaktır.
Örneğin: http://176.227.203.111:2256/listen.pls


PHP- Kodu:

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="http://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
}

Playerin çalışması için gerekli olan nHTMLn_2.95.dll eklentide mevcuttur. Ana dizine atınız.

LoDoS 26 Nisan 2023 08:14

Cevap: Radio Player / Mircten Radyo Dinleyin
 
Emeqine Saqlik Kral


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 14:03.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.


Navbar with Avatar by Motorradforum