XP 스크립트

#--------------------------------------------------------------------------
#HP bars for all ABS enemies
#By Takanuva Hagah
#--------------------------------------------------------------------------
class Window_Enemy < Window_Base
def initialize
super(-16, -16, 672, 640)
self.contents = Bitmap.new(width-32, height-32)
self.opacity = 0
self.contents.font.size = 14
@old_enemy = $ABS.enemies.size
for i in 0...$ABS.enemies.size
event_z = $ABS.enemies.values[i].event_id
@old_x = $game_map.events[event_z].real_x
@old_y = $game_map.events[event_z].real_y
@old_hp = $ABS.enemies.values[i].hp
end
@player_x = $game_player.real_x
@player_y = $game_player.real_y
refresh
end
def refresh
self.contents.clear
self.contents.font.color = system_color
self.contents.draw_text(6, 28, 32, 14, "")
self.contents.font.color = normal_color
for i in 0...$ABS.enemies.size
event_z = $ABS.enemies.values[i].event_id
x = ($game_map.events[event_z].real_x - $game_map.display_x) / 4
y = ($game_map.events[event_z].real_y - $game_map.display_y) / 4
data_id = $ABS.enemies.values[i].id
e2 = $data_enemies[data_id].maxhp
e1 = $ABS.enemies.values[i].hp
self.contents.draw_text(x-10, y-50, 73, 14, $ABS.enemies.values[i].name)
draw_enemy_bar("", x, y+40, 30, 5, Color.new(255, 255, 0), Color.new(204, 204, 0), e1, e2)
end
end
def update
super
if @old_enemy != $ABS.enemies.size
refresh
@old_enemy = $ABS.enemies.size
end
if @player_x != $game_player.real_x or
@player_y != $game_player.real_y
refresh
@player_x = $game_player.real_x
@player_y = $game_player.real_y
end
for i in 0...$ABS.enemies.size
event_z = $ABS.enemies.values[i].event_id
if @old_x != $game_map.events[event_z].real_x or
@old_y != $game_map.events[event_z].real_y or
@old_hp[i] != $ABS.enemies.values[i].hp
refresh
event_z = $ABS.enemies.values[i].event_id
@old_x = $game_map.events[event_z].real_x
@old_y = $game_map.events[event_z].real_y
@old_hp = $ABS.enemies.values[i].hp
end
end
end
def draw_enemy_bar(actor, x, y, length, thick, c1, c2, e1, e2)
width = length
height = thick
self.contents.fill_rect(x-1, y - 1, width+2, height + 3, Color.new(255, 255, 255, 255))
self.contents.fill_rect(x, y, width, height + 1, Color.new(0, 0, 0, 255))
w = width * e1 / e2
for i in 0..height
r = c1.red + (c2.red - c1.red) * (height -i)/height + 0 * i/height
g = c1.green + (c2.green - c1.green) * (height -i)/height + 0 * i/height
b = c1.blue + (c2.blue - c1.blue) * (height -i)/height + 0 * i/height
a = c1.alpha + (c2.alpha - c1.alpha)* (height -i)/height + 255 * i/height
self.contents.fill_rect(x, y+i, w, 1, Color.new(r, g, b, a))
end
end
end
class Scene_Map
alias enemy_scene_map_main main
alias enemy_scene_map_update update
def main
@enemy = Window_Enemy.new
enemy_scene_map_main
@enemy.dispose
end
def update
@enemy.update
enemy_scene_map_update
end
end

Who's 백호

?

이상혁입니다.

http://elab.kr

Comment '11'

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 6153
254 기타 (T-RPG) 데미지 표시 시의 폰트를 설정 백호 2009.02.22 1348
253 기타 3d 렌더링스크립트 어렵게 찾음 9 라구나 2011.03.05 3610
252 기타 3D스크립트 48 file ok하승헌 2010.02.18 3808
251 기타 4방향 마우스 스크립트 12 file 아방스 2009.02.28 2662
250 기타 8방향 마우스 스크립트 10 file 아방스 2009.02.28 4063
» 기타 ABS 몬스터 HP 게이지 바 11 백호 2009.02.22 2485
248 기타 Activation_system file 백호 2009.02.22 775
247 기타 Advanced Gold display by Dubealex 1 백호 2009.02.22 761
246 기타 Advanced Gold Display by Dubealex (돈 액수를 세자리씩 끊어 표기) 2 Alkaid 2010.11.18 1559
245 기타 Advanced Weather System (AWS) 3 file 백호 2009.02.22 1272
244 기타 AMS-Advanced Message Script Edited by Dubleax 3 file 백호 2009.02.21 765
243 기타 AMS___Advanced_Message_Script 1 file 백호 2009.02.22 889
242 기타 Anti Event Lag Script 3 백호 2009.02.21 1057
241 기타 appletree님 요청) 화면 명암 주기 3 file 뮤바보 2013.01.31 2724
240 기타 ATS-Advanced Time System 1 file 백호 2009.02.21 964
239 기타 Boat Script 백호 2009.02.21 729
238 기타 Book Event v2 by Bruth 5 백호 2009.02.22 1694
237 기타 CG그림 감상 스크립트 file 백호 2009.02.21 1735
236 기타 CG모드 도입 스크립트 file 백호 2009.02.21 1383
235 기타 Chaos Project Debug System 1.06b by Blizzard file Alkaid 2010.09.07 1367
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 12 13 Next
/ 13