Jump to content

تعديل كود#


Recommended Posts

Posted

السلام عليكم شباب

ابي طلب بسيط وهو:تعديل علي كود

الكود بتاع مود العاجل

#FF0000 المود لا يقبل الالوان مثل

الاقيه يطلع بالعاجل بدون اللوان والاكواد تطلع بالعاجل #FF0000 يعني مثلا لو كتبت فيه كذا مثلا هلا منوين السرفر

#FF0000 يعني بيطلع هكذا هلا منورين السرفر

p_170a79j1.png

ابيه يقبل اكواد الالوان

------------------------------------------------------------------------------------------------------------------------------------------------------

اكواد المود

سرفر

-- *  By MA[s]RIY 
  
Groups = {  -- القروبات المسموح لها بالكتابة 
"Admin", 
"Console", 
} 
  
  
function check ( thePlayer, commandName, ... ) 
        local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
        local veve = { ... } 
        local message = table.concat ( veve, " " ) 
        for i, v in ipairs ( Groups ) do 
          if isObjectInACLGroup ( "user."..accName, aclGetGroup ( v ) ) then        
        setElementData ( resourceRoot, "MessageAdmin", message ) 
        SaveMessage (  ) 
        triggerClientEvent ( "sora", getRootElement(  ), getElementData ( resourceRoot, "MessageAdmin" ) ) 
        end 
    end 
end 
addCommandHandler( "=", check ) 
  
addEventHandler ( "onResourceStart", resourceRoot, function (  ) 
        executeSQLQuery("CREATE TABLE IF NOT EXISTS SaveMessagee (Message, Server)") 
end 
) 
  
addEvent ( "SetMessage", true ) 
addEventHandler ( "SetMessage", root, function (  ) 
   getMessage (  ) 
end 
) 
  
SaveMessage = function (  ) 
local msg = executeSQLQuery ( "SELECT * FROM SaveMessagee WHERE Server = '" .. getServerName ( ) .."'" ) 
if ( #msg ~= 0  )   then 
   return executeSQLQuery("UPDATE SaveMessagee SET Message=? WHERE Server=? ", tostring ( getElementData ( resourceRoot, "MessageAdmin"  ) ), getServerName ( ) ) 
else 
   return executeSQLQuery("INSERT INTO SaveMessagee (Message,Server) VALUES(?,?)", tostring ( getElementData ( resourceRoot, "MessageAdmin" ) ), getServerName ( ) ) 
   end 
end 
  
getMessage = function (  ) 
local msg = executeSQLQuery ( "SELECT * FROM SaveMessagee" ) 
if ( #msg ~= 0  ) then 
    setElementData ( resourceRoot, "MessageAdmin", msg[1]["Message"] ) 
    return setTimer ( triggerClientEvent, 1000, 1, "sora", getRootElement(  ), getElementData ( resourceRoot, "MessageAdmin" ) ) 
else 
   return setTimer ( triggerClientEvent, 1000, 1, "sora", getRootElement(  ), " " ) 
  end 
end 
  
  
  
  
  

كلينت

-- * By MA[s]RIY 
  
function rdx ( message ) 
    removeEventHandler ( "onClientRender", getRootElement(  ), dx ) 
    function dx(  ) 
     dxDrawText ( "Advertising: ", 11.0, 250.0, 55.0, 182.0, tocolor ( 0, 150, 180, 255 ), 1.0, "default-bold", "left", "top", false, false, false ) 
     dxDrawText ( message , 80.0, 251.0, 799.0, 224.0, tocolor ( 255, 255, 255, 255 ), 1.0, "default-bold", "left", "top", false, false, false ) 
    end 
    addEventHandler("onClientRender", getRootElement(  ), dx ) 
end 
addEvent ( "sora", true ) 
addEventHandler ( "sora", getRootElement(  ), rdx ) 
bindKey ( "", "down", "chatbox", "=" ) 
  
  
addEventHandler ( "onClientResourceStart", resourceRoot, function (  ) 
triggerServerEvent ( "SetMessage", localPlayer ) 
end 
) 
  

مصري #

Posted

شكرا يا اخي طيب تعرف كيف اخليه يجيب اسم الي كاتب في العاجل

علي مما اظن كذا

get player name 

لو مب هكذا قولي كيف ووين اضعها

مصري #

Posted
شكرا يا اخي طيب تعرف كيف اخليه يجيب اسم الي كاتب في العاجل

علي مما اظن كذا

get player name 

لو مب هكذا قولي كيف ووين اضعها

getPlayerName 

76561198264399996.png

 

 

 

 

Posted

واضعها وين

علي ما اظن هنا

xDrawText ( "Advertising: " 

صح

يعني كده

xDrawText ( "Advertising..getPlayerName(playerSource), playerSource: " 

صح ولا وين

مصري #

Posted
dxDrawFramedText("Text ["..Name:gsub("#%x%x%x%x%x%x", "").."]: "..,14, 235, 783, 264,tocolor(255, 0, 0, 255),1.0,"default-bold","left","top",false,false,false) 
  

 

قد تكونآمنيآتنآ حزينه !وآحلآمُنآ ملت طآبور آلإنتِظآر لكنهآ ،تتشبث بآلأمل فنفوسُنآ خُلقت لتقول غداً آجمل B-18.png 

Posted
dxDrawFramedText("Text ["..Name:gsub("#%x%x%x%x%x%x", "").."]: "..,14, 235, 783, 264,tocolor(255, 0, 0, 255),1.0,"default-bold","left","top",false,false,false) 
  

:?:

 

 

Posted

function rdx ( m ) 
   function dx(  ) 
     dxDrawText ( "Advertising: "..m.name, 11.0, 250.0, 55.0, 182.0, tocolor ( 0, 150, 180, 255 ), 1.0, "default-bold", "left", "top", false, false, false, true ) 
     dxDrawText ( m.msg , 80.0, 251.0, 799.0, 224.0, tocolor ( 255, 255, 255, 255 ), 1.0, "default-bold", "left", "top", false, false, false,true ) 
    end 
    addEventHandler("onClientRender", getRootElement(  ), dx ) 
end 
addEvent ( "sora", true ) 
addEventHandler ( "sora", getRootElement(  ), rdx ) 
bindKey ( "", "down", "chatbox", "=" ) 
  
  
addEventHandler ( "onClientResourceStart", resourceRoot, function (  ) 
triggerServerEvent ( "SetMessage", localPlayer ) 
end 
) 

Groups = {  -- القروبات المسموح لها بالكتابة 
"Admin", 
"Console", 
} 
  
  
function check ( thePlayer, commandName, ... ) 
        local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
        local veve = { ... } 
        local message = table.concat ( veve, " " ) 
        for i, v in ipairs ( Groups ) do 
          if isObjectInACLGroup ( "user."..accName, aclGetGroup ( v ) ) then       
        setElementData ( resourceRoot, "MessageAdmin", { msg = message, name = getPlayerName( thePlayer ) } ) 
        SaveMessage (  ) 
        triggerClientEvent ( "sora", getRootElement(  ), getElementData ( resourceRoot, "MessageAdmin" ) ) 
        end 
    end 
end 
addCommandHandler( "=", check ) 
  
addEventHandler ( "onResourceStart", resourceRoot, function (  ) 
        executeSQLQuery("CREATE TABLE IF NOT EXISTS SaveMessagee (Name, Message, Server)") 
end 
) 
  
addEvent ( "SetMessage", true ) 
addEventHandler ( "SetMessage", root, function (  ) 
   getMessage (  ) 
end 
) 
  
SaveMessage = function (  ) 
local msg = executeSQLQuery ( "SELECT * FROM SaveMessagee WHERE Server = '" .. getServerName ( ) .."'" ) 
if ( #msg ~= 0  )   then 
    local inf =getElementData ( resourceRoot, "MessageAdmin"  ) 
   return executeSQLQuery("UPDATE SaveMessagee SET Name =?, Message=? WHERE Server=? ", inf.name, inf.msg, getServerName ( ) ) 
else 
    local inf = getElementData ( resourceRoot, "MessageAdmin"  ) 
   return executeSQLQuery("INSERT INTO SaveMessagee (Name, Message ,Server) VALUES(?,?,?)", inf.name, inf.msg, getServerName ( ) ) 
   end 
end 
  
getMessage = function (  ) 
local msg = executeSQLQuery ( "SELECT * FROM SaveMessagee" ) 
if ( #msg ~= 0  ) then 
   setElementData ( resourceRoot, "MessageAdmin", { msg = msg[1]['Message'], name = msg[1]['Name'] } ) 
    return setTimer ( triggerClientEvent, 1000, 1, "sora", getRootElement(  ), getElementData ( resourceRoot, "MessageAdmin" ) ) 
else 
    setElementData ( resourceRoot, "MessageAdmin", { msg = '', name = '' } ) 
  return setTimer ( triggerClientEvent, 1000, 1, "sora", getRootElement(  ), getElementData ( resourceRoot, "MessageAdmin" ) ) 
  end 
end 

ياليت تكتب من تعديلك لأن اللي سواه سورا , وبالتوفيق.

Sha67 سابقاً

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...