如何把这张图片的一部分显示在指定事件名称格式的事件下 - Project1

class Map_Damage
attr_accessor :pic
def initialize
@pic=Sprite.new
@front1=RPG::Cache.picture("front1")
@front2=RPG::Cache.picture("front2")
@front3=RPG::Cache.picture("front3")
@front4=RPG::Cache.picture("front4")
@front5=RPG::Cache.picture("front5")
@front6=RPG::Cache.picture("front6")
@pic.bitmap=Bitmap.new(640,480)
@pic.z=50
end
def mapupdate
if $game_switches[56]==true and $game_switches[8]==true
@pic.bitmap.clear
for i in $game_variables[90][0]...$game_variables[90][0]+$game_variables[90][1]
for j in $game_variables[90][2]...$game_variables[90][2]+$game_variables[90][3]
if $game_map.have_an_event?(i,j)
k=$game_map.check_event(i,j)
if $game_map.events[k].event.name[0,6]=="怪物" and $game_map.events[k].event.name[10,1]!="h"
draw_mapdamage($game_map.events[k].event.name[6,3].to_i,i,j)
end
end
end
end
end
end
def draw_mapdamage(number,i,j)
e=Enemy_property.new(number)
if !e.got_p(11)
e=Enemy_property.new(number)
damage=e.got_damage
if damage>=999999999999999999999999999999999 or $game_switches[8]==false
@pic.bitmap.blt(i*32+8, j*32+20, @front6, Rect.new(0,0,24,12))
else
if damage>=$game_actors[$game_variables[1]+1].hp
a=damage.to_s
for q in 0...a.size
@pic.bitmap.blt(i*32-a.size*8+q*8+32, j*32+20, @front5, Rect.new(a[q,1].to_i*15-1,0,12,12))
end
end
if damage<$game_actors[$game_variables[1]+1].hp/25
a=damage.to_s
for q in 0...a.size
@pic.bitmap.blt(i*32-a.size*8+q*8+32, j*32+20, @front1, Rect.new(a[q,1].to_i*15-1,0,12,12))
end
end
if damage>=$game_actors[$game_variables[1]+1].hp/25 and damage<$game_actors[$game_variables[1]+1].hp/8
a=damage.to_s
for q in 0...a.size
@pic.bitmap.blt(i*32-a.size*8+q*8+32, j*32+20, @front2, Rect.new(a[q,1].to_i*15,0,12,12))
end
end
if damage>=$game_actors[$game_variables[1]+1].hp/8 and damage<$game_actors[$game_variables[1]+1].hp/3
a=damage.to_s
for q in 0...a.size
@pic.bitmap.blt(i*32-a.size*8+q*8+32, j*32+20, @front3, Rect.new(a[q,1].to_i*15-1,0,12,12))
end
end
if damage>=$game_actors[$game_variables[1]+1].hp/3 and damage<$game_actors[$game_variables[1]+1].hp
a=damage.to_s
for q in 0...a.size
@pic.bitmap.blt(i*32-a.size*8+q*8+32, j*32+20, @front4, Rect.new(a[q,1].to_i*15-1,0,12,12))
end
end
end
end
end
end

复制代码

class Window_Light < Window_Base
def initialize
super(-16,-16,672,512)
@name = "文件名称"
@fat_x = (Bitmap.new(@name).width/4).to_i
@fat_y = (Bitmap.new(@name).height).to_i
self.opacity = 0
self.back_opacity = 0
self.contents = Bitmap.new(width - 32, height - 32)
refresh
end
def refresh
self.contents.clear
for event_a in $game_map.events.values
for enemy_id in 0..999
if event_a.event.name == sprintf("怪物%03dX",enemy_id)
bitmap = Bitmap.new(@name)
real_x = event_a.screen_x - ((@fat_x/2).to_i - 32)
real_y = event_a.screen_y - ((@fat_y/2).to_i - 32)
self.contents.blt(real_x ,real_y, bitmap, Rect.new(0, 0, @fat_x, @fat_y))
end
if event_a.event.name == sprintf("怪物%03dN",enemy_id)
bitmap = Bitmap.new(@name)
real_x = event_a.screen_x - ((@fat_x/2).to_i - 32)
real_y = event_a.screen_y - ((@fat_y/2).to_i - 32)
self.contents.blt(real_x ,real_y, bitmap, Rect.new(@fat_x * 3, 0, @fat_x, @fat_y))
end
end
end
end
end
class Game_Event
attr_accessor :event #如果这部分已定义，可删掉
end
class Scene_Map
alias hys_light_initialize initialize
def initialize
@light_window = Window_Light.new
hys_light_initialize
@light_window.dispose
end
alias hys_light_update update
def update
@light_window.update
@light_window.refresh if $game_map.scrolling?
hys_light_update
end
end

复制代码