![[Script]Melhoranbdo as janelas de quest Hitskin_logo](https://2img.net/i/fa/hitskin/hitskin_logo.png){kind=logo}
Hitskin.comIsto é uma pré-visualização de um tema em Hitskin.com
Instalar o tema • Voltar para a ficha do tema
[Script]Melhoranbdo as janelas de quest
+6
LeonM²
JuanCollin
Muta
KaiqueHunter
RD12
matheus180
10 participantes
Aldeia RPG :: RPG Maker :: Rpg Maker XP :: Netplays :: Scripts para netplays
Página 1 de 2
Página 1 de 2 • 1, 2 
![[Script]Melhoranbdo as janelas de quest Empty](https://2img.net/i/empty.gif)
[Script]Melhoranbdo as janelas de quest
por matheus180 Ter Mar 20, 2012 6:59 pm
Olá pessoal venho aqui trazer mais uma modificação que eu fiz nas janelas da quest e vou mostrar como ficou.
Script:
Troque sua [WIN] Lista de Quests por essa
e troque sua [WIN] Window_Quests por essa
AGRADECIMENTOS
RD12 - Por esclarecer uma duvida
- Spoiler:
![[Script]Melhoranbdo as janelas de quest Ss5ae](https://2img.net/r/ihimizer/img210/1158/ss5ae.png)
Script:
Troque sua [WIN] Lista de Quests por essa
- Spoiler:
- Código:
#==============================================================================
# ** Lista de Quests
#------------------------------------------------------------------------------
# By Marlos Gama
#==============================================================================
class Quest_list < Window_Selectable2
attr_accessor :data2
def initialize
super(100,80,207,230)
self.x = x
self.y = y
self.width = width
self.height = height
self.index = index
self.back_opacity = 200
self.z = 99999
self.index = 0
@dragable = true
@closable = true
refresh
end
def item
return @data[self.index]
end
def update
super
refresh if @old_quests != @data
if Input.trigger?(Input::C)
if $game_switches[Configurar_Quests::MISSION_START[index+1][0]] == true
else
return
end
return if @data[index] == nil
$quest_w.refresh
$quest_w.visible = true
$quest_w.active = true
end
end
def on_close
self.visible = false
self.active = false
$fechando_ativar = true
end
def refresh
@old_quests = @data
if self.contents != nil
self.contents.dispose
self.contents = nil
end
@data = []
# Add item
for p in 0..(Configurar_Quests::MISSION_NAME.size-1)
mission = Configurar_Quests::MISSION_NAME[p]
#for s in 0..(Configurar_Quests::MISSION_START.size-1)
#return if s != p
#if $game_switches[s[0]] == true
@data.push(mission)
#end
#end
end
a = @data.index(p)
@data[a] = nil if a != nil
@data = @data.compact
@item_max = @data.size
# If item count is not 0, make a bit map and draw all items
if @data.size > 0
self.contents = Bitmap.new(width - 32, row_max * 32)
for i in 0...@data.size
draw_item(i)
end
end
end
def draw_item(index)
item = @data[index]
return if index > 19
if $game_switches[Configurar_Quests::MISSION_START[index+1][0]] == true
self.contents.font.color = Color.new(0,128,0)
else
self.contents.font.color = Color.new(128,0,0)
item = "------------------"
end
x = 4
y = index * 20
rect = Rect.new(x, y-6, self.contents.width - 8, 32)
self.contents.draw_text(rect, item, 1)
end
end
e troque sua [WIN] Window_Quests por essa
- Spoiler:
- Código:
##==============================================================================
# ** Quests
#------------------------------------------------------------------------------
# By Marlos Gama
#------------------------------------------------------------------------------
# Máximo de 20 Missões, caso queira um número maior, configure no
# Script: [NET] Switch & Variables
#------------------------------------------------------------------------------
module Configurar_Quests
MISSION_NAME = []
MISSION_START = []
MISSION = []
#Nome das Missões
MISSION_NAME[1] = ["Baú Mágico"]
MISSION_NAME[2] = ["Mate o Monstro"]
#Switches que Começa as Missões
MISSION_START[1] = [14]
MISSION_START[2] = [16]
#Informações das Missões
# Informação, Item Requerido, Gráfico do Monstro, Quantidade de Monstros, Switche, level, Item que Ganha, grafico npc da quest
MISSION[1] = ["Fale com o NPC de Quests", 14, "090-Monster04", 1, 15, 1, 1, "003-fighter03"]
MISSION[2] = ["Algo Aqui", 29, "075-Devil01", 1, 17, 2, 4, "003-fighter03"]
end
class Window_Quests < Window_Base
def initialize
super(310,80,232,230)
self.contents = Bitmap.new(width - 32, height - 32)
@dragable = true
@closable = true
self.z = 999999
self.back_opacity = 200
refresh
end
def update
super
#refresh if something_changed?
end
#def mission
#return @mission
#end
#def set_mission(mission)
#@mission = mission
#refresh
#end
def on_close
self.visible = false
self.active = false
$fechando_ativar = true
end
def refresh
@actor = $game_party.actors[0]
self.contents.clear
#for quest in 0..(Configurar_Quests::MISSION.size-1)
#@name = Configurar_Quests::MISSION[quest]
#return if quest != $quest_list.index
@id = $quest_list.index+1
@name = Configurar_Quests::MISSION_NAME[@id][0]
@information = Configurar_Quests::MISSION[@id][1-1]
@requeriments = Configurar_Quests::MISSION[@id][2-1]
@monsters = Configurar_Quests::MISSION[@id][3-1]
@quantidade = Configurar_Quests::MISSION[@id][4-1]
@gain_item = Configurar_Quests::MISSION[@id][7-1]
@level = Configurar_Quests::MISSION[@id][6-1]
@andamento = Configurar_Quests::MISSION[@id][5-1]
@npc = Configurar_Quests::MISSION[@id][8-1]
# Nome
self.contents.font.color = Color.new(255,0,0)
self.contents.draw_text(70, 2, 262, 32, "Informações")
self.contents.font.color = Color.new(0,0,0)
# Informação
rect2 = Rect.new(4, 25, self.contents.width - 8, 32)
self.contents.draw_text(rect2, @information.to_s, 1)
# Requerimentos
self.contents.draw_text(0, 50, 262, 32, "Requerimentos: "+$data_items[@requeriments].name)
draw_item_name2($data_items[@requeriments], 90-3, 50)
# Nível
self.contents.draw_text(0, 70, 262, 32, "Nível: " +@level.to_s)
# Status
self.contents.draw_text(0, 160, 262, 32, "Quest: ")
if $game_switches[@andamento] == true #and $game_party.actors[0].level == @level or $game_party.actors[0].level >= @level
@status_quest = "Concluida"
self.contents.font.color = Color.new(0,128,0)
elsif $game_switches[@andamento] == false
self.contents.font.color = Color.new(255,0,0)
@status_quest = "Em andamento"
end
self.contents.draw_text(40, 160, 262, 32, @status_quest.to_s)
self.contents.font.color = normal_color
# Recompensa
self.contents.draw_text(0, 130, 262, 32, "Recompensa: "+$data_items[@gain_item].name)
draw_item_name2($data_items[@gain_item], 70, 130)
# Monstros
self.contents.draw_text(0, 100, 262, 32, "Monstros: " +@quantidade.to_s+"x")
bitmap = RPG::Cache.character(@monsters,0)
cw = bitmap.width / 4
ch = bitmap.height / 4
facing = 0
src_rect = Rect.new(0, facing * ch, cw, ch)
self.contents.blt(59, 100-15, bitmap, src_rect)
#end
# Npc
self.contents.draw_text(10, 0, 262, 32, "")
bitmap2 = RPG::Cache.character(@npc,0)
cw2 = bitmap2.width / 4
ch2 = bitmap2.height / 4
facing = 0
src_rect = Rect.new(0, facing * ch2, cw2, ch2)
self.contents.blt(0, 32-15, bitmap2, src_rect)
#end
end
def something_changed?
return true if @name != @name
return true if @information != @name
return true if @requeriments != @name
return true if @monsters != @name
return true if @gain_item != @name
return true if @level != @name
return true if @npc != @name
return false
end
end
AGRADECIMENTOS
RD12 - Por esclarecer uma duvida
_________________
![[Script]Melhoranbdo as janelas de quest 3trEP](https://i.imgur.com/3trEP.png)
matheus180- Desenvolvedor
- Mensagens : 749
Créditos : 174
Re: [Script]Melhoranbdo as janelas de quest
por RD12 Ter Mar 20, 2012 7:03 pm
Foi pouca modificação mas ficou bem legal. Apesar de eu gostar de uma window quest bem limpa sem imagens 
Boa sorte com o Rgss, se precisar de ajudar estarei no msn xD.
Boa sorte com o Rgss, se precisar de ajudar estarei no msn xD.
RD12- Lenda
- Medalhas :
![[Script]Melhoranbdo as janelas de quest 48080450](https://2img.net/r/ihimizer/img535/2589/48080450.png)
![[Script]Melhoranbdo as janelas de quest Trophy11](https://i.servimg.com/u/f56/12/16/42/40/trophy11.png)
![[Script]Melhoranbdo as janelas de quest GIueZ](https://i.imgur.com/gIueZ.png)
![[Script]Melhoranbdo as janelas de quest ZgLkiRU](https://i.imgur.com/zgLkiRU.png)
Mensagens : 1946
Créditos : 745
Re: [Script]Melhoranbdo as janelas de quest
por KaiqueHunter Ter Mar 20, 2012 7:06 pm
Ficou maneiro,gostei do efeito de escuro na frase "Bau Magico" ficou muito massa.Continue assim xD.
KaiqueHunter- Experiente
- Mensagens : 620
Créditos : 51
Re: [Script]Melhoranbdo as janelas de quest
por Muta Ter Mar 20, 2012 7:17 pm
Pow gostei muito apesar de poucas modificaçoes mas ficou legal +1
_________________
"Cansei de esconder o que há em meu coração, agora vou mostrar todo o amor que sinto por você"
By:Darus Sven
![[Script]Melhoranbdo as janelas de quest HcMNL](https://i.imgur.com/hcMNL.png)
Melhores Bandas da História:
By:Darus Sven
Melhores Bandas da História:
- Spoiler:
-AC/DC
-Metallica
-Iron Maiden
-Slipknot
-Sistem of a Down
-Angra
-Ramones
-Slayer
-Nirvana
-Scorpions
-Green Day
![[Script]Melhoranbdo as janelas de quest Tkw](https://2img.net/r/ihimg/photo/my-images/19/tkw.png/)
Muta- Ocasional
- Mensagens : 190
Créditos : 48
Re: [Script]Melhoranbdo as janelas de quest
por JuanCollin Ter Mar 20, 2012 7:20 pm
Cara fico bem legal as suas modificações apesar de não serem muitas
+1 Cred
+1 Cred
JuanCollin- Membro de Honra
- Mensagens : 988
Créditos : 98 -
Re: [Script]Melhoranbdo as janelas de quest
por LeonM² Ter Mar 20, 2012 7:54 pm
Modificação legal, parabens, só tenho uma pergunta: quando vc vai começar a criar seus scripts:?
LeonM²- Lenda
- Mensagens : 1802
Créditos : 153
Re: [Script]Melhoranbdo as janelas de quest
por Nanzin Ter Mar 20, 2012 8:27 pm
Leon Mega Maker escreveu:Modificação legal, parabens, só tenho uma pergunta: quando vc vai começar a criar seus scripts:?
cara o primeiro passo para um scripter é ediçoes... espero que ele comece a criar sim
_________________
![[Script]Melhoranbdo as janelas de quest Npvo](https://2img.net/r/ihimizer/img607/8039/npvo.png)
Para Aqueles que gostam de Min e de meu Trabalho;
Upem Meu Pet nao custa nda!!
- Pet:
![[Script]Melhoranbdo as janelas de quest 5886250](https://2img.net/h/squiby.net/view/5886250.png)
Nanzin- Membro de Honra
- Mensagens : 1550
Créditos : 252
Re: [Script]Melhoranbdo as janelas de quest
por RD12 Ter Mar 20, 2012 9:33 pm
Sim comecei com edições, quando eu era eventer, e estava criando o jogo Dragon Ball Action, eu editava meus scripts, e até criava uns, editei o de guilda e coloquei cargos. Assim que aprendi Rgss, mas fiquei fera mesmo foi estudando programação, visual basic é bom para se aprender isso. Aprendendo programação crio scripts pro Vx, Ace...
Boa sorte de novo
e siga as dicas 6)
Boa sorte de novo
e siga as dicas 6)
RD12- Lenda
- Medalhas :
Mensagens : 1946
Créditos : 745
Re: [Script]Melhoranbdo as janelas de quest
por MalucaoBeleza Ter Mar 20, 2012 9:37 pm
Nooossa vei
kk'
gostei mt + Rep
poderia me passa essa windowskin?
kk'
gostei mt + Rep
poderia me passa essa windowskin?
MalucaoBeleza- Desenvolvedor
- Medalhas :
![[Script]Melhoranbdo as janelas de quest ILtUbYveyXDIf](https://2img.net/h/i.minus.com/iLtUbYveyXDIf.gif)
Mensagens : 723
Créditos : 58
Re: [Script]Melhoranbdo as janelas de quest
por DeaN Qua Mar 21, 2012 8:42 am
fico bem legal gostei...
1+
1+
_________________
Dean, Programador Geral :)
Contato: Skype:matucarvalho e Facebook
The Enze - Vulzt
Shield Block
Contato: Skype:matucarvalho e Facebook
The Enze - Vulzt
Shield Block
Anti-Cheat para jogos de FPS, agora vou adaptar para jogos de RPG principalmente para o RMXP.
www.shieldblock.net
fb.com/shieldblockoficial
![[Script]Melhoranbdo as janelas de quest MiB0H](https://i.imgur.com/miB0H.png)
DeaN- Colaborador
- Mensagens : 1243
Créditos : 48 -
Página 1 de 2 • 1, 2
Tópicos semelhantes» Janelas Script
» Falcao Quest Script
» [Script] Ocultando Menu,Hud,Hotkeys, Chat [Script]
» Ajuda com Janelas
» [K] Janelas Personalizadas
» Falcao Quest Script
» [Script] Ocultando Menu,Hud,Hotkeys, Chat [Script]
» Ajuda com Janelas
» [K] Janelas Personalizadas
Aldeia RPG :: RPG Maker :: Rpg Maker XP :: Netplays :: Scripts para netplays
Página 1 de 2
Permissões neste sub-fórum
Não podes responder a tópicos|
|
|