IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   mırc açılış videosu (https://www.ircforumlari.net/mirc-scripting-sorunlari/355778-mirc-acilis-videosu.html)

LoRDGuaRD 21 Eylül 2010 11:05

mırc açılış videosu
 
mırc acıldıgında müzik çalabiliyoruz ben şöyle birşey isteyebilirmiyim mırc açıldıgında (mırc taki media player ile) mırcın içindeki gösterdiğim mp4 klip dosyası acılsın istiyorum nasıl yapılabilir. biryerde bulmuştum daha önce fakat o bilgisayarımdaki media player ile acıyordu benım ıstedıgım mırc a koydugum media player addonu ile acsın. teşekkürler.

fener1907 21 Eylül 2010 19:51

Cevap: mırc açılış videosu
 
mircda ki media playeri paylaşır mısın

LoRDGuaRD 22 Eylül 2010 09:07

Cevap: mırc açılış videosu
 
Alıntı:

fener1907 Nickli Üyeden Alıntı (Mesaj 1040524434)
mircda ki media playeri paylaşır mısın

dayı herhangı bır meia player yok mırcta onuda yukleyecegım ıste.

aLieN 22 Eylül 2010 17:01

Cevap: mırc açılış videosu
 
herhangi bir mp4 dosyasına sağ tıklayın. sırasıyla ;

I - Özellikler
II - Değiştir
III - Windows Media Player
IV - Tamam
V - Uygula

adımlarını izledikten sonra mIRC programınıza bu kodu yerleştirin.

PHP- Kodu:

on *:start: { .run acilis.mp4 

mIRC programında ; //run $mircdir

komutunu uygulayın. istediğiniz mp4 dosyasını açılan pencereye kopyalayın. adını acilis.mp4 olarak değiştirin. istediğiniz olacaktır.

mIRC'te media player'ınız varsa kodlarını görmem gerekiyor. bu verdiğim yöntem bilgisayarda ki windows media player ile açar. kodları verdikten sonra mIRC'te ki media player ile de yaparız.

LoRDGuaRD 22 Eylül 2010 20:22

Cevap: mırc açılış videosu
 
/*
=====================
mIRC Media Center vBeta

BY SeRDaR406

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
=====================
*/
dialog mmc {
title "mIRC Media Center vBeta"
size -1 -1 232 137
option dbu
icon $mmcico, 0
button "", 3000, 0 0 0 0, hide ok
box "", 2, 125 0 105 122
text "Liste:", 6, 127 5 89 8
list 7, 127 15 101 92, size
list 8, 127 108 101 11, size
list 9, 2 124 112 12, size
button "Button", 10, 89 24 37 12, hide cancel
text "mIRC Media Center vBeta | mIRCArge.com", 11, 127 127 120 8
}

alias mmc { if (!$dialog(mmc)) dialog -md mmc mmc }
alias mdc dll $shortfn($scriptdirmdc.dll) $1 $2-
alias mdx dll $shortfn($scriptdirmdx.dll) $1 $2-
alias barsmdx return $shortfn($scriptdirbars.mdx)
alias -l ekleico return $shortfn($scriptdirekle.ico)
alias -l silico return $shortfn($scriptdirsil.ico)
alias -l editico return $shortfn($scriptdirdüzelt.ico)
alias -l videoico return $shortfn($scriptdirpath.ico)
alias -l rdlist return $shortfn($scriptdirrdlist.txt)
alias -l urlico return $shortfn($scriptdirurl.ico)
alias -l closeico return $shortfn($scriptdirkapat.ico)
alias -l openmedia mdc WMPCommand Open $1-
alias -l mmcico return $shortfn($scriptdirmmc.ico)
alias -l file.ac {
var %file = $sfile($mircdir,Dosya Seç)
if (%file) openmedia $shortfn(%file)
}
alias -l url.ac {
var %url = $input(Adres:,e)
if (%url) openmedia %url
}
alias -l add.a.radio {
var %rn = $input(Listeye eklemek istediğiniz?: $+ $crlf $+ (Örn: X Radyo+mms://65.55.144.155/rd-x),e)
if (%rn) {
if (+ !isin %rn) return $input(Yanlış bilgi girişi!,ohud,Hata)
else {
tokenize 43 %rn
if ($isfile($rdlist) == $false) write -c $qt($rdlist)
write $rdlist $1 $+ ¿ $+ $2
did -a mmc 7 $1
}
}
}
alias -l edit.a.radio {
var %rnm = $input(Yeni isim ve kısayol(adres): $+ $crlf $+ (Örn: X Radyo+mms://65.55.144.155/rd-x),e)
if (%rnm) {
if (+ !isin %rnm) return $input(Yanlış bilgi girişi!,ohud,Hata)
else {
tokenize 43 %rnm
write -l $+ $did(mmc,7).sel $rdlist $1 $+ ¿ $+ $2
did -o mmc 7 $did(mmc,7).sel $1
}
}
}
alias -l listede->ara {
if (!$1-) return $input(Eksik bilgi!,ohud,Hata)
else {
var %liste = 1
var %a = $1-
while (%liste <= $lines($rdlist)) {
if (kral isin $read($rdlist)) { did -c $dname 7 %liste | halt }
inc %liste
}
}
}
on *:dialog:mmc:init:*: {
mdc WMPlayer $dialog($dname).hwnd 0 0 400 300
mdx MarkDialog $dname
mdx SetBorderStyle $dname 8,9
mdx SetFont $dname 8 13 700 Tahoma
mdx SetControlMDX $dname 8,9 Toolbar arrow nodivider flat list > $barsmdx
did -i $dname 8,9 1 bmpsize 16 16
did -i $dname 8 1 setimage icon large 0, $+ $ekleico
did -a $dname 8 +W 50 1 Ekle
did -a $dname 8 1 -
did -i $dname 8 1 setimage icon large 0, $+ $silico
did -a $dname 8 +W 50 2 SiL
did -a $dname 8 1 -
did -i $dname 8 1 setimage icon large 0, $+ $editico
did -a $dname 8 3 Düzenle
did -i $dname 9 1 setimage icon large 0, $+ $videoico
did -a $dname 9 1 Dosya Aç
did -a $dname 9 1 -
did -i $dname 9 1 setimage icon large 0, $+ $urlico
did -a $dname 9 +W 62 2 URL Aç
did -a $dname 9 1 -
did -i $dname 9 1 setimage icon large 0, $+ $closeico
did -a $dname 9 +W 60 3 Kapat
var %i = 1
while (%i <= $lines($rdlist)) {
tokenize 191 $read($rdlist,%i)
did -a $dname 7 $1
inc %i
}
}
on *:dialog:mmc:sclick:*: {
if ($did == 9) {
if ($did(9).sel == 6) .timer 1 0 dialog -x mmc
if ($did(9).sel == 2) file.ac
if ($did(9).sel == 4) url.ac
}
if ($did == 8) {
if ($did(8).sel == 6) edit.a.radio
if ($did(8).sel == 2) add.a.radio
if ($did(8).sel == 4) {
if ($did(7).sel == 0) return $input(Listeden bir seçim yapılmadı!,ohud,Hata)
else {
write -dl $+ $did(7).sel $rdlist
did -d $dname 7 $did(7).sel
}
}
}
}
on *:dialog:mmc:dclick:7: openmedia $gettok($read($rdlist,$did(7).sel),2,191)
alias -l ifile return $isfile($1-)
alias -l err { echo -a "4 $+ $1 $+ " isimli dosya bulunamadı.Bu dosyayı 4" $+ $scriptdir $+ " adlı klasöre kopyalayın. | .unload -rs $shortfn($script) }
on *:load: {
if ($ifile($shortfn($scriptdirmdc.dll)) == $false) err mDC.DLL
elseif ($ifile($shortfn($scriptdirmdx.dll)) == $false) err mDX.DLL
elseif ($ifile($barsmdx) == $false) err Bars.mdx
elseif ($ifile($ekleico) == $false) err ekle.ico
elseif ($ifile($silico) == $false) err sil.ico
elseif ($ifile($editico) == $false) err edit.ico
elseif ($ifile($videoico) == $false) err path.ico
elseif ($ifile($rdlist) == $false) err Rdlist.txt
elseif ($ifile($urlico) == $false) err URL.ico
elseif ($ifile($closeico) == $false) err Kapat.ico
elseif ($ifile($mmcico) == $false) err MMC.ico
else {
echo -a 4mIRC Media Center vBeta Yüklendi.
echo -a [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
echo -a Açmak için: /mmc yazın.
}
}
on *:signal:WMPlayer: {
did -h mmc 6,7,8,11
mdx SetDialog mmc coords * * $calc($1 + 226) $calc($2 + 30)
mdx MoveControl mmc 9 * $calc($2 + 5) * *
mdx MoveControl mmc 2 $calc($1 + 10) * * $calc($2 + 5)
mdx MoveControl mmc 6 $calc($1 + 15) *
mdx MoveControl mmc 7 $calc($1 + 15) * * $calc($2 - 55)
mdx MoveControl mmc 8 $calc($1 + 15) $calc($2 - 22)
mdx MoveControl mmc 11 $calc($1 + 2) $calc($2 + 10)
did -v mmc 6,7,8,11
}
menu menubar,status {
mIRC Media Center: mmc
}
alias sxq {
var %s = 1
while (%s <= $lines(ss.txt)) {
write sx.txt $replace($read(ss.txt,%s),$chr(44),¿)
inc %s
}
}


bu media player addonunu yukledım mırcıma mırc acıldıgında mp4 klip dosyasını bu addonla açılmasını istiyorum dayı.

fener1907 23 Eylül 2010 02:49

Cevap: mırc açılış videosu
 
Kod:

dialog mmc {
  title "mIRC Media Center vBeta"
  size -1 -1 232 137
  option dbu
  icon $mmcico, 0
  button "", 3000, 0 0 0 0, hide ok
  box "", 2, 125 0 105 122
  text "Liste:", 6, 127 5 89 8
  list 7, 127 15 101 92, size
  list 8, 127 108 101 11, size
  list 9, 2 124 112 12, size
  button "Button", 10, 89 24 37 12, hide cancel
  text "mIRC Media Center vBeta | mIRCArge.com", 11, 127 127 120 8
}
alias mmc { if (!$dialog(mmc)) dialog -md mmc mmc }
alias mdc dll $shortfn($scriptdirmdc.dll) $1 $2-
alias mdx dll $shortfn($scriptdirmdx.dll) $1 $2-
alias barsmdx return $shortfn($scriptdirbars.mdx)
alias -l ekleico return $shortfn($scriptdirekle.ico)
alias -l silico return $shortfn($scriptdirsil.ico)
alias -l editico return $shortfn($scriptdirdüzelt.ico)
alias -l videoico return $shortfn($scriptdirpath.ico)
alias -l rdlist return $shortfn($scriptdirrdlist.txt)
alias -l urlico return $shortfn($scriptdirurl.ico)
alias -l closeico return $shortfn($scriptdirkapat.ico)
alias  -l openmedia mdc WMPCommand Open $1-
alias -l mmcico return $shortfn($scriptdirmmc.ico)
alias  file.ac {
  var %file = $sfile($mircdir,Dosya Seç)
  if (%file) openmedia $shortfn(%file)
}
alias -l url.ac {
  var %url = $input(Adres:,e)
  if (%url) openmedia %url
}
alias -l add.a.radio {
  var %rn = $input(Listeye eklemek istediğiniz?: $+ $crlf $+ (Örn: X Radyo+mms://irc.cerkesya.com/rd-x),e)
  if (%rn) {
    if (+ !isin %rn) return $input(Yanlış bilgi girişi!,ohud,Hata)
    else {
      tokenize 43 %rn
      write $rdlist $1 $+ ¿ $+ $2
      did -a mmc 7 $1
    }
  }
}
alias -l add.a.radio {
  var %rn = $input(Listeye eklemek istediğiniz?: $+ $crlf $+ (Örn: X Radyo+mms://65.55.144.155/rd-x),e)
  if (%rn) {
    if (+ !isin %rn) return $input(Yanlış bilgi girişi!,ohud,Hata)
    else {
      tokenize 43 %rn
      if ($isfile($rdlist) == $false) write -c $qt($rdlist)
      write $rdlist $1 $+ ¿ $+ $2
      did -a mmc 7 $1
    }
  }
}
alias -l edit.a.radio {
  var %rnm = $input(Yeni isim ve kısayol(adres): $+ $crlf $+ (Örn: X Radyo+mms://65.55.144.155/rd-x),e)
  if (%rnm) {
    if (+ !isin %rnm) return $input(Yanlış bilgi girişi!,ohud,Hata)
    else {
      tokenize 43 %rnm
      write -l $+ $did(mmc,7).sel $rdlist $1 $+ ¿ $+ $2
      did -o mmc 7 $did(mmc,7).sel $1
    }
  }
}
on *:dialog:mmc:init:*: {
  mdc WMPlayer $dialog($dname).hwnd
  mdx MarkDialog $dname
  mdx SetBorderStyle $dname 8,9
  mdx SetFont $dname 8 13 700 Tahoma
  mdx SetControlMDX $dname 8,9 Toolbar arrow nodivider flat list > $barsmdx
  did -i $dname 8,9 1 bmpsize 16 16
  did -i $dname 8 1 setimage icon large 0, $+ $ekleico
  did -a $dname 8 +W 50 1 Ekle
  did -a $dname 8 1 -
  did -i $dname 8 1 setimage icon large 0, $+ $silico
  did -a $dname 8 +W 50 2 SiL
  did -a $dname 8 1 -
  did -i $dname 8 1 setimage icon large 0, $+ $editico
  did -a $dname 8 3 Düzelt
  did -i $dname 9 1 setimage icon large 0, $+ $videoico
  did -a $dname 9 1 Dosya Aç
  did -a $dname 9 1 -
  did -i $dname 9 1 setimage icon large 0, $+ $urlico
  did -a $dname 9 +W 62 2 URL Aç
  did -a $dname 9 1 -
  did -i $dname 9 1 setimage icon large 0, $+ $closeico
  did -a $dname 9 +W 60 3 Kapat 
  did -a $dname 9 1 -
  var %i = 1
  while (%i <= $lines($rdlist)) {
    tokenize 191 $read($rdlist,%i)
    did -a $dname 7 $1
    inc %i
  }
}
on *:dialog:mmc:sclick:*: {
  if ($did == 9) {
    if ($did(9).sel == 6) .timer 1 0 dialog -x mmc
    if ($did(9).sel == 2) file.ac
    if ($did(9).sel == 4) url.ac
  }
  if ($did == 8) {
    if ($did(8).sel == 6) edit.a.radio
    if ($did(8).sel == 2) add.a.radio
    if ($did(8).sel == 4) {
      if ($did(7).sel == 0) return $input(Listeden bir seçim yapılmadı!,ohud,Hata)
      else {
        write -dl $+ $did(7).sel $rdlist
        did -d $dname 7 $did(7).sel
      }
    }
  }
}
on *:dialog:mmc:dclick:7: openmedia $gettok($read($rdlist,$did(7).sel),2,191)
alias -l ifile return $isfile($1-)
alias -l err { echo -a "4 $+ $1 $+ " isimli dosya bulunamadı.Bu dosyayı 4" $+ $scriptdir $+ " adlı klasöre kopyalayın. | .unload -rs $shortfn($script) }
on *:load: {
  if ($ifile($shortfn($scriptdirmdc.dll)) == $false) err mDC.DLL
  elseif ($ifile($shortfn($scriptdirmdx.dll)) == $false) err mDX.DLL
  elseif ($ifile($barsmdx) == $false) err Bars.mdx
  elseif ($ifile($ekleico) == $false) err ekle.ico
  elseif ($ifile($silico) == $false) err sil.ico
  elseif ($ifile($editico) == $false) err edit.ico
  elseif ($ifile($videoico) == $false) err path.ico
  elseif ($ifile($rdlist) == $false) err Rdlist.txt
  elseif ($ifile($urlico) == $false) err URL.ico
  elseif ($ifile($closeico) == $false) err Kapat.ico
  elseif ($ifile($mmcico) == $false) err MMC.ico
}
on *:signal:WMPlayer: {
  did -h mmc 6,7,8,11
  mdx SetDialog mmc coords * * $calc($1 + 226) $calc($2 + 30)
  mdx MoveControl mmc 9 * $calc($2 + 5)  * *
  mdx MoveControl mmc 2 $calc($1 + 10) * * $calc($2 + 5)
  mdx MoveControl mmc 6 $calc($1 + 15) *
  mdx MoveControl mmc 7 $calc($1 + 15) * * $calc($2 - 55)
  mdx MoveControl mmc 8 $calc($1 + 15) $calc($2 - 22)
  mdx MoveControl mmc 11 $calc($1 + 2) $calc($2 + 10)
  did -v mmc 6,7,8,11
}
on *:start:.mmc | .timer 1 1  openmedia  acilis.mp3

kırmızı yere gerekli ismi yazarsın

LoRDGuaRD 23 Eylül 2010 03:39

Cevap: mırc açılış videosu
 
mp4 veya flv dosyası nı acmıyor yukledım kodu mırc acılır acılmaz kapanıyor neden olabılır.

----------

uzantıyı hıc degıstırmedım mp3 yaptım ve bır mp3 dosyası attım yıne aynı sekılde mırc acıldıgında oto mırc kapanıyor terar:S sanırım olmadı.

fener1907 23 Eylül 2010 03:51

Cevap: mırc açılış videosu
 
kodu deneyip verdim aşağıda ki linkten dosyayı indirip mirc ana klasörüne kopyalaıp dener misin birde

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

LoRDGuaRD 23 Eylül 2010 05:33

Cevap: mırc açılış videosu
 
gayet normal calıyısıyor fakat media player bu dosyayı calamıyor calmayı denesınmı dıyor sanırım mediaplayerden kaynaklanıyor mp3 formatında duzgun calısıyor.

aLieN 23 Eylül 2010 12:29

Cevap: mırc açılış videosu
 
ozaman mirc üzerindeki media player dosyayı açacak yeterli düzeyde değil. yapılacak bişey yok. daha iyi bir media player yapılana kadar bekleyin :)


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk