Project1

标题: [RM脚本] 逃跑放到技能里 [打印本页]

---

作者: ikki    时间: 2006-10-9 01:31
标题: [RM脚本] 逃跑放到技能里
脚本来源：日本KGC网站
脚本说明：就是一个技能，技能威力设置为大于0的数值才起作用，效果为角色逃跑。{/gg}
逃跑公式：逃跑成功率*技能威力
插入在MAIN的前面，设置一个属性叫做逃跑，拥有逃跑属性的技能即为逃跑技能。

1. 
   
2. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
3. #_/　　◆逃走スキル － KGC_EscapeSkill◆
   
4. #_/----------------------------------------------------------------------------
   
5. #_/　逃走効果を持つスキルを作成します。
   
6. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
7. 
   
8. $imported = {} if $imported == nil
   
9. $imported["EscapeSkill"] = true
   
10. 
    
11. if $game_special_elements == nil
    
12.   $game_special_elements = {}
    
13.   $data_system = load_data("Data/System.rxdata")
    
14. end
    
15. # 逃走スキル属性
    
16. $game_special_elements["skill_escape"] = $data_system.elements.index("逃跑")
    
17. 
    
18. #==============================================================================
    
19. # ■ Scene_Battle (分割定義 2)
    
20. #==============================================================================
    
21. 
    
22. class Scene_Battle
    
23.   #--------------------------------------------------------------------------
    
24.   # ● フレーム更新 (パーティコマンドフェーズ : 逃げる)
    
25.   #--------------------------------------------------------------------------
    
26.   alias update_phase2_escape_KGC_EscapeSkill update_phase2_escape
    
27.   def update_phase2_escape(skill = nil)
    
28.     # スキルでない場合は元の処理を実行
    
29.     if skill == nil
    
30.       update_phase2_escape_KGC_EscapeSkill
    
31.       return
    
32.     end
    
33. 
    
34.     # 逃走できない場合は戻る
    
35.     return unless $game_temp.battle_can_escape
    
36. 
    
37.     # エネミーの素早さ平均値を計算
    
38.     enemies_agi, enemies_number = 0, 0
    
39.     for enemy in $game_troop.enemies
    
40.       next unless enemy.exist?
    
41.       enemies_agi += enemy.agi
    
42.       enemies_number += 1
    
43.     end
    
44.     enemies_agi /= enemies_number if enemies_number > 0
    
45.     # アクターの素早さ平均値を計算
    
46.     actors_agi, actors_number = 0, 0
    
47.     for actor in $game_party.actors
    
48.       next unless actor.exist?
    
49.       actors_agi += actor.agi
    
50.       actors_number += 1
    
51.     end
    
52.     actors_agi /= actors_number if actors_number > 0
    
53.     # 成功率計算
    
54.     prob = 50 * actors_agi / [enemies_agi, 1].max
    
55.     # スキルの場合は倍率を掛ける
    
56.     prob = prob * skill.power / 100 if skill != nil
    
57.     # 逃走成功判定
    
58.     success = rand(100) < prob
    
59.     # 逃走成功の場合
    
60.     if success
    
61.       # 逃走 SE を演奏
    
62.       $game_system.se_play($data_system.escape_se)
    
63.       # バトル開始前の BGM に戻す
    
64.       $game_system.bgm_play($game_temp.map_bgm)
    
65.       # バトル終了
    
66.       battle_end(1)
    
67.     # 逃走失敗の場合
    
68.     else
    
69.       # 戻る
    
70.       return
    
71.     end
    
72.   end
    
73. end
    
74. 
    
75. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
76. 
    
77. #==============================================================================
    
78. # ■ Scene_Battle (分割定義 4)
    
79. #==============================================================================
    
80. 
    
81. class Scene_Battle
    
82.   #--------------------------------------------------------------------------
    
83.   # ● フレーム更新 (メインフェーズ ステップ 5 : ダメージ表示)
    
84.   #--------------------------------------------------------------------------
    
85.   alias update_phase4_step5_KGC_EscapeSkill update_phase4_step5
    
86.   def update_phase4_step5
    
87.     # 逃走スキル判定
    
88.     if @active_battler.current_action.kind == 1 &&
    
89.         @active_battler.current_action.skill_id > 0
    
90.       skill = $data_skills[@active_battler.current_action.skill_id]
    
91.       if skill.element_set.include?($game_special_elements["skill_escape"])
    
92.         # 逃走判定
    
93.         update_phase2_escape(skill)
    
94.         unless $scene.is_a?(Scene_Battle)
    
95.           @phase4_step = 1
    
96.           return
    
97.         end
    
98.       end
    
99.     end
    
100. 
     
101.     # 元の処理を実行
     
102.     update_phase4_step5_KGC_EscapeSkill
     
103.   end
     
104. end
     

复制代码

---

作者: ikki    时间: 2006-10-9 01:31
标题: [RM脚本] 逃跑放到技能里
脚本来源：日本KGC网站
脚本说明：就是一个技能，技能威力设置为大于0的数值才起作用，效果为角色逃跑。{/gg}
逃跑公式：逃跑成功率*技能威力
插入在MAIN的前面，设置一个属性叫做逃跑，拥有逃跑属性的技能即为逃跑技能。

1. 
   
2. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
3. #_/　　◆逃走スキル － KGC_EscapeSkill◆
   
4. #_/----------------------------------------------------------------------------
   
5. #_/　逃走効果を持つスキルを作成します。
   
6. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
7. 
   
8. $imported = {} if $imported == nil
   
9. $imported["EscapeSkill"] = true
   
10. 
    
11. if $game_special_elements == nil
    
12.   $game_special_elements = {}
    
13.   $data_system = load_data("Data/System.rxdata")
    
14. end
    
15. # 逃走スキル属性
    
16. $game_special_elements["skill_escape"] = $data_system.elements.index("逃跑")
    
17. 
    
18. #==============================================================================
    
19. # ■ Scene_Battle (分割定義 2)
    
20. #==============================================================================
    
21. 
    
22. class Scene_Battle
    
23.   #--------------------------------------------------------------------------
    
24.   # ● フレーム更新 (パーティコマンドフェーズ : 逃げる)
    
25.   #--------------------------------------------------------------------------
    
26.   alias update_phase2_escape_KGC_EscapeSkill update_phase2_escape
    
27.   def update_phase2_escape(skill = nil)
    
28.     # スキルでない場合は元の処理を実行
    
29.     if skill == nil
    
30.       update_phase2_escape_KGC_EscapeSkill
    
31.       return
    
32.     end
    
33. 
    
34.     # 逃走できない場合は戻る
    
35.     return unless $game_temp.battle_can_escape
    
36. 
    
37.     # エネミーの素早さ平均値を計算
    
38.     enemies_agi, enemies_number = 0, 0
    
39.     for enemy in $game_troop.enemies
    
40.       next unless enemy.exist?
    
41.       enemies_agi += enemy.agi
    
42.       enemies_number += 1
    
43.     end
    
44.     enemies_agi /= enemies_number if enemies_number > 0
    
45.     # アクターの素早さ平均値を計算
    
46.     actors_agi, actors_number = 0, 0
    
47.     for actor in $game_party.actors
    
48.       next unless actor.exist?
    
49.       actors_agi += actor.agi
    
50.       actors_number += 1
    
51.     end
    
52.     actors_agi /= actors_number if actors_number > 0
    
53.     # 成功率計算
    
54.     prob = 50 * actors_agi / [enemies_agi, 1].max
    
55.     # スキルの場合は倍率を掛ける
    
56.     prob = prob * skill.power / 100 if skill != nil
    
57.     # 逃走成功判定
    
58.     success = rand(100) < prob
    
59.     # 逃走成功の場合
    
60.     if success
    
61.       # 逃走 SE を演奏
    
62.       $game_system.se_play($data_system.escape_se)
    
63.       # バトル開始前の BGM に戻す
    
64.       $game_system.bgm_play($game_temp.map_bgm)
    
65.       # バトル終了
    
66.       battle_end(1)
    
67.     # 逃走失敗の場合
    
68.     else
    
69.       # 戻る
    
70.       return
    
71.     end
    
72.   end
    
73. end
    
74. 
    
75. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
76. 
    
77. #==============================================================================
    
78. # ■ Scene_Battle (分割定義 4)
    
79. #==============================================================================
    
80. 
    
81. class Scene_Battle
    
82.   #--------------------------------------------------------------------------
    
83.   # ● フレーム更新 (メインフェーズ ステップ 5 : ダメージ表示)
    
84.   #--------------------------------------------------------------------------
    
85.   alias update_phase4_step5_KGC_EscapeSkill update_phase4_step5
    
86.   def update_phase4_step5
    
87.     # 逃走スキル判定
    
88.     if @active_battler.current_action.kind == 1 &&
    
89.         @active_battler.current_action.skill_id > 0
    
90.       skill = $data_skills[@active_battler.current_action.skill_id]
    
91.       if skill.element_set.include?($game_special_elements["skill_escape"])
    
92.         # 逃走判定
    
93.         update_phase2_escape(skill)
    
94.         unless $scene.is_a?(Scene_Battle)
    
95.           @phase4_step = 1
    
96.           return
    
97.         end
    
98.       end
    
99.     end
    
100. 
     
101.     # 元の処理を実行
     
102.     update_phase4_step5_KGC_EscapeSkill
     
103.   end
     
104. end
     

复制代码

---

作者: 轮回者    时间: 2006-10-9 03:14
没人理？我支持一下……

---

作者: 叼烟的男孩    时间: 2006-10-9 03:22
试试效果怎么样
好的话再顶

---

作者: kira    时间: 2006-10-9 08:35
做一个这样的技能用得到脚本吗{/gg}

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1