تصحيح كود ** طلب اضاقة على الكود / طلب كود

yaza034 · December 1, 2013

السلام عليكم

ابي اتضوفولي على الكود كل لاعب يكتب في الشات سباق يروح كل واحد لمكان ابي 5 لعيبة

"كل واحد كتب سباق يروح لمكان معين في الماب "

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

RaceCars = { 
    "ايدي السيارة الاولى مثلا 432", 
    "ايدي السيارة الثانية" 
    } 
    addEventHandler('onPlayerChat',root, 
    function(msg) 
            if string.find(msg,'سباق') then 
                setElementPosition ( source, X, Y, Z ) 
            local RaceVehicle = createVehicle ( RaceCars, x, y, z) 
                warpPedIntoVehicle ( source, RaceVehicle ) 
            end 
        end 
    )

Edited December 2, 2013 by Guest

AboShanab · December 1, 2013

ي اخي .. #

هذا الكود بالنسبة للي انت تبيه 1% .. #

انا ما ادري ليه الناس تبي تقلد على السيرفرات المشهورة .. #

ي اخي طلع فكرة انت وسوها بنفسك او اطلب من مبرمج خبير يسويه لك بـ مقابل مادي .. #

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

3NAD · December 1, 2013

لم يتم التجربة

Race = { 
    Players = { }; 
    Vehicles = { }; 
    Position = {  
        [1] = { x, y, z }; 
        [2] = { x, y, z }; 
        [3] = { x, y, z }; 
        [4] = { x, y, z }; 
        [5] = { x, y, z }; 
    }; 
    Cars = { 
        { 432 }; 
        { 432 }; 
    };   
}; 
  
addEventHandler ( "onPlayerChat", root, 
    function ( msg ) 
        if string.find ( msg, "سباق" ) then 
            if #Race.Players < 5 then 
                if Race.Vehicles[source] then 
                    if isElement ( Race.Vehicles[source] ) then 
                        destroyElement ( Race.Vehicles[source] ) 
                    end 
                    Race.Vehicles[source] = nil 
                end 
                Race.Vehicles[source] = createVehicle ( math.random(#Race.Cars)[1], RacePosition[#Race.Players][1], RacePosition[#Race.Players][2], RacePosition[#Race.Players][3] ) 
                setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] ) 
                table.insert { Race.Players, source } 
            else 
                outputChatBox ( "* أكتمل العدد", source ) 
            end 
        end 
    end 
)

yaza034 · December 1, 2013

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

3NAD · December 1, 2013

متى يخلص السباق ؟

yaza034 · December 2, 2013

المود حطيتة بس ما اشتغل

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

ويأخذ فلسوي اخر واحد يتفجر

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

والاخير يكون معاه فلسوي بقيمة 5000

شكراً عناد والله انك ما اتقصر اخوي

الله يوفقكــ

3NAD · December 2, 2013

جرب ورد خبر

Race = { 
    Players = { }; 
    Vehicles = { }; 
    Position = { 
        [1] = { x, y, z }; 
        [2] = { x, y, z }; 
        [3] = { x, y, z }; 
        [4] = { x, y, z }; 
        [5] = { x, y, z }; 
    }; 
    Cars = { 
        { 432 }; 
        { 432 }; 
    };  
}; 
  
setRaceStats = function ( stats ) 
    if stats then 
        setElementData ( resourceRoot, "RaceStarted", true ) 
    else 
        Race.Players = { }; 
        setElementData ( resourceRoot, "RaceStarted", false ) 
        outputChatBox ( "* تم إفتتاح السباق", root, 255, 255, 0, true ) 
    end 
end 
  
addEventHandler ( "onPlayerChat", root, 
    function ( msg ) 
        if string.find ( msg, "سباق" ) then 
            if getElementData ( resourceRoot, "RaceStarted" ) then  
                return outputChatBox ( "* لم ينتهي السباق بعد", source, 255, 0, 0, true ) 
            end      
            if #Race.Players < 5 then 
                if not Race.Vehicles[source] then 
                    if #Race.Players == 4 then 
                        setRaceStats ( true ) 
                    end 
                    Race.Vehicles[source] = createVehicle ( Race.Cars[math.random(#Race.Cars)][1], Race.Position[#Race.Players][1], Race.Position[#Race.Players][2], Race.Position[#Race.Players][3] ) 
                    setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] ) 
                    table.insert { Race.Players, { source, Race.Vehicles[source], #Race.Players } } 
                end 
            else 
                outputChatBox ( "* أكتمل العدد", source, 255, 0, 0, true ) 
            end 
        end 
    end 
) 
  
addEventHandler ( "onVehicleExplode", resourceRoot, 
    function ( ) 
        for i, v in ipairs ( Race.Players ) do 
            if v[2] == source then 
                if #Race.Players == 1 then 
                    if isElement ( v[1] ) then 
                        givePlayerMoney ( v[1], 5000 ) 
                        outputChatBox ( "* $5000 لقد ربحت", v[1], 255, 255, 0, true ) 
                    end 
                    setTimer ( setRaceStats, 2000, 1, false ) 
                else 
                    table.remove { Race.Players, v[3] } 
                end 
                if isElement ( v[1] ) then 
                    Race.Vehicles[v[1]] = nil 
                end              
                break 
            end 
        end 
    end 
) 
  
addEventHandler ( "onElementDestroy", resourceRoot, 
    function ( ) 
        if getElementType ( source ) == "vehicle" then 
            for i, v in ipairs ( Race.Players ) do 
                if v[2] == source then 
                    if #Race.Players == 1 then 
                        if isElement ( v[1] ) then 
                            givePlayerMoney ( v[1], 5000 ) 
                            outputChatBox ( "* $5000 لقد ربحت", v[1], 255, 255, 0, true ) 
                        end 
                        setTimer ( setRaceStats, 2000, 1, false ) 
                    else 
                        table.remove { Race.Players, v[3] } 
                    end 
                    if isElement ( v[1] ) then 
                        Race.Vehicles[v[1]] = nil 
                    end 
                    break 
                end 
            end 
        end 
    end 
) 
  
addEventHandler ( "onPlayerQuit", root, 
    function ( ) 
        if Race.Vehicles[source] then 
            if isElement ( Race.Vehicles[source] ) then 
                destroyElement ( Race.Vehicles[source] )  
            else 
                for i, v in ipairs ( Race.Players ) do 
                    if v[1] == source then 
                        if #Race.Players == 1 then 
                            setTimer ( setRaceStats, 2000, 1, false ) 
                        else 
                            table.remove { Race.Players, v[3] } 
                        end 
                        break 
                    end 
                end          
            end 
            Race.Vehicles[source] = nil 
        end 
    end 
) 
  
setRaceStats ( false )

yaza034 · December 2, 2013

الله يكثر من امثالك اخوي والله يمكن تعبتك معي

اوكي راح اردلك خبر يا غالي

yaza034 · December 4, 2013

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

يوجد مشكلة

jafar · December 4, 2013

تأكد انك كاتب سباق في الشات بدون /

The Killer · December 4, 2013

+

تأكد انك حاط الاحداثيات هنا

    Position = { 
        [1] = { x, y, z }; 
        [2] = { x, y, z }; 
        [3] = { x, y, z }; 
        [4] = { x, y, z }; 
        [5] = { x, y, z }; 
    };

yaza034 · December 4, 2013

يجب وضع كل الاحدثيات واحدة حطيك كلهم نفس الاحداثية

وبس اكتب سباق ما يروح الكود صحيح !

The Killer · December 4, 2013

تكتب سباق في الشات ولا وين ؟

yaza034 · December 4, 2013

اي في شات "T"

3NAD · December 4, 2013

تأكد انه ملف سيرفر .

yaza034 · December 4, 2013

انا حطيت الكود في ملف وحطيتة lua

واعملت ميتا وحطيتة لكشي تمام يجي المود في السيرفر بس لما اشغلة وتحط سباق ما يروح لأي مكان

Race = { 
    Players = { }; 
    Vehicles = { }; 
    Position = { 
        [1] = { x, y, z }; 
        [2] = { x, y, z }; 
        [3] = { x, y, z }; 
        [4] = { x, y, z }; 
        [5] = { x, y, z }; 
    }; 
    Cars = { 
        { 432 }; 
        { 432 }; 
    }; 
}; 
  
setRaceStats = function ( stats ) 
    if stats then 
        setElementData ( resourceRoot, "RaceStarted", true ) 
    else 
        Race.Players = { }; 
        setElementData ( resourceRoot, "RaceStarted", false ) 
        outputChatBox ( "* تم إفتتاح السباق مرة اخرى", root, 255, 255, 0, true ) 
    end 
end 
  
addEventHandler ( "onPlayerChat", root, 
    function ( msg ) 
        if string.find ( msg, "سباق" ) then 
            if getElementData ( resourceRoot, "RaceStarted" ) then 
                return outputChatBox ( "* لم ينتهي السباق بعد", source, 255, 0, 0, true ) 
            end     
            if #Race.Players < 5 then 
                if not Race.Vehicles[source] then 
                    if #Race.Players == 4 then 
                        setRaceStats ( true ) 
                    end 
                    Race.Vehicles[source] = createVehicle ( math.random(#Race.Cars)[1], RacePosition[#Race.Players][1], RacePosition[#Race.Players][2], RacePosition[#Race.Players][3] ) 
                    setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] ) 
                    table.insert { Race.Players, { source, Race.Vehicles[source], #Race.Players } } 
                end 
            else 
                outputChatBox ( "* أكتمل العدد", source, 255, 0, 0, true ) 
            end 
        end 
    end 
) 
  
addEventHandler ( "onVehicleExplode", resourceRoot, 
    function ( ) 
        for i, v in ipairs ( Race.Players ) do 
            if v[2] == source then 
                if #Race.Players == 1 then 
                    if isElement ( v[1] ) then 
                        givePlayerMoney ( v[1], 5000 ) 
                        outputChatBox ( "* $5000 لقد ربحت", v[1], 255, 255, 0, true ) 
                    end 
                    setTimer ( setRaceStats, 2000, 1, false ) 
                else 
                    table.remove { Race.Players, v[3] } 
                end 
                if isElement ( v[1] ) then 
                    Race.Vehicles[v[1]] = nil 
                end             
                break 
            end 
        end 
    end 
) 
  
addEventHandler ( "onElementDestroy", resourceRoot, 
    function ( ) 
        if getElementType ( source ) == "vehicle" then 
            for i, v in ipairs ( Race.Players ) do 
                if v[2] == source then 
                    if #Race.Players == 1 then 
                        if isElement ( v[1] ) then 
                            givePlayerMoney ( v[1], 5000 ) 
                            outputChatBox ( "* $5000 لقد ربحت", v[1], 255, 255, 0, true ) 
                        end 
                        setTimer ( setRaceStats, 2000, 1, false ) 
                    else 
                        table.remove { Race.Players, v[3] } 
                    end 
                    if isElement ( v[1] ) then 
                        Race.Vehicles[v[1]] = nil 
                    end 
                    break 
                end 
            end 
        end 
    end 
) 
  
addEventHandler ( "onPlayerQuit", root, 
    function ( ) 
        if Race.Vehicles[source] then 
            if isElement ( Race.Vehicles[source] ) then 
                destroyElement ( Race.Vehicles[source] ) 
            else 
                for i, v in ipairs ( Race.Players ) do 
                    if v[1] == source then 
                        if #Race.Players == 1 then 
                            setTimer ( setRaceStats, 2000, 1, false ) 
                        else 
                            table.remove { Race.Players, v[3] } 
                        end 
                        break 
                    end 
                end         
            end 
            Race.Vehicles[source] = nil 
        end 
    end 
) 
  
setElementData ( resourceRoot, "RaceStarted", false )

3NAD · December 4, 2013

انسخ الكود مرة ثانية . في الرد الماضي

yaza034 · December 4, 2013

هذا اخر مرة كتبتة

Race = { 
    Players = { }; 
    Vehicles = { }; 
    Position = { 
        [1] = { x, y, z }; 
        [2] = { x, y, z }; 
        [3] = { x, y, z }; 
        [4] = { x, y, z }; 
        [5] = { x, y, z }; 
    }; 
    Cars = { 
        { 432 }; 
        { 432 }; 
    }; 
}; 
  
setRaceStats = function ( stats ) 
    if stats then 
        setElementData ( resourceRoot, "RaceStarted", true ) 
    else 
        Race.Players = { }; 
        setElementData ( resourceRoot, "RaceStarted", false ) 
        outputChatBox ( "* تم إفتتاح السباق", root, 255, 255, 0, true ) 
    end 
end 
  
addEventHandler ( "onPlayerChat", root, 
    function ( msg ) 
        if string.find ( msg, "سباق" ) then 
            if getElementData ( resourceRoot, "RaceStarted" ) then 
                return outputChatBox ( "* لم ينتهي السباق بعد", source, 255, 0, 0, true ) 
            end     
            if #Race.Players < 5 then 
                if not Race.Vehicles[source] then 
                    if #Race.Players == 4 then 
                        setRaceStats ( true ) 
                    end 
                    Race.Vehicles[source] = createVehicle ( Race.Cars[math.random(#Race.Cars)][1], Race.Position[#Race.Players][1], Race.Position[#Race.Players][2], Race.Position[#Race.Players][3] ) 
                    setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] ) 
                    table.insert { Race.Players, { source, Race.Vehicles[source], #Race.Players } } 
                end 
            else 
                outputChatBox ( "* أكتمل العدد", source, 255, 0, 0, true ) 
            end 
        end 
    end 
) 
  
addEventHandler ( "onVehicleExplode", resourceRoot, 
    function ( ) 
        for i, v in ipairs ( Race.Players ) do 
            if v[2] == source then 
                if #Race.Players == 1 then 
                    if isElement ( v[1] ) then 
                        givePlayerMoney ( v[1], 5000 ) 
                        outputChatBox ( "* $5000 لقد ربحت", v[1], 255, 255, 0, true ) 
                    end 
                    setTimer ( setRaceStats, 2000, 1, false ) 
                else 
                    table.remove { Race.Players, v[3] } 
                end 
                if isElement ( v[1] ) then 
                    Race.Vehicles[v[1]] = nil 
                end             
                break 
            end 
        end 
    end 
) 
  
addEventHandler ( "onElementDestroy", resourceRoot, 
    function ( ) 
        if getElementType ( source ) == "vehicle" then 
            for i, v in ipairs ( Race.Players ) do 
                if v[2] == source then 
                    if #Race.Players == 1 then 
                        if isElement ( v[1] ) then 
                            givePlayerMoney ( v[1], 5000 ) 
                            outputChatBox ( "* $5000 لقد ربحت", v[1], 255, 255, 0, true ) 
                        end 
                        setTimer ( setRaceStats, 2000, 1, false ) 
                    else 
                        table.remove { Race.Players, v[3] } 
                    end 
                    if isElement ( v[1] ) then 
                        Race.Vehicles[v[1]] = nil 
                    end 
                    break 
                end 
            end 
        end 
    end 
) 
  
addEventHandler ( "onPlayerQuit", root, 
    function ( ) 
        if Race.Vehicles[source] then 
            if isElement ( Race.Vehicles[source] ) then 
                destroyElement ( Race.Vehicles[source] ) 
            else 
                for i, v in ipairs ( Race.Players ) do 
                    if v[1] == source then 
                        if #Race.Players == 1 then 
                            setTimer ( setRaceStats, 2000, 1, false ) 
                        else 
                            table.remove { Race.Players, v[3] } 
                        end 
                        break 
                    end 
                end         
            end 
            Race.Vehicles[source] = nil 
        end 
    end 
) 
  
setRaceStats ( false )

3NAD · December 5, 2013

طيب جربت هذا ؟

Race = { 
    Players = { }; 
    Vehicles = { }; 
    Position = { 
        [1] = { x, y, z }; 
        [2] = { x, y, z }; 
        [3] = { x, y, z }; 
        [4] = { x, y, z }; 
        [5] = { x, y, z }; 
    }; 
    Cars = { 
        { 432 }; 
        { 432 }; 
    };  
}; 
  
setRaceStats = function ( stats ) 
    if stats then 
        setElementData ( resourceRoot, "RaceStarted", true ) 
    else 
        Race.Players = 0 
        setElementData ( resourceRoot, "RaceStarted", false ) 
        outputChatBox ( "* تم إفتتاح السباق", root, 255, 255, 0, true ) 
    end 
end 
  
addEventHandler ( "onPlayerChat", root, 
    function ( msg ) 
        if string.find ( msg, "سباق" ) then 
            if getElementData ( resourceRoot, "RaceStarted" ) then  
                return outputChatBox ( "* لم ينتهي السباق بعد", source, 255, 0, 0, true ) 
            end      
            if Race.Players < 5 then 
                if not Race.Vehicles[source] then 
                    if Race.Players == 4 then 
                        setRaceStats ( true ) 
                    end 
                    Race.Players = Race.Players+1 
                    Race.Vehicles[source] = createVehicle ( Race.Cars[math.random(#Race.Cars)][1], Race.Position[Race.Players][1], Race.Position[Race.Players][2], Race.Position[Race.Players][3] ) 
                    setTimer ( warpPedIntoVehicle, 100, 1, source, Race.Vehicles[source] )   
                    setElementData ( Race.Vehicles[source], "Owner", source ) 
                end 
            else 
                outputChatBox ( "* أكتمل العدد", source, 255, 0, 0, true ) 
            end 
        end 
    end 
) 
  
addEventHandler ( "onVehicleExplode", resourceRoot, 
    function ( ) 
        if Race.Players == 1 then 
            local player = getElementData ( source, "Owner" ) 
            if isElement ( player ) then 
                if getElementData ( resourceRoot, "RaceStarted" ) then 
                    givePlayerMoney ( player, 5000 ) 
                    outputChatBox ( "* $5000 لقد ربحت", player, 255, 255, 0, true ) 
                end 
                Race.Vehicles[player] = nil 
            end 
            setTimer ( setRaceStats, 2000, 1, false ) 
        else 
            Race.Players = Race.Players-1 
        end 
    end 
) 
  
addEventHandler ( "onElementDestroy", resourceRoot, 
    function ( ) 
        if getElementType ( source ) == "vehicle" then 
            if Race.Players == 1 then 
                local player = getElementData ( source, "Owner" ) 
                if isElement ( player ) then 
                    if getElementData ( resourceRoot, "RaceStarted" ) then 
                        givePlayerMoney ( player, 5000 ) 
                        outputChatBox ( "* $5000 لقد ربحت", player, 255, 255, 0, true ) 
                    end 
                    Race.Vehicles[player] = nil 
                end 
                setTimer ( setRaceStats, 2000, 1, false ) 
            else 
                Race.Players = Race.Players-1 
            end 
        end 
    end 
) 
  
addEventHandler ( "onPlayerQuit", root, 
    function ( ) 
        if Race.Vehicles[source] then 
            if isElement ( Race.Vehicles[source] ) then 
                destroyElement ( Race.Vehicles[source] )  
            else 
                if Race.Players == 1 then 
                    setTimer ( setRaceStats, 2000, 1, false ) 
                else 
                    Race.Players = Race.Players-1 
                end  
            end 
            Race.Vehicles[source] = nil 
        end 
    end 
) 
  
setRaceStats ( false )

yaza034 · December 5, 2013

مشكور عناد الله يبارك فيك انا راح احط اسمك في المود لانة بدونك انا ولا شي :@ واردلك خبر اذا نجح

yaza034 · December 6, 2013

نجح والله يبارك فيك اخوي

تم بنجاح

شكراً اخوي

3NAD · December 6, 2013

حياك الله .

yaza034 · December 6, 2013

الله يبارك فيك اخوي عناد ممكن سكايب خاص بيك !

yaza034 · December 6, 2013

عناد ممكن كود العالم الوهمي الذي راح يكونفية السباق !!

واستطيع ان اعمل كود انة المود بس يخلص من السباق يربح العاب بعد ما يربح يسكر السباق ويروح الماب

وبعد دقيقة يفتح المود واذا كبوا سباق يروحو وتستمر العملية .....

3NAD · December 6, 2013

setElementDimension

هذا يخليك بعالم ثاني

وش لون يربح العاب ؟

تصحيح كود ** طلب اضاقة على الكود / طلب كود

Recommended Posts

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members