GTAONLINE.PL :: Premium na ogrpg

Cytat:

function isEventHandlerAdded(sEventName,pElementAttachedTo,func)
if type(sEventName)=='string' and isElement(pElementAttachedTo) and type(func)=='function' then local aAttachedFunctions = getEventHandlers(sEventName,pElementAttachedTo)
if type(aAttachedFunctions)=='table' and #aAttachedFunctions > 0 then for i,v in ipairs(aAttachedFunctions) do if v==func then return true end end end
end return false
end

ww,hh = 1920, 1080
www,hhh = guiGetScreenSize()
wn, hn = (www/ww), (hhh/hh)

local screenW, screenH = guiGetScreenSize()
local sx, sy = guiGetScreenSize()

function mysz(psx,psy,pssx,pssy,abx,aby)
if not isCursorShowing() then return end
cx,cy=getCursorPosition()
cx,cy=cx*sx,cy*sy
if cx >= psx and cx <= psx+pssx and cy >= psy and cy <= psy+pssy then
return true,cx,cy
else
return false
end
end
local dxfont0_droidsans = dxCreateFont(":ogrpg-gui/droid-sans.ttf", 12)
local dxfont1_droidsans = dxCreateFont(":ogrpg-gui/droid-sans.ttf", 14)
local dxfont2_droidsans = dxCreateFont(":ogrpg-gui/droid-sans.ttf", 15)
local gp = {}

editbox = guiCreateEdit(0.43, 0.49, 0.14, 0.04, "", true)
komboboks = guiCreateComboBox(0.44, 0.34, 0.12, 0.13, "", true)
guiComboBoxAddItem(komboboks, "1 dzie?")
guiComboBoxAddItem(komboboks, "3 dni")
guiComboBoxAddItem(komboboks, "7 dni")
guiComboBoxAddItem(komboboks, "14 dni")
guiComboBoxAddItem(komboboks, "30 dni")
guiComboBoxAddItem(komboboks, "60 dni")
guiSetVisible(komboboks,false)
guiSetVisible(editbox,false)
local pp = false

function guiPremka()
local a = interpolateBetween(0,0,255,255,0,255,((getTickCount()-tick)/3350),"Linear")
local a2 = interpolateBetween(0,0,141,141,0,141,((getTickCount()-tick)/3350),"Linear")
local wybrane = guiComboBoxGetSelected(komboboks)
if not wybrane then return end
local tekst = guiComboBoxGetItemText(komboboks,wybrane)
if tekst == "1 dzie?" then
txt="Obecnie brak premium na 1 d."
elseif tekst == "3 dni" then
txt="Tre?? sms: MSMS.YCRPG\nNumer: 73480\nKoszt: 3,69 z?\nPoni?ej wpisz otrzymany w sms kod:"
elseif tekst == "7 dni" then
txt="Tre?? sms: MSMS.YCRPG\nNumer: 75480\nKoszt: 6,15 z?\nPoni?ej wpisz otrzymany w sms kod:"
elseif tekst == "14 dni" then
txt="Tre?? sms: MSMS.YCRPG\nNumer: 79480\nKoszt: 11,07 z?\nPoni?ej wpisz otrzymany w sms kod:"
elseif tekst == "30 dni" then
txt="Tre?? sms: MSMS.YCRPG\nNumer: 91400\nKoszt: 17,22 z?\nPoni?ej wpisz otrzymany w sms kod:"
elseif tekst == "60 dni" then
txt="Tre?? sms: MSMS.YCRPG\nNumer: 92521\nKoszt: 30,75 z?\nPoni?ej wpisz otrzymany w sms kod:"
else
txt="Tre?? sms: --\nNumer: --\nKoszt: --\nPoni?ej wpisz otrzymany w sms kod:"
end
roundedRectangle(screenW * 0.3755, screenH * 0.2833, screenW * 0.2495, screenH * 0.4333, tocolor(97, 107, 103, 141), false)
dxDrawText("Panel kupna konta premium\nPoni?ej wybierz ilo?? dni", (screenW * 0.3755) + 1, (screenH * 0.2889) + 1, (screenW * 0.6250) + 1, (screenH * 0.3343) + 1, tocolor(0, 0, 0, a), 1*wn, dxfont0_droidsans, "center", "center", false, false, false, false, false)
dxDrawText("Panel kupna konta premium\nPoni?ej wybierz ilo?? dni", screenW * 0.3755, screenH * 0.2889, screenW * 0.6250, screenH * 0.3343, tocolor(255, 255, 255, a), 1*wn, dxfont0_droidsans, "center", "center", false, false, false, false, false)
dxDrawText(txt, (screenW * 0.4385) + 1, (screenH * 0.3648) + 1, (screenW * 0.5615) + 1, (screenH * 0.4954) + 1, tocolor(0, 0, 0, a), 1*wn, dxfont1_droidsans, "center", "center", false, false, false, false, false)
dxDrawText(txt, screenW * 0.4385, screenH * 0.3648, screenW * 0.5615, screenH * 0.4954, tocolor(255, 255, 255, a), 1*wn, dxfont1_droidsans, "center", "center", false, false, false, false, false)
if mysz(screenW * 0.4307, screenH * 0.5750, screenW * 0.1396, screenH * 0.0583) then roundedRectangle(screenW * 0.4307, screenH * 0.5750, screenW * 0.1396, screenH * 0.0583, tocolor(20, 184, 118, a2), false) else roundedRectangle(screenW * 0.4307, screenH * 0.5750, screenW * 0.1396, screenH * 0.0583, tocolor(20, 184, 118, a), false) end
--dxDrawText("Zakup premium", 827 + 1*wn, 621 + 1*hn, 1095 + 1*wn, 684 + 1*hn, tocolor(0, 0, 0, a), 1*wn, dxfont2_droidsans, "center", "center", false, false, false, false, false)
dxDrawText("Zakup premium", 827*wn, 621*hn, 1095*wn, 684*hn, tocolor(255, 255, 255, a), 1*wn, dxfont2_droidsans, "center", "center", false, false, false, false, false)
if mysz(screenW * 0.5984, screenH * 0.6685, screenW * 0.0214, screenH * 0.038) then roundedRectangle(screenW * 0.5984, screenH * 0.6685, screenW * 0.0214, screenH * 0.0389, tocolor(20, 184, 118, a2), false) else roundedRectangle(screenW * 0.5984, screenH * 0.6685, screenW * 0.0214, screenH * 0.0389, tocolor(20, 184, 118, a), false) end
-- dxDrawText("X", (screenW * 0.5984) + 1, (screenH * 0.6676) + 1, (screenW * 0.6198) + 1, (screenH * 0.7074) + 1, tocolor(0, 0, 0, a), 1*wn, dxfont0_droidsans, "center", "center", false, false, false, false, false)
dxDrawText("X", screenW * 0.5984, screenH * 0.6676, screenW * 0.6198, screenH * 0.7074, tocolor(255, 255, 255, a), 1*wn, dxfont0_droidsans, "center", "center", false, false, false, false, false)
end

addEventHandler("onClientClick", root, function(b, s)
if b ~= "state" and s ~= "down" then return end
if mysz(screenW * 0.4307, screenH * 0.5750, screenW * 0.1396, screenH * 0.0583) and pp == true then
if guiGetText(editbox) == "" then return end
local dni = 0
local wybrane = guiComboBoxGetSelected(komboboks)
if not wybrane then return end
local tekst = guiComboBoxGetItemText(komboboks,wybrane)
if tekst == "1 dzie?" then
dni = 1
elseif tekst == "3 dni" then
dni = 3
elseif tekst == "7 dni" then
dni = 7
elseif tekst == "14 dni" then
dni = 14
elseif tekst == "30 dni" then
dni = 30
elseif tekst == "60 dni" then
dni = 60
else
dni = 0
end
if dni == 0 then
outputChatBox("Nie wybra?e? ilo?ci dni, wybierz i kliknij ponownie.")
return
end
triggerServerEvent("skPremium", localPlayer, guiGetText(editbox), dni)
elseif mysz(screenW * 0.5984, screenH * 0.6685, screenW * 0.0214, screenH * 0.0389) and pp == true then
pp = false
guiSetVisible(komboboks,false)
guiSetVisible(editbox,false)
showCursor(false)
setElementFrozen(localPlayer,false)
removeEventHandler("onClientPreRender", root, guiPremka)
end
end)

addCommandHandler("premium", function()
tick = getTickCount()
--if getPlayerSerial(localPlayer) == "8FE50105E2AB81DFA78E08780A079292" or getPlayerSerial(localPlayer) == "26B5B94341856F4168BD00A7DFF6CFB4" then
if pp ~= true then
pp = true
guiSetVisible(komboboks,true)
guiSetVisible(editbox,true)
showCursor(true, false)
setElementFrozen(localPlayer,true)
addEventHandler("onClientPreRender", root, guiPremka)
else
pp = false
guiSetVisible(komboboks,false)
guiSetVisible(editbox,false)
showCursor(false)
setElementFrozen(localPlayer,false)
removeEventHandler("onClientPreRender", root, guiPremka)
-- end
end
end)

function roundedRectangle(x, y, w, h, color)
dxDrawRectangle(x, y, w, h, color, false)
dxDrawRectangle(x + 2, y - 1, w - 4, 1, color, false)
dxDrawRectangle(x + 2, y + h, w - 4, 1, color, false)
dxDrawRectangle(x - 1, y + 2, 1, h - 4, color, false)
dxDrawRectangle(x + w, y + 2, 1, h - 4, color, false)
end

tutaj masz c.lua :V