Aio'ya Seçmeli Müzik Ekleme

[murathassoy]

[center][b]Merhaba Arkadaşlar
Yeni hazırlamış olduğum aio'ya Küçük bir müzik eklentisi eklemek istiyorum.
MuratHASSOY KATILIMSIZ Arşivi v5 de hazırladğımız APz yi kaybettiğim için eklentilerini bulamadım.
Örnek Dosyalarada baktım malesef.

14.01.2012 de agletis arkadaşımla hazırlamaya çalıştık ama sorunlar çıktığı için ekleyemedik.
Küçük bir örneği bu resimde var [img]http://i.imgur.com/dv230.png[/img]

Yani Demek istediğim şu

5 şarkı eklicem
~ İleri - Geri - Pause - Diğeri - İlerleme Göstergesi - Süre ~ Kayan yazı ~
Yardımlarınızı Bekliyorum[/b][/center] Edited January 28, 2012 by murathassoy

[0mh3r]

Al Bu Örnekten Yaralan

[code]http://hotfile.com/dl/141992409/dbc26c1/AudioEx.rar.html[/code]

[Kral__]

yaptığım player çalışmalarına bakarsan bulabilirsin kardeş bulamazsan pm ata nerede takıldıysan çözebilirim kolay gele

[murathassoy]

[quote name='0mh3r' date='15 January 2012 - 20:35 ' timestamp='1326652502' post='1141203']
Al Bu Örnekten Yaralan

[code]http://hotfile.com/dl/141992409/dbc26c1/AudioEx.rar.html[/code]
[/quote]

[b][color="#FF0000"]Error: Plugin "AudioEx\AudioEx.lmd" is not licensed for re-distribution[/color][/b]

Dosyasınıda paylasırmısın sitesine baktım yok

[Kral__]

pluginin sürümü uymamış olabilir

[murathassoy]

Bilemem [b]Kral__[/b] basit gibi gozukuyor ama bayağı yorucu Akşam dolu komut yazıldı bişiler çıktı ortaya ama kaldık olece

[NotToday]

evde değilim abi bakacaktık unutmadımda birkaç gün yokum ya

[Kral__]

~ Global ~

[code]
function SecondsToClock(sSeconds)
local nSeconds = String.ToNumber(sSeconds)
if nSeconds == 0 then

return "00:00";
else
local nMins = string.format("%02.f", Math.Floor(nSeconds/60));
local nSecs = string.format("%02.f", Math.Floor(nSeconds - nMins *60));
return nMins..":"..nSecs
end
end

function muzikcal(path)
Audio.Load(CHANNEL_BACKGROUND, path, true, false);
nLen = Audio.GetLength(CHANNEL_BACKGROUND)
Page.StartTimer(500);
end
[/code]

~ İleri Kod ~

[code]
item = item + 1
itemdatasi = ListBox.GetItemData("list", item);
ListBox.DeselectItem("list", -1);
ListBox.SelectItem("list", item);
ListBox.SetItemCheck("list", item, BST_CHECKED);
muzikcal(itemdatasi)
Application.Sleep(2000)
[/code]

~ Prev Kod ~

[code]
item = item - 1
itemdatasi = ListBox.GetItemData("list", item);
ListBox.DeselectItem("list", -1);
ListBox.SelectItem("list", item);
muzikcal(itemdatasi)
Application.Sleep(2000)
[/code]

~ İlerleme Göstergesi ~

Timer

[code]
nCurPos = Audio.GetCurrentPos(CHANNEL_BACKGROUND);
nGetLength = Audio.GetLength(CHANNEL_BACKGROUND);
Paragraph.SetText("süre/tam süre", SecondsToClock(nCurPos).. " / " ..SecondsToClock(nLen));
Image.SetProperties("bar", {Width = ((nCurPos/nGetLength))* İlerleme barınnın genişiliği yazılacak }
[/code]

kayan yazı sana kalmış

Edited January 15, 2012 by Kral__

[murathassoy]

kral eksik bişiler var yahu ilerleme göstergesini nasıl acacam kafam katıştı pm ne ßakacakmısın

[milano88]

Global :
[code]nMuzik = 0;[/code]

On Show :
[code]Page.StartTimer(100);
title = " yazacak isim ";
--- çalacak müzik ---Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\1.mp3", true, true);
--- ses seviyesi --- Audio.SetVolume(CHANNEL_BACKGROUND, 255);
nMuzik = 1;[/code]

On Timer :
[code]-- zaman -----
curTime = Math.Round(Audio.GetCurrentPos(CHANNEL_BACKGROUND), 2);
if String.Find(curTime, ".", 1, false)==-1 then
curTime = String.Concat(curTime, ".");
end
decPos = String.Find(curTime, ".", 1, false);
strLen = String.Length(curTime);
zerosNeeded = 2 - (strLen - decPos);
if zerosNeeded > 0 then
for count = 1, zerosNeeded do
curTime = curTime.."0";
end
end
Paragraph.SetText("Paragraph1", curTime);

-- kayan yazi ----
myChar = String.Left(title, 1);
title = String.Right(title, (String.Length(title)-1));
title = title..myChar;
titleText = String.Left(title, 20);
Paragraph.SetText("Paragraph2", titleText);[/code]

İleri buton :
[code]if nMuzik == 1 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\2.mp3", true, true);
nMuzik = 2;
title = " NOW PLAYING - 2. şarkı";
elseif nMuzik == 2 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\3.mp3", true, true);
nMuzik = 3;
title = " NOW PLAYING - 3. şarkı";
elseif nMuzik == 3 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\4.mp3", true, true);
nMuzik = 4;
title = " NOW PLAYING - 4. şarkı";
elseif nMuzik == 4 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\1.mp3", true, true);
nMuzik = 1;
title = " NOW PLAYING - 1. şarkı";
end[/code]


Geri Buton:
[code]if nMuzik == 1 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\4.mp3", true, true);
nMuzik = 4;
title = " NOW PLAYING - 4. şarkı";
elseif nMuzik == 2 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\1.mp3", true, true);
nMuzik = 1;
title = " NOW PLAYING - 1. şarkı";
elseif nMuzik == 3 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\2.mp3", true, true);
nMuzik = 2;
title = " NOW PLAYING - 2. şarkı";
elseif nMuzik == 4 then
Audio.Load(CHANNEL_BACKGROUND, "AutoPlay\\Audio\\3.mp3", true, true);
nMuzik = 3;
title = " NOW PLAYING - 3. şarkı";
end[/code]

[murathassoy]

[b]Hata veriyor eksik bişiler var sanırım[/b]

[g.a]

[topic='169262']Milano88'in çok güzel bir örneği vardı bir bak[/topic]

[milano88]

hata yok kodları nereye yazacağını üstte yazdım zaten abi copy paste de yanlışın var örnek proje hazırladım :
http://hotfile.com/dl/142061560/47928e9/My_Project.rar.html

[murathassoy]

[b]Düzelttim Milano88 tamamdır [/b]