Jump to content

Booo

Members
  • Posts

    335
  • Joined

  • Last visited

Everything posted by Booo

  1. يخوي ماتوصل للزعل ان شاء الله عوآفي عليه
  2. https://wiki.multitheftauto.com/wiki/GetPlayerAcls http://im71.gulfup.com/su3g0G.png تصرف اقل مايقال عنه ، عمل صبياني وظيفه تجلس تشتغل عليها ساعه والا ساعتين ويجيك واحد ببرودة اعصاب يحذفها ويحط وظيفته بحجة انه مسويها من قبل للمعلوميه ياوسام ترا كودك يختلف عن كودي ولو تلاحظ كودك يرجع قيمة جدول function getPlayerAcls(thePlayer) local acls = {} local account = getPlayerAccount(thePlayer) if (account) and not (isGuestAccount(account)) then local accountName = getAccountName(account) acls = {} for i,group in ipairs(aclGroupList()) do if (isObjectInACLGroup( "user." ..accountName, group)) then local groupName = aclGroupGetName(group) table.insert(acls, groupName) end end end return acls end بينما لو تدقق بالكود الي كاتبها راح تلاحظ القيمه الي ترجع نصيه function getPlayerAllGroups(player) local account = getPlayerAccount ( player) if ( isGuestAccount ( account ) ) then return false end local AclList = {} AclList["Groups"] = {} AclList["getGroups"] = {} for _, group in ipairs ( aclGroupList() ) do table.insert ( AclList["Groups"],aclGroupGetName ( group ) ) end for k ,v in pairs(AclList.Groups) do if isObjectInACLGroup ( "user."..getAccountName ( account ), aclGetGroup (v) ) then table.insert ( AclList["getGroups"],v) end end return table.concat(AclList.getGroups, ",") end وايضا يالغالي اذا تبي تحذف كود خذ اذن المشرف قبل ماتسوي شي بالويكي
  3. عيونك الخقق لبى قلبك وان شاء الله نكمل التحركات زي من الوسط ل اليسار علشان لاجيت تقفل النافذه تضبط
  4. ترا كذا بعد يضبط نفس كودك الاول Window = guiCreateWindow(383, 213, 681, 393, "", false) guiSetVisible (Window,false) function open() guiSetVisible (Window, not guiGetVisible(Window)) showCursor(guiGetVisible(Window)) guiMoveRightToCenter(Window) end bindKey ("F2", "down", open) TimeGuiSetRightC = { } function guiMoveRightToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,-x,y,false) TimeGuiSetRightC[gui] = setTimer(guiMoveRightToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (x1 >= x) then killTimer(TimeGuiSetRightC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,x1+10,y,false) end end
  5. على قدر آهل العزم تأتي العزآئم آهني فيك روح العزيمه يأبطل لا ان شاء الله تصير مافيه شي مستحيل لكن هي مشكلتها زي ماقلت بتاخذ وقت طويل يعني لازم كل الدوال تترجم للعربي لكن بالمقابل لو نسوي ملف مفتوح وكل عضو يترجم بيجي الوقت ان شاء الله الي نقول نقدر نبرمج بالعربي
  6. زي كذا والوظايف الي بالموضوع ترا كلها امثله تقدر تتعلم عليها جرب كذا يالغالي Window = guiCreateWindow(383, 213, 681, 393, "", false) guiSetVisible (Window,false) function open() if guiGetVisible(Window) == false then guiSetVisible (Window, true) guiMoveRightToCenter(Window) showCursor(true) else showCursor(false) guiSetVisible (Window,false) end end bindKey ("F2", "down", open) TimeGuiSetRightC = { } function guiMoveRightToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,-x,y,false) TimeGuiSetRightC[gui] = setTimer(guiMoveRightToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (x1 >= x) then killTimer(TimeGuiSetRightC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,x1+10,y,false) end end
  7. بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته آخباركم يآشباب إن شاء الله بخير بغيت اخذ رآيكم بفكره البرمجه بالغه العربيه . عطني رأيك تنفع البرمجه بالعربيه ؟ مثال للبرمجه بالغه العربيه وظيفة رسالة-ترحيب ()[color=#0080FF]ا[/color] اظهار-شات("ولكمووو نورت السيرفر",سورس)[color=#4080FF]ا[/color] انهاء اضف-تعليمة("اذا-دخل-لاعب-السيرفر",روت,رسالة-ترحيب)[color=#4040FF]ا[/color] مقآبلها function welcomemsg () outputChatBox("ولكمو نورت السيرفر",source) end addEventHandler("onplayerjoin",root,welcomemsg) مع والا ضد !
  8. تعلم البرمجه ^ سوى لك كم سكربت وقيم مود ^ بتسوي وظايف بالهبل هذا الي اقدر اقوله لك اعذرني التعبير زيرو
  9. https://wiki.multitheftauto.com/wiki/GetPlayerAcls يآصاحبي ليه ماتحطها هنآ https://wiki.multitheftauto.com/wiki/Useful_Functions كآن وفرت علينا وقت .. ------------------------------------------------------------------------------------------------------------------------------- بسم الله الرحمن الرحيم Client gui library لتحريك الواجهه من فوق لـ الوسط استخدم الكود هذا TimeGuiSetTopC = { } function guiMoveTopToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,x,-w2,false) TimeGuiSetTopC[gui] = setTimer(guiMoveTopToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (y1 >= y) then killTimer(TimeGuiSetTopC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,x1,(y1+10),false) end end لتحريك الواجهه لـ اليمين لـ الوسط استخدم الكود هذا TimeGuiSetRightC = { } function guiMoveRightToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,-x,y,false) TimeGuiSetRightC[gui] = setTimer(guiMoveRightToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (x1 >= x) then killTimer(TimeGuiSetRightC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,x1+10,y,false) end end لتحريك الواجهه من تحت لـ الوسط استخدم الكود هذا TimeGuiSetDownC = { } function guiMoveDownToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,x,(w2*4),false) TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (y1 <= y) then killTimer(TimeGuiSetDownC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,x1,(y1-10),false) end end لتحريك الواجهه لليسار لـ الوسط استخدم الكود هذا TimeGuiSetLeftC = { } function guiMoveLeftToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,(w1*4),(y),false) TimeGuiSetLeftC[gui] = setTimer(guiMoveLeftToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (x1 <= x) then killTimer(TimeGuiSetLeftC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,(x1-10),y1,false) end end ----------------------------------------------------- مثآل TimeGuiSetLeftC = { } function guiMoveLeftToCenter(gui) if getElementData(gui,"HelhGui") == false then setElementData(gui,"HelhGui",true) local s1,s2=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (s1-w1)/2,(s2-w2)/2 guiSetPosition(gui,(w1*4),(y),false) TimeGuiSetLeftC[gui] = setTimer(guiMoveLeftToCenter,50,0,gui) end local a,b=guiGetScreenSize() local w1,w2=guiGetSize(gui,false) local x,y = (a-w1)/2,(b-w2)/2 local x1,y1 = guiGetPosition ( gui, false) if (x1 <= x) then killTimer(TimeGuiSetLeftC[gui]) setElementData(gui,"HelhGui",false) else guiSetPosition(gui,(x1-10),y1,false) end end addEventHandler( "onClientResourceStart",resourceRoot, function ( startedRes ) myWindow = guiCreateWindow ( 0, 0, 0.3, 0.3, "Booo", true ) myLabel = guiCreateLabel ( 0.2,0.2,0.3, 0.3, "u Love Me ?",true,myWindow) guiMoveLeftToCenter(myWindow) end )
  10. وعليكم السلام ورحمة الله وبركاته واتيش يآصاحبي ، إقصد بالتوفيق لك سؤالين على الطآير يإصاحبي الاول : وش معنى كلمة [WIP] الي بعنوان الموضوع ؟؟ الثاني ' : المابات الي بالحرب ثآبته يعني مآب واحد ؟؟ والا مجموعة مابات تتغير بعد كل ماب؟
  11. الله يعطيك العافيه يآبرستيج على الطريقه فكيت آزمة منتدى وإنا إخوك
  12. بسم الله الرحمن الرحيم وظيفه تقوم بجلب جميع القروبات للاعب * لازم يكون مسجل دخول بحسابه فقط سيرفر صيغة الوظيفه getPlayerAllGroups(player) الكود function getPlayerAllGroups(player) local account = getPlayerAccount ( player) if ( isGuestAccount ( account ) ) then return false end local AclList = {} AclList["Groups"] = {} AclList["getGroups"] = {} for _, group in ipairs ( aclGroupList() ) do table.insert ( AclList["Groups"],aclGroupGetName ( group ) ) end for k ,v in pairs(AclList.Groups) do if isObjectInACLGroup ( "user."..getAccountName ( account ), aclGetGroup (v) )then table.insert ( AclList["getGroups"],v) end end return table.concat(AclList.getGroups, ",") end مثآل مثآل من عناد الله يعطيه العآفيه addCommandHandler ( "mygroups", function ( p ) local groups = getPlayerAllGroups ( p ) if groups then outputChatBox ( getPlayerName ( p ).. " [ "..groups.." ].", root, 255, 255, 0, true ) end end ) https://wiki.multitheftauto.com/wiki/GetPlayerAllGroups
  13. خله يخلص وآبشر بالسيرفر باقي شغآل على لوحة الادمنيه
  14. فري روم ومصآرعه وان شاء الله الريس بالطريق
  15. حنا نتكلم عن استخدام string.format بالكود .! وتقدر تسوي بدونها string.format اقصد من ردي وش الفايده انك تستخدم ع العموم ما قصرت . http://www.lua.org/pil/20.2.html ولو كن المفروض تشرح الرموز كلها افضل , فيه ناس ما تعرفها ذذ بالتوفيق يـ ابن الناس انت من وين تفهم قلت لك حنا نتكلم عن string.format يعني الرجال قال لي ابي مثال نستخدم فيها الداله وكتبت له مثال استخدمنا فيها سترنق فورمات فهمت ؟ وبالنسبه للرموز يالحبيب هذي كل الرموز الي تخص سترنق فورمات والي حاط رابطها هذي للداله ثانيه ماتخص سترنق فورمات وترا ماهو عيب انك تقول مااعرف الرموز هذي ماهو لازم تقول "فيه ناس ما تعرفها " خلك صريح لبى قلببك
  16. السلام عليكم ورحمة الله وبركاته ياشباب فيه Multi Gamemode من برمجتي وافكر اني ابيعه احد يشتري ؟؟ للمعلوميه المود تم تجربته وشغال ان شاء الله 100%
  17. حنا نتكلم عن استخدام string.format بالكود .!
  18. حيآآك الله يانصور منؤر الحته
  19. عن عائشة رضي الله عنها قالت: قدم رسول الله صلى الله عليه وسلم من سفرٍ وقد سترتُ سهوة لي بقرامٍ فيه تماثيلُ، فلما رآهُ رسولُ الله صلى الله عليه وسلم هتكه وتلون وجهه وقال: (( يا عائشةُ: أشدُّ الناس عذاباً عند الله يوم القيامة الذي يضاهون خلق الله )) . متفق عليه السهوةُ : كالصُّفة تكون بين يدي البيت. القِرام بكسر القاف: ستر رقيق هتكه : أفسد الصورة التي فيه. الشـــــــــــــــــــــــــــ ـرح نقل المؤلف النووي - رحمه الله- في كتابه رياض الصالحين في باب الغضب إذا انتهك شرع الله- وسبق لنا الكلام على الآيات التي صدر بها المؤلف هذا الباب، وأما الأحاديث فمنها حديث عائشة رضي الله عنها؛ أن النبي صلى الله عليه وسلم قدم من سفر فوجدها قد سترت سهوةً لها بقرامٍ فيه تماثيل، يعني فيه صورة، فهتكه النبي صلى الله عليه وسلم ، وأخبر (( أن أشد الناس عذاباً الذين يضاهون بخلق الله)) يعني المصورين، فهم أشد الناس عذاباً، لأنهم أرادوا أن يضاهوا الله سبحانه وتعالى في خلقه، وفي تصويره. وكانوا فيما ... يصورون باليد؛ لأنه ليس عندهم آلات وأجهزة تلتقط الصور بدون عمل يدوي، فكانوا يخططون بأيديهم، فيأتي الحاذق منهم ويصور صورة بيده على أنها كالذي صوره ويتقنها لتشابه صورة الله، ليُقال: ما أشد مهارة هذا الرجل، وما أعرفه، كيف استطاع أن يقلد خلق الله عزّ وجلَّ؟ فهم يريدون بذلك أن يشاركون الله سبحانه وتعالى في تصويره، وهو سبحانه وتعالى لا شريك له : (هُوَ الَّذِي يُصَوِّرُكُمْ فِي الْأَرْحَامِ كَيْفَ يَشَاءُ)(آل عمران:6)، ( وَصَوَّرَكُمْ فَأَحْسَنَ صُوَرَكُمْ )(غافر: 64) . فهتكه: يعني مزقه عليه الصلاة والسلام. وفي هذا دليلٌ على مشروعية تمزيق الصور التي تصور باليد؛ لأنه يضاهي بها خلق الله عزّ وجلّ، وإقرار المنكر كفعل المنكر، وفيه العضب إذا انتهكت حرمات الله عزّ وجلّ؛ لأن النبي صلى الله عليه وسلم غضب وهتكه.
  20. موفق خير وياليت لو تحط صور للبرنامج
  21. بآرك الله فيك اسئل الله ان يثبتنا بالقول الثابت بالدنيا والاخره اللهم امين اللهم وآت محمد الوسيلة والفضيله وابعثه اللهم مقاما محمود الذي وعدته رضياً بالله ربا وبالاسلام ديناً ومحمد صلى الله عليه وسلم رسولاً ونبياً
  22. صحيح ياشباب صارت المشككله من Notepad الله يعطيكم العافيه يغلق
  23. نفس المشكلله ياصاحبي بالنسخه الاخيرهه
×
×
  • Create New...