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

Wysłany: 2015-12-03, 20:14


BlackTen

LUA Dev.






Wiek: 28
Na forum: 4329 dni
Posty: 698

Piwa: 2080

Respekt: 157
Respekt: 157Respekt: 157

Mam tutaj kod servera na przecho i mam blad

--[[
Code by Riot
--]]

--SQL LITE
handler dbConnect("sqlite""przechowywalnia.db")
dbExec(handler"CREATE TABLE IF NOT EXISTS `przechowywalnia` (`id` INTEGER, `model` INTEGER, `wlasciciel` INTEGER)")

function onStartPrzechowywalnia()
--marker
local maly createMarker(1707.34,-1471.34,12.55"cylinder"22550045)
addEventHandler("onMarkerHit"malyonPrzechowywalniaHit)

duzy createMarker(1702.55,-1471.50,12.55"cylinder"701339975)
end
addEventHandler("onResourceStart"getResourceRootElement(getThisResource()), onStartPrzechowywalnia)

function onPrzechowywalniaHit(hitElement)
    if getElementType(hitElement) == "player" then
    local acc getPlayerAccount(hitElement)
        if acc then
        local veh getPedOccupiedVehicle(hitElement)
            if not veh then
            local login getAccountName(acc)
            local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE wlasciciel='"..login.."'")
            local resultrows dbPoll (query, -1)
            triggerClientEvent(hitElement"showPrzechowywalniaGUI"rootresult or {})
            end
        end
    end
end

addEvent("onPrzywrocPojazdZPrzechowywalni"true)
addEventHandler("onPrzywrocPojazdZPrzechowywalni"getRootElement(),
function(id)
local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE id='"..id.."'")
local resultrows dbPoll (query, -1)
    if #result > 0 then
    dbExec(handler"DELETE FROM przechowywalnia WHERE id='"..id.."'")
    
    --tworze pojazd
    local xygetElementPosition(duzy)
    local zrob exports.YALSalon:createVehicle(idxyz)
        if zrob then
        warpPedIntoVehicle(sourcezrob)
        else
        outputChatBox("Podane auto nie istnieje."source255255255true)
        end
    else
    outputChatBox("Podane auto nie istnieje ju? w przechowywalni."source255255255true)
    end
end)

function czyPojazdJestWPrzechowywalni(id)
local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE id='"..id.."'")
local resultrows dbPoll (query, -1)
    if #result > 0 then
    return true
    else
    return false
    end
end
--##
timery = {}

function onPrzechoVehExit(playerseat)
    if seat == 0 then
    local id getElementData(source"car_id")
        if id then
            if isElementWithinMarker(sourceduzythen
            timery[id] = setTimer(oddajPojazdDoPrzechowywalni50001sourceplayeridtrue)
            end
        end
    end
end
addEventHandler("onVehicleExit"getRootElement(), onPrzechoVehExit)

function oddajPojazdDoPrzechowywalni(vehplayeridbool)
    if isElement(vehthen
    local acc getPlayerAccount(player)
        if acc then
        local wlasciciel getElementData(veh"car_owner")
        local model getElementModel(veh)
        dbExec(handler"INSERT INTO przechowywalnia VALUES('"..id.."', '"..model.."', '"..wlasciciel.."')")
        
        if isElement(playerthen
            if bool then
            outputChatBox("Tw?j pojazd "..getVehicleName(veh).." zosta? umieszczony w przechowywalni."player255255255true)
            else
            outputChatBox("Odda?e? pojazd "..getVehicleName(veh).." do przechowywalni."player255255255true)
            end
        end

        destroyElement(veh)
        end
    end
end

function komendaDlaAdmina(player)
local acc getPlayerAccount(player)
    if acc then
    local login getAccountName(acc)    
        if isObjectInACLGroup ("user."..loginaclGetGroup("Admin")) then
        local veh getPedOccupiedVehicle(player)
            if veh then
            local id getElementData(veh"car_id")
                if id then
                oddajPojazdDoPrzechowywalni(vehplayerid)
                end
            end
        end
    end
end
addCommandHandler("oddajauto"komendaDlaAdmina)

function onPrzechoVehEnter(playerseat)
    if seat == 0 then
    local id getElementData(source"car_id")
        if id then
            if isTimer(timery[id]) then
            killTimer(timery[id])
            end
        end
    end
end
addEventHandler("onVehicleEnter"getRootElement(), onPrzechoVehEnter)


b??d ten wystepuje kiedy probuje wyciagn?? pojazd:
http://www.wrzucajtu.pl/w...03_20-13-54.png

Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-03, 20:32


Maximerr

Programmer PHP, LUA






Wiek: 25
Na forum: 4427 dni
Posty: 548

Piwa: 1051

Respekt: 365,3
Respekt: 365,3Respekt: 365,3Respekt: 365,3Respekt: 365,3

Poka? zawarto?? triggera:
local zrob exports.YALSalon:createVehicle(idxyz)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-03, 20:51


BlackTen

LUA Dev.






Wiek: 28
Na forum: 4329 dni
Posty: 698

Piwa: 2080

Respekt: 157
Respekt: 157Respekt: 157

server

addEventHandler("onPrzywrocPojazdZPrzechowywalni"getRootElement(),
function(id)
local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE id='"..id.."'")
local resultrows dbPoll (query, -1)
    if #result > 0 then
    dbExec(handler"DELETE FROM przechowywalnia WHERE id='"..id.."'")
    
    --tworze pojazd
    local xygetElementPosition(duzy)
    local zrob exports.YALSalon:createVehicle(idxyz)
        if zrob then
        warpPedIntoVehicle(sourcezrob)
        else
        outputChatBox("Podane auto nie istnieje."source255255255true)
        end
    else
    outputChatBox("Podane auto nie istnieje ju? w przechowywalni."source255255255true)
    end
end)


clinet
function onPrzechowywalniaPrzywroc()
local row guiGridListGetSelectedItem(umgui[3])
    if row >= 0 then
    local id guiGridListGetItemData (umgui[3], rowumgui[4])
    
    triggerServerEvent("onPrzywrocPojazdZPrzechowywalni"localPlayerid)
    onPrzechowywalniaZamknij()
    end
end
addEventHandler ("onClientGUIClick"umgui[7], onPrzechowywalniaPrzywrocfalse)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-04, 14:54


Maximerr

Programmer PHP, LUA






Wiek: 25
Na forum: 4427 dni
Posty: 548

Piwa: 1051

Respekt: 365,3
Respekt: 365,3Respekt: 365,3Respekt: 365,3Respekt: 365,3

To nie to.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2015-12-04, 14:54


BlackTen

LUA Dev.






Wiek: 28
Na forum: 4329 dni
Posty: 698

Piwa: 2080

Respekt: 157
Respekt: 157Respekt: 157

To co?

[ Dodano: 2015-12-04, 14:57 ]
c:

local sXsY guiGetScreenSize()


umgui = {}

umgui[1] = guiCreateWindow((sX 400)/2, (sY 290)/2400290"Przechowywalnia pojazd?w"false)
guiWindowSetSizable(umgui[1], false)
umgui[2] = guiCreateLabel(103038040"Poni?ej znajduje si? lista Twoich pojazd?w, kt?re umieszczone s? w przechowywalni."falseumgui[1])
guiLabelSetHorizontalAlign(umgui[2], "center"true)
umgui[3] = guiCreateGridList(1070380172falseumgui[1])
umgui[4] = guiGridListAddColumn(umgui[3], "Pojazd"0.6)
umgui[5] = guiGridListAddColumn(umgui[3], "ID"0.32)
umgui[6] = guiCreateButton(102508529"Wyjd?"falseumgui[1])
umgui[7] = guiCreateButton(3052508529"Przywr??"falseumgui[1])
guiSetVisible(umgui[1], false)

addEvent("showPrzechowywalniaGUI"true)
addEventHandler("showPrzechowywalniaGUI"getRootElement(),
function(pojazdy)
guiSetVisible(umgui[1], true)
showCursor(true)
guiGridListClear(umgui[3])
    for i,v in pairs(pojazdy) do
    local row guiGridListAddRow(umgui[3])
    guiGridListSetItemText(umgui[3], rowumgui[4], getVehicleNameFromModel(v["model"]), falsefalse)
    guiGridListSetItemText(umgui[3], rowumgui[5], v["id"], falsefalse)
    guiGridListSetItemData (umgui[3], rowumgui[4], v["id"])
    end
end)

function onPrzechowywalniaZamknij()
guiSetVisible(umgui[1], false)
showCursor(false)
end
addEventHandler ("onClientGUIClick"umgui[6], onPrzechowywalniaZamknijfalse)

function onPrzechowywalniaPrzywroc()
local row guiGridListGetSelectedItem(umgui[3])
    if row >= 0 then
    local id guiGridListGetItemData (umgui[3], rowumgui[4])
    
    triggerServerEvent("onPrzywrocPojazdZPrzechowywalni"localPlayerid)
    onPrzechowywalniaZamknij()
    end
end
addEventHandler ("onClientGUIClick"umgui[7], onPrzechowywalniaPrzywrocfalse)


s:
--[[
Code by Riot
--]]

--SQL LITE
handler dbConnect("sqlite""przechowywalnia.db")
dbExec(handler"CREATE TABLE IF NOT EXISTS `przechowywalnia` (`id` INTEGER, `model` INTEGER, `wlasciciel` INTEGER)")

function onStartPrzechowywalnia()
--marker
local maly createMarker(1707.34,-1471.34,12.55"cylinder"22550045)
addEventHandler("onMarkerHit"malyonPrzechowywalniaHit)

duzy createMarker(1702.55,-1471.50,12.55"cylinder"701339975)
end
addEventHandler("onResourceStart"getResourceRootElement(getThisResource()), onStartPrzechowywalnia)

function onPrzechowywalniaHit(hitElement)
    if getElementType(hitElement) == "player" then
    local acc getPlayerAccount(hitElement)
        if acc then
        local veh getPedOccupiedVehicle(hitElement)
            if not veh then
            local login getAccountName(acc)
            local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE wlasciciel='"..login.."'")
            local resultrows dbPoll (query, -1)
            triggerClientEvent(hitElement"showPrzechowywalniaGUI"rootresult or {})
            end
        end
    end
end

addEvent("onPrzywrocPojazdZPrzechowywalni"true)
addEventHandler("onPrzywrocPojazdZPrzechowywalni"getRootElement(),
function(id)
local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE id='"..id.."'")
local resultrows dbPoll (query, -1)
    if #result > 0 then
    dbExec(handler"DELETE FROM przechowywalnia WHERE id='"..id.."'")
    
    --tworze pojazd
    local xygetElementPosition(duzy)
    local zrob exports.YALSalon:createVehicle(id1694.96,-1498.29,13.12,359.5,5.5,3.3)
        if zrob then
        warpPedIntoVehicle(sourcezrob)
        else
        outputChatBox("Podane auto nie istnieje."source255255255true)
        end
    else
    outputChatBox("Podane auto nie istnieje ju? w przechowywalni."source255255255true)
    end
end)

function czyPojazdJestWPrzechowywalni(id)
local query dbQuery(handler"SELECT * FROM przechowywalnia WHERE id='"..id.."'")
local resultrows dbPoll (query, -1)
    if #result > 0 then
    return true
    else
    return false
    end
end
--##
timery = {}

function onPrzechoVehExit(playerseat)
    if seat == 0 then
    local id getElementData(source"car_id")
        if id then
            if isElementWithinMarker(sourceduzythen
            timery[id] = setTimer(oddajPojazdDoPrzechowywalni50001sourceplayeridtrue)
            end
        end
    end
end
addEventHandler("onVehicleExit"getRootElement(), onPrzechoVehExit)

function oddajPojazdDoPrzechowywalni(vehplayeridbool)
    if isElement(vehthen
    local acc getPlayerAccount(player)
        if acc then
        local wlasciciel getElementData(veh"car_owner")
        local model getElementModel(veh)
        dbExec(handler"INSERT INTO przechowywalnia VALUES('"..id.."', '"..model.."', '"..wlasciciel.."')")
        
        if isElement(playerthen
            if bool then
            outputChatBox("Tw?j pojazd "..getVehicleName(veh).." zosta? umieszczony w przechowywalni."player255255255true)
            else
            outputChatBox("Odda?e? pojazd "..getVehicleName(veh).." do przechowywalni."player255255255true)
            end
        end

        destroyElement(veh)
        end
    end
end

function komendaDlaAdmina(player)
local acc getPlayerAccount(player)
    if acc then
    local login getAccountName(acc)    
        if isObjectInACLGroup ("user."..loginaclGetGroup("Admin")) then
        local veh getPedOccupiedVehicle(player)
            if veh then
            local id getElementData(veh"car_id")
                if id then
                oddajPojazdDoPrzechowywalni(vehplayerid)
                end
            end
        end
    end
end
addCommandHandler("oddajauto"komendaDlaAdmina)

function onPrzechoVehEnter(playerseat)
    if seat == 0 then
    local id getElementData(source"car_id")
        if id then
            if isTimer(timery[id]) then
            killTimer(timery[id])
            end
        end
    end
end
addEventHandler("onVehicleEnter"getRootElement(), onPrzechoVehEnter)


Postaw piwo autorowi tego posta
 

 
Tagi: przecho
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Przecho 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