GesiorACC Click Item

[president vankk]

I wanted a scripter, you have X points in the shopping gesior acc.
You go on the server, and click the item and you win the item, you will lose points at the shopping ^_^

Rep++ :wub::wub: :thumbup:

 

[QuaS]

 local function GetPoints(cid)
local result_plr = db.getResult("SELECT points FROM accounts WHERE `id` = "..getPlayerAccountId(cid)..";");
return tonumber(result_plr:getDataInt("points");
end
local function SetPoints(cid,count)
return db.executeQuery("UPDATE `accounts` SET points = "..count.."  WHERE `id` = " .. getPlayerAccountId(cid) .. ";")
;
end
function onUse(cid,bla bla bla)
local y,z,needPoints = math.random(0,1),GetPoints(cid),100;
if(z >= needPoints) then
if(y)then
doPlayerAddItem(cid,blabla);
else
SetPoints(cid,0);
end
end
return true;
end

 

[president vankk]

is one function
actions :S
doPlayerAddItem(cid,ID); (COUNT) EXEMPLE: 2160 - 100

 

[QuaS]

oh RLY?

 

[president vankk]

oh RLY?
What?

 

[QuaS]

Why can't i write doPlayerAddItem(cid, blabla)? :x

 

[president vankk]

I'm learning scripter, I explain here, why did no one in actions?

 

[QuaS]

what the f*ck u need more?xD

 

[president vankk]

I know nothing.
I just want one actions
if you have premium points at the mall you get the items in the game.
Example: emporia.vapus.net

 

[QuaS]

and i've written u 1 action. You just need to change params in few places.

I won't register on some ot just cause u want it.

 

[Sync]

 local function GetPoints(cid)
local result_plr = db.getResult("SELECT points FROM accounts WHERE `id` = "..getPlayerAccountId(cid)..";");
return tonumber(result_plr:getDataInt("points");
end
local function SetPoints(cid,count)
return db.executeQuery("UPDATE `accounts` SET points = "..count.."  WHERE `id` = " .. getPlayerAccountId(cid) .. ";")
;
end
function onUse(cid,bla bla bla)
local y,z,needPoints = math.random(0,1),GetPoints(cid),100;
if(z >= needPoints) then
if(y)then
doPlayerAddItem(cid,blabla);
else
SetPoints(cid,0);
end
end
return true;
end

Once again quas.. This is not C#;. hahha xD

 

[Cykotitan]

Once again quas.. This is not C#;. hahha xD

semicolons don't do anything in Lua

 

[Sync]

semicolons don't do anything in Lua

I know they dont Do anything in Lua i was pointing out that he was scripting in C++ and C# language.. Holy crap man

 

[cbrm]

You are not allowed to bump before 24h

 

[Serginov]

He already gave you the script!! stop bump the thread

 

[president vankk]

where's the script?
is written bla bla bla ...
I want no bla bla bla

 

[Serginov]

lol
change
doPlayerAddItem(cid,blabla);
for
doPlayerAddItem(cid, ITEM ID HERE, 1);

 

[president vankk]

 local function GetPoints(cid)
local result_plr = db.getResult("SELECT points FROM accounts WHERE `id` = "..getPlayerAccountId(cid)..";");
return tonumber(result_plr:getDataInt("points");
end
local function SetPoints(cid,count)
return db.executeQuery("UPDATE `accounts` SET points = "..count.."  WHERE `id` = " .. getPlayerAccountId(cid) .. ";")
;
end
function onUse(cid,bla bla bla) <--
local y,z,needPoints = math.random(0,1),GetPoints(cid),100;
if(z >= needPoints) then
if(y)then
doPlayerAddItem(cid, 2160, 1);
doPlayerAddItem(cid, 2142, 1);
doPlayerAddItem(cid, 2472, 1);
doPlayerAddItem(cid, 2470, 1);
doPlayerAddItem(cid, 2473, 1);
else
SetPoints(cid,0);
end
end
return true;
end

ACTION ID?

 

[Fallen]

local function getPoints(cid)
	local result = db.getResult("SELECT `points` FROM `accounts` WHERE `id` = " .. getPlayerAccountId(cid) .. ";")
	if result:getID() ~= -1 then
		return result:getDataInt("points")
	end
end
local function setPoints(cid, count)
	return db.executeQuery("UPDATE `accounts` SET `points` = `points` - " .. count .. " WHERE `id` = " .. getPlayerAccountId(cid) .. ";")
end
function onUse(cid, item, fromPosition, itemEx, toPosition)
	if getPoints(cid) >= 100 then
		local items = {2160, 2142, 2472, 2470, 2473}
		if math.random(0, 1) then
			for i = 1, #items do
				doPlayerAddItem(cid, items[i], 1)
			end
			setPoints(cid, 100)
		else
			setPoints(cid, 100)
		end
	else
		doPlayerSendTextMessage(cid, 27, "You dont have enough points.")
	end
	return true
end

 

[president vankk]

ACTION ID?
ACTION.XML? :x

@EDIT
EX: this script shows how many points is in the shop?