Çevrimdışı

Arkadaşlar mırc açılış müziğini mırçta yüklü olan media player programı ile birlikde açabilirmiyim gereken codeler nedir yardımcı olurmusunuz. ama müzik değilde hazırladığım slayt gösterisini açacağım uzantıyımı değiştirmem gerekir?
Anlatamadım sanırım mırc acıldıgında calan mp.3 ü ben mırcdaki mediaplayer addonunda açılsın istiyprum ve çalacağım mp.3 değilde hazırladığım bi slayt gösterisi açılacak nasıl yaparım şimdiden teşekkürler.

 

Çevrimdışı

yanlış anlamadıysam
on *:start: {
//run $mircdirprogramınadı.exe
}

 

Çevrimdışı

on *:start: { splay sounds/ozlem3.mp3 }

bu yolda muzıgım var ve calısıyor sorunsuz.
Ama ben bunu burda açmak istiyorum.

dialog mmc {
title "Media Player"
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 "Media Player |
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
11, 118 127 112 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
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ü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
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 4Media Player Yüklendi.(LoRDGuaRD)
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,channel {
MeDia PLaYeR: mmc
}
alias sxq {
var %s = 1
while (%s <= $lines(ss.txt)) {
write sx.txt $replace($read(ss.txt,%s),$chr(44),¿)
inc %s
}
}


yani mırc acıldıgında medıa player devreye gırecek ve benım acılısta calan mp3 u calacak tabı mp3 degılde buna benım hazırladıgım slayt gosterısını ekleyecegım. goruntu olacak yani teşekkürler.

 

Çevrimdışı

bu programla bunu yapabileceğini pek sanmıyorum benim bildiğim kadarıyla bu program radyo çalıyo oluşturduğun listeden bağlanıp

 

Çevrimdışı

surukleyıp ıcıne atarsan videoda calıyor

 

Çevrimdışı

bununla olacağını pek sanmıyorum çünkü içine attığın şarkıyı hafızasında tutmuyo onun yerine bir windows media playerda bir çalma listesi oluşturup her açılışta onu çalıştırabilirsin her bilgisayarda windows media player vardır sorun olmadan çalacaktır

 

Çevrimdışı

alias -l file.ac {

burayı

alias file.ac {

Yapıp;
on *:start:.mmc | .timer 1 1 .file.ac DOSYAN
Dene bakalım.