Jump to content

طلب اكواد ! ..


Rockyz

Recommended Posts

اسويها

else 

بعد الكود ؟

أنا أقولككـ المختصر

اذا ضغط الزر سوي ترايقر للسيرفر ذذ وسوي لوب لكل اللاعبين وسوي تحقق اذا سيريال اللاعب مهوب بالجدول يحط له فريز ويظهر سوي ترايقر للكلنت وسوي أظهار للوحة ذذ

"onClientGUIClick" 
guiSetVisible 
triggerServerEvent 
table 
getPlayerSerial 
getElementsByType -- "player" 
getPlayerSerial 
setPedFrozen 
Link to comment
  • Replies 161
  • Created
  • Last Reply

Top Posters In This Topic

اسويها

else 

بعد الكود ؟

أنا أقولككـ المختصر

اذا ضغط الزر سوي ترايقر للسيرفر ذذ وسوي لوب لكل اللاعبين وسوي تحقق اذا سيريال اللاعب مهوب بالجدول يحط له فريز ويظهر سوي ترايقر للكلنت وسوي أظهار للوحة ذذ

"onClientGUIClick" 
guiSetVisible 
triggerServerEvent 
table 
getPlayerSerial 
getElementsByType -- "player" 
getPlayerSerial 
setPedFrozen 

خلاص مشكور احسك عصبت شوية خخ

Link to comment

وظيفة التحميل , dxDrawLoading

السنتاكس

bool dxDrawLoading ( int posX, int posY, int width , int height , int posX2 , int posY2 , int size [ int color , int color2 ] int time )

int posX : مكان الشريط بالاكس

int posY : مكان الشريط بالاي

int width : عرض الشريط

int height : طول الشريط

int posX2 : مكان الكتابة بالاكس

int posY2 : مكان الكتابة بالاي

int size : حجم الخط للكتابة

int color : لون الشريط الثابت

int color2 : لون الشريط المتحرك

int time : وقت التحميل

الكود : #

local start = getTickCount() 
function dxDrawLoading (x, y, width, height, x2, y2, size, color, color2, second) 
    local now = getTickCount() 
    local seconds = second 
    local with = interpolateBetween(0,0,0,width,0,0, (now - start) / ((start + seconds) - start), "Linear") 
    local text = interpolateBetween(0,0,0,100,0,0,(now - start) / ((start + seconds) - start),"Linear") 
        dxDrawText ( "Loading ... "..math.floor(text).."%", x2, y2 , width, height, tocolor ( 0, 255, 0, 255 ), size, "pricedown" ) 
        dxDrawRectangle(x, y ,width ,height -10, color) 
        dxDrawRectangle(x, y, with ,height -10, color2) 
        end 

مثال بسيط :#

        addEventHandler("onClientRender",root, 
        function () 
        dxDrawLoading(196, 482,422, 58, 196 , 450 ,1.00,tocolor(0,0,0,170),tocolor(0,255,0,170),10000) 
        end) 

صورة للشكل :

i_16a4349dee1.png

اي خطا او اي شيء كلمني ,

ايه مشكور لاكن كيف اربطه بالكود ؟

معليش , توي اشوف ردودكم ,

المهم في طريقة اسهل تستعمل كودي + تحط مثلا في الفنكشن حق الي تسوي فيه التحميل ,

مثل كذا ماقدر كيف اشرح لك

addEventHandler("onClientRender",root, 
        function () 
        dxDrawLoading(196, 482,422, 58, 196 , 450 ,1.00,tocolor(0,0,0,170),tocolor(0,255,0,170),10000) 
   if now < start + seconds then 
      --- code 
        end 
        end) 

طريقة اسهل من الفنكشنات حقت سفاح ,

عاد كيفك , صح ان ردي متاخر عاد الشكوى لله

Link to comment

معليش , توي اشوف ردودكم ,

المهم في طريقة اسهل تستعمل كودي + تحط مثلا في الفنكشن حق الي تسوي فيه التحميل ,

مثل كذا ماقدر كيف اشرح لك

addEventHandler("onClientRender",root, 
        function () 
        dxDrawLoading(196, 482,422, 58, 196 , 450 ,1.00,tocolor(0,0,0,170),tocolor(0,255,0,170),10000) 
   if now < start + seconds then 
      --- code 
        end 
        end) 

طريقة اسهل من الفنكشنات حقت سفاح ,

عاد كيفك , صح ان ردي متاخر عاد الشكوى لله [/b]

مشكور افدتني وخاصة انها دي اكس ! :P

Link to comment

اسويها

else 

بعد الكود ؟

أنا أقولككـ المختصر

اذا ضغط الزر سوي ترايقر للسيرفر ذذ وسوي لوب لكل اللاعبين وسوي تحقق اذا سيريال اللاعب مهوب بالجدول يحط له فريز ويظهر سوي ترايقر للكلنت وسوي أظهار للوحة ذذ

"onClientGUIClick" 
guiSetVisible 
triggerServerEvent 
table 
getPlayerSerial 
getElementsByType -- "player" 
getPlayerSerial 
setPedFrozen 
setPedFrozen 

X ?

This function is deprecated. This means that its use is discouraged and that it might not exist in future versions, but there should be a more generic way to perform what it does.

^^

استعمل هذا ؟

setElementFrozen 

Link to comment

Client :

addEventHandler ( "onClientResourceStart", getRootElement(), 
function () 
    outputChatBox ( "Freeze System Started !", 255, 0, 0, 255) 
end ) 
  
MyWindow = guiCreateWindow ( ... ) 
Start = guiCreateButton ( ... ) 
Stop = guiCreateButton ( ... ) 
  
 addEventHandler ( "onClientGUIClick", root, 
function () 
    if ( source == Start ) then 
triggerServerEvent ( "StartF", localPlayer ) 
    end 
end ) 
  
 addEventHandler ( "onClientGUIClick", root, 
function () 
    if ( source == Stop ) then 
triggerServerEvent ( "StopF", localPlayer ) 
    end 
end ) 
  
addEvent ( "Freeze", true ) 
 addEventHandler ( "Freeze", root, 
function () 
    guiSetVisible ( MyWindow, true ) 
    outputChatBox ( "لقد تم تجميدك !", 255, 0, 0, 255) 
end ) 
  
addEvent ( "unFreeze", true ) 
 addEventHandler ( "unFreeze", root, 
function () 
    guiSetVisible ( MyWindow, false ) 
    outputChatBox ( "لقد تم فك تجميدك !", 0, 255, 0, 255) 
end ) 
  

Server :

local Opens = { 
    ["Serial"] = true, 
} 
  
addEvent ( "StartF", true ) 
 addEventHandler ( "StartF", root, 
function () 
    local PLAy = getElementsByType ( "player" ) 
    if not Opens[getPlayerSerial()] then 
    for i,v in ipairs(PLAy) do 
    if setElementFrozen(PLAy,false) then 
    setElementFrozen(PLAy,true) 
else 
    setElementFrozen(PLAy,false) 
triggerClientEvent ( "Freeze", source ) 
            end 
        end 
    end 
end 
) 
  
addEvent ( "StopF", true ) 
 addEventHandler ( "StopF", root, 
function () 
setElementFrozen(PLAy,false) 
triggerClientEvent ( "unFreeze", source ) 
    end 
end ) 

فيه اي خطأ ؟

لاني احس فيه خطأ

Link to comment

local Opens = { 
    ["Serial"] = true, 
} 
  
addEvent ( "StartF", true ) 
 addEventHandler ( "StartF", root, 
function () 
    local PLAy = getElementsByType ( "player" ) 
    if not Opens[getPlayerSerial()] then 
    for i,v in ipairs(PLAy) do 
    if setElementFrozen(PLAy,false) then 
    setElementFrozen(PLAy,true) 
else 
    setElementFrozen(PLAy,false) 
triggerClientEvent ( "Freeze", source ) 
            end 
        end 
    end 
end 
) 
  
addEvent ( "StopF", true ) 
 addEventHandler ( "StopF", root, 
function () 
setElementFrozen(PLAy,false) 
triggerClientEvent ( "unFreeze", source ) 
    end 
end ) 

فيه اي خطأ ؟

لاني احس فيه خطأ

المفروض أنت بعد الترايقر حق الفريز تسوي لوب للاعبين وتجيب سيريالاته وتسوي تحقق ان سيرياله بالجدول ولا لا اذا موب بالجدول سوي لهم فريز

وبالنسبة لـ ترايقر فك الفريز المفروض تسوي لوب للاعبين وتشيل منهم الفريز = ))

Link to comment

Server:

local Opens = { 
["Serial"] = true, 
} 
      
 addEvent ( "StartF", true ) 
 addEventHandler ( "StartF", root, 
 function () 
        for i,PLAy in ipairs(getElementsByType("player")) do 
        local serial = getPlayerSerial( PLAy ) 
        if Opens[serial] then outputChatBox ("لقد تم تجميد الكل",PLAy,255,0,0,true) return end 
        if isElementFrozen ( source ) then 
        setElementFrozen ( source, false) 
        else 
        setElementFrozen ( source, true) 
        triggerClientEvent ( "Freeze", source) 
        end 
        end 
     end) 
     
      
    addEvent ( "StopF", true ) 
    addEventHandler ( "StopF", root, 
    function () 
    setElementFrozen( source,false) 
    triggerClientEvent ( "unFreeze", source ) 
    end ) 

Client :

  addEventHandler ( "onClientResourceStart", getRootElement(), 
    function () 
    outputChatBox ( "Freeze System Started !", 255, 0, 0, true) 
    end ) 
      
    MyWindow = guiCreateWindow ( ... ) 
    Start = guiCreateButton ( ... ) 
    Stop = guiCreateButton ( ... ) 
      
     addEventHandler ( "onClientGUIClick", root, 
    function () 
        if ( source == Start ) then 
    triggerServerEvent ( "StartF", localPlayer ) 
        end 
    end ) 
      
     addEventHandler ( "onClientGUIClick", root, 
    function () 
        if ( source == Stop ) then 
    triggerServerEvent ( "StopF", localPlayer ) 
        end 
    end ) 
      
    addEvent ( "Freeze", true ) 
     addEventHandler ( "Freeze", root, 
    function () 
        guiSetVisible ( MyWindow, true ) 
        outputChatBox ( "لقد تم تجميدك !", 255, 0, 0, true) 
    end ) 
      
    addEvent ( "unFreeze", true ) 
     addEventHandler ( "unFreeze", root, 
    function () 
        guiSetVisible ( MyWindow, false ) 
        outputChatBox ( "لقد تم فك تجميدك !", 0, 255, 0, true) 
    end ) 
      
      
      

Link to comment
Server:
local Opens = { 
["Serial"] = true, 
} 
      
 addEvent ( "StartF", true ) 
 addEventHandler ( "StartF", root, 
 function () 
        for i,PLAy in ipairs(getElementsByType("player")) do 
        local serial = getPlayerSerial( PLAy ) 
        if Opens[serial] then outputChatBox ("لقد تم تجميد الكل",PLAy,255,0,0,true) return end 
        if isElementFrozen ( source ) then 
        setElementFrozen ( source, false) 
        else 
        setElementFrozen ( source, true) 
        triggerClientEvent ( "Freeze", source) 
        end 
        end 
     end) 
     
      
    addEvent ( "StopF", true ) 
    addEventHandler ( "StopF", root, 
    function () 
    setElementFrozen( source,false) 
    triggerClientEvent ( "unFreeze", source ) 
    end ) 

!هو يبي يجمد اللاعبين كلهم وأنت جمدت السورس الي هو الي ضغط الزر؟

Link to comment

Client side #

addEventHandler ( "onClientResourceStart", resourceRoot, 
  function () 
    outputChatBox ("Freeze System Started !", 255, 0, 0, true) 
  end 
) 
      
MyWindow = guiCreateWindow (...) 
Start = guiCreateButton (...) 
Stop = guiCreateButton (...) 
  
addEventHandler ("onClientGUIClick", resourceRoot, 
  function () 
    if (source == Start) then 
      triggerServerEvent ("StartF", localPlayer) 
    end 
    if (source == Stop) then 
      triggerServerEvent ("StopF", localPlayer) 
    end 
  end 
) 
  
addEvent ("Freeze", true) 
addEventHandler ("Freeze", root, 
  function () 
    guiSetVisible (MyWindow, true) 
    outputChatBox ("لقد تم تجميدك !", 255, 0, 0, true) 
  end 
) 
  
addEvent ("unFreeze", true) 
addEventHandler ("unFreeze", root, 
  function () 
    guiSetVisible (MyWindow, false) 
    outputChatBox ("لقد تم فك تجميدك !", 0, 255, 0, true) 
  end 
) 

Server side #

local Opens = { 
  ["Serial"] = true, 
} 
  
addEvent ("StartF", true) 
addEventHandler ("StartF", root,  
    function () 
        for _,v in ipairs (getElementsByType ("player")) do 
            if not Opens [getPlayerSerial (v)] then 
                triggerClientEvent (v, "Freeze", source) 
                setElementFrozen (v, true) 
            end 
        end 
    end 
) 
  
addEvent ("StopF", true) 
addEventHandler ("StopF", root,  
    function () 
        for _,v in ipairs (getElementsByType ("player")) do 
            if not Opens [getPlayerSerial (v)] then 
                triggerClientEvent (v, "unFreeze", source) 
                setElementFrozen (v, false) 
            end 
        end 
    end 
) 
Link to comment
Client side #

addEventHandler ( "onClientResourceStart", resourceRoot, 
  function () 
    outputChatBox ("Freeze System Started !", 255, 0, 0, true) 
  end 
) 
      
MyWindow = guiCreateWindow (...) 
Start = guiCreateButton (...) 
Stop = guiCreateButton (...) 
  
addEventHandler ("onClientGUIClick", resourceRoot, 
  function () 
    if (source == Start) then 
      triggerServerEvent ("StartF", localPlayer) 
    end 
    if (source == Stop) then 
      triggerServerEvent ("StopF", localPlayer) 
    end 
  end 
) 
  
addEvent ("Freeze", true) 
addEventHandler ("Freeze", root, 
  function () 
    guiSetVisible (MyWindow, true) 
    outputChatBox ("لقد تم تجميدك !", 255, 0, 0, true) 
  end 
) 
  
addEvent ("unFreeze", true) 
addEventHandler ("unFreeze", root, 
  function () 
    guiSetVisible (MyWindow, false) 
    outputChatBox ("لقد تم فك تجميدك !", 0, 255, 0, true) 
  end 
) 

Server side #

local Opens = { 
  ["Serial"] = true, 
} 
  
addEvent ("StartF", true) 
addEventHandler ("StartF", root,  
    function () 
        for _,v in ipairs (getElementsByType ("player")) do 
            if not Opens [getPlayerSerial (v)] then 
                triggerClientEvent (v, "Freeze", source) 
                setElementFrozen (v, true) 
            end 
        end 
    end 
) 
  
addEvent ("StopF", true) 
addEventHandler ("StopF", root,  
    function () 
        for _,v in ipairs (getElementsByType ("player")) do 
            if not Opens [getPlayerSerial (v)] then 
                triggerClientEvent (v, "unFreeze", source) 
                setElementFrozen (v, false) 
            end 
        end 
    end 
) 

TheKiller

ممكن تشرح ليي وش هذي اجوفها بعض الاحيان

لاكن مافهمها

_, 

Link to comment
الشرطة _

في اللوب كأي حرف ثآني مالها معنى تقدر تحطها اي شيء وهي المفتاح بعضهم يظنون انها تخطي المفتاح يعني ما راح أستخدمه لاكن ذا خاطئ هاذي كأي حرف ثاني

ممكن تعلمني وش كانت الاخطاء عشان اصححها مرة ثانية ؟

Link to comment

local Opens = { 
    ["Serial"] = true, 
} 
  
addEvent ( "StartF", true ) 
 addEventHandler ( "StartF", root, 
function () 
    local PLAy = getElementsByType ( "player" ) 
    if not Opens[getPlayerSerial()] then 
    for i,v in ipairs(PLAy) do 
    if setElementFrozen(PLAy,false) then 
    setElementFrozen(PLAy,true) 
else 
    setElementFrozen(PLAy,false) 
triggerClientEvent ( "Freeze", source ) 
            end 
        end 
    end 
end 
) 
  
addEvent ( "StopF", true ) 
 addEventHandler ( "StopF", root, 
function () 
setElementFrozen(PLAy,false) 
triggerClientEvent ( "unFreeze", source ) 
    end 
end ) 

فيه اي خطأ ؟

لاني احس فيه خطأ

المفروض أنت بعد الترايقر حق الفريز تسوي لوب للاعبين وتجيب سيريالاته وتسوي تحقق ان سيرياله بالجدول ولا لا اذا موب بالجدول سوي لهم فريز

وبالنسبة لـ ترايقر فك الفريز المفروض تسوي لوب للاعبين وتشيل منهم الفريز = ))

Link to comment
guiCheckBoxGetSelected 
triggerServerEvent 
getElementsByType -- loop Player 
setElementFrozen 
guiGridListAddRow 
getElementsByType -- loop Player 
getPlayerName 
guiGridListGetItemText 
guiGridListGetSelectedItem 
guiGridListSetItemText 
setElementFrozen 

الكلنت اخليه في اي حدث؟

Link to comment

الكلنت اخليه في اي حدث؟

"onClientResourceStart" 
--[[ لوب للاعبين وجيب أسمائهم وحطهم بالقريد ليست ]]-- 
"onClientGUIClick" 
--[[ سوي تحقق أن السورس هل هو الشيك بوكس اذا هو سوي تحقق أن الشيك بوكس موجود ثم سوي ترايقر للسيرفر ولوب للاعبين وتجميد ]]-- 
Link to comment

الكلنت اخليه في اي حدث؟

"onClientResourceStart" 
--[[ لوب للاعبين وجيب أسمائهم وحطهم بالقريد ليست ]]-- 
"onClientGUIClick" 
--[[ سوي تحقق أن السورس هل هو الشيك بوكس اذا هو سوي تحقق أن الشيك بوكس موجود ثم سوي ترايقر للسيرفر ولوب للاعبين وتجميد ]]-- 

تعقدت اخر شي يمكن بعد مسوي هريسة

Link to comment

"onClientGUIClick" 

أستخدم ذا الحدث وسوي تحقق تحته أن السورس هو الشيك بوكس

if ( source == checkbox ) then 

بعدها سوي ترايقر للسيرفر وسوي لوب لجميع اللاعبين وسوي لهم فريز وبس ذذ

Link to comment
"onClientGUIClick" 

أستخدم ذا الحدث وسوي تحقق تحته أن السورس هو الشيك بوكس

if ( source == checkbox ) then 

بعدها سوي ترايقر للسيرفر وسوي لوب لجميع اللاعبين وسوي لهم فريز وبس ذذ

تفضل هريسة

Client :{

local screenW, screenH = guiGetScreenSize() 
  
WndPP = guiCreateWindow((screenW - 463) / 2, (screenH - 340) / 2, 463, 340,"HH", false) 
guiSetVisible ( WndPP, false ) 
Stop = guiCreateButton(10, 281, 172, 49, ".. x [ R Freeze ] x ..", false, WndPP) 
guiSetProperty(Stop, "NormalTextColour", "FF00FFFF") 
Start = guiCreateButton(281, 281, 172, 49, ".. x [ Freeze ] x ..", false, WndPP) 
guiSetProperty(Start, "NormalTextColour", "FFFF00FF") 
Grid = guiCreateGridList ( ... ) 
Check = guiCreateCheckBox( ... ) 
CC = guiGridListAddColumn( ... ) 
  
 addEventHandler ( "onClientGUIClick", root, 
function () 
if ( source == Check ) then 
      triggerServerEvent ("Frz", localPlayer) 
        end 
    end 
) 
  
addEvent ( "Grid", true ) 
addEventHandler ("Grid", root, 
function () 
local AdR = guiGridListAddRow (Grid) 
for i,v in ipairs(getElementsByType ( "player" )) do 
guiGridListSetItemText ( Grid, AdR, column, getPlayerName (v), false, false ) 
guiGridListGetItemText ( Grid, guiGridListGetSelectedItem ( Grid ), 1 ) 
      triggerServerEvent ("ii", localPlayer) 
    end 
end 
) 

Server:--

local Te = { 
    ["Serial"] = true, 
} 
  
  
addEvent ( "Frz", true ) 
addEventHandler ("Frz", root, 
function () 
for _,v in ipairs(getElementsByType ( "player" ) ) do 
if not Te [getPlayerSerial (v)] then 
triggerClientEvent (v, "Grid", source) 
setElementFrozen (v, true) 
        end 
    end 
end 
) 
  
addEvent ( "ii", true ) 
addEventHandler ("ii", root, 
    function () 
setElementFrozen (v, true) 
    end 
) 

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