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

Wysłany: 2016-01-26, 21:21


PingwinekPlus

Uczeń Lua






Wiek: 35
Na forum: 3864 dni
Posty: 79
Nick w MP: Offensywny.

Piwa: 396

Respekt: 40

Ostrzeżeń: 100%
Trzecim moim problemem jest Suszarka.

Rzecz jest w tym, ?e wysiadaj?c z auta ona przestaje dzia?a? i nie sprawdza kogo to pojazd tak jak powinna to robi?.

local sw,sh guiGetScreenSize()

function onSuszarka(target)
    if target then
        if getElementType(target) == "vehicle" then
        vehicle target
        end
    end
end
addEventHandler ("onClientPlayerTarget"getRootElement(), onSuszarka)

function wlaczLPM()
render true
end
bindKey ("mouse1""down"wlaczLPM)

function wylaczLPM()
render false
end 
bindKey ("mouse1""up"wylaczLPM)

function dxDrawSuszarkaInfo()
    if render then
        if vehicle then
            if isElement(vehiclethen
               --if getPlayerTeam(localPlayer) == getTeamFromName("Policja"then --zamiast Policja dowolna nazwa teamuwazne by w cudzyslowiu (i taki team faktycznie istnial :P)
                    if getPedWeapon(localPlayer) == 22 then
                        local xygetElementPosition(localPlayer)
                        local txtytz getElementPosition(vehicle)
                        local dis getDistanceBetweenPoints3D(xyztxtytz)
                        local id getElementData(vehicle"car_id") or "Brak ID pojazdu"
                        local wl getElementData(vehicle"car_owner") or "Brak W?a?cicela"
                        if 80 >= dis then --jestesmy dosyc blisko gracza
                            local kmh getVehicleSpeed(vehicle)
                            dxDrawRectangle(1115/1440*sw401/900*sh290/1440*sw219/900*shtocolor(045110206), false)
                            dxDrawRectangle(1106/1440*sw382/900*sh309/1440*sw19/900*shtocolor(837103217), false)
                            dxDrawText("Suszarka Policji"1104/1438*sw370/898*sh1413/1438*sw388/898*shtocolor(255255255255), 2.00"default-bold""center""center"falsefalsefalsefalsefalse)
                            dxDrawText("Pr?dko?? pojazdu:   "..kmh.." km/h"1122/1440*sw411/900*sh1420/1440*sw429/900*shtocolor(255255255255), 1.00"default-bold""left""center"falsefalsefalsefalsefalse)
                            dxDrawText("Nick w?a?ciciela:   "..wl..""1122/1440*sw443/900*sh1420/1440*sw461/900*shtocolor(255255255255), 1.00"default-bold""left""center"falsefalsefalsefalsefalse)
                            dxDrawText("Nazwa pojazdu:   "..getVehicleName(vehicle)..""1122/1440*sw483/900*sh1420/1440*sw501/900*shtocolor(255255255255), 1.00"default-bold""left""center"falsefalsefalsefalsefalse)
                            local controller getVehicleController(vehicle)
                            if controller then
                                dxDrawText("ID gracza:"..getElementData(controller,"id").." Nazwa Gracza:"..getPlayerName(controller)..""1122/1440*sw528/900*sh1420/1440*sw547/900*shtocolor(255255255255), 1.00"default-bold""left""top"falsefalsefalsefalsefalse)
                            end
                            dxDrawText("ID pojazdu:"..id..""1122/1440*sw557/900*sh1420/1440*sw576/900*shtocolor(255255255255), 1.00"default-bold""left""top"falsefalsefalsefalsefalse)
                            --dxDrawText("Co?............"1122/1440*sw591/900*sh1421/1440*sw610/900*shtocolor(255255255255), 1.00"default-bold""left""top"falsefalsefalsefalsefalse)
                        end   
                    end
                --end
            end
        end
    end
   
    if (getKeyState("mouse1") == falsethen --dodatkowa blokada
        wylaczLPM()
    end
end
addEventHandler("onClientRender"getRootElement(), dxDrawSuszarkaInfo)

function getVehicleSpeed(element)
    local vxvyvz getElementVelocity(element)
    local speed math.sqrt(vx^vy^vz^2) * 161
    return math.floor(speed)
end


Ta suszarka robiona jest pod System Pojazd?w PanaPrezes

[ Dodano: 2016-01-26, 21:33 ]
(chodzi o to by nie mo?na dawa? ofert na - minusie inaczej np: -1000
i graczowi kt?ry kupuje daje 1000 kasy xd jak temu zapobiec ?)

i w kt?rym momencie doda?

if getPlayerMoney(cena) > and getPlayerMoney(cena) >= cena then

w tym kodzie:

local sprzedaz createMarker2132.64, -2091.3413.55"cylinder"225500100)
 
function onSprzedazHit(hitElementdim)
    if getElementType(hitElement) == "player" then
    local players getElementsInMarker(sprzedaz)
    triggerClientEvent(hitElement"pokazGUISprzedazy"rootplayers)
    end
end
addEventHandler("onMarkerHit"sprzedazonSprzedazHit)

function getElementsInMarker(marker)
elements = {}
    for i,v in pairs(getElementsByType("player")) do
        if isElementWithinMarker(vmarkerthen
        table.insert(elementsv)
        end
    end
return elements
end

addEvent("pobierzListePojazdow"true)
addEventHandler("pobierzListePojazdow"getRootElement(), 
function()
local account getPlayerAccount(source)
    if account then
    local wlasciciel getAccountName(account)
    local query dbQuery(handler"SELECT * FROM pojazdy WHERE wlasciciel='"..wlasciciel.."'")
    local resultnum_rowserrormsg dbPoll (query, -1)
    triggerClientEvent(source"pokazListePojazdow"rootresult)
    end
end)

ofertyKupna = {}

addEvent("zaproponujKupnoPojazdu"true)
addEventHandler("zaproponujKupnoPojazdu"getRootElement(),
function(graczidcena)
    if not ofertyKupna[graczthen
    ofertyKupna[gracz] = {}
    ofertyKupna[gracz] = {graczsourceidcena}
    
    local query dbQuery(handler"SELECT model,przebieg FROM pojazdy WHERE id='"..id.."'")
    local resultnum_rowserrormsg dbPoll (query, -1)
    local pojazd result[1].model
    local pojazd getVehicleNameFromModel(pojazd)
    local przebieg result[1].przebieg
    triggerClientEvent(gracz"pokazOferteKupnaPojazdu"rootsourcepojazdcenaprzebieg)
    else
    outputChatBox("Ten gracz w tym momencie ma otwart? inn? ofert? kupna pojazdu..."source255255255true)
    end
end)

addEvent("odrzucOferteKupna"true)
addEventHandler("odrzucOferteKupna"getRootElement(),
function()
    if ofertyKupna[sourcethen
    local od_kogo_oferta ofertyKupna[source][2]
        if isElement(od_kogo_ofertathen
        outputChatBox("Gracz "..getPlayerName(source).." odrzuci? Twoj? ofert? kupna pojazdu."od_kogo_oferta255255255true)
        end
    ofertyKupna[source] = nil
    end
end)

addEvent("przyjmijOferteKupna"true)
addEventHandler("przyjmijOferteKupna"getRootElement(),
function()
    if ofertyKupna[sourcethen
    local account getPlayerAccount(source)
      if account then
      local login getAccountName(account)
        if 199 >= getYourVehicleCount(loginthen
        local od_kogo_oferta ofertyKupna[source][2]
        local veh ofertyKupna[source][3] --id pojazdu
        local cena ofertyKupna[source][4]
            if isElement(od_kogo_ofertathen
            local cena tonumber(cena)
                if getPlayerMoney(source) >= cena then
                takePlayerMoney(sourcecena)
                givePlayerMoney(od_kogo_ofertacena)
                --nadpisanie danych
                local vehicle getVehicleByID(veh)
                ustawDanePojazdu(vehiclevehlogin)
                dbExec(handler"UPDATE pojazdy SET wlasciciel='"..login.."' WHERE id="..veh.."")
                --chat
                local pojazd getVehicleName(vehicle)
                outputChatBox("Gracz "..getPlayerName(source).." przyja? Twoj? ofert? i kupi? Tw?j pojazd "..pojazd.." za "..cena.."$."od_kogo_oferta255255255true)
                outputChatBox("Kupi?e? pojazd "..pojazd.." za "..cena.."$ od gracza "..getPlayerName(od_kogo_oferta).."."source255255255true)
                else
                outputChatBox("Gracz "..getPlayerName(source).." nie ma wystarczaj?co pieni?dzy by kupi? Tw?j pojazd."od_kogo_oferta255255255true)
                outputChatBox("Nie masz wystarczaj?co pieni?dzy by kupi? ten pojazd."source255255255true)
                end
            else
            outputChatBox("Gracz kt?ry sk?ada? Ci ofert? nie jest ju? online na serwerze."source255255255true)
            end
        else
        outputChatBox("Mo?esz posiada? maksymalnie 5 pojazd?w."source255255255true)
        end
      else
      outputChatBox("Nie jeste? zalogowany."source255255255true)
      end
    else
    outputChatBox("Wyst?pi? b??d, nie mo?esz teraz kupi? pojazdu :|"source255255 ,255true)
    end
ofertyKupna[source] = nil
end)


Podpis
@
Pomogłem? || Daj >> :arrow: Piweczko :piwo: i Respekta R*

Unikatowy serwer: OneLife! Gotowy w: # 62% :)
Serwer wam oddany! serwer został stworzony od graczy dla gracz 8-)
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-01-27, 10:12


TRIN

Młodzieniec






Wiek: 23
Na forum: 4205 dni
Posty: 29
Nick w MP: GreeN

Piwa: 831

Respekt: 8,8

Ostrzeżeń: 100%
Suszarka nie dzia?a gdy? system PanaPrezesa nie jest pod MySQL ;) Temu ci nie dzia?a.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-01-27, 10:29


_Haze

Peace Yo!






Wiek: 24
Na forum: 4184 dni
Posty: 1648
Nick w MP: Haze

Piwa: 2628

Respekt: 1020
Respekt: 1020

Trin jak czyta?em tw?j komentarz to dosta?em raka. Co do tematu system pana prezesa jest na sqlite. Ta linijk? z getPlayerMoney daj za getPlayerMoney w evencie przyjmij ofert? kupna. Co do 1 kodu nwm jak mo?na to zrobic ale odsy?am cie do zobaczenia skrypt?w na suszark? z gtao sam je pobiera? i wiem ze one s? naprawd? fajnie napisane mo?esz si? na nich wzorowa?.

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-01-27, 18:14


mlodasnygo







Wiek: 16
Na forum: 3973 dni
Posty: 205

Piwa: 518

Respekt: 161,8
Respekt: 161,8Respekt: 161,8

Odno?nie systemu pojazd?w :)

Znajd? to w sprzedaz_c.lua:


function onSprzedazClickSprzedaj()
local cena guiGetText(guig[16])
    if #cena >= 1 then
    local cena tonumber(cena)
        if type(cena) == "number" then
            showCursor(false)
            guiSetVisible(guig[13], false)
            --
            triggerServerEvent("zaproponujKupnoPojazdu"localPlayersavePLAYERsaveVEHICLEcena)
        else
            outputChatBox("Wpisz cen? za jak? chcesz sprzeda? sw?j pojazd."255255255true)
        end
    end
end


i zamie? na to:


function onSprzedazClickSprzedaj()
local cena guiGetText(guig[16])
    if #cena >= 1 then
    local cena tonumber(cena)
        if type(cena) == "number" then
            if cena >= 1 then
                showCursor(false)
                guiSetVisible(guig[13], false)
                --
                triggerServerEvent("zaproponujKupnoPojazdu"localPlayersavePLAYERsaveVEHICLEcena)
            else
                outputChatBox("Podana cena jest nie prawid?owa."255255255true)
            end
        else
            outputChatBox("Wpisz cen? za jak? chcesz sprzeda? sw?j pojazd."255255255true)
        end
    end
end



ps mia?em ten sam problem, AteX mi pom?g? :P

Podpis
600 dni - 10 marca 2017
:piwo: 500 piw :piwo: - 10 marca 2017
Postaw piwo autorowi tego posta
 

 
Tagi: nie :: odpowiednie :: działanie
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