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

Wysłany: 2016-07-13, 14:28


JołMadaFakaJoł

Ucze się LUA :)






Wiek: 23
Na forum: 3625 dni
Posty: 11
Nick w MP: BoQu

Piwa: 42

Respekt: 60

Ostrzeżeń: 100%
Witam,
Mam problem oto? nie moge zmieni? lss-bankomaty na swoj? baze danych prosze o pomoc !!
Tutaj kawa?ek kodu - W odpowiedziach prosz? napisa? co mam doda? / zmieni? !!
Kod:

--[[
@author Lukasz Biegaj <wielebny@bestplay.pl>
@copyright 2011-2013 Lukasz Biegaj <wielebny@bestplay.pl>
@license Dual GPLv2/MIT
@todo przerobic z zasobu DB na DB2
]]--


local function getPlayerID(plr)
local c=getElementData(client,"character")
if not c or not c.id then return nil end
return tonumber(c.id)
end

addEvent("onPlayerRequestATMInfo", true)
addEventHandler("onPlayerRequestATMInfo", resourceRoot, function()
local c=getElementData(client,"character")
if not c or not c.id then
triggerClientEvent(client,"doFillATMInfo", resourceRoot, false)
return
end
local dbid=tonumber(c.id)
if not dbid then
triggerClientEvent(client,"doFillATMInfo", resourceRoot, false)
return
end
local sr=exports.DB:pobierzWyniki("SELECT bank_money FROM lss_characters WHERE id="..(tonumber(dbid) or 0).." LIMIT 1")
if not sr or not sr.bank_money then
triggerClientEvent(client,"doFillATMInfo", resourceRoot, false)
return
end
triggerClientEvent(client,"doFillATMInfo", resourceRoot, true, tonumber(sr.bank_money))
end)

addEvent("doATMOperation", true)
addEventHandler("doATMOperation", resourceRoot, function(kwota)
-- kwota dodatnia - wplata
-- kwota ujemna - wyplata
if kwota>0 and kwota>getPlayerMoney(client) then return end -- komunikat bledu po stronie klienta
local dbid=getPlayerID(client)
if not dbid then return end -- nie powinno sie zdarzyc
if kwota>0 then
if getPlayerMoney(client)<kwota then return end
takePlayerMoney(client, kwota)
exports.DB:zapytanie("UPDATE lss_characters SET bank_money=bank_money+"..(tonumber(kwota) or 0).." WHERE id="..tonumber(dbid).." LIMIT 1")
exports["lss-admin"]:gameView_add("BANK wplata "..getPlayerName(client).."/"..dbid.." kwota "..kwota.."$")
triggerEvent("broadcastCaptionedEvent", client, getPlayerName(client).." wp?aca pieni?dze do bankomatu", 3, 20, true)
elseif kwota<0 then
local sr=exports.DB:pobierzWyniki("SELECT `bank_money` FROM `lss_characters` WHERE id="..tonumber(dbid).." LIMIT 1")
if not sr or not sr.bank_money then return end -- nie opwinno sie wydarzyc
sr.bank_money=tonumber(sr.bank_money)
if (sr.bank_money<math.abs(kwota)) then
outputChatBox("Nie masz tyle ?rodk?w na koncie!", client, 255,0,0)
-- triggerClientEvent(client,"onAnnouncement3", root, "Nie masz tyle ?rodk?w na koncie!", 5)
return
end
triggerEvent("broadcastCaptionedEvent", client, getPlayerName(client).." wyp?aca pieni?dze z bankomatu", 3, 20, true)
exports.DB:zapytanie("UPDATE lss_characters SET bank_money=bank_money-"..math.abs(tonumber(kwota)).." WHERE id="..tonumber(dbid).." LIMIT 1")
exports["lss-admin"]:gameView_add("BANK wyplata "..getPlayerName(client).."/"..dbid.." kwota "..kwota.."$")
givePlayerMoney(client, math.abs(kwota))
end


end)

addEvent("doATMOperationFraction", true)
addEventHandler("doATMOperationFraction", resourceRoot, function(kwota,frakcja,tytul)
local dbid=getPlayerID(client)
if not dbid then return end -- nie powinno sie zdarzyc

local sr=exports.DB:pobierzWyniki("SELECT `bank_money` FROM `lss_characters` WHERE id="..tonumber(dbid).." LIMIT 1")
if not sr or not sr.bank_money then return end -- nie opwinno sie wydarzyc
sr.bank_money=tonumber(sr.bank_money)
if (sr.bank_money<math.abs(kwota)) then
outputChatBox("Nie masz tyle ?rodk?w na koncie!", client, 255,0,0)
return
end

exports.DB:zapytanie("UPDATE lss_characters SET bank_money=bank_money-"..(tonumber(kwota) or 0).." WHERE id="..tonumber(dbid).." LIMIT 1") --zabieramy kase z konta gracza
exports.DB2:zapytanie(string.format("INSERT INTO `lss_faction_wplaty` (`char_id`, `faction_id`, `kwota`, `tytul`) VALUES ('%f', '%f', '%f', '%s')", tonumber(dbid), tonumber(frakcja), tonumber(kwota), tytul))

local sr=exports.DB:pobierzWyniki("SELECT `id` FROM `lss_containers` WHERE owning_faction="..tonumber(frakcja).." LIMIT 1")
-- exports["lss-pojemniki"]:insertItemToContainer(sr.id, -1, tonumber(kwota*0.75), 0, "Got?wka") --75% dla firmy

exports["lss-pojemniki"]:insertItemToContainer(1533, -1, tonumber(kwota*0.75), 0, "Got?wka") --25% dla urzedu

exports["lss-admin"]:gameView_add("BANK-FRAKCJA wplata "..getPlayerName(client).."/"..dbid.." kwota "..kwota.."$ NA KONTO "..frakcja.." TYTULEM "..tytul)
triggerEvent("broadcastCaptionedEvent", client, getPlayerName(client).." przelewa ?rodki na konto frakcyjne", 3, 20, true)


end)


Daje :arrow: :piwo:

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-13, 15:16


marcin778

Krytyk serwerów MTA






Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8

odnajd? zas?b DB i tam zmie? dane do bazy.

Podpis
Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw

-- obecnie
-- obecnie
-- dawniej
-- dawniej
-- dawniej
Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-13, 15:25


JołMadaFakaJoł

Ucze się LUA :)






Wiek: 23
Na forum: 3625 dni
Posty: 11
Nick w MP: BoQu

Piwa: 42

Respekt: 60

Ostrzeżeń: 100%
M?g?bys mi to jako? bardziej wyt?umaczyc ?

Postaw piwo autorowi tego posta
 

 
Wysłany: 2016-07-13, 15:27


marcin778

Krytyk serwerów MTA






Wiek: 24
Na forum: 4149 dni
Posty: 2268
Nick w MP: Marcineg

Piwa: 4662

Respekt: 1436,8
Respekt: 1436,8

Je?li wgra?e? ca?y gm xyyzyrp to znajd? folder DB i w nim jest plik odpowiadaj?cy za baz? danych. Edytuj go na dane do swojej bazy.

Podpis
Moje prace: https://www.youtube.com/c...MuaWGHPp1mhlGnw

-- obecnie
-- obecnie
-- dawniej
-- dawniej
-- dawniej
Postaw piwo autorowi tego posta
 

 
Tagi: nie :: wiem :: jak :: zmienić :: lss-bankomaty :: moja :: baze :: danych
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Nie wiem jak zmienić lss-bankomaty na moja baze danych !! 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