XP 스크립트

제목과 이하동문 입니다.

 

#==============================================================================
#   ◆ 소지수 한계 돌파 - item_maximum◆
#------------------------------------------------------------------------------
#  아이템을 가질 수 있는 수를99이상으로 하는 스크립트입니다
#==============================================================================
# ★ 커스터마이즈 항목 ★
#==============================================================================

#아이템의 소지수
$item_maximum = 500
#소지수의 자리수
$item_maximum_place = 3

#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
#  파티를 취급하는 클래스입니다. 골드나 아이템등의 정보가 포함됩니다. 이 쿠
# 라스의 인스턴스는 $game_party 으로 참조됩니다.
#==============================================================================

class Game_Party
#--------------------------------------------------------------------------
# ● 아이템의 증가 (감소)
# item_id : 아이템 ID
# n : 개수
#--------------------------------------------------------------------------
def gain_item(item_id, n)
# 해시의 개수 데이터를 갱신
if item_id > 0
@items[item_id] = [[item_number(item_id) + n, 0].max, $item_maximum].min
end
end
#--------------------------------------------------------------------------
# ● 무기의 증가 (감소)
# weapon_id : 무기 ID
# n : 개수
#--------------------------------------------------------------------------
def gain_weapon(weapon_id, n)
# 해시의 개수 데이터를 갱신
if weapon_id > 0
@weapons[weapon_id] = [[weapon_number(weapon_id) + n, 0].max, $item_maximum].min
end
end
#--------------------------------------------------------------------------
# ● 방어용 기구의 증가 (감소)
# armor_id : 방어용 기구 ID
# n : 개수
#--------------------------------------------------------------------------
def gain_armor(armor_id, n)
# 해시의 개수 데이터를 갱신
if armor_id > 0
@armors[armor_id] = [[armor_number(armor_id) + n, 0].max, $item_maximum].min
end
end
end

#-------------------------------------------------------------------------------

#==============================================================================
# ■ Window_Item
#------------------------------------------------------------------------------
#  아이템 화면 , 배틀 화면에서 , 소지 아이템의 일람을 표시하는 윈도우입니다.
#==============================================================================

class Window_Item < Window_Selectable
#--------------------------------------------------------------------------
# ● 항목의 묘화
# index : 항목 번호
#--------------------------------------------------------------------------
def draw_item(index)
item = @data[index]
case item
when RPG::Item
number = $game_party.item_number(item.id)
when RPG::Weapon
number = $game_party.weapon_number(item.id)
when RPG::Armor
number = $game_party.armor_number(item.id)
end
if item.is_a?(RPG::Item) and $game_party.item_can_use?(item.id)
self.contents.font.color = normal_color
else
self.contents.font.color = disabled_color
end
x = 4 + index % 2 * (288 + 32)
y = index / 2 * 32
rect = Rect.new(x, y, self.width / @column_max - 32, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
bitmap = RPG::Cache.icon(item.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
width = 24 + ($item_maximum_place - 2) * 12
x_i = x - width + 24
self.contents.draw_text(x_i + 240, y, 16, 32, ":", 1)
self.contents.draw_text(x_i + 256, y, width, 32, number.to_s, 2)
end
end

#-------------------------------------------------------------------------------

#==============================================================================
# ■ Window_ShopNumber
#------------------------------------------------------------------------------
#  숍 화면에서 , 구입 또는 매각하는 아이템의 개수를 입력하는 윈도우입니다.
#==============================================================================

class Window_ShopNumber < Window_Base
#--------------------------------------------------------------------------
# ● 리프레쉬
#--------------------------------------------------------------------------
def refresh
self.contents.clear
draw_item_name(@item, 4, 96)
self.contents.font.color = normal_color
width = 24 + ($item_maximum_place - 2) * 12
widths = 32 + ($item_maximum_place - 2) * 12
self.contents.draw_text(272 - width + 24, 96, 32, 32, "×")
self.contents.draw_text(308 - width + 24, 96, width, 32, @number.to_s, 2)
self.cursor_rect.set(304 - width + 24, 96, widths, 32)
# self.cursor_rect.set(304, 96, 32, 32)
# 합계 가격과 통화단위를 묘화
domination = $data_system.words.gold
cx = contents.text_size(domination).width
total_price = @price * @number
self.contents.font.color = normal_color
self.contents.draw_text(4, 160, 328-cx-2, 32, total_price.to_s, 2)
self.contents.font.color = system_color
self.contents.draw_text(332-cx, 160, cx, 32, domination, 2)
end
#--------------------------------------------------------------------------
# ● 프레임 갱신
#--------------------------------------------------------------------------
def update
super
if self.active
# 커서 오른쪽 (+1)
if Input.repeat?(Input::RIGHT) and @number < @max
$game_system.se_play($data_system.cursor_se)
@number += 1
refresh
end
# 커서왼쪽 (-1)
if Input.repeat?(Input::LEFT) and @number > 1
$game_system.se_play($data_system.cursor_se)
@number -= 1
refresh
end
# 커서상 (+10)
if Input.repeat?(Input::UP) and @number < @max
$game_system.se_play($data_system.cursor_se)
@number = [@number + 10, @max].min
refresh
end
# 커서하 (-10)
if Input.repeat?(Input::DOWN) and @number > 1
$game_system.se_play($data_system.cursor_se)
@number = [@number - 10, 1].max
refresh
end
# R(최대수)
if Input.repeat?(Input::R) and @number < @max
$game_system.se_play($data_system.cursor_se)
@number = @max
refresh
end
# L(1)
if Input.repeat?(Input::L) and @number > 1
$game_system.se_play($data_system.cursor_se)
@number = 1
refresh
end
end
end
end

#-------------------------------------------------------------------------------

#==============================================================================
# ■ Window_ShopStatus
#------------------------------------------------------------------------------
#  숍 화면에서 , 아이템의 소지수나 엑터의 장비를 표시하는 윈도우입니다.
#==============================================================================

class Window_ShopStatus < Window_Base
#--------------------------------------------------------------------------
# ● 리프레쉬
#--------------------------------------------------------------------------
def refresh
self.contents.clear
if @item == nil
return
end
case @item
when RPG::Item
number = $game_party.item_number(@item.id)
when RPG::Weapon
number = $game_party.weapon_number(@item.id)
when RPG::Armor
number = $game_party.armor_number(@item.id)
end
self.contents.font.color = system_color
self.contents.draw_text(4, 0, 200, 32, "가지고 있는 수")
self.contents.font.color = normal_color
width = 36 + ($item_maximum_place - 2) * 16
self.contents.draw_text(204 - width + 36, 0, width, 32, number.to_s, 2)
if @item.is_a?(RPG::Item)
return
end
# 장비품 추가 정보
for i in 0...$game_party.actors.size
# 엑터를 취득
actor = $game_party.actors[i]
# 장비 가능하면 통상 문자색에 , 불가능하면 무효 문자색으로 설정
if actor.equippable?(@item)
self.contents.font.color = normal_color
else
self.contents.font.color = disabled_color
end
# 엑터의 이름을 묘화
self.contents.draw_text(4, 64 + 64 * i, 120, 32, actor.name)
# 현재의 장비품을 취득
if @item.is_a?(RPG::Weapon)
item1 = $data_weapons[actor.weapon_id]
elsif @item.kind == 0
item1 = $data_armors[actor.armor1_id]
elsif @item.kind == 1
item1 = $data_armors[actor.armor2_id]
elsif @item.kind == 2
item1 = $data_armors[actor.armor3_id]
else
item1 = $data_armors[actor.armor4_id]
end
# 장비 가능한 경우
if actor.equippable?(@item)
# 무기의 경우
if @item.is_a?(RPG::Weapon)
atk1 = item1 != nil ? item1.atk : 0
atk2 = @item != nil ? @item.atk : 0
change = atk2 - atk1
end
# 방어용 기구의 경우
if @item.is_a?(RPG::Armor)
pdef1 = item1 != nil ? item1.pdef : 0
mdef1 = item1 != nil ? item1.mdef : 0
pdef2 = @item != nil ? @item.pdef : 0
mdef2 = @item != nil ? @item.mdef : 0
change = pdef2 - pdef1 + mdef2 - mdef1
end
# 파라미터의 변화치를 묘화
self.contents.draw_text(124, 64 + 64 * i, 112, 32,
sprintf("%+d", change), 2)
end
# 아이템을 묘화
if item1 != nil
x = 4
y = 64 + 64 * i + 32
bitmap = RPG::Cache.icon(item1.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
self.contents.draw_text(x + 28, y, 212, 32, item1.name)
end
end
end
end

#-------------------------------------------------------------------------------

#==============================================================================
# ■ Window_ShopSell
#------------------------------------------------------------------------------
#  숍 화면에서 , 매각을 위해서(때문에) 소지 아이템의 일람을 표시하는 윈도우입니다.
#==============================================================================

class Window_ShopSell < Window_Selectable
#--------------------------------------------------------------------------
# ● 항목의 묘화
# index : 항목 번호
#--------------------------------------------------------------------------
def draw_item(index)
item = @data[index]
case item
when RPG::Item
number = $game_party.item_number(item.id)
when RPG::Weapon
number = $game_party.weapon_number(item.id)
when RPG::Armor
number = $game_party.armor_number(item.id)
end
# 매각 가능하면 통상 문자색에 , 그렇지 않으면 무효 문자색으로 설정
if item.price > 0
self.contents.font.color = normal_color
else
self.contents.font.color = disabled_color
end
x = 4 + index % 2 * (288 + 32)
y = index / 2 * 32
rect = Rect.new(x, y, self.width / @column_max - 32, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
bitmap = RPG::Cache.icon(item.icon_name)
opacity = self.contents.font.color == normal_color ? 255 : 128
self.contents.blt(x, y + 4, bitmap, Rect.new(0, 0, 24, 24), opacity)
self.contents.draw_text(x + 28, y, 212, 32, item.name, 0)
width = 24 + ($item_maximum_place - 2) * 12
x_i = x - width + 24
self.contents.draw_text(x_i + 240, y, 16, 32, ":", 1)
self.contents.draw_text(x_i + 256, y, width, 32, number.to_s, 2)
end
end

#-------------------------------------------------------------------------------

#==============================================================================
# ■ Scene_Shop
#------------------------------------------------------------------------------
#  숍 화면의 처리를 실시하는 클래스입니다.
#==============================================================================

class Scene_Shop
#--------------------------------------------------------------------------
# ● 프레임 갱신 (구입 윈도우가 액티브의 경우)
#--------------------------------------------------------------------------
def update_buy
# 스테이터스 윈도우의 아이템을 설정
@status_window.item = @buy_window.item
# B 버튼이 밀렸을 경우
if Input.trigger?(Input::B)
# 캔슬 SE 을 연주
$game_system.se_play($data_system.cancel_se)
# 윈도우 상태를 초기 모드에
@command_window.active = true
@dummy_window.visible = true
@buy_window.active = false
@buy_window.visible = false
@status_window.visible = false
@status_window.item = nil
# 헬프 텍스트를 소거
@help_window.set_text("")
return
end
# C 버튼이 밀렸을 경우
if Input.trigger?(Input::C)
# 아이템을 취득
@item = @buy_window.item
# 아이템이 무효의 경우 , 또는 가격이 소지금보다 위의 경우
if @item == nil or @item.price > $game_party.gold
# 버저 SE 를 연주
$game_system.se_play($data_system.buzzer_se)
return
end
# 아이템의 소지수를 취득
case @item
when RPG::Item
number = $game_party.item_number(@item.id)
when RPG::Weapon
number = $game_party.weapon_number(@item.id)
when RPG::Armor
number = $game_party.armor_number(@item.id)
end
# 벌써 99 개소 지키고 있는 경우
if number == $item_maximum
# 버저 SE 를 연주
$game_system.se_play($data_system.buzzer_se)
return
end
# 결정 SE 을 연주
$game_system.se_play($data_system.decision_se)
# 최대 구입 가능 개수를 계산
max = @item.price == 0 ? $item_maximum : $game_party.gold / @item.price
max = [max, $item_maximum - number].min
# 윈도우 상태를 개수 입력 모드에
@buy_window.active = false
@buy_window.visible = false
@number_window.set(@item, max, @item.price)
@number_window.active = true
@number_window.visible = true
end
end
end

Comment '12'

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 6153
801 기타 양손무기, 전신갑옷 스크립트 2 백호 2009.02.22 1714
800 스킬 약간 수정한 심플액알(크리티컬,스킬) 10 백호 2009.02.22 3836
799 전투 액티브 타임 배틀(보행그래픽) file 백호 2009.02.21 2104
798 기타 액터 선택 스크립트 2 백호 2009.02.21 1228
797 액알입니다.정말 확신함 12 dkqkfsoatp 2007.12.13 4266
796 액알 스크립트 강좌용~!!!| 27 아방스 2007.11.09 5461
795 전투 액알 스크립트 24 백호 2009.02.22 6013
794 기타 액알 30 지존!! 2010.07.26 5095
793 타이틀/게임오버 애니메이션을 타이틀 화면에서 이용 15 file 백호 2009.02.21 3340
792 기타 암울한스크립트? 엔딩후 캐릭터 이어서 새로운 게임시작 스크립트 5 *ps인간 2009.01.26 2533
791 이동 및 탈것 아하! 그렇구나의 3D 신기술 체험 3 14 아하!잘봤어요. 2010.02.28 4258
790 이동 및 탈것 아하! 그렇구나의 3D 신기술 체험 2 23 아하!잘봤어요. 2010.02.28 3815
789 이동 및 탈것 아하! 그렇구나의 3D 신기술 체험 30 아하!잘봤어요. 2010.02.28 4772
788 아이템 아이템획득스크립트 ps인간 2009.01.23 2993
787 아이템 아이템창변경 27 카르닉스 2010.02.26 3634
786 아이템 아이템제한스크립트 ps인간 2009.01.23 1680
785 아이템 아이템을 얻으면 자동으로 아이템 입수 메세지윈도우 띄우기 4 백호 2009.02.22 2279
784 아이템 아이템을 사용하여 기술 습득하기 (기술문서 아이템) 2 file 백호 2009.02.21 1033
» 아이템 아이템소지수 한계돌파 (중복일지도) 12 카르닉스 2010.02.26 1500
782 아이템 아이템도감 14 키라링 2009.01.22 2299
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 ... 52 Next
/ 52