زر لتوليد الاسئلة بشكل عشوائى

[خادم المسلمين]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته


اخوانى الاعزاء

كيف نبننى سؤال اكتب الاجابة
بحيث يكون هناك زر يولد اسئلة عشوائية
"يعنى كلما فتحت الملف " لاتأتى الاسئلة بترتيب ثابت
ولكن يتغير ترتيب الاسئلة
http://www.gulfup.com/?tlDGOS

ارفقت لكم الفلاش " المثال"
بغية أن نجد مثل هذه البرمجة فى برنامج الاوتو بلاى

[محمود خليل]

فهمت انك عايز تحول الملف
لو تريد تحويل ملف الفلاش لأوتوبلاى
ابحث فى جوجل عن برنامج يحول الفلاش لأوتوبلاى

[خادم المسلمين]

فهمت انك عايز تحول الملف
لو تريد تحويل ملف الفلاش لأوتوبلاى
ابحث فى جوجل عن برنامج يحول الفلاش لأوتوبلاى

لا اخى

الغرض
هو ابراز من خلال مشروع apz او شرح

امكانية تطبيق ذلك فى برنامج الاوتو بلاى

وليس تحويل ملف الى ملف اخر
برنامج الاوتو بلاى فيه الامكانيات دى" عمل اسئلة تفاعلية"
ولذك نتابع مع الاخوة الاقدم والاكثر خبرة مع الاوتو بلاى

[محمود خليل]

ولذك نتابع مع الاخوة الاقدم والاكثر خبرة مع الاوتو بلاى

زى ما تحب
دى بقى ترجعلك

و بمناسبة رمضان ممكن نتسلى أكتر
حط مرفق عبارة عن ملف نص فيه خمسة أسئلة من أى نوع
بشرط كل سؤال فى سطر واحد

ممكن ساعتها أحاول أساعدك على قد علمى
و عموما براحتك

و حظ موفق مع الاخوة الاقدم

[خادم المسلمين]

زى ما تحب
دى بقى ترجعلك

و بمناسبة رمضان ممكن نتسلى أكتر
حط مرفق عبارة عن ملف نص فيه خمسة أسئلة من أى نوع
بشرط كل سؤال فى سطر واحد

ممكن ساعتها أحاول أساعدك على قد علمى
و عموما براحتك

و حظ موفق مع الاخوة الاقدم
يا اخى انت على دماغنا من فوق
ما تأخدشى الجملة بالحساسية دى
انا كل اللى قصدته ان قسم الاستفسارات هنا كلنا بنتابع فيه
والاقدمية هنا مش بالمدة ولا بالفلسفة ابدا
وانما من اول رد ليك واول مساعدة بتقدمها بيبان مدى علاقتك وصداقتك مع الاوتو بلاى

سبحان الله والله تصدق ان اسلوبك الجميل ده يشبه كثيرا
اسلوب احد الاخوة هنا بالمنتدى
عموما الاسئلة موجودة فى الفلاش تستطيع ان تسخدمها

أيضا قمت بارفاق ملف نصى به الاسئلة وامام كل سؤال اجاباته المحتملة

[سموحة]

شككككرررررررررررررررررررر ااااااااااااااااااااااااا ااااااااااا

[عبود عبود]

مرحبا بالجميع :abc_152:

جارى الإطلاع :abc_051:

[عبود عبود]

استعمل التعليمة البرمجية Math.Random للإختيارات العشوائية


بالتوفيق :abc_138:

[محمود خليل]

استعمل التعليمة البرمجية Math.Random للإختيارات العشوائية
بالتوفيق :abc_138:

بداية صاحب السؤال مش على الخط معانا خالص
لعل المانع خير إن شاء الله

أستاذ عبود عبود
دلوقت
لو فرضنا إننا حنظهر سؤال من 6
إيه يمنع الدالة Math.Random إنها تعطى المخرجات التالية :-
1و1و1و2و3و4
أو
5و5و5و5و5و5

إزاى نخليها تدينا نتيجة مظبوطة ؟؟
صعب ؟؟

فكر :abc_033:
حاول :abc_033:
الحل مرفق :abc_033:

[عبود عبود]

أستاذ عبود عبود
دلوقت
لو فرضنا إننا حنظهر سؤال من 6
إيه يمنع الدالة Math.Random إنها تعطى المخرجات التالية :-
1و1و1و2و3و4
أو
5و5و5و5و5و5

إزاى نخليها تدينا نتيجة مظبوطة ؟؟
صعب ؟؟

فكر :abc_033:
حاول :abc_033:
الحل مرفق :abc_033:


جميل جدا طريقة وضع الحلول بباسورد
واضح أنك الشخص الوحيد الذى يمتلك التغلب على المشكلة التى ذكرتها :abc_051:


ههههههه بالتوفيق أخى محمود

بداية موفقة

نحاول أن نتعلم كما تعلم أخى

[محمود خليل]

جميل جدا طريقة وضع الحلول بباسورد

مش شايف فيها مشكلة طالما فى النهاية الكل حيعرف الحل


واضح أنك الشخص الوحيد الذى يمتلك التغلب على المشكلة التى ذكرتها :abc_051:

تعجبنى صراحتك


نحاول أن نتعلم كما تعلم أخى
كذلك نحن

سيتم وضع الباسوورد بعد رد صاحب السؤال
إلى اللقاء

[عبود عبود]

طيب إكتب على الحل سرى للغاية ههههههههههه


:abc_051:

[محمود خليل]

طيب إكتب على الحل سرى للغاية ههههههههههه


:abc_051:

هههههههههههههههههه
لا سرى و لا حاجة

شكلك مستعجل تعرف الحل
بعتلك الباس برسالة خاصة

إطلع على الحل و رد عليا هنا
لكن بدون نسخ و لصق الكود :abc_088:

إتفقنا ؟؟

أوكى
راجع رسايلك :abc_091:

[عبود عبود]

هههههههههههههههههه
لا سرى و لا حاجة

شكلك مستعجل تعرف الحل
بعتلك الباس برسالة خاصة

إطلع على الحل و رد عليا هنا
لكن بدون نسخ و لصق الكود :abc_088:

إتفقنا ؟؟

أوكى
راجع رسايلك :abc_091:

ماشى شكرا يا حودة
لكن بصراحة عندى شغل غدا وبعد غد سوف أعاين أكوادك حتى أتعلم منها


شكرا لروحك الجميلة

[محمود خليل]

ماشى شكرا يا حودة
لكن بصراحة عندى شغل غدا وبعد غد سوف أعاين أكوادك حتى أتعلم منها


شكرا لروحك الجميلة

و حتى لو مش عايز ترد خالص
و لا يهمك يا أستاذ عبود عبود
دى حرية شخصية

الباس حيطرح للجميع بعد أول رد من صاحب السؤال :abc_088:
ربنا يرجعه بالسلامه

[خادم المسلمين]

شكرا ليك اخ محمود وعذرا لتأخرى لظروف خارجة عن ارادتى

تفضل اخى
نحن جميعا متابعين

[محمود خليل]

لا بأس

if Browse == nil then
Browse = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "Txt Files (*.txt)|*.txt|", "", "txt", false, false);
text = TextFile.ReadToTable(Browse[1]);
end
Questions = {}
for i = 1,#text do
Table.Insert(Questions, i, i);
end
function Rando(My_Table)
local c = #My_Table

while c >= 2 do
local s = math.random(c)
My_Table[c], My_Table[s] = My_Table[s], My_Table[c]
c = c - 1
end
return My_Table
end
Rando (Questions)
for k, v in ipairs (Questions) do
Dialog.Message("Notice", text[v], MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

هذا الكود يحل المعضلة
تحياتى للأستاذ صاحب الفضل الذى رفض ذكر إسمه
كل عام و أنتم جميعا بخير

[خادم المسلمين]

لا بأس

if browse == nil then
browse = dialog.filebrowse(true, "locate file", _desktopfolder, "txt files (*.txt)|*.txt|", "", "txt", false, false);
text = textfile.readtotable(browse[1]);
end
questions = {}
for i = 1,#text do
table.insert(questions, i, i);
end
function rando(my_table)
local c = #my_table

while c >= 2 do
local s = math.random(c)
my_table[c], my_table[s] = my_table[s], my_table[c]
c = c - 1
end
return my_table
end
rando (questions)
for k, v in ipairs (questions) do
dialog.message("notice", text[v], mb_ok, mb_iconinformation, mb_defbutton1);
end

هذا الكود يحل المعضلة
تحياتى للأستاذ صاحب الفضل الذى رفض ذكر إسمه
كل عام و أنتم جميعا بخير

شوف يا غالى
نحن نحتاج شرح واضح
أين اضع هذا الكود
أين اخزن الاسئلة؟ فى الكود لا ملف نصى داخل التجميعة؟

لانى الى الان لم اتلقى منك رداا موضحا ومباشرا
يا ريت تقدم اما شرحا مصورا بالصور او شرح فلاشى او فيديو وحتى لو بدون صوت مش مشكلة

المهم نفهم كيف نستخدم هذا الكود فى عمل سؤال " اكتب الاجابة" بحيث فى كل ضغطة على زر اسمه " التالى" يتولد سؤال اخر



وبطريقة عشوائية

[محمود خليل]

أين اضع هذا الكود


ده معناه انك مجربتش الكود خالص


أين اخزن الاسئلة؟ فى الكود لا ملف نصى داخل التجميعة؟

مش فارقة كتير
المشكلة مش فى الكود
انت عندك مشكلة جامدة فى توظيف الأكواد


يا ريت تقدم اما شرحا مصورا بالصور او شرح فلاشى او فيديو وحتى لو بدون صوت مش مشكلة

كلنا مشغولين
دا انت حتى معندكش وقت تجرب الكود أو حتى لمتابعة للسؤال
ربنا يكون فى عونك

كذلك انا
مشغول حاليا
لما الاقى الوقت اعملك الشرح

[الأمل القادم]

جاري الاطلاع على نموذج الاسئلة المرفقة
موفق بإذن الله ... لك مني أجمل تحية .

[محمود خليل]

هو انت بتناقش رسالة ما جستير؟
سيبك من الاقتباسات وكتر الردود اللى ما استفدناش منها لغاية الوقتى

ليه الأسلوب الموش ظريف ده ؟


خير الكلام ما قل ودل

الإجابة وصلتك بس انت شكلك ملكش علاقة بالبرمجة من الأساس


بئالنا كم يوم بنتابع استفسار وما تلقناش اى رد مباشر وواضح

اتكلم عن نفسك و بس
الكل استفاد


اين تستخدم الاكودا"on show, on click" مثلا

مش عيب انك مبتدئ
العيب انك تصر على عدم التعلم و عايز اللى يديك رغيف يفتح لك بقك و يوكلهولك

عموما اى كود المفروض تجربه فى زورار و لما ميشتغلش تبقى تدينا محاضرة جميلة زى دى


وستجد اغلب من يقدمون الاستفسارات هنا
ممن لم يدرسو ا او يتمكنوا جيدا من استخدام لغة برمجة الاوتو بلاى

صح
بس اللى بياخد كود بيشكر و يتعامل على طول


:abc_012:وتو بة ان الواحد عاد يكتب اى استفسار فى المنتدى:abc_023:


انا برضه توبه اجاوب
بدل ما تشكرنى عمال تقطمنى

اللهم انى صائم
ربنا يهدينا جميعا :abc_023:

[خادم المسلمين]

ليه الأسلوب الموش ظريف ده ؟


الإجابة وصلتك بس انت شكلك ملكش علاقة بالبرمجة من الأساس


اتكلم عن نفسك و بس
الكل استفاد


مش عيب انك مبتدئ
العيب انك تصر على عدم التعلم و عايز اللى يديك رغيف يفتح لك بقك و يوكلهولك

عموما اى كود المفروض تجربه فى زورار و لما ميشتغلش تبقى تدينا محاضرة جميلة زى دى


صح
بس اللى بياخد كود بيشكر و يتعامل على طول



انا برضه توبه اجاوب
بدل ما تشكرنى عمال تقطمنى

اللهم انى صائم
ربنا يهدينا جميعا :abc_023:

اللهم انى صائم!!!!!
اللى بيأخد كود!!!!
هى زكاة الفطر ولا ايه؟
انت حسستنا ان كنا داخلين نشحت مش نتعلم!
هو الكود بكم اليومين دول؟
شوف يا حبيبى سعره كم ورقم حسابك واحنا هنبعتهولك على حسابك او على البريد العادى
عشنا وشوفنا
سبق وان عرضت فى قسم الفلاش هذا الملف

http://www.gulfup.com/?k6DAQp
ولما دخلت قسم الاوتو بلاى
بدخل لاكتشاف معلومة جديدة فى البرنامج
بشوف كدة هل فيه نفس الامكانيات و كنت متوقع رد
كعادة الرد على الاستفساراتت التى تعودناها من الاخوة هنا
وللاسف ردينا عليك اكثر من مرة عشان الفكرة تصلك" فكرة طريقة الرد على الاستفسار"
وبرضه انت مصر على نمط معين "معقد" واللى يهلك من الضحك انك عملت باس وورد للملف التكست
وبتشترط وجود صاحب الموضوع؟
يا اخى الاستفسار يطرحه العضو ليستفيد منه الجميع وليس فرد بعينه
ولو تلاحظ لقد تلقيت بعض الروود "اللى ابدت اندهاشها من اسلوبك"
وكاننا بلسان حالنا بنقولك :abc_012:ده مش اسلوبنا فى الرد ابدا
ياااااما كتبنا استفسارات ورد عليها اخوة فضلاء بمنتهى البساطة ودون ان يحملونا افضالا:abc_028:
:abc_091::abc_087:واحتسبوا اجرهم لوجه الله
اما انت انسان غريب فى ردودك:abc_088:

اللى بيأخد كود واللى بيلحق كود
كرهتنا فى الاوتو بلاى يا محمود

[أبو يوسف]

جزاك الله خيرا اخانا خادم المسلمين وبارك الله فيك :abc_152:

[خادم المسلمين]

تم ايجاد الحل
الاستاذ ثامر بدون كثرة كلام و وفلسفة
انجز المشروع واتضحت الاكواد
فلقد وجت هذا الملف ضمن احد مشاركات الاستاذ ثامر
نشكره من كل قلوبنا
مشروع لتوليد الاسئلة بشكل عشوائى (http://www.abc4web.net/vb/showthread.php?t=29888)

[ثامر أبو بلقيس]

موفق بإذن الله ... لك مني أجمل تحية . :abc_152:

مفيد هذا الحوار لتحقيق المطلوب


من هناااااا (http://forums.coronalabs.com/topic/46555-i-want-to-pick-20-random-numbers-without-repeating-any/)

سنضع تطبيق في أقرب فرصة إن شاء الله

[ثامر أبو بلقيس]

الملف النصي الاول تكون فيه الأسئلة
الملف النصي الثاني تكون فيه الاجابة متوافقة مع الأسئلة من حيث الترتيب
http://www.gulfup.com/?qUrXLs

موفق :abc_138:

[ياسرهتهت]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
أشكرك اخي خــــــــادم المسلمين على طرح هذا الاستفسار ؟
:abc_050::abc_050::abc_050:
الذي استفدت منه كثير .......ولم اكن اعرف كيف استفسر عنة :abc_102:
هذا الملف الذي وضعه استاذنا الفاضل ابو بلقس
:abc_138: كانه رد علي طلبي الذي لم اطلبه :abc_138:
--------------------------------------------------------------------
وشكراً للاخ مـــــحمود خــــــــليل :abc_152:
علي معلومة المفيدة واسلوبه الطريف والجديد
:abc_152::abc_152::abc_152:
========================================
http://im85.gulfup.com/XOH4xd.gif والشكر الاكبر الي استاذنا الفاضل

:abc_114::abc_114: ثامر ابو بلقس :abc_114::abc_114:

http://im73.gulfup.com/J3rWqT.gif




==================

[خادم المسلمين]

الملف النصي الاول تكون فيه الأسئلة
الملف النصي الثاني تكون فيه الاجابة متوافقة مع الأسئلة من حيث الترتيب
http://www.gulfup.com/?qurxls

موفق :abc_138:

مشكور استاذنا الفاضل اشكرك من كل قلبى
ومنتظرين باقى انواع الاسئلة
الاختيار من متعدد
وسحب الككلمة او الحرف فى مكانه المناسب

[ثامر أبو بلقيس]

موفق بإذن الله ... لك مني أجمل تحية .

[امل الماضي]

شكرا لكما .........شكرا للسائل .....وشكرا للمجيب ......بارك الله فيكما وجزاكما الخير كله
موفق بإذن الله ... لك مني أجمل تحية .

[ثامر أبو بلقيس]

لنحاول :
انجاز أسئلة اختيار من متعدد لذا هات ثلاث ملفات نصية أو أكثر بحيث في الملف النصي الواحد 11 سؤالا
مكتوبة بهذا النمط تحت بعضها البعض
اختيار.اختيار.اختيار.اختيا� �.السؤال.رقم الاجابة الصحيحة.
-------
حيث تفصل بين كل اختيار و الاخر أو السؤال أو رقم الجواب الصحيح نقطة .
بهذا النمط توضع 11 سؤالا في الملف النصي الواحد
------------------------------------------------------------------------
مثال :
5 . 15 . سمير.قلم. ماهو مجموع 10+5؟.2.
تونس.مصر.الجزائر.اليمن.ماهو بلد المليون ونصف المليون شهيدا؟.3.

بهذا الشكل يكون 11 سؤالا في الملف النصي
ثم ينجز ملف نصي آخر بنفس الكيفية بأسئلة أخرى .... لتحقيق عشوائية في طرح السؤال
لانها عشوائية ظهور الاختيارات قد تكون متاحة
مع ملاحظة الاختيارات 4 في كل مرة وتحتمل اجابة واحدة صحيحة من الاربعة
سلام :abc_138:

[ثامر أبو بلقيس]

محاولة :
http://www.gulfup.com/?xdGf8B
بالتوفيق :abc_138:

[خادم المسلمين]

محاولة :
http://www.gulfup.com/?xdGf8B
بالتوفيق :abc_138:

رووعة اخى الحبيب
ودى طريقة جميلة جدا وسهلة لاضافة الاسئلة والاجابة على حسب ما يريد المعلم تمام.
الأن
نفسى افهم هذه السطور اللى فالكود ده

اما تعليق على كل سطر

أو حتى المعنى الاجمالى لكل دالة



function split(pString, pPattern)
if string.find(pString,".") then
pString = string.gsub(pString,"%.","'.'")
end
if pPattern == "." then
pPattern = "'.'"
end
local Table = {}
local fpat = "(.-)" .. pPattern
local last_end = 1
local s, e, cap = pString:find(fpat, 1)
while s do
if s ~= 1 or cap ~= "" then
table.insert(Table,cap)
end
last_end = e+1
s, e, cap = pString:find(fpat, last_end)
end
if last_end <= #pString then
cap = pString:sub(last_end)
table.insert(Table, cap)
end
return Table
end
هل يمكن ان يظهر عند كل سؤال صوته؟
صوت يقرأ صيغة السؤال؟
وهل عن د الضغط على الاجابة بالامكان ايضا اظهار صوت يقرأ الاجابة الصحيحة ثم يتلوه صوت التشجيع الدال على ان الاجابة كانت صحية؟

[ثامر أبو بلقيس]

هذا كود عام يستعمل في تجزئة المحتوى النصي أو الرقمي إلى أجزاء حسب العلامة
التي تحددها على أن يكتب هذا الكود في القلوبال دون تغيير أي شيء

لكن عند أمر التطبيق يمكنك وضع العلامة التي ستجزأ به الأثر الكتابي

افتح مشروعا جديدا و ضع الكود في القلوبال و لاتغيير فيه شيء

ثم نضع مثلا اينبوت في التجميعة
ونزرع الكود التالي في زر مثلا :
e = split(Input.GetText("Input1")," ")
Dialog.Message("Notice",(e[1]));
Dialog.Message("Notice",(e[2]));
Dialog.Message("Notice",(e[3]));
Dialog.Message("Notice",(e[4]));

لاحظ في السطر الاول أني اخترت العلامة الفاصلة هي فراغ وواضح أني سأتعامل مع جملة من 4 كلمات

أكتب الان في الانبوت هذه العبارة:
زر لتوليد الاسئلة عشوائيا

ستظهر لك الجملة بالمفردة لأن بين الواحدة و الثانية فراغ وهو المختار
وهكذا لو وضعت علامة أخرى مهما كانت واعلنتها في بداية كود التنفيذ
سيقسم المحتوى حسب تلك العلامة و في مثالنا استعملتها لتجزئة الاختيارات و الاجابة و رقم الجواب الصحيح
ليسهل عني التعامل معها

لاأجيد الشرح جيدا أرجو أن الفائدة منه وصلت
يمكنك الرجوع لهذا الموضوع :
http://www.abc4web.net/vb/showthread.php?t=29732&page=2

[ثامر أبو بلقيس]

هل يمكن ان يظهر عند كل سؤال صوته؟
صوت يقرأ صيغة السؤال؟
وهل عن د الضغط على الاجابة بالامكان ايضا اظهار صوت يقرأ الاجابة الصحيحة ثم يتلوه صوت التشجيع الدال على ان الاجابة كانت صحية؟

الجزء الأخير مادام تحديد الجواب الصحيح متعلق بتقويم و بالضغط عليه ارى أنه من الممكن أن يستدعي معه صوت الاجابة الصحيحة
بمعنى اذا تحقق شرط الاجابة صحيحة سيعطي درجة للطالب ضف معها يقرأ صوت هاته الاجابة ----
الجزء الأول من سؤالك قراءة صيغة السؤال ليس صعبا لكن يحتاج لتركيز لا شيء في بالي الان
موفق

[خادم المسلمين]

شكرا اخى ثامر واتابع اى جديد منك فى نفس الموضوع

[سعيدون]

مشكورين مشكورين
الف تحية للابطال

[الباب]

شـكــــرا لك وبارك الله فيك

[منوبة]

نفس السؤال كنت حابب اسئله فشكرا لصاحب السؤال وشكرا لكل من جاوب بما يعرفه وشكرا للمنتدى الذي يجمعنا جميعا

[نجوم ليبيا]

السلام عليكم ورحمة الله وبركاته شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ربيع]

لا بأس

if Browse == nil then
Browse = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "Txt Files (*.txt)|*.txt|", "", "txt", false, false);
text = TextFile.ReadToTable(Browse[1]);
end
Questions = {}
for i = 1,#text do
Table.Insert(Questions, i, i);
end
function Rando(My_Table)
local c = #My_Table

while c >= 2 do
local s = math.random(c)
My_Table[c], My_Table[s] = My_Table[s], My_Table[c]
c = c - 1
end
return My_Table
end
Rando (Questions)
for k, v in ipairs (Questions) do
Dialog.Message("Notice", text[v], MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

هذا الكود يحل المعضلة
تحياتى للأستاذ صاحب الفضل الذى رفض ذكر إسمه
كل عام و أنتم جميعا بخير

شــكــرا :abc_152:

[ابوسوار]

الفين شكر وتحية

[ساندى كريم]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية . :abc_050:

[منوبة]

شكرا للجميع وبارك الله فيكم
:abc_152::abc_152:

[kiaamed]

شككككرررررررررررررررررررر اااااا

[يوسف البراهيم]

الله يعطيك العافية

[حليبساخن]

السلام عليكم ورحمة الله وبركاته
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .