设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 2087|回复: 8

[RM脚本] 敌人颜色变化表示血量多少

 关闭 [复制链接]

Lv1.梦旅人

放逐者

梦石
0
星屑
50
在线时间
0 小时
注册时间
2006-1-31
帖子
258
发表于 2006-4-14 02:36:17 | 显示全部楼层 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
一个怪异的脚本,本人还没有见过这样的游戏~~

喜欢的来看看:

预览图:


脚本内容:
#バトラー色調変化
#
#バトラーの残りHPに応じて色調を変化させます。
#
#2005.4.14 バグ修正
#HPが減った状態で戦闘をはじめた時
#アクターの色調が変化してないバグを修正。

module Momo_Change_Tone
  # 味方の色調変化をするか?
  ACTOR_CHANGE_TONE = false
  # 敵の色調変化をするか?
  ENEMY_CHANGE_TONE = true
  # 色調の赤成分
  TONE_RED   = 128
  # 色調の緑成分
  TONE_GREEN = 0
  # 色調の青成分
  TONE_BLUE  = 0
end

class Game_Battler
  attr_accessor :tone_change
  alias game_battler_change_color_initialize initialize
  def initialize
    game_battler_change_color_initialize
    # 色調変化要求フラグ
    @tone_change = false
  end
end

class Sprite_Battler < RPG::Sprite
  alias sprite_battler_change_color_initialize initialize
  def initialize(viewport, battler = nil)
    sprite_battler_change_color_initialize(viewport, battler)
    @change_tone = Tone.new(0, 0, 0)
  end
  alias sprite_battler_change_color_update update
  def update
    sprite_battler_change_color_update
    tone_update
  end
  def tone_update
    if @battler != nil
      if rest_hp_tone_change?
        if @battler.tone_change
          rest_hp_tone_change_set
          @battler.tone_change = false
        end
        self.tone = @change_tone
      end
    end
  end
  # 色調変化可能かどうか
  def rest_hp_tone_change?
    if (Momo_Change_Tone::ACTOR_CHANGE_TONE and @battler.is_a?(Game_Actor)) or
       (Momo_Change_Tone::ENEMY_CHANGE_TONE and @battler.is_a?(Game_Enemy))
      return true
    end
    return false
  end
  # 残りHPに応じて色調を変更
  def rest_hp_tone_change_set
    hp_rate = (@battler.hp.to_f / @battler.maxhp) * 100
    rate = 100 - hp_rate
    red   = Momo_Change_Tone::TONE_RED * rate / 100
    green = Momo_Change_Tone::TONE_GREEN * rate / 100
    blue  = Momo_Change_Tone::TONE_BLUE * rate / 100
    @change_tone.set(red, green, blue)
  end
end

class Spriteset_Battle
  alias spriteset_battle_change_color_initialize initialize
  def initialize
    spriteset_battle_change_color_initialize
    # アクタースプライトの更新
    for sprite in @actor_sprites
      if !sprite.battler.nil?
        sprite.battler.tone_change = true
        sprite.update
      end
    end
  end
end

class Scene_Battle
  alias scene_battle_change_color_update_phase4_step5 update_phase4_step5
  def update_phase4_step5
    scene_battle_change_color_update_phase4_step5
    # ダメージ表示時に色調変更要求フラグを立てる
    for target in @target_battlers
      target.tone_change = true
    end
  end
end

Lv1.梦旅人

放逐者

梦石
0
星屑
50
在线时间
0 小时
注册时间
2006-1-31
帖子
258
 楼主| 发表于 2006-4-14 02:36:17 | 显示全部楼层 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
一个怪异的脚本,本人还没有见过这样的游戏~~

喜欢的来看看:

预览图:


脚本内容:
#バトラー色調変化
#
#バトラーの残りHPに応じて色調を変化させます。
#
#2005.4.14 バグ修正
#HPが減った状態で戦闘をはじめた時
#アクターの色調が変化してないバグを修正。

module Momo_Change_Tone
  # 味方の色調変化をするか?
  ACTOR_CHANGE_TONE = false
  # 敵の色調変化をするか?
  ENEMY_CHANGE_TONE = true
  # 色調の赤成分
  TONE_RED   = 128
  # 色調の緑成分
  TONE_GREEN = 0
  # 色調の青成分
  TONE_BLUE  = 0
end

class Game_Battler
  attr_accessor :tone_change
  alias game_battler_change_color_initialize initialize
  def initialize
    game_battler_change_color_initialize
    # 色調変化要求フラグ
    @tone_change = false
  end
end

class Sprite_Battler < RPG::Sprite
  alias sprite_battler_change_color_initialize initialize
  def initialize(viewport, battler = nil)
    sprite_battler_change_color_initialize(viewport, battler)
    @change_tone = Tone.new(0, 0, 0)
  end
  alias sprite_battler_change_color_update update
  def update
    sprite_battler_change_color_update
    tone_update
  end
  def tone_update
    if @battler != nil
      if rest_hp_tone_change?
        if @battler.tone_change
          rest_hp_tone_change_set
          @battler.tone_change = false
        end
        self.tone = @change_tone
      end
    end
  end
  # 色調変化可能かどうか
  def rest_hp_tone_change?
    if (Momo_Change_Tone::ACTOR_CHANGE_TONE and @battler.is_a?(Game_Actor)) or
       (Momo_Change_Tone::ENEMY_CHANGE_TONE and @battler.is_a?(Game_Enemy))
      return true
    end
    return false
  end
  # 残りHPに応じて色調を変更
  def rest_hp_tone_change_set
    hp_rate = (@battler.hp.to_f / @battler.maxhp) * 100
    rate = 100 - hp_rate
    red   = Momo_Change_Tone::TONE_RED * rate / 100
    green = Momo_Change_Tone::TONE_GREEN * rate / 100
    blue  = Momo_Change_Tone::TONE_BLUE * rate / 100
    @change_tone.set(red, green, blue)
  end
end

class Spriteset_Battle
  alias spriteset_battle_change_color_initialize initialize
  def initialize
    spriteset_battle_change_color_initialize
    # アクタースプライトの更新
    for sprite in @actor_sprites
      if !sprite.battler.nil?
        sprite.battler.tone_change = true
        sprite.update
      end
    end
  end
end

class Scene_Battle
  alias scene_battle_change_color_update_phase4_step5 update_phase4_step5
  def update_phase4_step5
    scene_battle_change_color_update_phase4_step5
    # ダメージ表示時に色調変更要求フラグを立てる
    for target in @target_battlers
      target.tone_change = true
    end
  end
end

Lv1.梦旅人

指舞飞扬

梦石
0
星屑
50
在线时间
0 小时
注册时间
2006-3-5
帖子
508
发表于 2006-4-14 02:41:53 | 显示全部楼层
LZ发的这些脚本应该有不少人看过的了~~
个人感觉这些脚本没啥实用性(个人观点)~~~~
世界真奇妙~啥鸟人都有/:|~
回复 支持 反对

使用道具 举报

Lv1.梦旅人

放逐者

梦石
0
星屑
50
在线时间
0 小时
注册时间
2006-1-31
帖子
258
 楼主| 发表于 2006-4-14 02:49:19 | 显示全部楼层
以下引用兰色枫叶于2006-4-13 18:41:53的发言:

LZ发的这些脚本应该有不少人看过的了~~
个人感觉这些脚本没啥实用性(个人观点)~~~~

站上有人发过吗?要是没有的话,我弄来也无妨~
回复 支持 反对

使用道具 举报

Lv1.梦旅人

指舞飞扬

梦石
0
星屑
50
在线时间
0 小时
注册时间
2006-3-5
帖子
508
发表于 2006-4-14 02:53:55 | 显示全部楼层
以下引用小白一个于2006-4-13 18:49:19的发言:
站上有人发过吗?要是没有的话,我弄来也无妨~

偶没有什么其他意思~~
只是觉得比较好的脚本都在主站上了~~
世界真奇妙~啥鸟人都有/:|~
回复 支持 反对

使用道具 举报

Lv1.梦旅人

放逐者

梦石
0
星屑
50
在线时间
0 小时
注册时间
2006-1-31
帖子
258
 楼主| 发表于 2006-4-14 02:54:44 | 显示全部楼层
以下引用兰色枫叶于2006-4-13 18:53:55的发言:


以下引用小白一个于2006-4-13 18:49:19的发言:
站上有人发过吗?要是没有的话,我弄来也无妨~


偶没有什么其他意思~~
只是觉得比较好的脚本都在主站上了~~

共享而已
回复 支持 反对

使用道具 举报

Lv1.梦旅人

有事烧纸

梦石
0
星屑
149
在线时间
508 小时
注册时间
2005-10-22
帖子
6982

贵宾VX城市地图大赛冠军第1届RMTV比赛冠军第1届TG大赛冠军

发表于 2006-4-14 03:07:35 | 显示全部楼层
樱雅的脚本。。。。冲突一堆,不用了。。。。。
神隐中,偶尔诈尸
回复 支持 反对

使用道具 举报

Lv1.梦旅人

66RPG站长

梦石
0
星屑
54
在线时间
615 小时
注册时间
2005-10-10
帖子
5734

RMVX自由创作大赛亚军第2届短篇游戏比赛亚军第5届短篇游戏比赛冠军

发表于 2006-4-15 09:18:20 | 显示全部楼层
很有趣的创意……顺着想想……
回复 支持 反对

使用道具 举报

Lv1.梦旅人

富有责任感的好版主

梦石
0
星屑
50
在线时间
0 小时
注册时间
2005-11-15
帖子
347

贵宾

发表于 2006-4-15 19:09:13 | 显示全部楼层
SFC上我唯一一个通关的RPG鲁多拉秘宝就有过这个设定
广告
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:fux2@moe9th.com|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2020-2-22 19:16

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表