y en action/scripts crean un archivo lua llamado casino.lua
Código:
---------------------------------------------------------- --- SCRIPT CASINO ---------------------------------------- --- SCRIPT BY LEYENDARIO --------------------------------- --- COMIENZO DE LA CONFIGURACION ------------------------- ----------------------------------------------------------
local config = { dinero = 100, -- dinero que contara. doble = 1000, -- premio de un doble(gold). triple = 10000, -- premio de un triple(gold). storage = 2032, -- storage no usado. tiempo = 5 -- tiempo de duracion. }
local pos = { -- posiciones de los items. recomendable juntos en una ilera. {x = 474, y = 144, z = 7, stackpos = 1}, -- posicion del primer item {x = 475, y = 144, z = 7, stackpos = 1}, -- lo mismo pero segundo {x = 476, y = 144, z = 7, stackpos = 1} -- lo mismo pero tercero }
local items = { -- items que estaran en la maquina, mientras mas items mas dificil. 2160, 2161, 2162, 2163, 2164, 2165, 2166, 2167, 2168, 2169, } --------------------------------------------------------- -- FIN DE LA CONFIGURACION ------------------------------ -- NO TOCAR NADA DEBAJO A MENOS QUE SEPAS LO QUE HACES -- ---------------------------------------------------------
function girar(items, itemlist, storage) if getGlobalStorageValue(storage) == 1 then for _, i in pairs(items) do local get = getThingfromPos(i) if get then doRemoveItem(get.uid) end local nitem = math.random(1, #itemlist) doCreateItem(itemlist[nitem], 1, i) end return addEvent(girar, 250, items, itemlist, storage) end end
function listo(pos, cid, storage) if getGlobalStorageValue(storage) == 0 then return end local contador = 0 local item1 = getThingfromPos(pos[1]) local item2 = getThingfromPos(pos[2]) local item3 = getThingfromPos(pos[3]) if item1.itemid == item2.itemid then contador = contador + 1 end if item1.itemid == item3.itemid then contador = contador + 1 end if item2.itemid == item3.itemid then contador = contador + 1 end local ready = contador if ready == 3 then for _, i in pairs(pos) do doSendMagicEffect(i, CONST_ME_EXPLOSIONAREA) end doPlayerAddMoney(cid, config.triple) doPlayerSendTextMessage(cid, 22, "Ganaste con un triple!, has obtenido " ..config.triple) elseif ready == 1 then doPlayerAddMoney(cid, config.doble) doPlayerSendTextMessage(cid, 22, "Ganaste con un doble!, has obtenido " ..config.doble) else doPlayerSendTextMessage(cid, 22, "no ganaste =[") end setGlobalStorageValue(storage, 0) end
function parar(storage) if getGlobalStorageValue(storage) > 0 then setGlobalStorageValue(storage, 0) end end
function onUse(cid, item, fromPosition, itemEx, toPosition) if getGlobalStorageValue(config.storage) > 0 then doPlayerSendTextMessage(cid, 22, "Debes esperar a que termine.") addEvent(parar, config.tiempo * 1000 + 5000, config.storage) return false end if getPlayerMoney(cid) < config.dinero then doPlayerSendCancel(cid, "se necesitan " ..config.dinero) return false end doPlayerRemoveMoney(cid, config.dinero) setGlobalStorageValue(config.storage, 1) addEvent(setGlobalStorageValue, config.tiempo * 1000, config.storage, 2) for _, i in pairs(pos) do local nitem = math.random(1, #items) doCreateItem(items[nitem], 1, i) end girar(pos, items, config.storage) addEvent(listo, config.tiempo * 1000 + 1000, pos, cid, config.storage) return true end
¿Como Funciona?
Creditos Al Foro De Otserv 98% y ami 2% Bye
Última edición por God Dunckan el Sáb Mayo 21, 2011 5:34 pm, editado 1 vez
Dj Pacos Admin
Mensajes : 169 Puntos : 294 Reputación : 56 Fecha de inscripción : 01/05/2011 Edad : 31
Tema: Re: Maquina De Casino :D Jue Mayo 12, 2011 8:31 pm
jaja.. puede que agrege un casino a uno de mis ots algun dia.. gracias por el aporte
God Maracula Admin
Mensajes : 81 Puntos : 102 Reputación : 4 Fecha de inscripción : 04/05/2011 Edad : 31 Localización : C: Vaguiando
Tema: Re: Maquina De Casino :D Jue Mayo 12, 2011 9:15 pm
No we Tu si Te La Rifas Man ><;
Posdata: como rayos ases los vídeos enséñame paro!
admin heber723 Admin
Mensajes : 128 Puntos : 1163 Reputación : 16 Fecha de inscripción : 27/04/2011
Tema: Re: Maquina De Casino :D Jue Mayo 12, 2011 9:35 pm
bien man +rep
God Dunckan Nivel 4
Mensajes : 67 Puntos : 192 Reputación : 22 Fecha de inscripción : 03/05/2011
Tema: Re: Maquina De Casino :D Jue Mayo 12, 2011 10:57 pm
tmb ise dos videos en mi otro post
[Action/Talkaction] Contrareloj! xD asi se llama el post