xTibia

.com
RE

[Action/ajuda] Casino System

Por renannmtm, 25 de abr. de 2011 em Archived

tibia
script
otserv
4
1.6k
renannmtmR
25 de abril de 2011 às 11:58

Ae ae galera, eu queria perguntar se alguem tem o script do Casino que utiliza Slot Machine



 

Veja a Imagen

 

saaaaaaaa.png

 

Eu vih esse tipo de Casino num Poketibia Mexicano, onde vc clicava consumia 1 Scarab q no caso era o Casino Coin

 

Ai era na sorte uma hora ganha outra perdia etc...

 

P.S: Ja tenho Casino System da Alavanca do Pokemon Dash

 

Alguem ai tem desse Casino que usa a Slot Machine?

 

No Pokemon POD, vem um script desse Casino, mas acho q está incompleto da uma olhada:

 

function onUse(cid, item, frompos, item2, topos)
if item.itemid == 3719 then

rand = math.random(1,15)

if rand  1 and  7 and doPlayerRemoveMoney (cid,100) == 1 then
doPlayerRemoveMoney(cid,100)
doPlayerSendTextMessage(cid,22, "Aff... Que azar!")
doRemoveItem(item.uid,1)

elseif rand  7 and  15 and doPlayerRemoveMoney (cid,100) == 1 then
doPlayerRemoveMoney (cid,100)
doPlayerSendTextMessage(cid,22, "Aff... Que azar!")
doRemoveItem(item.uid,1)

elseif rand == 15 and doPlayerRemoveMoney (cid,100) == 1 then
doPlayerAddItem(cid,2152,100)
doPlayerSendTextMessage(cid,22, "HuHuHu money!")
doRemoveItem(item.uid,1)
end

end
return 1
end



 

Eu adiciono no Script.xml, mas quando ligo o ot aparece isso:

[25/04/2011 11:48:38] [Error - LuaScriptInterface::loadFile] data/actions/scripts/casino.lua:6: 'then' expected near '1'
[25/04/2011 11:48:38] [Warning - Event::loadScript] Cannot load script (data/actions/scripts/casino.lua)

Alguem pode me ajudar e dizer o que tem de errado nele?

 

Achei um outro script feito pelo [ sejameuamigo ], mas nele os premius vem seguidos um atras do outro

a chance de ganhar o premio é mto facil...

thaliaT
25 de abril de 2011 às 18:30

Tenta assim:

 

 

function onUse(cid, item, frompos, item2, topos)
if item.itemid == 3719 then

rand = math.random(1,15)

if rand ~= 15 and doPlayerRemoveMoney (cid,100) == TRUE then
doPlayerRemoveMoney(cid,100)
doPlayerSendTextMessage(cid,22, "Aff... Que azar!")
doRemoveItem(item.uid,1)

elseif rand == 15 and doPlayerRemoveMoney (cid,100) == 1 then
doPlayerAddItem(cid,2152,100)
doPlayerSendTextMessage(cid,22, "HuHuHu money!")
doRemoveItem(item.uid,1)
end
else
doPlayerSendCancel(cid, 'You dont have money')
end
return 1
end

 

Eu fiz aqui correndo, se tiver errado dá um toque!

renannmtmR
26 de abril de 2011 às 07:03

Funcionar funcionou, mas não estava retirando o "Dinheiro" so dava a msg

"You dont have money"

 

Modei o ID do iten que removia, ai começou a consumir o iten mas o iten errado,

pois add a id da Cassino Coin (Scarab Coin) mas esta consumindo os Dollar's (Platinum Coin),

e tb só está perdendo, gasta 2 Dollar pra jogar, ja gastei mais de 200 e nada de ganhar :S

joaohdJ
26 de abril de 2011 às 07:22

Tente assim:

 

function onUse(cid, item)

local config = {
WinChance = 50,
Price = {
	Type = "Money", -- Se for "Money", não precisa do Id, mas recomendo que coloque
	Id = 0000,
	Count = 100
	},
Reward = {
	Id = 2152,
	Count = 100
	}
}

if (config.Price.Type == "Money") then
	if  (doPlayerRemoveMoney(cid, config.Price.Count)) then
		if (math.random(100) >= config.WinChance) then
			doPlayerSendTextMessage(cid, 25, "You win! There is your reward.")
			doPlayerAddItem(cid, config.Reward.Id, config.Reward.Count)
		else
			doPlayerSendTextMessage(cid, 25, "=x you got nothing.")
	else
		doPlayerSendCancel(cid, "You dont have money.")
	end

else
	if (doPlayerRemoveItem(cid, config.Price.Id, config.Price.Count)) then 
		if (math.random(100) >= config.WinChance) then
			doPlayerSendTextMessage(cid, 25, "You win! There is your reward.")
			doPlayerAddItem(cid, config.Reward.Id, config.Reward.Count)
		else
			doPlayerSendTextMessage(cid, 25, "=x you got nothing.")
	else
		doPlayerSendCancel(cid, "You dont have money.")
	end

end
return true
end

 

flw

Editado Abril 26 por apocarai