المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : الى الاستاذ عبدالهادي ممكن


يوسف البراهيم
10-01-2018, 06:17 PM
السلام عليكم

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

عبد الهادي بهاب
10-01-2018, 06:20 PM
السلام عليكم ورحمة الله وبركاته

ساحاول ان شاء الله

عبد الهادي بهاب
10-01-2018, 06:24 PM
السلام عليكم

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

كيف الازرار تتحرك الى الاسفل ؟
اي مشروع ؟؟

يوسف البراهيم
10-01-2018, 08:38 PM
كيف الازرار تتحرك الى الاسفل ؟
اي مشروع ؟؟

هذه صورة من المشروع
http://gulfup.co/i/00677/b4tocxzlx1kl.png

هذا مشروعي للتجربة
http://gulfup.co/51e4fpmwac9i

عبد الهادي بهاب
10-01-2018, 10:33 PM
هذه صورة من المشروع
http://gulfup.co/i/00677/b4tocxzlx1kl.png

هذا مشروعي للتجربة
http://gulfup.co/51e4fpmwac9i

في التايمر ضع الكود :

if e_ID==1 then
if Button.GetPos("Button1").Y >= Paragraph.GetPos("Paragraph1").Y then Page.StopTimer(1);
for i = 1,3 do Button.SetPos("Button"..i, Button.GetPos("Button"..i).X, -25 ); end
Page.ClickObject("xButton1") ;
else
for i = 1,3 do Button.SetPos("Button"..i, Button.GetPos("Button"..i).X, Button.GetPos("Button"..i).Y+2 );
end
end
end

الان امح الموجود في xbutton و عوضه بالتالي :
for i = 1,3 do Button.SetPos("Button"..i, Button.GetPos("Button"..i).X, -25 ); end

for i=1,3 do
Button.SetProperties("Button"..i,{ButtonFile = "AutoPlay\\Buttons\\gris.btn"});
end

pos={};
for i=1,3 do
pos[i] = Button.GetPos("Button"..i);
end
---------------
if ListBox.GetCount("ListBox1") < 1 then
ListBox.DeleteItem("ListBox1", LB_ALLITEMS);
for i = 1 , ListBox.GetCount("ListBox2") do
q = ListBox.GetItemText("ListBox2", i);
a = ListBox.GetItemData("ListBox2", i);
ListBox.AddItem("ListBox1", q, a)
end
end
---------------------
igli = Math.Random(1,ListBox.GetCount("ListBox1"));
qus = ListBox.GetItemText("ListBox1", igli);
Paragraph.SetText("Paragraph1", qus)
-------------------------------------
ala = ListBox.GetItemData("ListBox1", igli);
f1 = String.Find(ala, ".", 1);
f2 = String.Find(ala, ".", f1+1);
long = String.Length(ala);
v1 = String.Mid(ala, 1, f1-1);
Button.SetText("Button1", v1);
v2 = String.Mid(ala, f1+1, f2-f1-1);
Button.SetText("Button2", v2);
v3 = String.Mid(ala, f2+1, long-f2);
Button.SetText("Button3", v3);
------------------------------------------
for i=1,#pos do
ali = Math.Random(1,#pos);
Button.SetPos("Button"..i,pos[ali].X ,pos[ali].Y);
Table.Remove(pos,ali);
end
Page.StartTimer(30,1)

ListBox.DeleteItem("ListBox1",igli);

لا تنسى ان تنسخ السيبوكس ليصبح لديك 2 من اليسبوكس
اجعل الازار بحجم كبير من حيث العرض
ممكن تتحكم في السرعة فقط بتغيير (30 ) في page.sarttime
ضع الباراغراف في الاسفل ( مهم جدا )

جرب

يوسف البراهيم
11-01-2018, 05:46 AM
الله يعطيك العافية

ضبطت معاي

يوسف البراهيم
11-01-2018, 11:17 AM
في التايمر ضع الكود :

if e_id==1 then
if button.getpos("button1").y >= paragraph.getpos("paragraph1").y then page.stoptimer(1);
for i = 1,3 do button.setpos("button"..i, button.getpos("button"..i).x, -25 ); end
page.clickobject("xbutton1") ;
else
for i = 1,3 do button.setpos("button"..i, button.getpos("button"..i).x, button.getpos("button"..i).y+2 );
end
end
end

الان امح الموجود في xbutton و عوضه بالتالي :
for i = 1,3 do button.setpos("button"..i, button.getpos("button"..i).x, -25 ); end

for i=1,3 do
button.setproperties("button"..i,{buttonfile = "autoplay\\buttons\\gris.btn"});
end

pos={};
for i=1,3 do
pos[i] = button.getpos("button"..i);
end
---------------
if listbox.getcount("listbox1") < 1 then
listbox.deleteitem("listbox1", lb_allitems);
for i = 1 , listbox.getcount("listbox2") do
q = listbox.getitemtext("listbox2", i);
a = listbox.getitemdata("listbox2", i);
listbox.additem("listbox1", q, a)
end
end
---------------------
igli = math.random(1,listbox.getcount("listbox1"));
qus = listbox.getitemtext("listbox1", igli);
paragraph.settext("paragraph1", qus)
-------------------------------------
ala = listbox.getitemdata("listbox1", igli);
f1 = string.find(ala, ".", 1);
f2 = string.find(ala, ".", f1+1);
long = string.length(ala);
v1 = string.mid(ala, 1, f1-1);
button.settext("button1", v1);
v2 = string.mid(ala, f1+1, f2-f1-1);
button.settext("button2", v2);
v3 = string.mid(ala, f2+1, long-f2);
button.settext("button3", v3);
------------------------------------------
for i=1,#pos do
ali = math.random(1,#pos);
button.setpos("button"..i,pos[ali].x ,pos[ali].y);
table.remove(pos,ali);
end
page.starttimer(30,1)

listbox.deleteitem("listbox1",igli);

لا تنسى ان تنسخ السيبوكس ليصبح لديك 2 من اليسبوكس
اجعل الازار بحجم كبير من حيث العرض
ممكن تتحكم في السرعة فقط بتغيير (30 ) في page.sarttime
ضع الباراغراف في الاسفل ( مهم جدا )

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

عبد الهادي بهاب
11-01-2018, 06:43 PM
الامور طيبه
باقي فقط اذا وصلت الأزرار الى الأسفل و لم يجب على السؤال
تنحسب له في عداد الخطأ بنقطة

اضف ليبال 2 label لاختساب الاجابات الخاطئة

الان في الازرار 2 و 3 نضيف السطر التالي في اعلى الكود الموجود

Label.SetText("Label2", tonumber(Label.GetText("Label2"))+1);


و نضيف نفس الكود السابق في التايمر تحت السطر الثاني 2

يوسف البراهيم
11-01-2018, 08:06 PM
اضف ليبال 2 label لاختساب الاجابات الخاطئة

الان في الازرار 2 و 3 نضيف السطر التالي في اعلى الكود الموجود

label.settext("label2", tonumber(label.gettext("label2"))+1);


و نضيف نفس الكود السابق في التايمر تحت السطر الثاني 2

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

ضبط

عبد الهادي بهاب
11-01-2018, 08:09 PM
لله يعطيك العافية

ضبط

الحمد لله
ننتظر مشروعا في المنتدى

يوسف البراهيم
11-01-2018, 08:22 PM
الحمد لله
ننتظر مشروعا في المنتدى

ان شاء الله

يوسف البراهيم
12-01-2018, 11:39 AM
الحمد لله
ننتظر مشروعا في المنتدى

سلام عليكم

عزيزي الاستاذ عبدالهادي

http://gulfup.co/lvse5wnvs5ld

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

عبد الهادي بهاب
12-01-2018, 08:09 PM
سلام عليكم

عزيزي الاستاذ عبدالهادي

http://gulfup.co/lvse5wnvs5ld

هولك حالص الشكر

وعليكم السلام ورحمة الله وبركاته
اولا ارى من الاحدى و النقع توجيه سؤال عام يتضمن موضوع الاستفسار
ثانيا ضع الموضوع في موضوع مستقل بسؤال واضح ينتفه به الجميع و يفيدك الجميع