Jump to content

SaedAmer

Members
  • Posts

    906
  • Joined

  • Last visited

Everything posted by SaedAmer

  1. كده ؟ بس يظهر للكل addEventHandler("onPlayerChat",root, function( text, type) local playerTeam = getPlayerTeam(source) if (playerTeam and type == 2 ) then cancelEvent() local r, g, b = getTeamColor (playerTeam) local h = string.format("#%.2X%.2X%.2X", r, g, b) outputChatBox('#FF0000(Team) #FFFFFF['..h..' '..getTeamName(playerTeam).. '#FFFFFF] '..h..''..getPlayerName(source):gsub("#%x%x%x%x%x%x", "") ..'#FF0000 : #FFFFFF'.. text,root, r, g, b, true) end
  2. السلام عليكم ما يجي كلام الشات التيم addEvent("onPlayeropenChat",true) addEventHandler("onPlayeropenChat",root,function () removeElementData(resourceRoot,"chat") end) addEvent("onPlayerCloseChat",true) addEventHandler("onPlayerCloseChat",root,function () setElementData (resourceRoot, "chat",true) end) ------ addEventHandler("onPlayerChat",root, function( text, type) if getElementData(source,"tag") then return cancelEvent() end if getElementData(source,"Data_Tag") then return cancelEvent() end if type == 1 or type == 2 then return end if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Console")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) return outputChatBox("#FF0000* [ Console ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) else end if getElementData ( resourceRoot, "chat" ) == true then cancelEvent() return outputChatBox ("[C.Console]: Chat has been locked by Console ",source,255,0,0,true) end if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 1")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#0099DC* [ Lv.1 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 2")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#2554C7* [ Lv.2 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 3")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#00cc11* [ Lv.3 ] " .. getPlayerName ( source ) ..": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 4")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#007700* [ Lv.4 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 5")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#cc0000* [ Lv.5 ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Level 6")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#FF0000* [ Lv.6 ] " .. getPlayerName ( source ) ..": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Head.Admin")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#C11B17* [ Head.Admin ] " .. getPlayerName ( source ) ..": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("V.I.P")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#DCD800* [ VIP ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("SaedAmer")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#cd0000* [ VIP ]#ffff00 سعيد : #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("mosp")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#02AB2F* [ AL-MLOok Event's] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Manager")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#347235* [ T-Developer ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Admin - Ex")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#777777* [ Admin - EX ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Police")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#007F7F* [ Soldier ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) elseif isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(source)), aclGetGroup("Everyone")) then cancelEvent() local r, g, b = getPlayerNametagColor(source) outputChatBox("#5494A7* [ AL-MLOoK ] " .. getPlayerName ( source ) .. ": #ffFFff" .. text, getRootElement(), r, g, b, true ) end end )
  3. السلام عليكم دلوقتي الكود ده لما اضغط علي الاعب يفتح الوحة عاوز ازود عليه لما اضغط علي العربية تتفتح الوحة ويجبلي اخر واحد كان يسوقها function elementClicked(_,_,plr,veh) local mhaster12 = getPlayerName (source) local gfg = getVehicleController ( source ) local mnm = getPlayerName (gfg) if getElementType (source) == "player" or getElementType (source) == "vehicle" then triggerClientEvent(plr,"openGui",plr) triggerClientEvent(plr,"openGui123",plr,mhaster12) removeElementData (plr,"bugfix") removeEventHandler ("onElementClicked",plr,elementClicked) end end addEvent("check2",true) addEventHandler("check2",root, function() local acc = getPlayerAccount(source) if isObjectInACLGroup("user."..getAccountName(acc),aclGetGroup("Police")) then addEventHandler("onElementClicked",source,elementClicked) setElementData (source,"bugfix",true) else outputChatBox("You are not police or admin",source,255,255,255) end end )
  4. السلام عليكم ده كود لوكال شات بس لما اجي اكتب جملة طويلة ما يجيب غير اول كلمة فقط Groups = {"Console", "Admin1", "mosp", "SuperModerator1", "Moderator1", "Moderator2", "Master", "Moafek", "Sozr", "SuperModerator2", "msol.beot", "Super.Admin", "FDR", "Mangres", "m5fe", "Super.Police", "Big.Admin", "msol", "Head.Admin", "LVL1", "LVL2", "LVL3", "LVL4", "LVL5", "LVL6", "Help Console", "ACL-Manager", "General-Admin", "Help Console", "LVL1", "LVL2", "LVL3", "LVL4", "LVL5", "LVL6", "Everyone"} -- addCommandHandler("Local",function(player,cmd,msg) if root:getData("Local") == true then cancelEvent() return outputChatBox ("[C.Console]: Local Chat has been locked by Console ",source,255,0,0,true) end for _,theGroup in pairs(Groups) do if ACLGroup.get(theGroup):doesContainObject( "user."..player:getAccount():getName()) then if not isPlayerMuted(player) then cancelEvent() outputChatBox("#FFFF00(LOCAL) "..getPlayerName(player) .. " : #FFFFFF".. msg,root, 255, 0, 0, true) else outputChatBox("#FF0000Sorry You Are Muted",source,255,0,0,true) end else outputChatBox("#FF0000you are not Login",source,255,0,0,true) end return end end)
  5. السلام عليكم ده كود لوكال شات بس لما اجي اكتب جملة طويلة ما يجيب غير اول كلمة فقط Groups = {"Console", "Admin1", "mosp", "SuperModerator1", "Moderator1", "Moderator2", "Master", "Moafek", "Sozr", "SuperModerator2", "msol.beot", "Super.Admin", "FDR", "Mangres", "m5fe", "Super.Police", "Big.Admin", "msol", "Head.Admin", "LVL1", "LVL2", "LVL3", "LVL4", "LVL5", "LVL6", "Help Console", "ACL-Manager", "General-Admin", "Help Console", "LVL1", "LVL2", "LVL3", "LVL4", "LVL5", "LVL6", "Everyone"} -- addCommandHandler("Local",function(player,cmd,msg) if root:getData("Local") == true then cancelEvent() return outputChatBox ("[C.Console]: Local Chat has been locked by Console ",source,255,0,0,true) end for _,theGroup in pairs(Groups) do if ACLGroup.get(theGroup):doesContainObject( "user."..player:getAccount():getName()) then if not isPlayerMuted(player) then cancelEvent() outputChatBox("#FFFF00(LOCAL) "..getPlayerName(player) .. " : #FFFFFF".. msg,root, 255, 0, 0, true) else outputChatBox("#FF0000Sorry You Are Muted",source,255,0,0,true) end else outputChatBox("#FF0000you are not Login",source,255,0,0,true) end return end end)
  6. السلام عليكم دلوقتي الكود ده لما اضغط علي الاعب يفتح الوحة عاوز ازود عليه لما اضغط علي العربية تتفتح الوحة ويجبلي اخر واحد كان يسوقها function elementClicked(_,_,plr,veh) local mhaster12 = getPlayerName (source) local gfg = getVehicleController ( source ) local mnm = getPlayerName (gfg) if getElementType (source) == "player" or getElementType (source) == "vehicle" then triggerClientEvent(plr,"openGui",plr) triggerClientEvent(plr,"openGui123",plr,mhaster12) removeElementData (plr,"bugfix") removeEventHandler ("onElementClicked",plr,elementClicked) end end addEvent("check2",true) addEventHandler("check2",root, function() local acc = getPlayerAccount(source) if isObjectInACLGroup("user."..getAccountName(acc),aclGetGroup("Police")) then addEventHandler("onElementClicked",source,elementClicked) setElementData (source,"bugfix",true) else outputChatBox("You are not police or admin",source,255,255,255) end end )
  7. السلام عليكم انا عامل جدول و حاتط فيه كلامات و خليت الاعب لما يكتب كلمة يظهر كلام بالشات عاوز اضيف لما يكتب كلمه من الي بالجدول تيجي بدل الكلمة كده ----
  8. مود رائع بدايه موفقه بالتوفيق منتظر جديدك
  9. حتطيت كودي بأسكربت و جربت ما بتشتغل المهمة كل ما المس الماركر يقلي انتظر حتي تبدأ المهمة و ما في خطأ بالدي بق
  10. طيب سويه ياعم السهل
  11. ميزو ترا طلبت منك مود و قلتلك فكرته خاص ما رديت علي سحبت ترا
  12. يا اخ واي فاي ما قلت لك تجربه انا اقول فين الخطأ في الكود + ايه الغير معرف + الكود صح ولالا؟ + هات فنكشن محدش بقدر بطلع نفاثه بالمهمة فقط
  13. بسم الله الرحمن الرحيم .. السلآم عليكم وحمةة الله وبركآإته .. ..|[ تم افتتاح منتدي الملوك ]|.. ● http://al-mlook.esy.es/ ● اتمني تفاعلكم بالمنتدي ● قريبا افتتاح السيرفر و الله الموفق و المستعان
  14. كده تمام ؟ spawns = {} setElementData(resourceRoot,"map1","no") setElementData(resourceRoot,"winMoney","0") SaedAmer1 = createMarker(z, y, x, "arrow", 1.1, 255, 0, 0, 170 ) SaedAmer2 = createMarker(z, y, x, "arrow", 1.1, 255, 0, 0, 170 ) SaedAmer3 = createMarker(z, y, x, "arrow", 1.1, 255, 0, 0, 170 ) addEventHandler('onMarkerHit', resourceRoot, function(element) if source == SaedAmer1 or source == SaedAmer2 or source == SaedAmer3 then if getElementType(element) == 'player' and checkDuel(element) == "prestart" and ( not checkExistPlrOnDuel(element) ) then online = countPlayersOnRun() if tonumber(online) +1 < 32 then setData(element,"onCrossMap","yes") exports.killmessages:outputMessage('* [ Run Mission ] : الرجاء الانتظار ..',element,255,255,0,true) spawnOnMap(element) else exports.killmessages:outputMessage('* [ Run Mission ] : لم يبق مكان بمهمة الركض الرجآء, الانتظآر القيم القآدم',element,0,255,0,true) end end end end) function checkDuel(p) if tostring(getElementData(resourceRoot,"map1")) == "yes" then exports.killmessages:outputMessage('* [ Run Mission ] : لقد بدأت مهمة الركض',p,255,255,0,true) elseif tostring(getElementData(resourceRoot,"map1")) == "no" then exports.killmessages:outputMessage('* [ Run Mission ] : الرجآء الانتظآر,حتى تبدء مهمة الركض',p,255,255,0,true) if _mytimer and isTimer(_mytimer) then local _r,_e,_t = getTimerDetails(_mytimer) if _r and _e and _t then total = _r / 60 / 1000 ss = math.floor( _r / 1000 ) seconds = tostring( math.fmod( ss, 60 ) ) exports.killmessages:outputMessage("* [ Run Mission ] تبقـى: "..math.ceil(total)..":"..seconds.."",p,255,255,0,true) end end end return tostring(getElementData(resourceRoot,"map1")) end function checkExistPlrOnDuel(p) per = getElementData(p,"onCrossMap") if tostring(per) == "yes" then return true else return false end end function setData(element,key,vlr) setElementData(element,key,vlr) end function spawnOnMap(p) count = countPlayersOnDerby() spawned = "no" for i,data in pairs(spawns)do if tonumber(data.id) == tonumber(count) then spawned = "yes" s = setElementPosition (411,data.x,data.y,data.z,data.rx,data.ry,data.rz) setElementDimension(s,30) setElementFrozen(s,true) setElementData(s,"creatorDerby","yes") break end end toggleControl(p,"enter_exit", false ) setCameraTarget(p,p) exports.killmessages:outputMessage(getPlayerName(p):gsub("#%x%x%x%x%x%x", "")..' دخل لمهمة الركض!', root, 255, 0, 0) local ss = countPlayersOnDerby() exports.killmessages:outputMessage('المتـواجـدون فـي مهمة الركض '..tostring(ss + 1)..' / 32', root, 255, 0, 0) end function countPlayersOnDerby() c = -1 for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then c = c+1 end end return tonumber(c) end function newDuel() for i,p in pairs(getElementsByType("player"))do setData(p,"onCrossMap","no") end setElementData(resourceRoot,"map1","prestart") exports.killmessages:outputMessage('* [ Run Mission ] : لدخول مهمة الركض توجه ( اف6 مهمة الركض ) ء', root, 255, 0, 0, true) RMoney = math.random("10000","100000") setElementData(resourceRoot,"winMoney",tonumber(RMoney)) setTimer(checkPlrs,30000,1) end if tonumber(c) == 1 then givePlayerMoney(winner,tonumber(getElementData(resourceRoot,"winMoney"))) n = string.gsub(getPlayerName(winner), "#%x%x%x%x%x%x", "") exports.killmessages:outputMessage("*[ " .. n .. " Won the Run Mission and win " .. tonumber(getElementData(resourceRoot,"winMoney")) .. "$ ]",getRootElement(),255,255,0,true) setElementData(resourceRoot,"map1","no") endRun() _mytimer = setTimer(newDuel,60*1000*15,1) end function checkPlrs () c = 0 for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then c = c+1 end end if tonumber(c) > 1 then setElementData(resourceRoot,"map1","yes") for i,p in pairs(getElementsByType("player"))do if checkExistPlrOnDuel(p) then exports.killmessages:outputMessage('* [ Run Mission ] : لقد بدآءت مهمة الركض , يمكنك الانطلاق',p,0,255,0,true) exports.killmessages:outputMessage('* [ Run Mission ] : لقد بدآءت مهمة الركض ', root, 255, 0, 0, true) setElementFrozen(thePlayer,false) end end else endRun() setElementData(resourceRoot,"map1","no") exports.killmessages:outputMessage('* [ Run Mission ] : لم تبدآء مهمة الركض , لعدم توفر الاعبين',getRootElement(),255,255,0,true) _mytimer = setTimer(newDuel,60*1000*15,1) end end addCommandHandler('Run', function(SaedAmer) local acc = getPlayerAccount(SaedAmer) if acc and not isGuestAccount(acc) and isObjectInACLGroup("user." .. getAccountName(acc),aclGetGroup('Console')) then if _mytimer and isTimer(_mytimer) then killTimer(_mytimer) newDuel() end end end ) for i,v in ipairs (getElementsByType("player")) do sa = setElementPosition ( x, y, z ) end
  15. السلام عليكم المهمة عبارة عن لما العب يلمس ماركر يروح لعالم وهمي و يقف ما يتحرك الا ما يبدأ المهمة يقدر يتحرك هي عبارة عن مهمة ركد الكل يركد لحين ما يوصل ل ماركر معين اول واحد يلمسه يفوز بمبلغ المهمة تتعاد كل 15د تعطبر مثل مهمة الديربي
  16. كلنت حق وش ؟ + الدي بق
  17. الكود الاول تبع لوحة تسوي تاج بالشات و الكود التاني تبع مود التاجات للسيرفر كلو فاهم انا دمجتهم على بعض عشان مايكرر الكلام مرتين بالشات جربته ما شتغل التاجين اساسا
  18. الكود الاول تبع لوحة تسوي تاج بالشات و الكود التاني تبع مود التاجات للسيرفر كلو
×
×
  • Create New...