Jump to content

طلب مساعدة املاك خاصة


apple700

Recommended Posts

السلام عليكم ورحمة الله وبركاته

جبنا كم كود من مبرمج وخبصت وجبت شوي من الويكي وكذا

المهم #

:cry: عندي مشكلة ان مافي اثرر للوحة

انا ابي اسوي مود الاملاك الخاصة يعني

لوحة تفتح بسريال محدد

فيها جريد لست وفيها زر اظهار واخفاء احدد سيارة من الجريد لست واضغط اظهار واركب

يوم يجي واحد يبي يركب يطلع له بشات املاك خاصة

هذي هي فكرتي

وسويت ملف كلينت وسيرفر وظبط الاكواد واخر شئ ما اشتغلت

وهذي الكلينت والسيرفر

كلينت #

HASSANWnd = guiCreateWindow(278,94,275,422,"",false) 
guiSetAlpha(HASSANWnd,1) 
Label = guiCreateLabel(71,28,135,21,":: لوحة الاملاك الخاصة ::",false,HASSANWnd) 
guiLabelSetColor(Label,0,255,15) 
Button_X = guiCreateButton(227,26,33,17,"X",false,HASSANWnd) 
grid = guiCreateGridList(13,60,253,255,false,HASSANWnd) 
guiGridListSetSelectionMode(grid,2) 
guiGridListAddColumn(grid,"Vehicles",0.2) 
local Vehicles = {{541},{421},{404},{562},{415},{451},{458},{560},{546},{411},{589}} 
for i,v in ipairs (Vehicles) do 
spawnBut = guiCreateButton(45,327,185,35,".:: اظهار السيارة ::.",false,HASSANWnd) 
destroyBut = guiCreateButton(45,370,185,35,".:: اخفاء السيارة ::.",false,HASSANWnd) 
  
bindKey("O","down", 
    function () 
        guiSetVisible(HASSANWnd,not guiGetVisible(HASSANWnd)) 
        showCursor(guiGetVisible(HASSANWnd)) 
    end 
) 
  
--الاكواد 
  
addEvent ("carSpawn", true) 
addEvent ("carDestroy", true) 
  
function guiClick (button, state, absoluteX, absoluteY) 
  if (source == spawnBut) then 
    triggerServerEvent ("carSpawn", lp) 
  elseif (source == destroyBut) then 
    triggerServerEvent ("carDestroy", lp) 
  end 
end 
  
local car = createVehicle (HASSANWnd)  
 addEventHandler("onVehicleStartEnter", root, 
function(player) 
    if(source==car)then 
        if (getPlayerSerial(player)~="**********************************")then 
            cancelEvent() 
            r,b,g = math.random(0,255) 
            outputChatBox( "املاك خاصة", player, r, b, g, true ) 
        else 
         r,b,g = math.random(0,255) 
            outputChatBox( "مرحباً بك امتمنى لك قيادة جيدة", player, r, b, g, true ) 
        end 
    end 
end) 

السيرفر #

  
  
addEvent ("carSpawn", true) 
addEvent ("carDestroy", true) 
  
  
function carSpawn () 
  if not (isGuestAccount (getPlayerAccount (source))) and not (isPedInVehicle(source)) then 
    if (getElementData (source, "hisCar")) and (getElementData (source, "hisCar") ~= nil) and (getElementType(getElementData (source, "hisCar")) == "vehicle") then 
      setElementVelocity (getElementData (source, "hisCar"), 0,0,0) 
      local x,y,z = getElementPosition (source) 
      setVehicleRotation (getElementData (source, "hisCar"), 0, 0, 0) 
      setElementPosition (getElementData (source, "hisCar"), x+2,y,z +1) 
      outputChatBox ("Car spawned.", source, 255, 0, 0) 
    elseif not (getElementData (source, "hisCar")) then 
      local accountData = getAccountData (getPlayerAccount (source), "funmodev2-car") 
      if (accountData) then 
        carID = getAccountData (getPlayerAccount (source), "funmodev2-car") 
        x,y,z = getElementPosition (source) 
        vehicle = createVehicle (carID, x +2, y, z +1) 
        setElementID (vehicle, getAccountName (getPlayerAccount(source))) 
        setElementData (source, "hisCar", vehicle) 
        outputChatBox ("Car spawned.", source, 255, 0, 0) 
        if (getAccountData (getPlayerAccount(source), "funmodev2-carupg")) then 
          local upgrades = nil 
          local upgrades = {} 
          local upgrades = getAccountData (getPlayerAccount(source), "funmodev2-carupg") 
          for i,v in ipairs (upgrades) do 
            addVehicleUpgrade (vehicle, v) 
          end 
        end 
        if (getAccountData (getPlayerAccount(source), "funmodev2-paintjob")) then 
          local paintjob = getAccountData (getPlayerAccount(source), "funmodev2-paintjob") 
          setVehiclePaintjob (vehicle, paintjob) 
        end 
        if (getAccountData (getPlayerAccount(source), "funmodev2-carcolor1")) and (getAccountData (getPlayerAccount(source), "funmodev2-carcolor2")) then 
          local c1 = getAccountData (getPlayerAccount(source), "funmodev2-carcolor1") 
          local c2 = getAccountData (getPlayerAccount(source), "funmodev2-carcolor2") 
          setVehicleColor (vehicle, c1,c2,0,0) 
        end 
      else 
        outputChatBox ("You haven't got a car.", source, 255, 0, 0) 
      end 
    else 
      outputChatBox ("You're already in a car!", source, 255, 0, 0) 
    end 
  end 
end 
addEventHandler ("carSpawn", getRootElement(), carSpawn) 
  
function carDestroy ()  
  if  not (isGuestAccount (getPlayerAccount (source))) then 
    if (isPedInVehicle (source)) then 
      if (getElementID(getPedOccupiedVehicle(source)) == getAccountName (getPlayerAccount(source))) then 
        setElementHealth (getElementData (source, "hisCar"), 0) 
        destroyElement (getPedOccupiedVehicle (source)) 
        removeElementData (source, "hisCar") 
        outputChatBox ("Car Destroyed.", source, 255, 0, 0) 
      else 
        outputChatBox ("This not your car!", source, 255, 0, 0) 
      end 
    elseif (not (isPedInVehicle (source))) and (getElementData (source, "hisCar")) and (getElementData (source, "hisCar") ~= nil) then 
      car=getElementData(source, "hisCar") 
      destroyElement(car) 
      outputChatBox ("Car Destroyed.", source, 255, 0, 0) 
      removeElementData (source, "hisCar") 
    end 
  end 
end 
addEventHandler ("carDestroy", getRootElement(), carDestroy) 
  
function engineSwitch () 
  if (isPedInVehicle (source)) then 
    local veh = getPedOccupiedVehicle (source) 
    if (getVehicleEngineState (veh) == true) then 
      setVehicleEngineState (veh, false) 
      outputChatBox ("Vehicle shutted down.", source, 255, 0, 0) 
    elseif (getVehicleEngineState (veh) == false) then 
      setVehicleEngineState (veh, true) 
      outputChatBox ("Vehicle started.", source, 255, 0, 0) 
    end 
  else 
    outputChatBox ("You aren't in a vehicle!", source, 255, 0, 0) 
  end 
end 
addEvent("engenieSwitch",true) 
addEventHandler("engenieSwitch",getRootElement(),engineSwitch) 
  
function lightsSwitch () 
  if (isPedInVehicle (source)) then 
    local veh = getPedOccupiedVehicle (source) 
    if (getVehicleOverrideLights(veh) ~= 2) then 
      setVehicleOverrideLights(veh, 2) 
      outputChatBox ("Vehicle lights turned on.", source, 255, 0, 0) 
    elseif (getVehicleOverrideLights(veh) ~= 1) then 
      setVehicleOverrideLights(veh, 1) 
      outputChatBox ("Vehicle lights turned off.", source, 255, 0, 0) 
    end 
  else 
    outputChatBox ("You aren't in a vehicle!", source, 255, 0, 0) 
  end 
end 
addEvent("lightsSwitch",true) 
addEventHandler("lightsSwitch",getRootElement(),lightsSwitch) 
  
function lockSwitch () 
  if (isPedInVehicle (source)) then 
    local veh = getPedOccupiedVehicle (source) 
    if not (isVehicleLocked (veh)) then 
      setVehicleLocked (veh, true) 
      setVehicleDoorsUndamageable (veh, true) 
      setVehicleDoorState (veh, 0, 0) 
      setVehicleDoorState (veh, 1, 0) 
      setVehicleDoorState (veh, 2, 0) 
      setVehicleDoorState (veh, 3, 0)  
      outputChatBox ("Vehicle locked.", source, 255, 0, 0) 
    elseif (isVehicleLocked (veh)) then 
      setVehicleLocked (veh, false) 
      setVehicleDoorsUndamageable (veh, false) 
      outputChatBox ("Vehicle unlocked.", source, 255, 0, 0) 
    end 
  else 
    outputChatBox ("You aren't in a vehicle!", source, 255, 0, 0) 
  end 
end 
addEvent("lockSwitch",true) 
addEventHandler("lockSwitch",getRootElement(),lockSwitch ) 
  
addEventHandler ("onVehicleStartEnter", getRootElement(),  
function(player, seat, jacked, door) 
  if (isVehicleLocked (source) == true) then 
    local mannetjeNaam = getAccountName (getPlayerAccount (player)) 
    local autoNaam = getElementID (source) 
    if (mannetjeNaam == autoNaam) then 
      setVehicleLocked (source, false) 
      outputChatBox ("Vehicle unlocked!", player, 255, 0, 0, false) 
    end 
  end 
end) 

مع احترامي للمبرمج شكله ما يعرف شئ

xml لان الكود معمول على داتا وملف

انا هذا الي فهمته من الكود

انا ابي على سريال

والسلام عليكم ورحمة الله وبركاته

Link to comment
الحبيب مجمع اكواد من كل حته و مخلط كلينت بسيرفر و تبي يشتغل ههه

# , ههههههههههههههههههههههههههههههههههههههههههههههههه .... :lol::lol::lol:

يبوي وش من كل حتةة خخ

# هذا كل حرف جايبه من مككـأن مجهـول خخ

Link to comment
ههه والله مدري ذا بيست يقولي خبص واتعلم

وانا ابي اخبص واتعلم

طيب خبص بس خبص بـ فهم

لو انت تبي تتعلم كان تعلمت والمفروض ما تعتمد علينا شوف الويكي تمشى وحاول تفهم وتقراه مثل مانقراه احنا

لأن احنا بشر وانت بشر مافيه فرق بيننا بس الفهم (العقل) <طبعا ماقصد اهانه بس حاول تفهم لأن لو انسان قدر لعي ششيء كل انسان يقدر عليه بأذن الله

Link to comment
ههه والله مدري ذا بيست يقولي خبص واتعلم

وانا ابي اخبص واتعلم

طيب خبص بس خبص بـ فهم

لو انت تبي تتعلم كان تعلمت والمفروض ما تعتمد علينا شوف الويكي تمشى وحاول تفهم وتقراه مثل مانقراه احنا

لأن احنا بشر وانت بشر مافيه فرق بيننا بس الفهم (العقل) <طبعا ماقصد اهانه بس حاول تفهم لأن لو انسان قدر لعي ششيء كل انسان يقدر عليه بأذن الله

كلامك من ذهب

وانا سويت كذا وصراحة ما كنت متوقعه غلط

بس قولي وش الاساسيات الي اقرئها بالويكي عشان افهم ؟؟

Link to comment

اول شيء تشوف وش تسوي الوظيفه,

مثلا ,

getRandomPlayer 

This function returns a random player.

يعني يجيب لك لاعب عشوائي,

Syntax وبعدين تقرأ الـ

player getRandomPlayer ( ) 

طبعا تلاحظ انه مافي ارقومنتات,

() كذا يعني بسيط,

وبعدين تشوف,

Returns

Returns a random player, false if the server is empty.

وان ما فهمت تشوف المثال ,

local randomPlayer = getRandomPlayer ( ) 
outputChatBox ( getPlayerName ( randomPlayer ).." is now the fugitive!" ) 

مثلآ ,

givePlayerMoney 

This function adds money to a player's current money amount. To set absolute values, setPlayerMoney can be used.

يعني انه يعطي اللاعب فلوس,

ولازم تقرأ الملاحظات والتحذيرآت,

Note: Using this function client side (not recommended) will not change a players money server side.

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

Syntax وبعدين تشوف الـ

bool givePlayerMoney ( player thePlayer, int amount ) 

بعدين تشوف الارقومنتات,

Required Arguments

thePlayer: the player you are giving the money to. يعني اللاعب الي تبيه تعطيه فلوس

amount: a positive integer number specifying the amount of money to give to the player. يعني قيمه الفلوس

Syntax وطبعا في كلنت وسيرفر, وبعضها تختلف في الـ

bool givePlayerMoney ( int amount ) 

Required Arguments

amount: a positive integer number specifying the amount of money to give to the player.

Link to comment
ههه والله مدري ذا بيست يقولي خبص واتعلم

وانا ابي اخبص واتعلم

طيب خبص بس خبص بـ فهم

لو انت تبي تتعلم كان تعلمت والمفروض ما تعتمد علينا شوف الويكي تمشى وحاول تفهم وتقراه مثل مانقراه احنا

لأن احنا بشر وانت بشر مافيه فرق بيننا بس الفهم (العقل) <طبعا ماقصد اهانه بس حاول تفهم لأن لو انسان قدر لعي ششيء كل انسان يقدر عليه بأذن الله

كلامك من ذهب

وانا سويت كذا وصراحة ما كنت متوقعه غلط

بس قولي وش الاساسيات الي اقرئها بالويكي عشان افهم ؟؟

# الأسسأسيأت ي الأخو ... هي اللي اي مود تسويه لأزم تكون موجودة تقريبا ذذ

# نفترضض انك بتسوي مود مثـلأ لوحة انتقال , او لوحة شخصيات

كيف بتسسوي النافذة ؟

بـ guieditor

# تسوي النافذة كــأملة مع الأزرار وكل شي

طيب الحين نبي نخلي النافذة تفتح بزر كيف ؟

bindKey 
guiSetVisible 
showCursor 

# مثل كود الفتح عندك ذا من الأساسيات , يعني تسوي نافذة بدون م تفتح بكل سكربت فيه نافذة , لأزم الكود ذا مستحيل بدونه زي كذا

# طيب الحين بتسوي وقت يضغط على الزر ان كـأن بلوحة الأنتقالأت او الشخصيات

تستخدم الححدث :

"onClientGUIClick"

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

# ` ذا الححدث الحين مو بس اساسي هو كل شي مع كل زر له وظيفة محددة موجودة بلوحة مأ

# يعني ذا حدث اساسي

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

# الحين لو تبغى تنقله تستخدم

setElementPosition

# او للشخصيات

setElementModel

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

# يعني القصصة على حسب المود

# بس في اشياء لأزم تعرفها قبل م تتعلم البرمجة يعني لأزم تكون تعرفها اشياء هي بسيطة مو بسيطة كيف اشرحلك يعني مهمة بس هي كلها كلمة بس مهمة

# يعني اساسيات , عرفت كيف , يعني بدونها م يشتغل حدث ما مثلأ ولأ شي ,

مثلأ يعني على سبيل المثال , مثال بسيط :

# root لو انت تبي وقت اللاعب يموت تجي له لوحة تسوي الحدث وكذا وتحط

# هنا غغلط ... , ليش ؟

# لأنك حطيت root < وهذا يعني للكل

# تحط localPlayer

تصير للاعب نفسه فقط

ولوكال بلير كلنت فقط ... ,

# واشياء كثيرة ثانية , مع الأيام تتعلمها ..

# لو عندك اي استفسار تفضضل اسأل

Link to comment

يعطيكم العافية شباب والله فهمت كثير اكثر شئ ما كنت فاهمه

لوكل بلاير + ذا بلاير

والله الحين صار عادي كفوو والله

والله ما قصرتوا

بحاول اخبص بذكاء

مو ذي الي فوق

يعني اخبص بنتيجة

Link to comment
يعطيكم العافية شباب والله فهمت كثير اكثر شئ ما كنت فاهمه

لوكل بلاير + ذا بلاير

والله الحين صار عادي كفوو والله

والله ما قصرتوا

بحاول اخبص بذكاء

مو ذي الي فوق

يعني اخبص بنتيجة

ok, xD

Link to comment

بالنسبة أن اللوحة ماتظهر و تبيها تفتح بسريال

--Client  
MySerial = {["سريالك"] = true} 
ShowHide = function() 
  if MySerial[getPlayerSerial(localPlayer)] then 
    guiSetVisible(HASSANWnd, not  
    guiGetVisible(HASSANWnd)) 
    showCursor(not isCursorShowing()) 
  end 
end 
bindKey("O", "down", ShowHide) 
  
    HASSANWnd = guiCreateWindow(278,94,275,422,"",false) 
    guiSetAlpha(HASSANWnd,1) 
    guiSetVisible(HASSANWnd, false) 
    Label = guiCreateLabel(71,28,135,21,":: لوحة الاملاك الخاصة ::",false,HASSANWnd) 
    guiLabelSetColor(Label,0,255,15) 
    Button_X = guiCreateButton(227,26,33,17,"X",false,HASSANWnd) 
    grid = guiCreateGridList(13,60,253,255,false,HASSANWnd) 
    guiGridListSetSelectionMode(grid,2) 
    guiGridListAddColumn(grid,"Vehicles",0.2) 
     
Vehicles1 = { 
{541}, 
{421}, 
{404}, 
{562}, 
{415}, 
{451}, 
{458}, 
{560}, 
{546}, 
{411}, 
{589}, 
} 
  
for i,ve in ipairs(Vehicles1) do 
    local row = guiGridListAddRow(grid) 
    guiGridListSetItemText(grid,row,1,ve[1],false,false) 
end 
     
    spawnBut = guiCreateButton(45,327,185,35,".:: اظهار السيارة ::.",false,HASSANWnd) 
    destroyBut = guiCreateButton(45,370,185,35,".:: اخفاء السيارة ::.",false,HASSANWnd) 
      
      
    addEvent ("carSpawn", true) 
    addEvent ("carDestroy", true) 
      
    function guiClick (button, state, absoluteX, absoluteY) 
      if (source == spawnBut) then 
        triggerServerEvent ("carSpawn", lp) 
      elseif (source == destroyBut) then 
        triggerServerEvent ("carDestroy", lp) 
      end 
    end 
      
    local car = createVehicle (HASSANWnd) 
     addEventHandler("onVehicleStartEnter", root, 
    function(player) 
        if(source==car)then 
            if (getPlayerSerial(player)~="**********************************")then 
                cancelEvent() 
                r,b,g = math.random(0,255) 
                outputChatBox( "املاك خاصة", player, r, b, g, true ) 
            else 
             r,b,g = math.random(0,255) 
                outputChatBox( "مرحباً بك امتمنى لك قيادة جيدة", player, r, b, g, true ) 
            end 
        end 
    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...