UltimaForum :: Zobacz temat

Spoiler:

Kod:

=begin
********************************************************************
* HUD WoW VX for Michu_1999 by Avara *
* Autor: Avara *
* ultimateam.pl *
**********************************************************************
Hud stworzony na zamĂłwienie dla Michu_1999. WrzuciÄ nad Main w edytorze skryptĂłw.
Skrypt zawiera fragment skryptu "Menu Bars" wersjÄ 4.1 Syvkal'a.
Grafika wziÄta z gry "World of Warcraft". NaleĹźy jÄ umieĹciÄ w folderze
Graphics\System.
ProszÄ nie zapomnieÄ o wspomnieniu o twĂłrcy skryptu w swoim projekcie.
ĹťyczÄ miĹego koĹźystania ;-)
=end
module HUD_WoW_by_Avara # <- nie usuwaÄ!
# KONFIGURACJA
HUD_WOW_WIDOCZNY_START = true #czy hud ma byÄ widoczny od samego poczÄtku gry (true/false)
HUD_WOW_WIDOCZNY = 20 #numer przeĹÄcznika, wĹÄczajÄcy/wyĹÄczajÄcy hud
HUD_WOW_UKRYJ = true #ukryj HUD, gdy bohater znajduje siÄ za nim
HUD_WOW_UKRYJ_NP = 100 #poziom "nieprzezroczystoĹci" (0 - przezroczyste;
#255 - nieprzezroczyste), gdy uktywanie jest wĹÄczone
# KONIEC KONFIGURACJI
# Dalej zmieniaÄ na wĹasne ryzyko!
end

class HUD_WoW < Window_Base

def initialize(x = - 12, y = - 14, width = 231, height = 112)
super(x,y,width,height)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.font.size = 16
self.opacity = 0
@bohater = $game_party.members[0]
@color1 = text_color(21)
@color2 = text_color(14)
ukryj
refresh
end

alias oldupdate update
def update
refresh
oldupdate
end

def refresh
self.contents.clear
ukryj
img = Cache.system("hud.png")
p_hp = Cache.system("pasek_zycia.png")
p_mp = Cache.system("pasek_many.png")
hp = @bohater.hp
maxhp = @bohater.base_maxhp
mp = @bohater.mp
maxmp = @bohater.base_maxmp
zycie = p_hp.width * hp / maxhp
mana = p_mp.width * mp / maxmp
self.contents.blt(0, 2, img, Rect.new(0, 0, img.width, img.height), 255)
self.contents.blt(73, 36, p_hp, Rect.new(0, 0, zycie, img.height), 255)
self.contents.blt(73, 47, p_mp, Rect.new(0, 0, mana, img.height), 255)
self.contents.draw_text(73, 14, 123, 17, @bohater.name, 1)
self.contents.draw_text(5, 51, 18, 17, @bohater.level, 1)
draw_actor_exp_ring(@bohater, 36, 36, 34, 3, 305, 70)
end

# FRAGMENT SKRYPTU "Menu Bars" BY Syvkal V 4.1
def draw_actor_exp_ring(actor, x, y, radius, height, amount = 360, start = 0, reverse = false)
@rate = actor.now_exp.to_f / [actor.next_exp, 1].max
gw = amount * actor.now_exp / [actor.next_exp, 1].max
self.contents.cogwheel_fill_ring(x, y, gw, radius, height, @color1, @color2, amount, start, reverse)
end
# KONIEC FRAGMENTU

def ukryj
if HUD_WoW_by_Avara::HUD_WOW_UKRYJ == true
if $game_player.screen_x - 16 < 187 and $game_player.screen_y - 28 < 60
self.contents_opacity = HUD_WoW_by_Avara::HUD_WOW_UKRYJ_NP
else
self.contents_opacity = 255
end
end
end
end

# FRAGMENT SKRYPTU "Menu Bars" BY Syvkal V 4.1
class Bitmap

def cogwheel_fill_ring(x, y, gw, radius, height, gc1, gc2, amount = 360, start = 0, reverse = false)
# Kolory obramĂłwki paska
color1 = Color.new(0, 0, 0, 192) # ZewnÄtrzne
color2 = Color.new(0, 0, 0, 192) # WewnÄtrzne
# WypeĹnienie pustego paska
color3 = Color.new(0, 0, 0, 255) # PoĹowa ceinowania
color4 = Color.new(64, 0, 0, 255)
fill_ring(x-2, y-2, radius, height+4, color1, amount, start, reverse)
fill_ring(x-1, y-1, radius, height+2, color2, amount, start, reverse)
if amount >= 220
gradient_fill_ring(x, y, radius, height, color3, color4, [amount/2, 180].min, start, reverse)
gradient_fill_ring(x, y, radius, height, color4, color3, [amount/2, 180].min, start+(amount/2), reverse)
else
gradient_fill_ring(x, y, radius, height, color3, color4, [amount, 360].min, start, reverse)
end
if gw >= 220
gw1 = amount/2; gw2 = gw / 2
gradient_fill_ring(x, y, radius, height, gc1, gc2, gw1, start, reverse)
gradient_fill_ring(x, y, radius, height, gc2, gc1, gw2, start +(amount/2), reverse)
else
gradient_fill_ring(x, y, radius, height, gc1, gc2, gw, start, reverse)
end
end

def fill_ring(ox, oy, radius, height, gc1, amount = 360, start = 0, reverse = false)
d = 2.0 * Math::PI / 360
for i in 1..[amount, 360].min
s = i + start
if reverse
x = ox + ( radius * Math.sin( d * s ) ).to_i
y = oy - ( radius * Math.cos( d * s ) ).to_i
else
x = ox - ( radius * Math.cos( d * s ) ).to_i
y = oy + ( radius * Math.sin( d * s ) ).to_i
end
fill_rect(x, y, height, height, gc1)
end
end

def gradient_fill_ring(ox, oy, radius, height, gc1, gc2, amount = 360, start = 0, reverse = false)
d = 2.0 * Math::PI / 360
for i in 1..amount
s = i + start
if reverse
x = ox + ( radius * Math.sin( d * s ) ).to_i
y = oy - ( radius * Math.cos( d * s ) ).to_i
else
x = ox - ( radius * Math.cos( d * s ) ).to_i
y = oy + ( radius * Math.sin( d * s ) ).to_i
end
color = get_gradient_pixel(gc1, gc2, amount, i)
fill_rect(x, y, height, height, color)
end
end

def get_gradient_pixel(gc1, gc2, amount, i)
red = gc1.red * (amount - i) / amount + gc2.red * i / amount
green = gc1.green * (amount - i) / amount + gc2.green * i / amount
blue = gc1.blue * (amount - i) / amount + gc2.blue * i / amount
alpha = gc1.alpha * (amount - i) / amount + gc2.alpha * i / amount
return Color.new(red, green, blue, alpha)
end
end

class Game_Actor < Game_Battler

def now_exp
return @exp - @exp_list[@level]
end

def next_exp
return @exp_list[@level+1] > 0 ? @exp_list[@level+1] - @exp_list[@level] : 0
end
end
# KONIEC FRAGMENTU

class Scene_Map < Scene_Base

alias hud_wow_by_avara_st start
def start
hud_wow_by_avara_st
@hud_wow_by_avara = HUD_WoW.new
if $game_switches[HUD_WoW_by_Avara::HUD_WOW_WIDOCZNY] == false
@hud_wow_by_avara.visible = false
end
end

alias hud_wow_by_avara_term terminate
def terminate
hud_wow_by_avara_term
@hud_wow_by_avara.dispose
end

alias hud_wow_by_avara_up update
def update
hud_wow_by_avara_up
if $game_switches[HUD_WoW_by_Avara::HUD_WOW_WIDOCZNY] == true
@hud_wow_by_avara.update
@hud_wow_by_avara.visible = true
else
@hud_wow_by_avara.visible = false
end
end
end

class Scene_Title < Scene_Base

alias hud_wow_by_avara_cr_ga_ob create_game_objects
def create_game_objects
hud_wow_by_avara_cr_ga_ob

$game_switches[HUD_WoW_by_Avara::HUD_WOW_WIDOCZNY] = HUD_WoW_by_Avara::HUD_WOW_WIDOCZNY_START
end
end

//Edit 9.11.2011 00:54 : Lvl postaci byĹ nieco za wysoko. JuĹź poprawiĹam ;-)