Interpreter 4
#============================================
# ¡ Interpreter (•ªŠ„’è‹` 4)
#----------------------------------------------
# @ƒCƒxƒ“ƒgƒRƒ}ƒ“ƒh‚ðÀs‚·‚éƒCƒ“ƒ^ƒvƒŠƒ^‚Å‚·B‚±‚̃Nƒ‰ƒX‚Í Game_System ƒNƒ‰
# ƒX‚â Game_Event ƒNƒ‰ƒX‚Ì“à•”‚Åg—p‚³‚ê‚Ü‚·B
#============================================
class Interpreter
#------------------------------------------
# œ ƒXƒCƒbƒ`‚Ì‘€ì
#------------------------------------------
def command_121
# ˆêŠ‡‘€ì‚Ì‚½‚߂Ƀ‹[ƒv
for i in @parameters[0] .. @parameters[1]
# ƒXƒCƒbƒ`‚ð•ÏX
$game_switches[i] = (@parameters[2] == 0)
end
# ƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
$game_map.need_refresh = true
# Œp‘±
return true
end
#------------------------------------------
# œ •Ï”‚Ì‘€ì
#------------------------------------------
def command_122
# ’l‚ð‰Šú‰»
value = 0
# ƒIƒyƒ‰ƒ“ƒh‚Å•ªŠò
case @parameters[3]
when 0 # ’è”
value = @parameters[4]
when 1 # •Ï”
value = $game_variables[@parameters[4]]
when 2 # —”
value = @parameters[4] + rand(@parameters[5] - @parameters[4] + 1)
when 3 # ƒAƒCƒeƒ€
value = $game_party.item_number(@parameters[4])
when 4 # ƒAƒNƒ^[
actor = $game_actors[@parameters[4]]
if actor != nil
case @parameters[5]
when 0 # ƒŒƒxƒ‹
value = actor.level
when 1 # EXP
value = actor.exp
when 2 # HP
value = actor.hp
when 3 # SP
value = actor.sp
when 4 # MaxHP
value = actor.maxhp
when 5 # MaxSP
value = actor.maxsp
when 6 # ˜r—Í
value = actor.str
when 7 # Ší—p‚³
value = actor.dex
when 8 # ‘f‘‚³
value = actor.agi
when 9 # –‚—Í
value = actor.int
when 10 # UŒ‚—Í
value = actor.atk
when 11 # •¨—–hŒä
value = actor.pdef
when 12 # –‚–@–hŒä
value = actor.mdef
when 13 # ‰ñ”ðC³
value = actor.eva
end
end
when 5 # ƒGƒlƒ~[
enemy = $game_troop.enemies[@parameters[4]]
if enemy != nil
case @parameters[5]
when 0 # HP
value = enemy.hp
when 1 # SP
value = enemy.sp
when 2 # MaxHP
value = enemy.maxhp
when 3 # MaxSP
value = enemy.maxsp
when 4 # ˜r—Í
value = enemy.str
when 5 # Ší—p‚³
value = enemy.dex
when 6 # ‘f‘‚³
value = enemy.agi
when 7 # –‚—Í
value = enemy.int
when 8 # UŒ‚—Í
value = enemy.atk
when 9 # •¨—–hŒä
value = enemy.pdef
when 10 # –‚–@–hŒä
value = enemy.mdef
when 11 # ‰ñ”ðC³
value = enemy.eva
end
end
when 6 # ƒLƒƒƒ‰ƒNƒ^[
character = get_character(@parameters[4])
if character != nil
case @parameters[5]
when 0 # X À•W
value = character.x
when 1 # Y À•W
value = character.y
when 2 # Œü‚«
value = character.direction
when 3 # ‰æ–Ê X À•W
value = character.screen_x
when 4 # ‰æ–Ê Y À•W
value = character.screen_y
when 5 # ’nŒ`ƒ^ƒO
value = character.terrain_tag
end
end
when 7 # ‚»‚Ì‘¼
case @parameters[4]
when 0 # ƒ}ƒbƒv ID
value = $game_map.map_id
when 1 # ƒp[ƒeƒBl”
value = $game_party.actors.size
when 2 # ƒS[ƒ‹ƒh
value = $game_party.gold
when 3 # •à”
value = $game_party.steps
when 4 # ƒvƒŒƒCŠÔ
value = Graphics.frame_count / Graphics.frame_rate
when 5 # ƒ^ƒCƒ}[
value = $game_system.timer / Graphics.frame_rate
when 6 # ƒZ[ƒu‰ñ”
value = $game_system.save_count
end
end
# ˆêŠ‡‘€ì‚Ì‚½‚߂Ƀ‹[ƒv
for i in @parameters[0] .. @parameters[1]
# ‘€ì‚Å•ªŠò
case @parameters[2]
when 0 # ‘ã“ü
$game_variables[i] = value
when 1 # ‰ÁZ
$game_variables[i] += value
when 2 # Œ¸Z
$game_variables[i] -= value
when 3 # æZ
$game_variables[i] *= value
when 4 # œZ
if value != 0
$game_variables[i] /= value
end
when 5 # è—]
if value != 0
$game_variables[i] %= value
end
end
# ãŒÀƒ`ƒFƒbƒN
if $game_variables[i] > 99999999
$game_variables[i] = 99999999
end
# ‰ºŒÀƒ`ƒFƒbƒN
if $game_variables[i] < -99999999
$game_variables[i] = -99999999
end
end
# ƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
$game_map.need_refresh = true
# Œp‘±
return true
end
#------------------------------------------
# œ ƒZƒ‹ƒtƒXƒCƒbƒ`‚Ì‘€ì
#------------------------------------------
def command_123
# ƒCƒxƒ“ƒg ID ‚ª—LŒø‚Ìê‡
if @event_id > 0
# ƒZƒ‹ƒtƒXƒCƒbƒ`‚̃L[‚ðì¬
key = [$game_map.map_id, @event_id, @parameters[0]]
# ƒZƒ‹ƒtƒXƒCƒbƒ`‚ð•ÏX
$game_self_switches[key] = (@parameters[1] == 0)
end
# ƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
$game_map.need_refresh = true
# Œp‘±
return true
end
#------------------------------------------
# œ ƒ^ƒCƒ}[‚Ì‘€ì
#------------------------------------------
def command_124
# n“®‚Ìê‡
if @parameters[0] == 0
$game_system.timer = @parameters[1] * Graphics.frame_rate
$game_system.timer_working = true
end
# ’â~‚Ìê‡
if @parameters[0] == 1
$game_system.timer_working = false
end
# Œp‘±
return true
end
#------------------------------------------
# œ ƒS[ƒ‹ƒh‚Ì‘Œ¸
#------------------------------------------
def command_125
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[0], @parameters[1], @parameters[2])
# ƒS[ƒ‹ƒh‚Ì‘Œ¸
$game_party.gain_gold(value)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒAƒCƒeƒ€‚Ì‘Œ¸
#------------------------------------------
def command_126
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
# ƒAƒCƒeƒ€‚Ì‘Œ¸
$game_party.gain_item(@parameters[0], value)
# Œp‘±
return true
end
#------------------------------------------
# œ •Ší‚Ì‘Œ¸
#------------------------------------------
def command_127
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
# •Ší‚Ì‘Œ¸
$game_party.gain_weapon(@parameters[0], value)
# Œp‘±
return true
end
#------------------------------------------
# œ –h‹ï‚Ì‘Œ¸
#------------------------------------------
def command_128
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
# –h‹ï‚Ì‘Œ¸
$game_party.gain_armor(@parameters[0], value)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒAƒNƒ^[‚Ì“ü‚ê‘Ö‚¦
#------------------------------------------
def command_129
# ƒAƒNƒ^[‚ð擾
actor = $game_actors[@parameters[0]]
# ƒAƒNƒ^[‚ª—LŒø‚Ìê‡
if actor != nil
# ‘€ì‚Å•ªŠò
if @parameters[1] == 0
if @parameters[2] == 1
$game_actors[@parameters[0]].setup(@parameters[0])
end
$game_party.add_actor(@parameters[0])
else
$game_party.remove_actor(@parameters[0])
end
end
# Œp‘±
return true
end
#------------------------------------------
# œ ƒEƒBƒ“ƒhƒEƒXƒLƒ“‚Ì•ÏX
#------------------------------------------
def command_131
# ƒEƒBƒ“ƒhƒEƒXƒLƒ“ ƒtƒ@ƒCƒ‹–¼‚ðÝ’è
$game_system.windowskin_name = @parameters[0]
# Œp‘±
return true
end
#------------------------------------------
# œ ƒoƒgƒ‹ BGM ‚Ì•ÏX
#------------------------------------------
def command_132
# ƒoƒgƒ‹ BGM ‚ðÝ’è
$game_system.battle_bgm = @parameters[0]
# Œp‘±
return true
end
#------------------------------------------
# œ ƒoƒgƒ‹I—¹ ME ‚Ì•ÏX
#------------------------------------------
def command_133
# ƒoƒgƒ‹I—¹ ME ‚ðÝ’è
$game_system.battle_end_me = @parameters[0]
# Œp‘±
return true
end
#------------------------------------------
# œ ƒZ[ƒu‹Ö~‚Ì•ÏX
#------------------------------------------
def command_134
# ƒZ[ƒu‹Ö~ƒtƒ‰ƒO‚ð•ÏX
$game_system.save_disabled = (@parameters[0] == 0)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒƒjƒ…[‹Ö~‚Ì•ÏX
#------------------------------------------
def command_135
# ƒƒjƒ…[‹Ö~ƒtƒ‰ƒO‚ð•ÏX
$game_system.menu_disabled = (@parameters[0] == 0)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒGƒ“ƒJƒEƒ“ƒg‹Ö~‚Ì•ÏX
#------------------------------------------
def command_136
# ƒGƒ“ƒJƒEƒ“ƒg‹Ö~ƒtƒ‰ƒO‚ð•ÏX
$game_system.encounter_disabled = (@parameters[0] == 0)
# ƒGƒ“ƒJƒEƒ“ƒg ƒJƒEƒ“ƒg‚ðì¬
$game_player.make_encounter_count
# Œp‘±
return true
end
end
# ¡ Interpreter (•ªŠ„’è‹` 4)
#----------------------------------------------
# @ƒCƒxƒ“ƒgƒRƒ}ƒ“ƒh‚ðÀs‚·‚éƒCƒ“ƒ^ƒvƒŠƒ^‚Å‚·B‚±‚̃Nƒ‰ƒX‚Í Game_System ƒNƒ‰
# ƒX‚â Game_Event ƒNƒ‰ƒX‚Ì“à•”‚Åg—p‚³‚ê‚Ü‚·B
#============================================
class Interpreter
#------------------------------------------
# œ ƒXƒCƒbƒ`‚Ì‘€ì
#------------------------------------------
def command_121
# ˆêŠ‡‘€ì‚Ì‚½‚߂Ƀ‹[ƒv
for i in @parameters[0] .. @parameters[1]
# ƒXƒCƒbƒ`‚ð•ÏX
$game_switches[i] = (@parameters[2] == 0)
end
# ƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
$game_map.need_refresh = true
# Œp‘±
return true
end
#------------------------------------------
# œ •Ï”‚Ì‘€ì
#------------------------------------------
def command_122
# ’l‚ð‰Šú‰»
value = 0
# ƒIƒyƒ‰ƒ“ƒh‚Å•ªŠò
case @parameters[3]
when 0 # ’è”
value = @parameters[4]
when 1 # •Ï”
value = $game_variables[@parameters[4]]
when 2 # —”
value = @parameters[4] + rand(@parameters[5] - @parameters[4] + 1)
when 3 # ƒAƒCƒeƒ€
value = $game_party.item_number(@parameters[4])
when 4 # ƒAƒNƒ^[
actor = $game_actors[@parameters[4]]
if actor != nil
case @parameters[5]
when 0 # ƒŒƒxƒ‹
value = actor.level
when 1 # EXP
value = actor.exp
when 2 # HP
value = actor.hp
when 3 # SP
value = actor.sp
when 4 # MaxHP
value = actor.maxhp
when 5 # MaxSP
value = actor.maxsp
when 6 # ˜r—Í
value = actor.str
when 7 # Ší—p‚³
value = actor.dex
when 8 # ‘f‘‚³
value = actor.agi
when 9 # –‚—Í
value = actor.int
when 10 # UŒ‚—Í
value = actor.atk
when 11 # •¨—–hŒä
value = actor.pdef
when 12 # –‚–@–hŒä
value = actor.mdef
when 13 # ‰ñ”ðC³
value = actor.eva
end
end
when 5 # ƒGƒlƒ~[
enemy = $game_troop.enemies[@parameters[4]]
if enemy != nil
case @parameters[5]
when 0 # HP
value = enemy.hp
when 1 # SP
value = enemy.sp
when 2 # MaxHP
value = enemy.maxhp
when 3 # MaxSP
value = enemy.maxsp
when 4 # ˜r—Í
value = enemy.str
when 5 # Ší—p‚³
value = enemy.dex
when 6 # ‘f‘‚³
value = enemy.agi
when 7 # –‚—Í
value = enemy.int
when 8 # UŒ‚—Í
value = enemy.atk
when 9 # •¨—–hŒä
value = enemy.pdef
when 10 # –‚–@–hŒä
value = enemy.mdef
when 11 # ‰ñ”ðC³
value = enemy.eva
end
end
when 6 # ƒLƒƒƒ‰ƒNƒ^[
character = get_character(@parameters[4])
if character != nil
case @parameters[5]
when 0 # X À•W
value = character.x
when 1 # Y À•W
value = character.y
when 2 # Œü‚«
value = character.direction
when 3 # ‰æ–Ê X À•W
value = character.screen_x
when 4 # ‰æ–Ê Y À•W
value = character.screen_y
when 5 # ’nŒ`ƒ^ƒO
value = character.terrain_tag
end
end
when 7 # ‚»‚Ì‘¼
case @parameters[4]
when 0 # ƒ}ƒbƒv ID
value = $game_map.map_id
when 1 # ƒp[ƒeƒBl”
value = $game_party.actors.size
when 2 # ƒS[ƒ‹ƒh
value = $game_party.gold
when 3 # •à”
value = $game_party.steps
when 4 # ƒvƒŒƒCŠÔ
value = Graphics.frame_count / Graphics.frame_rate
when 5 # ƒ^ƒCƒ}[
value = $game_system.timer / Graphics.frame_rate
when 6 # ƒZ[ƒu‰ñ”
value = $game_system.save_count
end
end
# ˆêŠ‡‘€ì‚Ì‚½‚߂Ƀ‹[ƒv
for i in @parameters[0] .. @parameters[1]
# ‘€ì‚Å•ªŠò
case @parameters[2]
when 0 # ‘ã“ü
$game_variables[i] = value
when 1 # ‰ÁZ
$game_variables[i] += value
when 2 # Œ¸Z
$game_variables[i] -= value
when 3 # æZ
$game_variables[i] *= value
when 4 # œZ
if value != 0
$game_variables[i] /= value
end
when 5 # è—]
if value != 0
$game_variables[i] %= value
end
end
# ãŒÀƒ`ƒFƒbƒN
if $game_variables[i] > 99999999
$game_variables[i] = 99999999
end
# ‰ºŒÀƒ`ƒFƒbƒN
if $game_variables[i] < -99999999
$game_variables[i] = -99999999
end
end
# ƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
$game_map.need_refresh = true
# Œp‘±
return true
end
#------------------------------------------
# œ ƒZƒ‹ƒtƒXƒCƒbƒ`‚Ì‘€ì
#------------------------------------------
def command_123
# ƒCƒxƒ“ƒg ID ‚ª—LŒø‚Ìê‡
if @event_id > 0
# ƒZƒ‹ƒtƒXƒCƒbƒ`‚̃L[‚ðì¬
key = [$game_map.map_id, @event_id, @parameters[0]]
# ƒZƒ‹ƒtƒXƒCƒbƒ`‚ð•ÏX
$game_self_switches[key] = (@parameters[1] == 0)
end
# ƒ}ƒbƒv‚ðƒŠƒtƒŒƒbƒVƒ…
$game_map.need_refresh = true
# Œp‘±
return true
end
#------------------------------------------
# œ ƒ^ƒCƒ}[‚Ì‘€ì
#------------------------------------------
def command_124
# n“®‚Ìê‡
if @parameters[0] == 0
$game_system.timer = @parameters[1] * Graphics.frame_rate
$game_system.timer_working = true
end
# ’â~‚Ìê‡
if @parameters[0] == 1
$game_system.timer_working = false
end
# Œp‘±
return true
end
#------------------------------------------
# œ ƒS[ƒ‹ƒh‚Ì‘Œ¸
#------------------------------------------
def command_125
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[0], @parameters[1], @parameters[2])
# ƒS[ƒ‹ƒh‚Ì‘Œ¸
$game_party.gain_gold(value)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒAƒCƒeƒ€‚Ì‘Œ¸
#------------------------------------------
def command_126
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
# ƒAƒCƒeƒ€‚Ì‘Œ¸
$game_party.gain_item(@parameters[0], value)
# Œp‘±
return true
end
#------------------------------------------
# œ •Ší‚Ì‘Œ¸
#------------------------------------------
def command_127
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
# •Ší‚Ì‘Œ¸
$game_party.gain_weapon(@parameters[0], value)
# Œp‘±
return true
end
#------------------------------------------
# œ –h‹ï‚Ì‘Œ¸
#------------------------------------------
def command_128
# ‘€ì‚·‚é’l‚ð擾
value = operate_value(@parameters[1], @parameters[2], @parameters[3])
# –h‹ï‚Ì‘Œ¸
$game_party.gain_armor(@parameters[0], value)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒAƒNƒ^[‚Ì“ü‚ê‘Ö‚¦
#------------------------------------------
def command_129
# ƒAƒNƒ^[‚ð擾
actor = $game_actors[@parameters[0]]
# ƒAƒNƒ^[‚ª—LŒø‚Ìê‡
if actor != nil
# ‘€ì‚Å•ªŠò
if @parameters[1] == 0
if @parameters[2] == 1
$game_actors[@parameters[0]].setup(@parameters[0])
end
$game_party.add_actor(@parameters[0])
else
$game_party.remove_actor(@parameters[0])
end
end
# Œp‘±
return true
end
#------------------------------------------
# œ ƒEƒBƒ“ƒhƒEƒXƒLƒ“‚Ì•ÏX
#------------------------------------------
def command_131
# ƒEƒBƒ“ƒhƒEƒXƒLƒ“ ƒtƒ@ƒCƒ‹–¼‚ðÝ’è
$game_system.windowskin_name = @parameters[0]
# Œp‘±
return true
end
#------------------------------------------
# œ ƒoƒgƒ‹ BGM ‚Ì•ÏX
#------------------------------------------
def command_132
# ƒoƒgƒ‹ BGM ‚ðÝ’è
$game_system.battle_bgm = @parameters[0]
# Œp‘±
return true
end
#------------------------------------------
# œ ƒoƒgƒ‹I—¹ ME ‚Ì•ÏX
#------------------------------------------
def command_133
# ƒoƒgƒ‹I—¹ ME ‚ðÝ’è
$game_system.battle_end_me = @parameters[0]
# Œp‘±
return true
end
#------------------------------------------
# œ ƒZ[ƒu‹Ö~‚Ì•ÏX
#------------------------------------------
def command_134
# ƒZ[ƒu‹Ö~ƒtƒ‰ƒO‚ð•ÏX
$game_system.save_disabled = (@parameters[0] == 0)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒƒjƒ…[‹Ö~‚Ì•ÏX
#------------------------------------------
def command_135
# ƒƒjƒ…[‹Ö~ƒtƒ‰ƒO‚ð•ÏX
$game_system.menu_disabled = (@parameters[0] == 0)
# Œp‘±
return true
end
#------------------------------------------
# œ ƒGƒ“ƒJƒEƒ“ƒg‹Ö~‚Ì•ÏX
#------------------------------------------
def command_136
# ƒGƒ“ƒJƒEƒ“ƒg‹Ö~ƒtƒ‰ƒO‚ð•ÏX
$game_system.encounter_disabled = (@parameters[0] == 0)
# ƒGƒ“ƒJƒEƒ“ƒg ƒJƒEƒ“ƒg‚ðì¬
$game_player.make_encounter_count
# Œp‘±
return true
end
end
Publicité