Zorua System Para PDA SEM LEVEL SYSTEM

Marshmello

Alone ~ [✖‿✖]
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 21/04/16Posts: 831Gênero: Masculino

Fala Jovens , Vi muitas pessoas falando sobre o system de zorua, então decidir trazer pra vocês

 

Lembrando : Testado em PDA TFS 0.3.6 SEM Level System

 

Então Vamos lá

 

Em CreatureScript/ Spawn.lua 

Em baixo de  

Citar

local function doShiny(cid)
if isCreature(cid) then
   if isSummon(cid) then return true end
   if getPlayerStorageValue(cid, 74469) >= 1 then return true end
   if getPlayerStorageValue(cid, 22546) >= 1 then return true end 
   if isNpcSummon(cid) then return true end
   if getPlayerStorageValue(cid, 637500) >= 1 then return true end  --alterado v1.9
   
if isInArray(shinys, getCreatureName(cid)) then  --alterado v1.9 \/
   chance = 0.1   --1% chance        
elseif isInArray(raros, getCreatureName(cid)) then   --n coloquem valores menores que 0.1 !!
   chance = 0.1   --1% chance       
else
   return true
end    
    if math.random(1, 1000) <= chance*10 then  
      doSendMagicEffect(getThingPos(cid), 18)               
      local name, pos = "Shiny ".. getCreatureName(cid), getThingPos(cid)
      doRemoveCreature(cid)
      local shi = doCreateMonster(name, pos, false)
      setPlayerStorageValue(shi, 74469, 1)      
   else
       setPlayerStorageValue(cid, 74469, 1)
   end                                        --/\
else                                                            
return true
end
end

 

Colé Isso

 

local function doZorua(cid)
if isCreature(cid) then
   if isSummon(cid) then return true end
   if getPlayerStorageValue(cid, 74469) >= 1 then return true end
   if getPlayerStorageValue(cid, 22546) >= 1 then return true end 
   if isNpcSummon(cid) then return true end
   if getPlayerStorageValue(cid, 637500) >= 1 then return true end  --alterado v1.9
   
if os.date("%X") >= "00:00:00" and os.date("%X") <= "03:00:00" then
chance = 0.75
elseif os.date("%X") >= "03:01:00" and os.date("%X") <= "05:00:00" then
chance = 1.50
elseif os.date("%X") >= "05:01:00" and os.date("%X") <= "07:00:00" then
chance = 1
elseif os.date("%X") >= "07:00:00" and os.date("%X") <= "12:00:00" then
chance = 0.20
elseif os.date("%X") >= "12:01:00" and os.date("%X") <= "16:00:00" then
chance = 0.10
elseif os.date("%X") >= "16:01:00" and os.date("%X") <= "18:00:00" then
chance = 0.10
elseif os.date("%X") >= "18:01:00" and os.date("%X") <= "20:00:00" then
chance = 0.15
elseif os.date("%X") >= "20:01:00" and os.date("%X") <= "22:00:00" then
chance = 0.18
elseif os.date("%X") >= "22:01:00" and os.date("%X") <= "23:59:59" then
chance = 0.30
else
chance = 0
end

   local test = math.random(1,20000)
        
    if test <= chance*5 then  
      doSendMagicEffect(getThingPos(cid), 18)   
	  local lvl = math.random(10, 30)	  
      local name, pos = "Zorua", getThingPos(cid)
      local shi = doCreateMonster(name, pos , false)
	  doSetCreatureOutfit(shi, getCreatureOutfit(cid), -1)
	  doCreatureSetNick(shi, getCreatureName(cid))
      doRemoveCreature(cid)
      setPlayerStorageValue(shi, 74469, 1) 
	  print("Um " .. name .. " foi spawnado em X=" .. pos.x .. " Y=" .. pos.y .. " Z=" .. pos.z)	  
   else
      setPlayerStorageValue(cid, 74469, 1)
   end                                        --/\
else                                                            
return true
end
end

Continuando Em Spawn.lua

Em Baixo De 

addEvent(doShiny, 10, cid)

Adicione

addEvent(doZorua, 10, cid)

==============================================================================

-----------CONFIGURANDO------------------------

 

Em

if os.date("%X") >= "00:00:00" and os.date("%X") <= "03:00:00" then
chance = 0.75

Cada Horario tem uma X Chance De Spawn  Pode ser trocadas 

-----------------------------

local name, pos = "Zorua", getThingPos(cid)

No Local Name , Seria o poke que ira spawnar  e ficara escondido no meio de outros Pokes

---------------------------------------------------------------------

Então e Isso Galera , Bom proveito do System

 

Gostou Deixe Aquele REP+ ;) 

placa1.png.90a184502351cebe72cd7b69751e551d.png

Meu Facebook

INFOS:

Citar

CIDADE: Rio de janeiro

Idade: 22 anos
SOU: {"Scripter(lua)", "WebMaster", "ProgramadorC++"}
 

local config = {
	delrey = getPlayerCarValue(cid, DELREY),
	cigarro = getPlayerCancer(cid, DERBY),
	prostituta = getPlayerAIDS(cid, cracuda),
	tresOitao = getPlayerRevorvi(cid, 38)
}
if(delrey == "Ligado" and cigarro == "Aceso" and prostituta == "No Colo" and tresOitao == "Carregado") then
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Começou o fim de semana. #PAS")
end

 

 

 

Marcellotibiano

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 17/11/17Posts: 21Gênero: Masculino

Nice

REP+

Benny

nvr gv p
avatar
Infante
Infante

INFOS

Grupo: InfanteRegistrado: 22/12/12Posts: 1958Gênero: MasculinoChar no Tibia: Marley

Obrigado pelo conteúdo, @Marshmello

?

 

Marshmello

Alone ~ [✖‿✖]
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 21/04/16Posts: 831Gênero: Masculino

@Benny ❤️ 

placa1.png.90a184502351cebe72cd7b69751e551d.png

Meu Facebook

INFOS:

Citar

CIDADE: Rio de janeiro

Idade: 22 anos
SOU: {"Scripter(lua)", "WebMaster", "ProgramadorC++"}
 

local config = {
	delrey = getPlayerCarValue(cid, DELREY),
	cigarro = getPlayerCancer(cid, DERBY),
	prostituta = getPlayerAIDS(cid, cracuda),
	tresOitao = getPlayerRevorvi(cid, 38)
}
if(delrey == "Ligado" and cigarro == "Aceso" and prostituta == "No Colo" and tresOitao == "Carregado") then
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Começou o fim de semana. #PAS")
end

 

 

 

Ayron5

avatar
Barão
Barão

INFOS

Grupo: BarãoRegistrado: 26/08/15Posts: 239

Muito bom ? rep!

                                                                  

                                                                    Meus tópicos         

                                                                   Se ajudei você deixe seu Rep! para fortalecer a amizade ^^

                                                                                        Vamos ajudar o fórum a crescer mais.

                                                                

                                                                                             ----- NPC que vende informação -----

                                                                                          -----Baú Que dá Outfit se tiver Level -----

                                                                    

Marcellotibiano

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 17/11/17Posts: 21Gênero: Masculino
Uma duvida se eu fizer tudo isso q vc passou o system ja vai funcionar ? Ou tenho que alterar algo ?
 

Marshmello

Alone ~ [✖‿✖]
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 21/04/16Posts: 831Gênero: Masculino
1 minuto atrás, Marcellotibiano disse:
4 horas atrás, Marshmello disse:
 

?

placa1.png.90a184502351cebe72cd7b69751e551d.png

Meu Facebook

INFOS:

Citar

CIDADE: Rio de janeiro

Idade: 22 anos
SOU: {"Scripter(lua)", "WebMaster", "ProgramadorC++"}
 

local config = {
	delrey = getPlayerCarValue(cid, DELREY),
	cigarro = getPlayerCancer(cid, DERBY),
	prostituta = getPlayerAIDS(cid, cracuda),
	tresOitao = getPlayerRevorvi(cid, 38)
}
if(delrey == "Ligado" and cigarro == "Aceso" and prostituta == "No Colo" and tresOitao == "Carregado") then
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Começou o fim de semana. #PAS")
end

 

 

 

Marcellotibiano

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 17/11/17Posts: 21Gênero: Masculino
Agora, Marshmello disse:

(Mals bugou) eu tenho uma dúvida, se eu fizer o passo a passo o system vai funcionar de boas ou eu preciso alterar algo ?

Marshmello

Alone ~ [✖‿✖]
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 21/04/16Posts: 831Gênero: Masculino
5 minutos atrás, Marcellotibiano disse:
6 minutos atrás, Marshmello disse:

(Mals bugou) eu tenho uma dúvida, se eu fizer o passo a passo o system vai funcionar de boas ou eu preciso alterar algo ?

Só fazer passo a passo que n da nenhum erro

placa1.png.90a184502351cebe72cd7b69751e551d.png

Meu Facebook

INFOS:

Citar

CIDADE: Rio de janeiro

Idade: 22 anos
SOU: {"Scripter(lua)", "WebMaster", "ProgramadorC++"}
 

local config = {
	delrey = getPlayerCarValue(cid, DELREY),
	cigarro = getPlayerCancer(cid, DERBY),
	prostituta = getPlayerAIDS(cid, cracuda),
	tresOitao = getPlayerRevorvi(cid, 38)
}
if(delrey == "Ligado" and cigarro == "Aceso" and prostituta == "No Colo" and tresOitao == "Carregado") then
	doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Começou o fim de semana. #PAS")
end