UltimaForum :: Zobacz temat

Ayene

~ HUD Ekwipunku na mapie [VX] ~

Krótki opis
Skrypt wyświetla HUD (okno) z ekwipunkiem na mapie (patrz screenshot).

Autor skryptu do XP
Moghunter

Tłumaczenie i konwersja na VX
Ayene [yurika@o2.pl]

Kompatybilność
Tylko VX

Skrypt

Spoiler:

Kod:

#==============================================================================
# MOG HUD Equip V1.1 VX
# Autor XP: Moghunter
# Przełożone na VX przez Ayene (mam nadzieję, że będzie 'śmigać' :P
#==============================================================================
if true # True = wyświetla HUD / False = nie wyświetla

module MOG
# Położenie HUD - współrzędne x i y
EQPMAPX = 340 # współrzędna x
EQPMAPY = 320 # współrzędna y

# Przełącznik, kontrolujący wyświetlanie HUD
EQPMAPVIS = 5

# Okno
EQPMAPSKIN = "Window"

# Przezroczystość okna HUD
EQPMAPOPA = 0
end

$mogscript = {} if $mogscript == nil
$mogscript["mpequip"] = true

#==============================================================================
# Window_Base
#==============================================================================
class Window_Base < Window
def draw_equip_map(item, x, y)
if item == nil
return
end
draw_icon(item.icon_index , x + 3 , y + 34)
end

def draw_mequip(x, y)
mequip = Cache.picture("Mequip")
cw = mequip.width
ch = mequip.height
src_rect = Rect.new(0, 0, cw, ch)
self.contents.blt(x , y - ch + 65 ,mequip, src_rect)
end
end

#==============================================================================
# Window_Equip_Map
#==============================================================================
class Window_Equipmap < Window_Base
def initialize(actor)
super(0, 0, 190, 100)
self.contents = Bitmap.new(width - 32, height - 32)
self.opacity = MOG::EQPMAPOPA
self.windowskin = Cache.system(MOG::EQPMAPSKIN)
@actor = actor
refresh
end
def refresh
self.contents.clear
draw_mequip(0,0)
@data = []
@data.push($data_weapons[@actor.weapon_id])
@data.push($data_armors[@actor.armor1_id])
@data.push($data_armors[@actor.armor2_id])
@data.push($data_armors[@actor.armor3_id])
@data.push($data_armors[@actor.armor4_id])
self.contents.font.color = system_color
draw_equip_map(@data[0], 32 * 0, 0)
draw_equip_map(@data[1], 32 * 1, 0)
draw_equip_map(@data[2], 32 * 2, 0)
draw_equip_map(@data[3], 32 * 3, 0)
draw_equip_map(@data[4], 32 * 4, 0)
end
end

#==============================================================================
# Scene_Map
#==============================================================================
class Scene_Map
alias ayene_start start
def start
@actor = $game_party.members[0]
@eqmap = Window_Equipmap.new(@actor)
@eqmap.x = MOG::EQPMAPX
@eqmap.y = MOG::EQPMAPY
if $game_switches[MOG::EQPMAPVIS] == false
@eqmap.visible = true
else
@eqmap.visible = false
end
ayene_start
end

alias ayene_terminate terminate
def terminate
ayene_terminate
@eqmap.dispose
end

alias mog8_update update
def update
if $game_switches[MOG::EQPMAPVIS] == false
@eqmap.visible = true
else
@eqmap.visible = false
end
if $eref == true
@eqmap.refresh
$eref = false
end
mog8_update
end
end

#==============================================================================
# Game_Map
#==============================================================================
class Game_Map
attr_accessor :eref
end

class Game_Interpreter
def eref
$eref = true
end
alias mog319ref command_319
def command_319
eref
return mog319ref
end
end
end

Dodatki
Skrypt wymaga umieszczenia w folderze Graphics/Pictures poniższego obrazka:

Spoiler:

Demo

alintes

Wow! Fajny ten skrypt tylko szkoda, że na VX, czy mogłabyś Ayene przerobic ten skrypt na Xp, bo by mi się przydał w projekcie?

KillYou

Ayene, czy da się/którym klawiszem przełączyć ekwipunek na innego bohatera?

Ayene

Chyba da radę :->

Zmień skrypt na poniższy:

Spoiler:

Kod:

#==============================================================================
# MOG HUD Equip V1.1 VX
# Autor XP: Moghunter
# Przełożone na VX przez Ayene (mam nadzieję, że będzie 'śmigać' :P
#==============================================================================
if true # True = wyświetla HUD / False = nie wyświetla

module MOG
# Położenie HUD - współrzędne x i y
EQPMAPX = 340 # współrzędna x
EQPMAPY = 320 # współrzędna y

# Przełącznik, kontrolujący wyświetlanie HUD
EQPMAPVIS = 5

# Okno
EQPMAPSKIN = "Window"

# Przezroczystość okna HUD
EQPMAPOPA = 0
end

$mogscript = {} if $mogscript == nil
$mogscript["mpequip"] = true

#==============================================================================
# Window_Base
#==============================================================================
class Window_Base < Window
def draw_equip_map(item, x, y)
if item == nil
return
end
draw_icon(item.icon_index , x + 3 , y + 34)
end

def draw_mequip(x, y)
mequip = Cache.picture("Mequip")
cw = mequip.width
ch = mequip.height
src_rect = Rect.new(0, 0, cw, ch)
self.contents.blt(x , y - ch + 65 ,mequip, src_rect)
end
end

#==============================================================================
# Window_Equip_Map
#==============================================================================
class Window_Equipmap < Window_Base
def initialize(actor)
super(0, 0, 190, 100)
self.contents = Bitmap.new(width - 32, height - 32)
self.opacity = MOG::EQPMAPOPA
self.windowskin = Cache.system(MOG::EQPMAPSKIN)
@actor = actor
refresh
end
def refresh
self.contents.clear
draw_mequip(0,0)
@data = []
@data.push($data_weapons[@actor.weapon_id])
@data.push($data_armors[@actor.armor1_id])
@data.push($data_armors[@actor.armor2_id])
@data.push($data_armors[@actor.armor3_id])
@data.push($data_armors[@actor.armor4_id])
self.contents.font.color = system_color
draw_equip_map(@data[0], 32 * 0, 0)
draw_equip_map(@data[1], 32 * 1, 0)
draw_equip_map(@data[2], 32 * 2, 0)
draw_equip_map(@data[3], 32 * 3, 0)
draw_equip_map(@data[4], 32 * 4, 0)
end
end

#==============================================================================
# Scene_Map
#==============================================================================
class Scene_Map
alias ayene_start start
def start
@index = 0
new_equip_hud
ayene_start
end

alias ayene_terminate terminate
def terminate
ayene_terminate
@eqmap.dispose
end

alias mog8_update update
def update
if $game_switches[MOG::EQPMAPVIS] == false
@eqmap.visible = true
else
@eqmap.visible = false
end
if $eref == true
@eqmap.refresh
$eref = false
end
if Input.trigger?(Input::R)
if @index == $game_party.members.size - 1
@index = 0
else
@index += 1
end
elsif Input.trigger?(Input::L)
if @index == 0
@index = $game_party.members.size - 1
else
@index -= 1
end
end
new_equip_hud if @index != @actor.index
mog8_update
end
def new_equip_hud
@actor = $game_party.members[@index]
@eqmap.dispose if !@eqmap.nil?
@eqmap = Window_Equipmap.new(@actor)
@eqmap.x = MOG::EQPMAPX
@eqmap.y = MOG::EQPMAPY
if $game_switches[MOG::EQPMAPVIS] == false
@eqmap.visible = true
else
@eqmap.visible = false
end
end
end

#==============================================================================
# Game_Map
#==============================================================================
class Game_Map
attr_accessor :eref
end

class Game_Interpreter
def eref
$eref = true
end
alias mog319ref command_319
def command_319
eref
return mog319ref
end
end
end

Wyświetlany ekwipunek zmienia się za pomocą klawiszy L i R (domyślnie Page Up i Down)

KillYou

Dzięki Ayene! Klawisze działają!

krychapl · Preferowany: Dołączył: 05 Sty 2010 Posty: 38

Dałoby się przerobić ten skrypt żeby pokazywał to co dodaje rozszerzenie ekwipunku?

Ayene

Nie wszystkie skrypty są ze sobą kompatybilne. To o co prosisz wymagałoby zbyt wielu przeróbek.

krychapl · Preferowany: Dołączył: 05 Sty 2010 Posty: 38

Dobra użyje tego co jest.

Asantos

a jak można ustawić, że kiedy wciśniemy "u" to okno się ukryje/pojawi?
to samo pytanie dotyczy okienka hp,mp i pd bohatera (HUD)

Ayene

Okienko ukrywa się, gdy wciśniesz 'D' (U nie jest domyślnie obsługiwane przez program):
Sprawdź, czy o to Tobie chodziło:

Spoiler:

Kod:

#==============================================================================
# MOG HUD Equip V1.1 VX
# Autor XP: Moghunter
# Przełożone na VX przez Ayene (mam nadzieję, że będzie 'śmigać' :P
#==============================================================================
if true # True = wyświetla HUD / False = nie wyświetla

module MOG
# Położenie HUD - współrzędne x i y
EQPMAPX = 340 # współrzędna x
EQPMAPY = 320 # współrzędna y

# Przełącznik, kontrolujący wyświetlanie HUD
EQPMAPVIS = 5

# Okno
EQPMAPSKIN = "Window"

# Przezroczystość okna HUD
EQPMAPOPA = 0

PRZYCIK_UKRYCIA = Input::Z # "D" na klawiaturze
end

$mogscript = {} if $mogscript == nil
$mogscript["mpequip"] = true

#==============================================================================
# Window_Base
#==============================================================================
class Window_Base < Window
def draw_equip_map(item, x, y)
if item == nil
return
end
draw_icon(item.icon_index , x + 3 , y + 34)
end

def draw_mequip(x, y)
mequip = Cache.picture("Mequip")
cw = mequip.width
ch = mequip.height
src_rect = Rect.new(0, 0, cw, ch)
self.contents.blt(x , y - ch + 65 ,mequip, src_rect)
end
end

#==============================================================================
# Window_Equip_Map
#==============================================================================
class Window_Equipmap < Window_Base
def initialize(actor)
super(0, 0, 190, 100)
self.contents = Bitmap.new(width - 32, height - 32)
self.opacity = MOG::EQPMAPOPA
self.windowskin = Cache.system(MOG::EQPMAPSKIN)
@actor = actor
refresh
end
def refresh
self.contents.clear
draw_mequip(0,0)
@data = []
@data.push($data_weapons[@actor.weapon_id])
@data.push($data_armors[@actor.armor1_id])
@data.push($data_armors[@actor.armor2_id])
@data.push($data_armors[@actor.armor3_id])
@data.push($data_armors[@actor.armor4_id])
self.contents.font.color = system_color
draw_equip_map(@data[0], 32 * 0, 0)
draw_equip_map(@data[1], 32 * 1, 0)
draw_equip_map(@data[2], 32 * 2, 0)
draw_equip_map(@data[3], 32 * 3, 0)
draw_equip_map(@data[4], 32 * 4, 0)
end
end

#==============================================================================
# Scene_Map
#==============================================================================
class Scene_Map
alias ayene_start start
def start
@index = 0
new_equip_hud
ayene_start
end

alias ayene_terminate terminate
def terminate
ayene_terminate
@eqmap.dispose
end

alias mog8_update update
def update
if $game_switches[MOG::EQPMAPVIS] == false
@eqmap.visible = true
else
@eqmap.visible = false
end
if Input.trigger?(MOG::PRZYCIK_UKRYCIA)
if $game_switches[MOG::EQPMAPVIS] == false
$game_switches[MOG::EQPMAPVIS] = true
else
$game_switches[MOG::EQPMAPVIS] = false
end
return
end
if $eref == true
@eqmap.refresh
$eref = false
end
if Input.trigger?(Input::R)
if @index == $game_party.members.size - 1
@index = 0
else
@index += 1
end
elsif Input.trigger?(Input::L)
if @index == 0
@index = $game_party.members.size - 1
else
@index -= 1
end
end

if Input.trigger?(Input::F5)
@actor.change_equip(0, nil)
end

new_equip_hud # if @index != @actor.index
mog8_update
end
def new_equip_hud
@actor = $game_party.members[@index]
@eqmap.dispose if !@eqmap.nil?
@eqmap = Window_Equipmap.new(@actor)
@eqmap.x = MOG::EQPMAPX
@eqmap.y = MOG::EQPMAPY
if $game_switches[MOG::EQPMAPVIS] == false
@eqmap.visible = true
else
@eqmap.visible = false
end
if Input.trigger?(MOG::PRZYCIK_UKRYCIA)
if $game_switches[MOG::EQPMAPVIS] == false
$game_switches[MOG::EQPMAPVIS] = true
else
$game_switches[MOG::EQPMAPVIS] = false
end
return
end
end
end

#==============================================================================
# Game_Map
#==============================================================================
class Game_Map
attr_accessor :eref
end

class Game_Interpreter
def eref
$eref = true
end
alias mog319ref command_319
def command_319
eref
return mog319ref
end
end
end

Asantos

a jeśli chodzi o HUD z informacjami bohatera?

Ayene

Wejdź w skrypt i znajdź (linijka 6):

Kod:

POŁOŻENIE_HUD = 2

i po nim dodaj:

Kod:

PRZYCIK_UKRYCIA = Input::Z # "D" na klawiaturze

Następnie znajdź (linijka 184):

Kod:

return if !HUD_HP_MP_EXP_NAME_FACE_LEVEL::CYCLE

po tym dodaj:

Kod:

if Input.trigger?(AYENE::PRZYCIK_UKRYCIA)
if @hp_mp_exp_name_face_hud.visible
hud(false)
else
hud(true)
end
return
end

Asantos

nie muszę chyba mówić

ale powiem! DziĘkujĘ Ayene :)

HESEE · Preferowany: **Pomógł:** 1 raz Dołączył: 31 Mar 2010 Posty: 145

Da radę go na środek przenieść.
Dół środek.

Ayene

HESEE, czytaj instrukcję :->

Kod:

EQPMAPX = 340 # współrzędna x
EQPMAPY = 320 # współrzędna y