如何制作向驱魔香或者狂魔香一样的效果？ - Project1

#==============================================================================
#控制遇敌（暗雷） By: 希望化身
#==============================================================================
$dis_encounter = 0 #设置驱魔变量
$muti_encounter = 0 #设置狂魔变量
$muti_times = 2 #狂魔遇敌几率倍数
#==============================================================================
#-----基本使用方法(驱魔）：
#1.在数据库=>物品下建立物品名字任意
#2.设置物品运行公共事件 => 比如运行a号公共事件
#3.在数据库=>公共事件=>a号事件=>执行内容双击
#4.脚本=> 输入set_dis_encounter(b) 把b代换为你想让驱魔香工作的步数，如50步就输
# 入set_dis_encounter(50)
#-----基本使用方法(狂魔）：
#1.-3. 设置方法与驱魔相同
#4.脚本=> 输入set_muti_encounter(b) 把b代换为你想让狂魔魔香工作的步数，如50步就
# 输入set_dis_encounter(50)
#==============================================================================
def set_dis_encounter(steps)
if $muti_encounter > 0
$muti_encounter = 0
else
$dis_encounter = steps
end
end
def set_muti_encounter(steps)
if $dis_encounter > 0
$dis_encounter = 0
else
$muti_encounter = steps
end
end
def set_muti_times(times)
$muti_times = times
end
#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# 　處理主角的類別。事件啟動的判定、以及地圖的滾動等功能。
# 　本類別的實例請參考 $game_player。
#==============================================================================
class Game_Player < Game_Character
#--------------------------------------------------------------------------
# ● 畫面更新
#--------------------------------------------------------------------------
def update
# 本地變數記錄移動訊息
last_moving = moving?
# 移動中、事件執行中、強制移動路線中、
# 訊息視窗一個也不顯示的時候
unless moving? or $game_system.map_interpreter.running? or
@move_route_forcing or $game_temp.message_window_showing
# 如果方向鍵被按下、主角就朝那個方向移動
case Input.dir4
when 2
move_down
when 4
move_left
when 6
move_right
when 8
move_up
end
end
# 本地變數記憶座標
last_real_x = @real_x
last_real_y = @real_y
super
# 角色向下移動、畫面上的位置在中央下方的情況下
if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
# 畫面向下捲動
$game_map.scroll_down(@real_y - last_real_y)
end
# 角色向左移動、畫面上的位置在中央左方的情況下
if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
# 畫面向左捲動
$game_map.scroll_left(last_real_x - @real_x)
end
# 角色向右移動、畫面上的位置在中央右方的情況下
if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
# 畫面向右捲動
$game_map.scroll_right(@real_x - last_real_x)
end
# 角色向上移動、畫面上的位置在中央上方的情況下
if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
# 畫面向上捲動
$game_map.scroll_up(last_real_y - @real_y)
end
# 不在移動中的情況下
unless moving?
# 上次主角移動中的情況
if last_moving
# 與同位置的事件接觸就判定為事件啟動
result = check_event_trigger_here([1,2])
# 沒有可以啟動的事件的情況下
if result == false
# 偵錯模式為 ON 並且按下 CTRL 鍵的情況下除外
unless $DEBUG and Input.press?(Input::CTRL)
# 遇敵計數下降
if @encounter_count > 0
if $dis_encounter > 0
$dis_encounter -= 1
elsif $muti_encounter > 0
@encounter_count = [@encounter_count-$muti_times,0].max
$muti_encounter -= 1
else
@encounter_count -= 1
end
p @encounter_count
end
end
end
end
# 按下 C 鍵的情況下
if Input.trigger?(Input::C)
# 判定為同位置以及正面的事件啟動
check_event_trigger_here([0])
check_event_trigger_there([0,1,2])
end
end
end
end

复制代码