- Joined
- Sep 7, 2015
- Messages
- 2,709
- Solutions
- 127
- Reaction score
- 2,159
I was bored and just scripted dicer npc for tfs 1.x, all you do is setup config and you ready to go. Dicer will count the money that player put on counter also will calculate how much he won and put the won money back on the counter.
Make sure the npc can't move, so he won't run away from depot
Preview:
Code:
Make sure the npc can't move, so he won't run away from depot
Preview:
Code:
Code:
-- written by Nekiro#5727 // otland: https://otland.net/members/nekiro.214311/
local config = {
bet = {
min = 30000, -- gold coins // 30k
max = 6000000,
win = 120, -- 120% high/low
winNum = 300, -- 300% numbers
},
playerPosition = Position(32352, 32226, 7), -- player must stay on this position to talk with npc
dicerCounter = Position(32353, 32225, 7), -- counter position
}
local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink()
npcHandler:onThink()
local tile = Tile(config.playerPosition)
if tile then
local player = tile:getTopCreature()
if not player then
npcHandler.focuses = {}
npcHandler:updateFocus()
end
end
end
local function getCoinValue(id)
if id == 2160 then
return 10000
elseif id == 2152 then
return 100
elseif id == 2148 then
return 1
end
return 0
end
local function getBetValue()
local value = 0
local tile = Tile(config.dicerCounter)
if tile then
local items = tile:getItems()
if not items or #items == 0 then
return 0
end
local tempMoney = {}
for _, item in pairs(items) do
if table.contains({2160, 2152, 2148}, item:getId()) then
value = value + getCoinValue(item:getId()) * item:getCount()
tempMoney[#tempMoney + 1] = item
end
end
if value >= config.bet.min and value <= config.bet.max then -- valid bet
for _, item in pairs(tempMoney) do
item:remove()
end
return value
end
end
return nil
end
local function createMoney(money)
local table = {}
local currentMoney = money
local crystals = math.floor(currentMoney / 10000)
currentMoney = currentMoney - crystals * 10000
while crystals > 0 do
local count = math.min(100, crystals)
table[#table + 1] = {2160, count}
crystals = crystals - count
end
local platinums = math.floor(currentMoney / 100)
if platinums ~= 0 then
table[#table + 1] = {2152, platinums}
currentMoney = currentMoney - platinums * 100
end
if currentMoney ~= 0 then
table[#table + 1] = {2148, currentMoney}
end
return table
end
local function greetCallback(cid)
local player = Player(cid)
if player:getPosition() ~= config.playerPosition then
npcHandler:say("If you want to play with me please come near me.", cid)
return false
end
return true
end
local function creatureSayCallback(cid, type, msg)
if not npcHandler:isFocused(cid) then
return false
end
local player = Player(cid)
if player:getPosition() ~= config.playerPosition then
npcHandler:unGreet(cid)
return false
end
local thisNpc = Npc(getNpcCid())
if table.contains({"low", "high", "h", "l", "1", "2", "3", "4", "5", "6"}, msg) then
local bet = getBetValue()
if not bet then
npcHandler:say("Your bet is higher or lower than the max (".. config.bet.max ..") or min (".. config.bet.min ..") bet.", cid)
npcHandler.topic[cid] = 0
return true
end
local number = math.random(1, 6)
thisNpc:say(thisNpc:getName() .. " rolled a ".. number .. ".", TALKTYPE_MONSTER_SAY)
thisNpc:getPosition():sendMagicEffect(CONST_ME_CRAPS)
if table.contains({"low", "l"}, msg) then
if table.contains({1, 2, 3}, number) then
local wonMoney = bet * (config.bet.win / 100)
npcHandler:say("Congratulations, you won! Here's your (".. wonMoney ..") gold coins.", cid)
config.dicerCounter:sendMagicEffect(math.random(29, 31))
for _, coin in pairs(createMoney(wonMoney)) do
Game.createItem(coin[1], coin[2], config.dicerCounter)
end
else
npcHandler:say("No luck this time, you lost.", cid)
end
elseif table.contains({"high", "h"}, msg) then
if table.contains({4, 5, 6}, number) then
local wonMoney = bet * (config.bet.win / 100)
npcHandler:say("Congratulations, you won! Here's your (".. wonMoney ..") gold coins.", cid)
config.dicerCounter:sendMagicEffect(math.random(29, 31))
for _, coin in pairs(createMoney(wonMoney)) do
Game.createItem(coin[1], coin[2], config.dicerCounter)
end
else
npcHandler:say("No luck this time, you lost.", cid)
end
elseif table.contains({"1", "2", "3", "4", "5", "6"}, msg) then
if number == tonumber(msg) then
local wonMoney = bet * (config.bet.winNum / 100)
npcHandler:say("Congratulations, you won! Here's your (".. wonMoney ..") gold coins.", cid)
config.dicerCounter:sendMagicEffect(math.random(29, 31))
for _, coin in pairs(createMoney(wonMoney)) do
Game.createItem(coin[1], coin[2], config.dicerCounter)
end
else
npcHandler:say("No luck this time, you lost.", cid)
end
end
end
return true
end
npcHandler:setMessage(MESSAGE_GREET, "Welcome to my cassino! I'm offering {high/low} and {numbers}, to start just put your {money} on {counter} and say {number} or {high/low}.")
npcHandler:setMessage(MESSAGE_FAREWELL, 'Good bye.')
npcHandler:setMessage(MESSAGE_WALKAWAY, 'Good bye.')
npcHandler:setCallback(CALLBACK_GREET, greetCallback)
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())
!
