بسم الله الرحمن الرحيم
الدرس
الخامس عشر:-
الحمد لله رب العالمين والصلاة
والسلام علي أشرف خلق الله أجمعين سيدنا محمد وعلي آله وصحبه أجمعين السلام عليكم
ورحمة الله وبركاته درس اليوم من الاهمية بمكان و هو درس الmulti media و اعني بذلك عمل ازرار
تتحكم بملف الفيديو و الصوت كالتي في مشغلات الصوت و بعد الانتهاء من هذا الدرس
تستطيع بإذن الله عمل الموسوعات الصوتية (مسوعات صوتية لعلماء الامة تحوي علي
محاضراتهم و خطبهم لتنال الأجر و الثواب من الله)
افتح مشروع جديد و ادراج فيه Digital movie icon (و يمكنك ادراج
sound icon بدل Digital movie icon اذا اردت) و سمها sound (التسمية هنا مهمة لأننا
سنستخدم الاسم في الكود) و من خصائصها نضغط علي import لادراج ملف الفديو انظر الي الصورة ادناه
بعدها ندرج interaction icon و نسمه interaction و ندرج يمينه مباشرة calculate icon (نختار من الخيارات button لأننا نريده زر تشغيل او play) و نسمه play و ندرج أربعة calculate icon و نسمها pause و previous و next و stop لعمل زر ايقاف مؤقت و زر
الرجوع الي الخلف و زر الانتقال الي الامام و زر التوقف (و يا حبذا لو قمت بعمل
صور لهذه الازرار برموزها المعروفة كما في برامج المشغلات الصوتية) انظر الي
الصورة ادناه
قم بفتح play ثم اذهب الي function و منها اختار general ثم اختار media pause ثم انقر عليها مرتين
تلقائيا سيكتب البرنامج الكود و نكتب اسم ملف الفيديو(sound) في icon id و نكتب كلمة false بدل كلمة pause (لاحظ اننا كتبنا كلمة false لأن زر play لا يمكننا تشغيله إلا اذا كان زر pause في حالة true أي اوقفنا ملف الفيديو ايقاف مؤقت) كما في
الصورة ادناه
ثم نغلق play و نحفظ التغييرات و نفتح pause بالنقر عليها مرتين و نقوم
بالخطوات السابقة أي نختار media pause ثم نكتب اسم ملف الصوت إلا
أننا نكتب كلمة true بدل false
MediaPause(IconID@"sound",
true)
اكتب الكود اعلاه اذا لم يكن واضح في الصورة
السابقة
افتح previous و اكتب فيه الكود التالي
if
MediaPosition@"sound" - 100 < 1 then
( MediaSeek(@"sound", 1
else
MediaSeek(@"sound",
MediaPosition@"sound" – 100)
end
if
و سأشرح الكود بصورة مختصرة معلوم ان أي ملف صوت
او فيديو ينقسم الي فريمات frames و هذا الكود يعني عند الضغط
علي زر التراجع الي خلف يرجع ملف الصوت بمقدار 100 فريم عند أي ضغطة انظر الصورة
ثم قم بفتح next ثم اكتب فيها الكود التالي
if
MediaPosition@"sound" + 100 > MediaLength@"sound" then
MediaSeek(@"sound",
MediaLength@"sound" - 1)
else
MediaSeek(@"sound",
MediaPosition@"sound" + 100)
end
if
و ايضا يعني عند الضغط علي زر التالي يقوم بالتقدم
في ملف الفديو بمقدار 100 فريم انظر الصورة ادناه
ثم افتح stop و اكتب فيه الكود التالي
GoTo(IconID@"interaction")
و يعني انهاء ملف الفديو او الصوت و العودة الي الinteraction icon الذي سميناه interaction
او يمكننا كتابة الكود التالي اذا علمنا عدد
فريمات ملف الفيديو او الصوت فنقوم بكتابة اخر فريم في الملف
MediaSeek(IconID@"sound",
16912)
كتبنا رقم اخر فريم في الملف
و بذلك نكون قد أنتهينا من درس اليوم و هو آخر درس
في هذه الدورة و أتمني ان تكونوا قد استفدتم منها فما كان من خطأ فمن نفسي و
الشيطان و ما كان من توفيق فمن الله عز و جل
و ادعوا لنا بالتوفيق و السداد و بالمغفرة و
الرحمة لنا و لوالدينا و للمسلمين و المسلمات الأحياء منهم و الأموات و لأمتنا
بالنصر و التمكين .. هذا و صلي الله علي سيدنا محمد و علي آله و صحبه وسلم تسليما
كثيرا سبحان ربك رب العزة عما يصفون و سلام علي المرسلين و الحمد لله رب العالمين
للتواصل:-
نرحب
بجميع ملاحظاتكم ومقترحاتكم في هذه الدورة ويمكنكم التواصل معنا علي البريد :
او
abdalla-9@hotmail.com
او
في صفحة برنامج authorware علي الفيس بوك
او
الاتصال علي الرقم : 00249920509872
دمتم في حمى
الرحمن