• There is NO official Otland's Discord server and NO official Otland's server list. The Otland's Staff does not manage any Discord server or server list. Moderators or administrator of any Discord server or server lists have NO connection to the Otland's Staff. Do not get scammed!
  • New resources must be posted under Resources tab. A discussion thread will be created automatically, you can't open threads manually anymore.

(MOD) Casino Tested on TFS 0.4

Rossii

Member
Joined
Mar 27, 2012
Messages
366
Reaction score
6
Location
England
Yo i was searching for a Casino MOD for TFS 0.4 and i couldn't find one so i got one off my friend

So here it is DNO who credits got maybe ZAUL ?

Casino

PHP:
<?xml version="1.0" encoding="UTF-8"?>
<mod name="Casino lever" enabled="yes">
	<action uniqueid="5885" event="script"><![CDATA[
		local pos = {x=32353, y=32218, z=7, stackpos = 255}
		local cash = 2160
		local t = {
			[{1, 55}] = 0,
			[{56, 90}] = 2,
			[{91, 100}] = 3
		}
		local a, b = getItemInfo(cash).name, getItemInfo(cash).plural
 
		function onUse(cid, item, fromPosition, itemEx, toPosition)
			local v = getThingfromPos(pos)
			if v.itemid ~= cash then
				return doCreatureSay(cid, 'You can only use ' .. b .. '.', TALKTYPE_ORANGE_1, false, cid)
			end
 
			local r = math.random(100)
			for i, k in pairs(t) do
				if r >= i[1] and r <= i[2] then
					doRemoveItem(v.uid)
					if k < 1 then
						doCreatureSay(cid, 'You lost ' .. v.type .. ' ' .. (v.type == 1 and a or b) .. ' :(', TALKTYPE_ORANGE_1, false, cid)
						doSendMagicEffect(pos, CONST_ME_POFF)
					else
						doCreatureSay(cid, 'You won ' .. v.type * k .. ' ' .. (v.type == 1 and a or b) .. ' :)', TALKTYPE_ORANGE_1, false, cid)
						doPlayerAddItem(cid, cash, v.type * k)
						doSendMagicEffect(pos, CONST_ME_MAGIC_RED)
						doSendMagicEffect(toPosition, CONST_ME_SOUND_YELLOW)
					end
					return true
				end
			end
		end
	]]></action>
</mod>

TESTED AND WORKING ON TFS 0.4
 
Last edited:
Back
Top