الموج الصامت
عضو مشاغب
التعامل مع الصوتيات في البرنامج
سنتعلم اليوم إن شاء الله تعالى كيفية التعامل مع الصوتيات و عمل مشغل صوتيات خاص بك
ولعمل ذلك نحتاج لمجموعة من الأزرار
كما في الصورة
بعد تهيئة الأزرار المناسبة والتصميم المناسب نبدأ في عمل مشغل الصوتيات وليكن هذا التصميم
نذهب لزر الإستكشاف ونضغط عليه مرتين لفتح خصائصة ثم نذهب إلى سكريبت ثم On Click
ونكتب هذا الكود
if (audioFile[1] ~= "CANCEL") then
Audio.Load(CHANNEL_NARRATION, audioFile[1], true, false);
end
Page.StartTimer(150);
كما في الصورة
ثم نذهب لزر الإيقاف ونضغط مرتين عليه ونذهب إلى سكريبت ثم On Click ونضع هذا الكود
ونعمل نفس الشيء بالنسبة للتشغيل والإيقاف المؤقت
كود التشغيل
كود الإيقاف المؤقت
كما ترى في هذه الصورة
الآن نذهب لوضع أمر التسريع للأمام والخلف بأي مقدار تريد
حيث نقوم بالضغط مرتين على زر التسريع للخلف ونختار On click
ثم نضغط على Add Action وتطلع هذه الصورة ونختار Audio ثم Audio.Seek
كما في الصورة
وبالتالي نحصل على هذا الكود
بنفس الطريقة نضع أمر التسريع للأمام فبدل أن نختار التراجع للخلف نختار Seek_Forward كما في الصورة
ونحصل على هذا الكود
الآن بقي علينا التحكم في الصوت ولعمل ذلك نذهب إلى زر تخفيض الصوت ونضغط عليه مرتين ونذهب إلى سكريبت ثم On click كالعادةونضع هذا الكود
if vol < 0 then
vol = 0;
elseif vol > 250 then
vol = 250;
end
Audio.SetVolume(CHANNEL_NARRATION, vol);
ثم زر زيادة الصوت كما يلي:
if vol < 0 then
vol = 0;
elseif vol > 255 then
vol = 255;
end
Audio.SetVolume(CHANNEL_NARRATION, vol);
كما في الصورة
وبهذا نكون قد صنعنا مشغل ميديا خاص بنا
ويمكن وضع هذه الطريقة في أسطوانة عادية أو تجميعة وبالتالي تعطي الخيار للمستعمل أن يختار الصوتيات المفضلة في جهازه والإستماع لها أثناء تصفه للأسطوانة
سنتعلم اليوم إن شاء الله تعالى كيفية التعامل مع الصوتيات و عمل مشغل صوتيات خاص بك
ولعمل ذلك نحتاج لمجموعة من الأزرار
كما في الصورة
بعد تهيئة الأزرار المناسبة والتصميم المناسب نبدأ في عمل مشغل الصوتيات وليكن هذا التصميم
نذهب لزر الإستكشاف ونضغط عليه مرتين لفتح خصائصة ثم نذهب إلى سكريبت ثم On Click
ونكتب هذا الكود
كود:
audioFile = Dialog.FileBrowse(true, "Open File", _DesktopFolder, "Audio Files (.ogg, .wav, .mp3, .ram, .raw )|*.ogg;*.wav;*.mp3;*.aif;*.aiff;*.raw|", "", "", false, true);if (audioFile[1] ~= "CANCEL") then
Audio.Load(CHANNEL_NARRATION, audioFile[1], true, false);
end
Page.StartTimer(150);
كما في الصورة
ثم نذهب لزر الإيقاف ونضغط مرتين عليه ونذهب إلى سكريبت ثم On Click ونضع هذا الكود
كود:
Audio.Stop(CHANNEL_NARRATION);ونعمل نفس الشيء بالنسبة للتشغيل والإيقاف المؤقت
كود التشغيل
كود:
Audio.Play(CHANNEL_NARRATION);كود الإيقاف المؤقت
كود:
Audio.Pause(CHANNEL_NARRATION);كما ترى في هذه الصورة
الآن نذهب لوضع أمر التسريع للأمام والخلف بأي مقدار تريد
حيث نقوم بالضغط مرتين على زر التسريع للخلف ونختار On click
ثم نضغط على Add Action وتطلع هذه الصورة ونختار Audio ثم Audio.Seek
كما في الصورة
وبالتالي نحصل على هذا الكود
كود:
Audio.Seek(CHANNEL_NARRATION, SEEK_BACKWARD, 15);بنفس الطريقة نضع أمر التسريع للأمام فبدل أن نختار التراجع للخلف نختار Seek_Forward كما في الصورة
ونحصل على هذا الكود
كود:
Audio.Seek(CHANNEL_NARRATION, SEEK_FORWARD, 15);الآن بقي علينا التحكم في الصوت ولعمل ذلك نذهب إلى زر تخفيض الصوت ونضغط عليه مرتين ونذهب إلى سكريبت ثم On click كالعادةونضع هذا الكود
كود:
vol = Audio.GetVolume(CHANNEL_NARRATION) -15;if vol < 0 then
vol = 0;
elseif vol > 250 then
vol = 250;
end
Audio.SetVolume(CHANNEL_NARRATION, vol);
ثم زر زيادة الصوت كما يلي:
كود:
vol = Audio.GetVolume(CHANNEL_NARRATION) + 15;if vol < 0 then
vol = 0;
elseif vol > 255 then
vol = 255;
end
Audio.SetVolume(CHANNEL_NARRATION, vol);
كما في الصورة
وبهذا نكون قد صنعنا مشغل ميديا خاص بنا
ويمكن وضع هذه الطريقة في أسطوانة عادية أو تجميعة وبالتالي تعطي الخيار للمستعمل أن يختار الصوتيات المفضلة في جهازه والإستماع لها أثناء تصفه للأسطوانة