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

Wysłany: 2020-04-13, 23:58


Shinnowaty






Wiek: 24
Na forum: 2312 dni
Posty: 25
Nick w MP: Kirotsune
Piwa: 1

Respekt: 50
Witam, ot?? mam taki problem z jednym b??dem:
Kod:

bad argument #1 to 'ipairs' (table expected, got boolean)

B??d jest w tej oto linijce:
Kod:

for i,v in ipairs(d) do
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-04-14, 01:21


DjPaTrOl






Wiek: 41
Na forum: 3631 dni
Posty: 2

Piwa: 1

Respekt: 50
bad argument #1 to 'ipairs' (table expected, got boolean). Z tego co tu pisze mo?esz se raczej wywnioskowa?, ?e w 1 argumencie ipairs (czyli d) spodziewa si? tablicy, a dostaje zmienn? bool. Z t? ilo?ci? kodu nikt ci raczej w tym nie pomo?e
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-04-14, 07:44


Wilq






Wiek: 24
Na forum: 4429 dni
Posty: 3410

Piwa: 739

Respekt: 1225,8
Respekt: 1225,8
Warto doda? do wy?szej wiadomo?ci, ?e zmienn? "d" definiujesz przez getElementData, a gracz mo?e nie mie? takiej element daty.
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-04-14, 14:01


Shinnowaty






Wiek: 24
Na forum: 2312 dni
Posty: 25
Nick w MP: Kirotsune
Piwa: 1

Respekt: 50
Jest to w linijce 389
Kod:

local sX,sY=guiGetScreenSize()
local latoReg9=exports.czcionka:czcionka("latoreg.ttf",9)
local latoReg10=exports.czcionka:czcionka("latoreg.ttf",10)
local latoReg11_gui=guiCreateFont("i/Lato_Regular.ttf",11)
local latoReg11=exports.czcionka:czcionka("latoreg.ttf",11)
local latoReg12=exports.czcionka:czcionka("latoreg.ttf",12)
local latoReg14=exports.czcionka:czcionka("latoreg.ttf",14)
local latoReg16=exports.czcionka:czcionka("latoreg.ttf",16)

function przecinek(liczba)
local format = liczba
while true do
format, k = string.gsub(format, "^(-?%d+)(%d%d%d)", '%1,%2')
if ( k==0 ) then
break
end
end
return format
end

local page=nil
local panelEnabled=false
local kasa=0
local okienko=nil
local antyLag=false
local karta=nil

local odbiorca=nil
local dbidOdbiorcy=0
local kwotaPrzelewu=0
local winX,winY,winW,winH=(sX-736)/2,(sY-186)/2,730,220
local optionH=40
local iloscOpcji,iloscWidocznych,opcjaPodstawowa=0,5,0

for i,v in ipairs(getElementsByType("object")) do
if getElementModel(v)==2942 then setObjectBreakable(v,false) end
end

local btn={
-- WP?ATA
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="wplata"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="WP?A? PIENI?DZE",page="wplata"},
-- WYP?ATA
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="wyplata"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="WYP?A? ?RODKI",page="wyplata"},

-- ************************************** BANKOMAT ************************************** --
-- Menu G??wne
{typ="akcja_1",x=(sX-480)/2,y=(sY-230)/2,w=190,h=190,wExtra=0,color={19, 121, 225, 100},xImg=(sX-410)/2,yImg=(sY-190)/2,wImg=120,hImg=120,linkImg="i/1.png",text="WP?A? PIENI?DZE",yText=(sY+62)/2,wText=190,hText=30,page="bankomat_start"},
{typ="akcja_1",x=(sX+100)/2,y=(sY-230)/2,w=190,h=190,wExtra=0,color={19, 121, 225, 100},xImg=(sX+170)/2,yImg=(sY-180)/2,wImg=120,hImg=120,linkImg="i/2.png",text="WYP?A? ?RODKI",yText=(sY+62)/2,wText=190,hText=30,page="bankomat_start"},
{typ="akcja",x=(sX-400)/2,y=(sY+250)/2,w=400,h=40,wExtra=0,color={19, 121, 225, 100},text="ZAMKNIJ PANEL",page="bankomat_start"},

-- ************************************** BANK ************************************** --
-- Menu G??wne
{typ="akcja_1",x=(sX-770)/2,y=(sY-180)/2,w=120,h=120,wExtra=0,color={19, 121, 225, 100},xImg=(sX-718)/2,yImg=(sY-160)/2,wImg=68,hImg=68,linkImg="i/1.png",text="WP?A? PIENI?DZE",yText=(sY+12)/2,wText=120,hText=10,page="bank_start"},
{typ="akcja_1",x=(sX-510)/2,y=(sY-180)/2,w=120,h=120,wExtra=0,color={19, 121, 225, 100},xImg=(sX-458)/2,yImg=(sY-160)/2,wImg=68,hImg=68,linkImg="i/2.png",text="WYP?A? ?RODKI",yText=(sY+12)/2,wText=120,hText=10,page="bank_start"},
{typ="akcja_1",x=(sX-250)/2,y=(sY-180)/2,w=120,h=120,wExtra=0,color={19, 121, 225, 150},xImg=(sX-198)/2,yImg=(sY-160)/2,wImg=68,hImg=68,linkImg="i/3.png",text="WYKONAJ\nPRZELEW",yText=(sY+12)/2,wText=120,hText=10,page="bank_start"},
{typ="akcja_1",x=(sX+270)/2,y=(sY-180)/2,w=120,h=120,wExtra=0,color={19, 121, 225, 100},xImg=(sX+322)/2,yImg=(sY-160)/2,wImg=68,hImg=68,linkImg="i/4.png",text="ZARZ?DZAJ\nKART?",yText=(sY+12)/2,wText=120,hText=10,page="bank_start"},
{typ="akcja_1",x=(sX+530)/2,y=(sY-180)/2,w=120,h=120,wExtra=0,color={19, 121, 225, 100},xImg=(sX+582)/2,yImg=(sY-160)/2,wImg=68,hImg=68,linkImg="i/5.png",text="HISTORIA\nTRANSAKCJI",yText=(sY+12)/2,wText=120,hText=10,page="bank_start"},
{typ="akcja",x=(sX-400)/2,y=(sY+250)/2,w=400,h=40,wExtra=0,color={19, 121, 225, 100},text="ZAMKNIJ PANEL",page="bank_start"},

-- ZARZ?DZANIE KART?
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="zarzadzaj_karta"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="",page="zarzadzaj_karta"},

-- PRZELEW
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="przelew"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="WYKONAJ PRZELEW",page="przelew"},
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="przelew_2"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POTWIERD? PRZELEW",page="przelew_2"},

-- HISTORIA PRZELEW?W
{typ="akcja",x=(sX-380)/2,y=(sY+300)/2,w=380,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="historia_przelewow"},

{typ="akcja_1",x=(sX+10)/2,y=(sY-180)/2,w=120,h=120,wExtra=0,color={19, 121, 225, 100},xImg=(sX+62)/2,yImg=(sY-160)/2,wImg=68,hImg=68,linkImg="i/3.png",text="PRZELEW\nDO BIZNESU",yText=(sY+12)/2,wText=120,hText=10,page="bank_start"},

-- PRZELEW BIZNES
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="przelewbiznes"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="WYKONAJ PRZELEW",page="przelewbiznes"},
{typ="akcja",x=(sX-610)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POWR?T DO POPRZEDNIEJ STRONY",page="przelewbiznes_2"},
{typ="akcja",x=(sX+10)/2,y=(sY+250)/2,w=300,h=40,wExtra=0,color={19, 121, 225, 100},text="POTWIERD? PRZELEW",page="przelewbiznes_2"},
}

local txt_wins={
{text="BANKOMAT / WP?ATOMAT",color={255,255,255,255},page="bankomat_start"},
{text="WP?ATOMAT - WP?ACANIE PIENI?DZY",color={255,255,255,255},page="wplata"},
{text="BANKOMAT - WYP?ACANIE ?RODK?W",color={255,255,255,255},page="wyplata"},
{text="ODDZIA? BANKU - SAN ANDREAS",color={255,255,255,255},page="bank_start"},
{text="ZARZ?DZANIE KART?",color={255,255,255,255},page="zarzadzaj_karta"},
{text="PRZELEW BANKOWY",color={255,255,255,255},page="przelew"},
{text="POTWIERDZENIE PRZELEWU",color={255,255,255,255},page="przelew_2"},
{text="PRZELEW BANKOWY",color={255,255,255,255},page="przelewbiznes"},
{text="POTWIERDZENIE PRZELEWU",color={255,255,255,255},page="przelewbiznes_2"},
{text="HISTORIA DZIA?A?",color={255,255,255,255},page="historia_przelewow"},
}

local wplataWyplata=guiCreateEdit((sX-390)/2,(sY+20)/2,440,40,"",false)
guiSetAlpha(wplataWyplata,0.55)
guiEditSetMaxLength(wplataWyplata,12)
guiSetFont(wplataWyplata,latoReg11_gui)
--guiSetProperty(wplataWyplata,"ValidationString","^[0-9]*$")
guiSetVisible(wplataWyplata,false)

local dbid=guiCreateEdit((sX-90)/2,(sY-100)/2,140,40,"",false)
guiSetAlpha(dbid,0.55)
guiEditSetMaxLength(dbid,10)
guiSetFont(dbid,latoReg11_gui)
--guiSetProperty(dbid,"ValidationString","^[0-9]*$")
guiSetVisible(dbid,false)

-- LISTA
local function myMouseOnList(x,y,w,h)
if isCursorShowing() and panelEnabled then
local cX,cY=getCursorPosition()
cX,cY=cX*sX,cY*sY
if(cX>x and cX<x+w) and (cY>y and cY<y+h) then return true end
end
return false
end

local function onClientKey(btn)
if btn=="mouse_wheel_down" then
if panelEnabled then
if iloscOpcji>5 then
if myMouseOnList(winX,winY,winW,winH) then
opcjaPodstawowa=opcjaPodstawowa+1
if opcjaPodstawowa>iloscOpcji-iloscWidocznych then opcjaPodstawowa=iloscOpcji-iloscWidocznych end
end
end
end
elseif btn=="mouse_wheel_up" then
if panelEnabled then
if iloscOpcji>5 then
if myMouseOnList(winX,winY,winW,winH) then
opcjaPodstawowa=opcjaPodstawowa-1
if opcjaPodstawowa<0 then opcjaPodstawowa=0 end
end
end
end
end
end

local function deleteList()
for i,v in ipairs(btn) do
if v.typ=="lista" then btn[i]=nil iloscOpcji=0 opcjaPodstawowa=0 end
end
end

local function addButtonsToWindow()

local cX,cY=getCursorPosition()
cX,cY=cX*sX,cY*sY

for i,v in ipairs(btn) do
if v.page==page then
if v.typ=="akcja" then
if(cX>=v.x-(v.wExtra/2) and cX<=v.x-(v.wExtra/2)+v.w+v.wExtra) and (cY>=v.y and cY<=v.y+v.h) then
if v.wExtra<10 then v.wExtra=v.wExtra+1 end
if v.color[4]<190 then v.color[4]=v.color[4]+9 end
else
if v.wExtra>0 then v.wExtra=v.wExtra-1 end
if v.color[4]>100 then v.color[4]=v.color[4]-9 end
end
dxDrawRectangle(v.x-(v.wExtra/2),v.y,v.w+v.wExtra,v.h,tocolor(v.color[1],v.color[2],v.color[3],v.color[4]),false) -- t?o
dxDrawText(v.text,v.x,v.y,v.x+v.w,v.y+v.h,tocolor(255,255,255,255),1.00,latoReg9,"center","center",false,false,false,false,false) -- opis
elseif v.typ=="akcja_1" then
if(cX>=v.x-(v.wExtra/2) and cX<=v.x-(v.wExtra/2)+v.w+v.wExtra) and (cY>=v.y-(v.wExtra/2) and cY<=v.y-(v.wExtra/2)+v.h+v.wExtra) then
if v.wExtra<10 then v.wExtra=v.wExtra+1 end
if v.color[4]<190 then v.color[4]=v.color[4]+9 end
else
if v.wExtra>0 then v.wExtra=v.wExtra-1 end
if v.color[4]>100 then v.color[4]=v.color[4]-9 end
end
dxDrawRectangle(v.x-(v.wExtra/2),v.y-(v.wExtra/2),v.w+v.wExtra,v.h+v.wExtra,tocolor(v.color[1],v.color[2],v.color[3],v.color[4]),false) -- t?o
dxDrawImage(v.xImg-(v.wExtra/2),v.yImg-(v.wExtra/2),v.wImg+v.wExtra,v.hImg+v.wExtra,v.linkImg,0,0,0,tocolor(255,255,255,255),false) -- ikona
dxDrawText(v.text,v.x-(v.wExtra/2),v.yText+(v.wExtra/2),v.x-(v.wExtra/2)+v.wText+v.wExtra,v.yText+(v.wExtra/2)+v.hText,tocolor(255,255,255,255),1.00,latoReg9,"center","center",false,false,false,false,false) -- opis
elseif v.typ=="lista" then
visible=(v.id-1)-opcjaPodstawowa
if iloscOpcji<=5 and iloscOpcji>0 then
if myMouseOnList(winX,winY+(optionH+5)*(v.id-1),winW,optionH) then
if v.color[4]<190 then v.color[4]=v.color[4]+9 end
else
if v.color[4]>100 then v.color[4]=v.color[4]-9 end
end
dxDrawRectangle(winX+winW,winY,6,winH,tocolor(255,255,255,190)) -- PASEK SCROLLA
dxDrawRectangle(winX,winY+(optionH+5)*visible,winW,optionH,tocolor(v.color[1],v.color[2],v.color[3],v.color[4]))
dxDrawText(v.text[1],winX,winY+(optionH+5)*visible,winX+243,winY+(optionH+5)*visible+41,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
dxDrawText(v.text[2],winX+258,winY+(optionH+5)*visible,winX+502,winY+(optionH+5)*visible+41,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
dxDrawText(v.text[3],winX+487,winY+(optionH+5)*visible,winX+730,winY+(optionH+5)*visible+41,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
elseif iloscOpcji>5 then
if myMouseOnList(winX,winY+(optionH+5)*visible,winW,optionH) then
if v.color[4]<190 then v.color[4]=v.color[4]+9 end
else
if v.color[4]>100 then v.color[4]=v.color[4]-9 end
end
dxDrawRectangle(winX+winW,winY+winH/iloscOpcji*opcjaPodstawowa,6,winH/iloscOpcji*iloscWidocznych,tocolor(255,255,255,190)) -- PASEK SCROLLA
if v.id>opcjaPodstawowa and v.id<=opcjaPodstawowa+5 then
dxDrawRectangle(winX,winY+(optionH+5)*visible,winW,optionH,tocolor(v.color[1],v.color[2],v.color[3],v.color[4]))
dxDrawText(v.text[1],winX,winY+(optionH+5)*visible,winX+243,winY+(optionH+5)*visible+41,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
dxDrawText(v.text[2],winX+258,winY+(optionH+5)*visible,winX+502,winY+(optionH+5)*visible+41,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
dxDrawText(v.text[3],winX+487,winY+(optionH+5)*visible,winX+730,winY+(optionH+5)*visible+41,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
end
end
end
end
end
end

local function panelWindowMain()
dxDrawRectangle((sX-800)/2,(sY-450)/2,800,450,tocolor(0,0,0,120),false)
for p=1,59 do
dxDrawRectangle((sX-800)/2,(sY-450)/2-p+59,p,1,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX+800)/2,(sY-450)/2-p+59,-p,1,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX-800)/2,(sY+330)/2+p,p,1,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX+800)/2-p,(sY+330)/2+p,p,1,tocolor(19, 121, 225,100),false)
end
dxDrawRectangle((sX-682)/2,(sY+450)/2-1,682,1,tocolor(19, 121, 225,100),false)

for p=1,60 do
dxDrawRectangle((sX-400)/2,(sY-450)/2-p+60,-p,1,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX+400)/2,(sY-450)/2-p+60,p,1,tocolor(19, 121, 225,100),false)
end
dxDrawRectangle((sX-400)/2,(sY-450)/2,400,60,tocolor(19, 121, 225,100),false)

for i,v in ipairs(txt_wins) do
if v.page==page then dxDrawText(v.text,(sX-400)/2,(sY-450)/2,(sX-400)/2+400,(sY-450)/2+60,tocolor(v.color[1],v.color[2],v.color[3],v.color[4]),1.00,latoReg12,"center","center",false,false,false,false,false) end
end
end

local function panelGieldaKonfiskata()
-- panel
panelWindowMain()
if page=="wplata" then
dxDrawText("W tym miejscu mo?esz wp?aci? pieni?dze na swoje konto bankowe.\nAby to zrobi?, wpisz odpowiedni? kwot? w poni?sze okno i kliknij 'WP?A? PIENI?DZE'.",(sX-400)/2,(sY-250)/2,(sX-400)/2+400,(sY-250)/2+60,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,true,false)
dxDrawText("#008000Stan konta: "..przecinek(kasa).."PLN",(sX-400)/2,(sY-120)/2,(sX-400)/2+400,(sY-120)/2+60,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
-- zielone t?o
dxDrawRectangle((sX-500)/2,(sY+10)/2,50,50,tocolor(19, 121, 225,100),false)
-- bia?e t?o
dxDrawRectangle((sX-400)/2,(sY+10)/2,450,50,tocolor(255,255,255,100),false)
-- infolabele
if string.len(guiGetText(wplataWyplata))==0 then dxDrawText("np. 1000",(sX-376)/2,(sY+10)/2,(sX-376)/2+150,(sY+10)/2+50,tocolor(0,0,0,255),1.00,latoReg11,"left","center",false,false,false,false,false) end
-- obrazki
dxDrawImage((sX-490)/2,(sY+20)/2,40,40,"i/1.png",0,0,0,tocolor(255,255,255,200),false)
elseif page=="wyplata" then
dxDrawText("W tym miejscu mo?esz wyp?aci? pieni?dze ze swojego konta bankowego.\nAby to zrobi?, wpisz odpowiedni? kwot? w poni?sze okno i kliknij 'WYP?A? ?RODKI'.",(sX-400)/2,(sY-250)/2,(sX-400)/2+400,(sY-250)/2+60,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,true,false)
dxDrawText("#008000Stan konta: "..przecinek(kasa).." PLN",(sX-400)/2,(sY-120)/2,(sX-400)/2+400,(sY-120)/2+60,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
-- zielone t?o
dxDrawRectangle((sX-500)/2,(sY+10)/2,50,50,tocolor(19, 121, 225,100),false)
-- bia?e t?o
dxDrawRectangle((sX-400)/2,(sY+10)/2,450,50,tocolor(255,255,255,100),false)
-- infolabele
if string.len(guiGetText(wplataWyplata))==0 then dxDrawText("np. 1000",(sX-376)/2,(sY+10)/2,(sX-376)/2+150,(sY+10)/2+50,tocolor(0,0,0,255),1.00,latoReg11,"left","center",false,false,false,false,false) end
-- obrazki
dxDrawImage((sX-490)/2,(sY+20)/2,40,40,"i/2.png",0,0,0,tocolor(255,255,255,200),false)
elseif page=="zarzadzaj_karta" then
dxDrawImage((sX-380)/2,(sY-260)/2,380,220,"i/karta.png",0,0,0,tocolor(255,255,255,160),false)
if not karta then
dxDrawImage((sX-380)/2,(sY-260)/2,380,220,"i/karta_pasek.png",0,0,0,tocolor(255,255,255,255),false)
else
dxDrawText(getPlayerName(localPlayer),((sX-270)/2)+1,((sY+120)/2)+1,(sX-270)/2+1,(sY+120)/2+1,tocolor(159,159,159,255),1.00,latoReg14,"left","center",false,false,false,false,false)
dxDrawText(getPlayerName(localPlayer),(sX-270)/2,(sY+120)/2,(sX-270)/2,(sY+120)/2,tocolor(90,90,90,255),1.00,latoReg14,"left","center",false,false,false,false,false)
end
elseif page=="przelew" then
dxDrawText("W tym miejscu mo?esz przela? pieni?dze ze swojego konta bankowego na konto innej osoby.\nAby to zrobi?, wpisz odpowiedni? kwot? oraz SID osoby, do kt?rej chcesz wys?a? przelew\ni kliknij 'WYKONAJ PRZELEW'.",(sX-400)/2,(sY-250)/2,(sX-400)/2+400,(sY-250)/2+60,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,true,false)
dxDrawText("#008000Stan konta: "..przecinek(kasa).." PLN",(sX-400)/2,(sY+115)/2,(sX-400)/2+400,(sY+115)/2+60,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
-- zielone t?o
dxDrawRectangle((sX-200)/2,(sY-110)/2,50,50,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX-500)/2,(sY+10)/2,50,50,tocolor(19, 121, 225,100),false)
-- bia?e t?o
dxDrawRectangle((sX-100)/2,(sY-110)/2,150,50,tocolor(255,255,255,100),false)
dxDrawRectangle((sX-400)/2,(sY+10)/2,450,50,tocolor(255,255,255,100),false)
-- infolabele
if string.len(guiGetText(dbid))==0 then dxDrawText("SID odbiocy...",(sX-76)/2,(sY-110)/2,(sX-76)/2+150,(sY-110)/2+50,tocolor(0,0,0,255),1.00,latoReg11,"left","center",false,false,false,false,false) end
if string.len(guiGetText(wplataWyplata))==0 then dxDrawText("np. 1000",(sX-376)/2,(sY+10)/2,(sX-376)/2+150,(sY+10)/2+50,tocolor(0,0,0,255),1.00,latoReg11,"left","center",false,false,false,false,false) end
-- obrazki
dxDrawImage((sX-490)/2,(sY+20)/2,40,40,"i/2.png",0,0,0,tocolor(255,255,255,200),false)
dxDrawImage((sX-190)/2,(sY-100)/2,40,40,"i/6.png",0,0,0,tocolor(255,255,255,200),false)
elseif page=="przelew_2" then
dxDrawText("W tym miejscu mo?esz przela? pieni?dze ze swojego konta bankowego na konto wybranego gracza.\nAby to zrobi?, wpisz odpowiedni? kwot? oraz SID odbiorcy, do kt?rego chcesz wys?a? przelew\ni kliknij 'WYKONAJ PRZELEW'.",(sX-400)/2,(sY-250)/2,(sX-400)/2+400,(sY-250)/2+60,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,true,false)
dxDrawText("Stan konta: "..przecinek(kasa).." PLN",(sX-400)/2,(sY+115)/2,(sX-400)/2+400,(sY+115)/2+60,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
dxDrawText("#ffff00Nazwa odbiorcy: "..odbiorca.."\nSID odbiorcy: "..dbidOdbiorcy,(sX-200)/2,(sY-110)/2,(sX-200)/2+200,(sY-110)/2+76,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
dxDrawText("#ffff00Kwota przelewu: "..przecinek(kwotaPrzelewu).." PLN + 10PLN op?aty za przelew",(sX-500)/2,(sY+10)/2,(sX-500)/2+500,(sY+10)/2+76,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
elseif page=="przelewbiznes" then
dxDrawText("W tym miejscu mo?esz przela? pieni?dze ze swojego konta bankowego na konto wybranego biznesu.\nAby to zrobi?, wpisz odpowiedni? kwot? oraz ID biznesu, do kt?rej chcesz wys?a? przelew\ni kliknij 'WYKONAJ PRZELEW'.",(sX-400)/2,(sY-250)/2,(sX-400)/2+400,(sY-250)/2+60,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,true,false)
dxDrawText("#FFFF00Stan konta: "..przecinek(kasa).." PLN",(sX-400)/2,(sY+115)/2,(sX-400)/2+400,(sY+115)/2+60,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
-- zielone t?o
dxDrawRectangle((sX-200)/2,(sY-110)/2,50,50,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX-500)/2,(sY+10)/2,50,50,tocolor(19, 121, 225,100),false)
-- bia?e t?o
dxDrawRectangle((sX-100)/2,(sY-110)/2,150,50,tocolor(255,255,255,100),false)
dxDrawRectangle((sX-400)/2,(sY+10)/2,450,50,tocolor(255,255,255,100),false)
-- infolabele
if string.len(guiGetText(dbid))==0 then dxDrawText("ID biznesu...",(sX-76)/2,(sY-110)/2,(sX-76)/2+150,(sY-110)/2+50,tocolor(0,0,0,255),1.00,latoReg11,"left","center",false,false,false,false,false) end
if string.len(guiGetText(wplataWyplata))==0 then dxDrawText("np. 1000",(sX-376)/2,(sY+10)/2,(sX-376)/2+150,(sY+10)/2+50,tocolor(0,0,0,255),1.00,latoReg11,"left","center",false,false,false,false,false) end
-- obrazki
dxDrawImage((sX-490)/2,(sY+20)/2,40,40,"i/2.png",0,0,0,tocolor(255,255,255,200),false)
dxDrawImage((sX-190)/2,(sY-100)/2,40,40,"i/6.png",0,0,0,tocolor(255,255,255,200),false)
elseif page=="przelewbiznes_2" then
dxDrawText("W tym miejscu mo?esz przela? pieni?dze ze swojego konta bankowego na konto wybranego biznesu.\nAby to zrobi?, wpisz odpowiedni? kwot? oraz ID biznesu, do kt?rej chcesz wys?a? przelew\ni kliknij 'WYKONAJ PRZELEW'.",(sX-400)/2,(sY-250)/2,(sX-400)/2+400,(sY-250)/2+60,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,true,false)
dxDrawText("Stan konta: "..przecinek(kasa).." PLN",(sX-400)/2,(sY+115)/2,(sX-400)/2+400,(sY+115)/2+60,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
dxDrawText("#ffff00Nazwa firmy odbiorcy: "..odbiorca.."\nID firmy odbiorcy: "..dbidOdbiorcy,(sX-200)/2,(sY-110)/2,(sX-200)/2+200,(sY-110)/2+76,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
dxDrawText("#ffff00Kwota przelewu: "..kwotaPrzelewu.."PLN + 10PLN op?aty za przelew",(sX-500)/2,(sY+10)/2,(sX-500)/2+500,(sY+10)/2+76,tocolor(255,255,255,255),1.00,latoReg12,"center","center",false,false,false,true,false)
elseif page=="historia_przelewow" then
dxDrawRectangle((sX-750)/2,(sY-296)/2,750,50,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX-750)/2,(sY+264)/2,750,2,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX-750)/2,(sY-196)/2,2,230,tocolor(19, 121, 225,100),false)
dxDrawRectangle((sX+746)/2,(sY-196)/2,2,230,tocolor(19, 121, 225,100),false)

dxDrawText("DATA WYKONANIA",(sX-736)/2,(sY-296)/2,(sX-736)/2+243,(sY-296)/2+50,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
dxDrawText("OPIS",(sX-250)/2,(sY-296)/2,(sX-250)/2+244,(sY-296)/2+50,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
dxDrawText("DZIA?ANIE",(sX+238)/2,(sY-296)/2,(sX+238)/2+243,(sY-296)/2+50,tocolor(255,255,255,255),1.00,latoReg10,"center","center",false,false,false,false,false)
end
addButtonsToWindow()
end

addEvent("panelBanku_c",true)
addEventHandler("panelBanku_c",resourceRoot,function(cmd,d,d2,d3)
if cmd=="showWindow" then
if d then
if not d2 then return end
if panelEnabled then return end
addEventHandler("onClientRender",root,panelGieldaKonfiskata)
addEventHandler("onClientClick",root,onClientClick)
addEventHandler("onClientKey",root,onClientKey)
panelEnabled=true
kasa=d2
okienko=d3
karta=getElementData(localPlayer,"bank:karta")
page=okienko.."_start"
showCursor(true,false)
guiSetInputMode("no_binds")
setElementData(localPlayer,"3dtext_status",false)
elseif not d then
removeEventHandler("onClientRender",root,panelGieldaKonfiskata)
removeEventHandler("onClientClick",root,onClientClick)
removeEventHandler("onClientKey",root,onClientKey)
panelEnabled=false
page="bankomat_start"
okienko=nil
karta=nil
showCursor(false,false)
guiSetInputMode("allow_binds")
setElementData(localPlayer,"3dtext_status",true)
end
elseif cmd=="odswiezPanel" then
if page=="wplata" or page=="wyplata" then kasa=d
elseif page=="zarzadzaj_karta" then
karta=d
antyLag=false
if not karta then btn[15].text="WYR?B NOW? KART? (20 PLN)" else btn[15].text="DEZAKTYWUJ KART?" end
elseif page=="przelew_2" then
page="przelew"
guiSetVisible(wplataWyplata,true)
guiSetVisible(dbid,true)
kasa=d
odbiorca=nil
dbidOdbiorcy=0
kwotaPrzelewu=0
elseif page=="przelewbiznes_2" then
page="przelewbiznes"
guiSetVisible(wplataWyplata,true)
guiSetVisible(dbid,true)
kasa=d
odbiorca=nil
dbidOdbiorcy=0
kwotaPrzelewu=0
end
elseif cmd=="przelewaniePieniedzy_2" then
guiSetText(wplataWyplata,"")
guiSetText(dbid,"")
guiSetVisible(wplataWyplata,false)
guiSetVisible(dbid,false)
odbiorca=d
kwotaPrzelewu=d2
dbidOdbiorcy=d3
page="przelew_2"
elseif cmd=="przelewaniePieniedzy_4" then
guiSetText(wplataWyplata,"")
guiSetText(dbid,"")
guiSetVisible(wplataWyplata,false)
guiSetVisible(dbid,false)
odbiorca=d
kwotaPrzelewu=d2
dbidOdbiorcy=d3
page="przelewbiznes_2"
elseif cmd=="unlock" then
antyLag=false
elseif cmd=="pobierzHistorie" then
for i,v in ipairs(d) do
if v.typ=="wplata" then table.insert(btn,{typ="lista",id=i,text={v.data,"kwota: "..v.kwota.."PLN","WP?ATA"},page="historia_przelewow",color={19, 121, 225,100}})
elseif v.typ=="wyplata" then table.insert(btn,{typ="lista",id=i,text={v.data,"kwota: "..v.kwota.."PLN","WYP?ATA"},page="historia_przelewow",color={19, 121, 225,100}})
elseif v.typ=="przelew" then table.insert(btn,{typ="lista",id=i,text={v.data,"DO: "..v.odbiorca.."("..v.dbid_o.."), kwota: "..v.kwota.." PLN","PRZELEW"},page="historia_przelewow",color={19, 121, 225,100}})
else
if v.dbid_n==getElementData(localPlayer,"player:sid") then table.insert(btn,{typ="lista",id=i,text={v.data,"DO: "..v.odbiorca.."("..v.dbid_o.."), kwota: "..v.kwota.."PLN","PRZELEW"},page="historia_przelewow",color={19, 121, 225,100}})
elseif v.dbid_o==getElementData(localPlayer,"player:sid") then table.insert(btn,{typ="lista",id=i,text={v.data,"OD: "..v.nadawca.."("..v.dbid_n.."), kwota: "..v.kwota.."PLN","PRZELEW"},page="historia_przelewow",color={19, 121, 225,100}}) end
end

iloscOpcji=iloscOpcji+1
end
end
end)

-- PRZYCISKI (CLICK)
function onClientClick(_,state,x,y)
-- zabezpieczenie przed aktywacj? przycisk?w poza panelem
if not panelEnabled then return end

-- aktywacja przycisk?w
if state=="up" then
local bClick=nil
for i,v in ipairs(btn) do
if v.page==page and not antyLag then
if v.typ=="akcja" then
if(x>=v.x-(v.wExtra/2) and x<=v.x-(v.wExtra/2)+v.w+v.wExtra) and (y>=v.y and y<=v.y+v.h) then
bClick=v
v.color[4]=100
v.wExtra=0
end
elseif v.typ=="akcja_1" then
if(x>=v.x-(v.wExtra/2) and x<=v.x-(v.wExtra/2)+v.w+v.wExtra) and (y>=v.y-(v.wExtra/2) and y<=v.y-(v.wExtra/2)+v.h+v.wExtra) then
bClick=v
v.color[4]=100
v.wExtra=0
end
end
end
end
if not bClick then return end

if bClick.text=="ZAMKNIJ PANEL" then triggerEvent("panelBanku_c",resourceRoot,"showWindow",false) page=nil end
if page=="bankomat_start" or page=="bank_start" then
if bClick.text=="WP?A? PIENI?DZE" then
page="wplata"
guiSetVisible(wplataWyplata,true)
elseif bClick.text=="WYP?A? ?RODKI" then
page="wyplata"
guiSetVisible(wplataWyplata,true)
end
end
if page=="bank_start" then
if bClick.text=="ZARZ?DZAJ\nKART?" then
if not karta then btn[15].text="WYR?B NOW? KART? (20 PLN)" else btn[15].text="DEZAKTYWUJ KART?" end
page="zarzadzaj_karta"
elseif bClick.text=="WYKONAJ\nPRZELEW" then
page="przelew"
guiSetVisible(wplataWyplata,true)
guiSetVisible(dbid,true)
elseif bClick.text=="PRZELEW\nDO BIZNESU" then
page="przelewbiznes"
guiSetVisible(wplataWyplata,true)
guiSetVisible(dbid,true)
elseif bClick.text=="HISTORIA\nTRANSAKCJI" then
triggerServerEvent("panelBanku",resourceRoot,"pobierzHistorie")
page="historia_przelewow"
end
elseif page=="wplata" then
if bClick.text=="WP?A? PIENI?DZE" then
if string.len(guiGetText(wplataWyplata))==0 then outputChatBox("Wpisz kwot?, kt?r? chcesz wp?aci? na konto bankowe.") return end
if tonumber(guiGetText(wplataWyplata)) then
triggerServerEvent("panelBanku",resourceRoot,"wplacaniePieniedzy",tonumber(guiGetText(wplataWyplata)),okienko)
guiSetText(wplataWyplata,"")
else outputChatBox("Nieprawid?owy format.") end
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
guiSetVisible(wplataWyplata,false)
guiSetText(wplataWyplata,"")
page=okienko.."_start"
end
elseif page=="wyplata" then
if bClick.text=="WYP?A? ?RODKI" then
if string.len(guiGetText(wplataWyplata))==0 then outputChatBox("Wpisz kwot?, kt?r? chcesz wyp?aci? z konta bankowego.") return end
if tonumber(guiGetText(wplataWyplata)) then
if tonumber(guiGetText(wplataWyplata))<(0) then outputChatBox("Nieprawid?owy format.") return end
local kasa = split(guiGetText(wplataWyplata), "")
if kasa[2] then if string.len(kasa[2]) > 2 then outputChatBox("Max 2 znaki po przecinku.") return end end
triggerServerEvent("panelBanku",resourceRoot,"wyplacaniePieniedzy",tonumber(guiGetText(wplataWyplata)),okienko)
guiSetText(wplataWyplata,"")
else outputChatBox("Nieprawid?owy format.") end
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
guiSetVisible(wplataWyplata,false)
guiSetText(wplataWyplata,"")
page=okienko.."_start"
end
elseif page=="zarzadzaj_karta" then
if bClick.text=="WYR?B NOW? KART? (20 PLN)" or bClick.text=="DEZAKTYWUJ KART?" then antyLag=true triggerServerEvent("panelBanku",resourceRoot,"wyrabianieKarty",okienko)
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then page=okienko.."_start" end
elseif page=="przelew" then
if bClick.text=="WYKONAJ PRZELEW" then
if string.len(guiGetText(dbid))==0 then outputChatBox("Wpisz SID odbiorcy.") return end
if string.len(guiGetText(wplataWyplata))==0 then outputChatBox("Wpisz kwot? przelewu.") return end
if tonumber(guiGetText(wplataWyplata)) then
if tonumber(guiGetText(wplataWyplata))<100 then outputChatBox("Przelew bankowy mo?na wykona? na kwot? od 100PLN.") return end
triggerServerEvent("panelBanku",resourceRoot,"przelewaniePieniedzy",tonumber(guiGetText(dbid)),tonumber(guiGetText(wplataWyplata)))
else outputChatBox("Nieprawid?owy format.") end
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
guiSetVisible(wplataWyplata,false)
guiSetVisible(dbid,false)
guiSetText(wplataWyplata,"")
guiSetText(dbid,"")
page=okienko.."_start"
end
elseif page=="przelew_2" then
if bClick.text=="POTWIERD? PRZELEW" then triggerServerEvent("panelBanku",resourceRoot,"przelewaniePieniedzy_2",dbidOdbiorcy,odbiorca,kwotaPrzelewu)
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
odbiorca=nil
dbidOdbiorcy=0
kwotaPrzelewu=0
guiSetVisible(wplataWyplata,true)
guiSetVisible(dbid,true)
page="przelew"
end
elseif page=="przelewbiznes" then
if bClick.text=="WYKONAJ PRZELEW" then
if string.len(guiGetText(dbid))==0 then outputChatBox("Wpisz ID biznesu.") return end
if string.len(guiGetText(wplataWyplata))==0 then outputChatBox("Wpisz kwot? przelewu.") return end
if tonumber(guiGetText(wplataWyplata)) then
if tonumber(guiGetText(wplataWyplata))<100 then outputChatBox("Przelew bankowy mo?na wykona? na kwot? od 100PLN.") return end

triggerServerEvent("panelBanku",resourceRoot,"przelewaniePieniedzy_3",tonumber(guiGetText(dbid)),tonumber(guiGetText(wplataWyplata)))
else outputChatBox("Nieprawid?owy format.") end
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
guiSetVisible(wplataWyplata,false)
guiSetVisible(dbid,false)
guiSetText(wplataWyplata,"")
guiSetText(dbid,"")
page=okienko.."_start"
end
elseif page=="przelewbiznes_2" then
if bClick.text=="POTWIERD? PRZELEW" then triggerServerEvent("panelBanku",resourceRoot,"przelewaniePieniedzy_4",dbidOdbiorcy,odbiorca,kwotaPrzelewu)
elseif bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
odbiorca=nil
dbidOdbiorcy=0
kwotaPrzelewu=0
guiSetVisible(wplataWyplata,true)
guiSetVisible(dbid,true)
page="przelewbiznes"
end
elseif page=="historia_przelewow" then
if bClick.text=="POWR?T DO POPRZEDNIEJ STRONY" then
page=okienko.."_start"
deleteList()
end
end
end
end

-- Zabezpieczenie przez zbugowaniem gracza ze statusem "no_binds"
addEventHandler("onClientResourceStop",resourceRoot,function()
if panelEnabled then
panelEnabled=false
guiSetInputMode("allow_binds")
setElementData(localPlayer,"3dtext_status",true)
end
end)
Postaw piwo autorowi tego posta
 

 
Wysłany: 2020-04-14, 15:23


Wilq






Wiek: 24
Na forum: 4429 dni
Posty: 3410

Piwa: 739

Respekt: 1225,8
Respekt: 1225,8
No i co, jeste? pewny, ?e w triggerze eventu panelBanku_c w 4/5 argumencie wstawiasz tabel??
Postaw piwo autorowi tego posta
 

 
Tagi: es-bank
Anonymous





Na forum: 245 dni
Posty: 1
Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » es-bank Odpowiedz do tematu

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