Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2014-11-24, 12:20


wwa22442







Wiek: 38
Na forum: 4706 dni
Posty: 127

Piwa: 82

Respekt: 50

Ostrzeżeń: 20%
Witajcie.

Jak zrobi? co? takiego ?e po kupieniu auta przez gracza, te auto b?dzie si? spawnowa? w jakim? miejscu automatycznie ? A po restarcie serwera b?dzie mia?o ostatni? pozycj? ?

oto kod kupna :


addEvent("buycar1",true)
addEventHandler("buycar1",getRootElement(),
function(id,cost,name)
    if (getPlayerMoney(client)>= tonumber(cost)) then
        local account getPlayerAccount(client)
        local name getAccountName(account)
        local playercar executeSQLQuery("SELECT Model,Paintjob,Color,Upgrade0,Upgrade1,Upgrade2,Upgrade3,Upgrade4,Upgrade5,Upgrade6,Upgrade7,Upgrade8,Upgrade9,Upgrade10,Upgrade11,Upgrade12,Upgrade13,Upgrade14,Upgrade15,Upgrade16 FROM carslot1 WHERE PlayerName = ?",name)
        if #playercar > 0 then
            outputChatBox("Masz juz inny pojazd na tym slocie.",client)
        else
            --[[local c1xml xmlLoadFile("buyingc1.dat")
            if not c1xml then
                c1xml xmlCreateFile("buyingc1.dat","wang")
            end
            local node xmlCreateChild(c1xml,"buyc1")
            local msg name.." tried to buy vehicle "..getVehicleNameFromModel(id)
            local success1 xmlNodeSetValue(node,msg)]]
            local paintjob 3
            local color "88,88,83,70,89,122"
            takePlayerMoney(client,tonumber(cost))
            local addVehicle executeSQLQuery("INSERT INTO carslot1 (PlayerName,Model,Cost,Paintjob,Color,Upgrade0,Upgrade1,Upgrade2,Upgrade3,Upgrade4,Upgrade5,Upgrade6,Upgrade7,Upgrade8,Upgrade9,Upgrade10,Upgrade11,Upgrade12,Upgrade13,Upgrade14,Upgrade15,Upgrade16) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"tostring(name), tonumber(id), tonumber(cost), tonumber(paintjob), tostring(color), " "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ")
            if addVehicle then
            --    local msg2 name.." succeeded in sale $"..cost
                --local node2 xmlCreateChild(c1xml,"buyc1")
                --local success2 xmlNodeSetValue(node2,msg2)
                outputChatBox("Gratulujemy zakupu. Panel pojazdu znajdziesz pod ' M '.",client)
            else
                --local msg2 name.." failed in sale $"..cost
                --local node2 xmlCreateChild(c1xml,"buyc1")
                --local success2 xmlNodeSetValue(node2,msg2)
                outputChatBox("Gratulujemy zakupu. Panel pojazdu znajdziesz pod ' M '.",client)
            end
            --xmlSaveFile(c1xml)
            --xmlUnloadFile(c1xml)
        end
    else
        outputChatBox("Nie masz pieniedzy aby kupic ten pojazd.",client)
    end
end)


Kod spawnu:


addEvent("spawncar1",true)
addEventHandler("spawncar1",getRootElement(),
function()
    if not (isGuestAccount(getPlayerAccount(client))) then
        if not (isPedInVehicle(client)) then
            local x,y,getElementPosition(client)
            if (getElementData(client,"mycar1")) and (getElementData(client,"mycar1")~= nil) --[[and (getElementType(getElementData(client,"mycar1")) =="vehicle")]] then
                local vehicle getElementData(client,"mycar1")
                --destroyElement(vehicle)
                removeElementData(client,"mycar1")
                --local x,y,getElementPosition(vehicle)
                --setElementPosition(vehicle,x,y,z)
                outputChatBox("Vehicle destroyed",client)
                --[[             local vehicle getElementData(client,"mybik1")
                                destroyElement(vehicle)
                                removeElementData(client,"mybik1")
                                outputChatBox("Vehicle destroyed",client)]]
                
            elseif not (getElementData(client,"mycar1")) then
                local account getPlayerAccount(client)
                local name getAccountName(account)
                local playercar executeSQLQuery("SELECT Model,Paintjob,Color,Upgrade0,Upgrade1,Upgrade2,Upgrade3,Upgrade4,Upgrade5,Upgrade6,Upgrade7,Upgrade8,Upgrade9,Upgrade10,Upgrade11,Upgrade12,Upgrade13,Upgrade14,Upgrade15,Upgrade16 FROM carslot1 WHERE PlayerName = ?",name)
                if (playercarthen
                
                    if #playercar > 0 then
                        local x,y,getElementPosition(client)
                        local vehicle createVehicle(playercar[1].Model,5,+2,z)
                        setVehiclePaintjob(vehicle,playercar[1].Paintjob)
                        setElementData(vehicle,"vehicleOwner","mycar1")
                        setElementData (vehicle,"mycar1",getPlayerName(source))
                        setElementData (client"mycar1"vehicle)
                        setElementData(vehicle,"VOwner",getPlayerName(client))
                        outputChatBox ("Car spawned."source25500)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade0) 
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade1)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade2)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade3)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade4)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade5)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade6)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade7)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade8)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade9)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade10)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade11)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade12)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade13)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade14)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade15)
                        addVehicleUpgrade(vehicleplayercar[1].Upgrade16)
                        local col1 gettok (playercar[1].Color1string.byte(',') )
                        local col2 gettok (playercar[1].Color2string.byte(',') )
                        local col3 gettok (playercar[1].Color3string.byte(',') )
                        local col4 gettok (playercar[1].Color4string.byte(',') )
                        local col5 gettok (playercar[1].Color5string.byte(',') )
                        local col6 gettok (playercar[1].Color6string.byte(',') )
                        outputChatBox(col1)
                        if col1 then
                        setVehicleColor(vehicletonumber(col1), tonumber(col2), tonumber(col3), tonumber(col4), tonumber(col5), tonumber(col6))
                        end
                    else
                        outputChatBox("You have not buy a car for this slot yet",client)
                    end
                end
            end
        else
            outputChatBox("You need to get out of your vehicle first",client)
        end
    else
        outputChatBox("You need to log in first",client)
    end
end)


Pozdrawiam i daje piwwwka ;)

Postaw piwo autorowi tego posta
 

 
Wysłany: 2014-11-24, 20:16


Dixers

No-Life






Wiek: 26
Na forum: 4312 dni
Posty: 549
Nick w MP: Dixers

Piwa: 412

Respekt: 56,8

wwa22442, ostatni? pozycj? musisz zrobi? przez MySQL, chyba ?e nie u?ywasz to polecam XML, gdzie zawarte b?dzie:
-ca?e tune jakie jest,
-pozycja,
-posiadacz danego pojazdu...

itp.

A do spawnowania u?yj createVehicle

Postaw piwo autorowi tego posta
 

 
Wysłany: 2014-11-24, 22:52


wwa22442







Wiek: 38
Na forum: 4706 dni
Posty: 127

Piwa: 82

Respekt: 50

Ostrzeżeń: 20%
Dixers, a jak zrobi? te tylko spawnowanie ? W tym kodzie co poda?em gdzie? wklei? ?

Postaw piwo autorowi tego posta
 

 
Wysłany: 2014-11-25, 16:26


Dixers

No-Life






Wiek: 26
Na forum: 4312 dni
Posty: 549
Nick w MP: Dixers

Piwa: 412

Respekt: 56,8

wwa22442, nie lepiej spr?bowa? zrobi?, sw?j. Taki ?atwiejszy.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2014-11-25, 16:28


MeeShuffle

Programista/Grafik






Wiek: 32
Na forum: 4394 dni
Posty: 2758
Nick w MP: Shuffle

Piwa: 8575

Respekt: 535,3
Respekt: 535,3

U?yj sobie mojego systemu bo nie warto si? m?czy? z czym? czego nie rozumiesz. M?j bazuje na XML jednej z najprostszych baz danych, tak?e sobie poradzisz z jej po??czeniem z kupionymi autami.

Podpis

https://shufflecode.pl
Static Codes and Graphics - Join our discord!
Postaw piwo autorowi tego posta
 

 
Tagi: spawn :: kupionego :: auta
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku