Jump to content

#Dr.BnG

Members
  • Posts

    162
  • Joined

  • Last visited

Everything posted by #Dr.BnG

  1. تمام ظبطت !!! - بس تعرف تخلليها تلف ابطا شوي؟؟؟
  2. السلام عليكم عندي طلب صغير معي مود الصورة المتحركة يلي تضل ثابته فوق علي اليمين بس ابيها تلف يعني تدور وهي بمكانها ممكن الكود ومكان وضعه؟ وشكرا
  3. انك تسويها علي سيريالات ما انصحك فيها مب حلوة يعني لو تبي تعطي لاحد الخاصية حقت العاجل لسا بتضل تفتح المود ووتضيف سيرياله وكذا فا مشوار ------------ بس ابشر بفتح الجهاز التاني واسويها لك -------------- ولو تبيها سيريالات ممكن تسوي شي افضل اقدر اسويلك لوحة من السيرفر تضيف فيها سيريالات بدل تفتح المود ومشوار وكذا ----------------- القرار الاخير لك
  4. تمام ارسلت لك علي الفيس طلب صداقة اسمي Mostafa Ibrahim
  5. مكتوب الكود ذا لو تششوف لك ما يظبط
  6. السلام عليكم معي مود لوحة اعلي 40 تواجد ساعات بالسيرفر ويطلع فيها اسماء الاعبين وكذا بس ابي اسوي احط زخرفة لاسم معين وبدل يطلع اسم الاعب يطلع زخرفة الي حطيتها ووالزخرفة احطها من المود نفسه في طريقة ولا لا؟؟؟
  7. مين قال الكود من صنعي + انا ناسخ اول جزء بس
  8. السلام عليكم عندي مشكلة بمود التاجات الخاصة عندي بمود تاجاتي مسوي تيكست ل تاجات الرتب وتيكست ل لوحة التاجات الخاصة وكذا ولما اجي ارفع لمود واشغله يشتغل تاجات رتبة عادي بدون تكرار ولما افتح لوحة التاجات الخاصة واركب لي تاج خاص يجي تكرار التكرار عبارة عن يجي تاج الخاص ويجي تاج الرتبة ولما اسحب تاج الخاص يجي تاج الرتبة بس كلمت مبرمج وقالي المشكلة انهم مو مربطين مع بعض مود التاجات + مود التاجات الخاصة ا لو ممكن احد يربطهم لي لاني حاولت مب عارف وشكررا <3
  9. ما عررررررررررررررررررررررررررررررفت اسويها يهوو سويها لي عدل الكود وحطها
  10. انا حاولت وما عرفت لو عرف تسويها لي زين لو ما تبي خلاص وشكرا لك
  11. سويته كذا وما ظبط وش المشكلة؟؟ function createCode(code,prize,thePlayer) local name = getPlayerName (thePlayer) for k,v in ipairs( getElementsByType("player") ) do exports.easytext:displayMessageForPlayer(v,1, "=========", wordTime, 0.17, 0.5, 0, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,2, "Word : "..code.."", wordTime, 0.17, 0.533, 255, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,3, "Prize : "..prize.."$", wordTime, 0.17, 0.563, 255, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,4, "=========", wordTime, 0.17, 0.593, 0, 255, 0, 255, 1.6) end outputChatBox ( "بارسال كلمة[ "..getPlayerName(source).." ] قام الاعب",root,0,255,0,true) local name = getPlayerName (thePlayer) ضفت هادي بعد الفنكشن ------------ و وضعت ذي بلرسالة الي تطلع بالشات outputChatBox ( "بارسال كلمة[ "..getPlayerName(source).." ] قام الاعب",root,0,255,0,true) وما ظبطت وش الحل
  12. كيف اضيف وظيفة الاسم وش كودها؟
  13. السلام عليكم عندي مود مثل العاجل اكتب شي من حرف ه وتظهر للكل مثل عاجل بس عندي مشكلة ابي اخلي مافي احد يكتب فيه غير برتبة معينة محاولتي الفاشلة local Groups = { "RandomWords", "word" } function isPlayerAdmin(player) for k,v in ipairs ( Groups ) do if ( isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(player)), aclGetGroup(v)) ) then return true end end end for k,v in ipairs ( {"randomcode","randomword","RW","rd"} ) do addCommandHandler(v,function(plr,cmd,prize,...) if plr and hasObjectPermissionTo(plr,"function.kickPlayer") then if ( not prize ) then makeRandomCode() else word = table.concat({...}, " ") if ( word ) then makeRandomCode(word,prize) end end end end ) end ابي احد يظبطلي الكود يخله ما يكتب غير بالرتب ذي وشكرا
  14. السلام عليكم ورحمة الله وبركاته معي كود ولما اسوي شي يطلع بالشات ابي لما اسوي الشي يطلع بالشات اسم الاعب الي سوا function createCode(code,prize) for k,v in ipairs( getElementsByType("player") ) do exports.easytext:displayMessageForPlayer(v,1, "=========", wordTime, 0.17, 0.5, 0, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,2, "Word : "..code.."", wordTime, 0.17, 0.533, 255, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,3, "Prize : "..prize.."$", wordTime, 0.17, 0.563, 255, 255, 0, 255, 1.6) exports.easytext:displayMessageForPlayer(v,4, "=========", wordTime, 0.17, 0.593, 0, 255, 0, 255, 1.6) end outputChatBox("- Random Words : #FFFF00Enter the word shown below to win the prize.",root,0,255,0,true) outputChatBox("=========",root,0,255,0,true) outputChatBox("Word : "..code.."",root,255,255,0,true) outputChatBox("Prize : "..prize.."$",root,255,255,0,true) outputChatBox("=========",root,0,255,0,true) outputChatBox("- #FFFF00You can see the word down on your screen.",root,0,255,0,true) -- startCodeTimer() wordOn = true end يعني مكان الكود ذا outputChatBox("- Random Words : #FFFF00Enter the word shown below to win the prize.",root,0,255,0,true) يكون يطلع اسم الي ارسل الكلمة وشكرا لككككمء
  15. xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,255,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا ! ",source,255,0,255,true); end local Wins = ( getElementData ( source , "Wins" ) or 0 ) if ( Wins >= tonumber(Price)) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,255,true); else outputChatBox("**ليس لديك ونز كافي",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) احط السيرفر كذا؟
  16. xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox(" * يجب عليك التسجيل اولاَ",source,255,0,255,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("** لديك هذهـ الرتبة فعـلا ! ",source,255,0,255,true); end local sValue = getElementData( source,'PlayTime' ) if not sValue then sValue = '0:0:0' end local data = split(sValue,':') local hour = tonumber( data[1] ) if hour == nil or not tonumber(hour) then hour = 0 end if ( hour >= tonumber(Price)) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("** تم اضافة الرتبة بنجاح | "..Name,source,0,255,255,true); else outputChatBox("**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler("Accept:the:request",root,xAddToGroupFunction_) Server ---------------------- -- Setting ---------------------- local Key = "F7" local Admin = { { "V.I.P", 10 }, { "Vote Police", 20 }, { "Police", 30 }, { "Msuol Police", 50 }, { "Vote Moderator", 80 }, { "Moderator1", 100 }, { "Moderator2", 150 }, { "SuperModerator1", 200 }, { "Admin1", 500 }, { "Admin Prinse", 550 }, { "V.I.P Admin", 600 }, { "Specail Admin", 800 }, { "Admin Mo7TaReF", 1000 }, { "Admin Mngem", 1500 }, { "senior Admin", 2000 }, { "SPECIAL PRINSE", 2500 }, } ---------------------- -- Setting ---------------------- GiveAdmin = { Window = {}, gridlist = {}, button = {}, label = {}, } function centerWindow(center_window) local screenW,screenH=guiGetScreenSize() local windowW,windowH=guiGetSize(center_window,false); local x,y = (screenW-windowW)/2,(screenH-windowH)/2 guiSetPosition(center_window,x,y,false); end GiveAdmin.Window[1] = guiCreateWindow(445, 132, 390, 339, "=[نــظًًـأم الرتبـً بأًلسـًًـاعأت ]=", false); centerWindow(GiveAdmin.Window[1]); guiSetVisible(GiveAdmin.Window[1],false); guiWindowSetSizable(GiveAdmin.Window[1], false); guiSetAlpha(GiveAdmin.Window[1], 1.00); guiSetProperty(GiveAdmin.Window[1], "CaptionColour", "FFF70000"); guiSetFont(GiveAdmin.label[1], "default-bold-small") guiLabelSetColor(GiveAdmin.label[1], 255, 0, 0) GiveAdmin.gridlist[1] = guiCreateGridList(9, 51, 267, 397, false, GiveAdmin.Window[1]); guiGridListAddColumn(GiveAdmin.gridlist[1], "#", 0.2) guiGridListAddColumn(GiveAdmin.gridlist[1], "الرتبة #", 0.4); guiGridListAddColumn(GiveAdmin.gridlist[1], "الساعات #", 0.5); guiSetFont(GiveAdmin.label[2], "default-bold-small"); guiLabelSetColor(GiveAdmin.label[2], 41, 255, 0); GiveAdmin.button[1] = guiCreateButton(281, 268, 105, 26, ":;|اترقـًـية ", false, GiveAdmin.Window[1]); guiSetFont(GiveAdmin.button[1], "default-bold-small"); guiSetProperty(GiveAdmin.button[1], "NormalTextColour", "FFF70000"); for k,v in ipairs ( Admin ) do row = guiGridListAddRow(GiveAdmin.gridlist[1]); guiGridListSetItemText(GiveAdmin.gridlist[1],row,1,''..k..'-',false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,2,v[1],false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,3,v[2],false,false); guiGridListSetItemText(GiveAdmin.gridlist[1],row,4,v[3],false,false); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,2,0,255,0); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,0) guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,0); guiGridListSetItemColor(GiveAdmin.gridlist[1],row,1,255,0,0); end xMainFunctions_ = function ( ) local row, col = guiGridListGetSelectedItem ( GiveAdmin.gridlist[1] ) local Group = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,3 )); local Price = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,4 )); local Name = tostring ( guiGridListGetItemText(GiveAdmin.gridlist[1],row,2 )); if ( row and col and row ~= -1 and col ~= -1 ) then triggerServerEvent("Accept:the:request",localPlayer,Group,Price,Name); else outputChatBox("* الرجاء اختيار رتبةة !",255,0,0,true); end end addEventHandler("onClientGUIClick",GiveAdmin.button[1],xMainFunctions_,false); xBindFunction_ = function () guiSetVisible(GiveAdmin.Window[1],not guiGetVisible(GiveAdmin.Window[1])); showCursor(guiGetVisible(GiveAdmin.Window[1])); end bindKey(Key,"down",xBindFunction_); Client
  17. ممكن تكتبلي الكود كامل
×
×
  • Create New...