Jump to content

x[سؤال]x عن العاجل #


Recommended Posts

سسلام عليكم

شباب أبي كود يخلي

الالوان تتفعل في العاجل

يعني يوم اكتب

#FFee11 Hello

يصير اخضر

ما يجي هالاكواد

وأبي فنكشات او اكواد

تخلي العاجل ينحفظ اذا اللعب خرج ؟

هل من غلام ؟

:]

Link to comment

Client

function dxDrawFramedText(message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, frameColor) 
color = color or tocolor(0, 0, 0, 50) 
frameColor = frameColor or tocolor(0, 0, 0, 255) 
scale = scale or 1.1 
font = font or "default" 
alignX = alignX or "left" 
alignY = alignY or "top" 
clip = clip or false 
wordBreak = wordBreak or false 
postGUI = postGUI or false 
dxDrawText(message, left + 1, top + 1, width + 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI,true) 
dxDrawText(message, left + 1, top - 1, width + 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI,true) 
dxDrawText(message, left - 1, top + 1, width - 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI,true) 
dxDrawText(message, left - 1, top - 1, width - 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI,true) 
dxDrawText(message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI,true) 
end 
  
function as() 
local data = getElementData(root,'3ajel') 
if not data then data = {'',''} end 
local Name = data[1] or '' 
local message = data[2] or '' 
   dxDrawText("*Admin", 14, 571, 766, 605, tocolor(255, 255, 255, 255), 1.00, "default-bold", "left", "top", false, false, false, false, false) 
   
end 
addEventHandler("onClientRender", getRootElement(), as) 
  

Server

  
function check(thePlayer, commandName,...) 
    local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
    if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Head.Admin" ) ) or isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Console" ) ) then 
        local Msg = {...} 
        local message = table.concat(Msg, " ") 
        local name = getPlayerName( thePlayer ) 
        local msg = message 
        setElementData(root,'3ajel',{name,msg})     
    end 
end 
addCommandHandler("AM", check) 
  
function clear(thePlayer, commandName) 
    local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
    if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Console" ) ) then 
        setElementData(root,'3ajel',false) 
       
    end 
end 
addCommandHandler("Clear", clear) 

Link to comment

Client :

addEventHandler ( "onClientRender", root, 
    function ( ) 
        local data = getElementData ( resourceRoot, "3ajel" ) 
        if ( data ) then 
            dxDrawText ( "* Admin : ".. data, 14, 571, 766, 605, tocolor ( 255, 255, 255, 255 ), 1.00, "default-bold", "left", "top", false, false, false, false, true ) 
        end 
    end 
) 
  
bindKey ( "u", "down", "chatbox", "AM" ) 

Server :

local AMGROUPS = { "Head.Admin", "Console" } 
  
function isCAN ( plr ) 
    local accName = getAccountName ( getPlayerAccount ( plr ) ) 
    for _,v in ipairs( AMGROUPS ) do 
        if ( isObjectInACLGroup ( "user." .. accName, aclGetGroup ( v ) ) ) then 
            return true 
        end 
    end 
end 
  
function check ( thePlayer, commandName, ... ) 
    if ( isCAN ( thePlayer ) ) then 
        local Msg = { ... } 
        local message = table.concat ( Msg, " " ) 
        setElementData ( resourceRoot, "3ajel", message )     
    end 
end 
addCommandHandler ( "AM", check ) 
  
function clear ( thePlayer, commandName ) 
    local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
    if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Console" ) ) then 
        setElementData ( resourceRoot, "3ajel", false ) 
      
    end 
end 
addCommandHandler("Clear", clear) 

ملاحظات بسيطة :

- العاجل لن يعمل معك في نفس المكان على جميع الشاشات

- في الجدول بملف سيرفر بإمكانك إضافة الرتب التي يمكنها وضع الكلام في العاجل

بالتوفيق لكـ .

Edited by Guest
Link to comment
بالنسبة لكود الاوان

اطرح

كود

dxDrawText 

بالنسبة للحفظ

executeSQLQuery 

اخوي الغالي .. لا داعي لإستعمال قواعد البيانات فهو لا يريد حفظه إذا عمل إعادة تشغيل للمود

Link to comment
Client :
function dxDrawFramedText ( message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, frameColor, colorCoded ) 
    color = color or tocolor ( 0, 0, 0, 50 ) 
    frameColor = frameColor or tocolor ( 0, 0, 0, 255 ) 
    scale = scale or 1.1 
    font = font or "default" 
    alignX = alignX or "left" 
    alignY = alignY or "top" 
    clip = clip or false 
    wordBreak = wordBreak or false 
    postGUI = postGUI or false 
    colorCoded = colorCoded or false 
    dxDrawText ( message, left + 1, top + 1, width + 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left + 1, top - 1, width + 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left - 1, top + 1, width - 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left - 1, top - 1, width - 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
end 
  
addEventHandler ( "onClientRender", root, 
    function ( ) 
        local data = getElementData ( resourceRoot, "3ajel" ) 
        if ( data ) then 
            local Name = tostring ( data[1] ) or "" 
            local Message = tostring ( data[2] ) or "" 
            dxDrawFramedText ( "* ".. Name ..": ".. Message, 14, 571, 766, 605, tocolor ( 255, 255, 255, 255 ), 1.00, "default-bold", "left", "top", false, false, false, false, true ) 
        end 
    end 
) 
  
bindKey ( "u", "down", "chatbox", "AM" ) 

Server :

local AMGROUPS = { "Head.Admin", "Console" } 
  
function isCAN ( plr ) 
    local accName = getAccountName ( getPlayerAccount ( plr ) ) 
    for _,v in ipairs( AMGROUPS ) do 
        if ( isObjectInACLGroup ( "user." .. accName, aclGetGroup ( v ) ) ) then 
            return true 
        end 
    end 
end 
  
function check ( thePlayer, commandName, ... ) 
    if ( isCAN ( thePlayer ) ) then 
        local Msg = { ... } 
        local message = table.concat ( Msg, " " ) 
        local name = getPlayerName ( thePlayer ) 
        setElementData ( resourceRoot, "3ajel", { name, message } )     
    end 
end 
addCommandHandler ( "AM", check ) 
  
function clear ( thePlayer, commandName ) 
    local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
    if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Console" ) ) then 
        setElementData ( resourceRoot, "3ajel", false ) 
      
    end 
end 
addCommandHandler("Clear", clear) 

ملاحظات بسيطة :

- العاجل لن يعمل معك في نفس المكان على جميع الشاشات

- في الجدول بملف سيرفر بإمكانك إضافة الرتب التي يمكنها وضع الكلام في العاجل

بالتوفيق لكـ .

أشتغل تمام بس جرت اسويه بدون اسم

ما اشتغل

ما ابي اسم اللاعب يظهر :]

Link to comment

Client Side :

function dxDrawFramedText ( message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, frameColor, colorCoded ) 
    color = color or tocolor ( 0, 0, 0, 50 ) 
    frameColor = frameColor or tocolor ( 0, 0, 0, 255 ) 
    scale = scale or 1.1 
    font = font or "default" 
    alignX = alignX or "left" 
    alignY = alignY or "top" 
    clip = clip or false 
    wordBreak = wordBreak or false 
    postGUI = postGUI or false 
    colorCoded = colorCoded or false 
    dxDrawText ( message, left + 1, top + 1, width + 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left + 1, top - 1, width + 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left - 1, top + 1, width - 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left - 1, top - 1, width - 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
end 
  
addEventHandler ( "onClientRender", root, 
    function ( ) 
        local data = getElementData ( resourceRoot, "3ajel" ) 
        if ( data ) then 
            dxDrawFramedText ( "* ".. tostring(data[1]), 14, 571, 766, 605, tocolor ( 255, 255, 255, 255 ), 1.00, "default-bold", "left", "top", false, false, false, false, true ) 
        end 
    end 
) 
  
bindKey ( "u", "down", "chatbox", "AM" ) 

Server Side :

local AMGROUPS = { "Head.Admin", "Console" } 
  
function isCAN ( plr ) 
    local accName = getAccountName ( getPlayerAccount ( plr ) ) 
    for _,v in ipairs( AMGROUPS ) do 
        if ( isObjectInACLGroup ( "user." .. accName, aclGetGroup ( v ) ) ) then 
            return true 
        end 
    end 
end 
  
function check ( thePlayer, commandName, ... ) 
    if ( isCAN ( thePlayer ) ) then 
        local Msg = { ... } 
        local message = table.concat ( Msg, " " ) 
        setElementData ( resourceRoot, "3ajel", { message })     
    end 
end 
addCommandHandler ( "AM", check ) 
  
function clear ( thePlayer, commandName ) 
    local accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
    if isObjectInACLGroup ( "user." .. accName, aclGetGroup ( "Console" ) ) then 
        setElementData ( resourceRoot, "3ajel", false ) 
      
    end 
end 
addCommandHandler("Clear", clear) 

Link to comment
شباب كيف اسوي صوت ؟

يعني يوم اكتب شيء به

يجي صوت

وابي يوم اكتب الكلام لونه يجي احمر ثانيتين

ويرجع كما كان

هل من مساعدة ؟

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

طاره

تعدلو يكون احسن

Link to comment
شباب كيف اسوي صوت ؟

يعني يوم اكتب شيء به

يجي صوت

وابي يوم اكتب الكلام لونه يجي احمر ثانيتين

ويرجع كما كان

هل من مساعدة ؟

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

طاره

تعدلو يكون احسن

??

وش تقصد يا شبح ؟

لا تخرج عن صلب الموضوع

ترا لو ما تعرف تساعد لا تساعد ""

Link to comment
أطرح الكود طيب
function dxDrawFramedText ( message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, frameColor, colorCoded ) 
    color = color or tocolor ( 0, 0, 0, 50 ) 
    frameColor = frameColor or tocolor ( 0, 0, 0, 255 ) 
    scale = scale or 1.1 
    font = font or "default" 
    alignX = alignX or "left" 
    alignY = alignY or "top" 
    clip = clip or false 
    wordBreak = wordBreak or false 
    postGUI = postGUI or false 
    colorCoded = colorCoded or false 
    dxDrawText ( message, left + 1, top + 1, width + 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left + 1, top - 1, width + 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left - 1, top + 1, width - 1, height + 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left - 1, top - 1, width - 1, height - 1, frameColor, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
    dxDrawText ( message, left, top, width, height, color, scale, font, alignX, alignY, clip, wordBreak, postGUI, colorCoded ) 
end 
  
addEventHandler ( "onClientRender", root, 
    function ( ) 
        local data = getElementData ( resourceRoot, "3ajel" ) 
        if ( data ) then 
            local Name = tostring ( data[1] ) or "" 
            local Message = tostring ( data[2] ) or "" 
            dxDrawFramedText ( "* Admin : ".. tostring(data[1]),  20, 429, 722, 450, tocolor ( 255, 255, 255, 255 ), 1.00, "default-bold", "left", "top", false, false, false, false, true ) 
           end 
    end 
) 
  
  

Link to comment
#1Topro: اخوي الكريم لاتزود المشاركات في هذه الحركات المبرمجين تعمل على الكود فضلا انتضر ولاتزود المشاركات

#حمله_تطوير_المنتدى_الى_الافضل

لا تزود مشاركاتك ع الفاضي !

تبي تساعد تفضل

ما تبي خلاص !

Link to comment

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...