幻想森林

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 2453|回复: 13

[RMVX] 脚本功能:蹦字文章

[复制链接]

193

主题

902

帖子

9515

积分

⑦老手

請堅持『人的尊重』

积分
9515
发表于 2006-11-26 20:31:50 | 显示全部楼层 |阅读模式
#脚本功能:蹦字文章
#使用方法:替换Window_Message类,其中打####的行是我修改过的,具体内容可以参看注释
#效果:变为类似RM2003的对话效果,一个字一个字蹦
#版权:未知,有任何版权纠纷,本站不负任何责任。


#############################################################################
    #$game_system.se_play($data_system.decision_se) #去掉#可以有声效,也可自定义声效
#############################################################################
    return
    end
  end
  if $game_temp.choice_max > 0
    @item_max = $game_temp.choice_max
    self.active = true
    self.index = 0
  end
  if $game_temp.num_input_variable_id > 0
    digits_max = $game_temp.num_input_digits_max
    number = $game_variables[$game_temp.num_input_variable_id]
    @input_number_window = Window_InputNumber.new(digits_max)
    @input_number_window.number = number
    @input_number_window.x = self.x + 8
    @input_number_window.y = self.y + $game_temp.num_input_start * 32
  end
  @update_text = false #š
end
# ------------------------------------

我去了 #也沒有声效. [s:3]
真實的我沒有一個不『沖動』, 誰在阻擋我發言~『我憤怒』. 誰在發言辱罵我,請堅持『人的尊重』.
回复

使用道具 举报

好人卡的 该用户已被删除
发表于 2006-11-26 20:36:29 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

193

主题

902

帖子

9515

积分

⑦老手

請堅持『人的尊重』

积分
9515
 楼主| 发表于 2006-11-26 20:43:36 | 显示全部楼层
在data_system.decision_se)设定嗎?
真實的我沒有一個不『沖動』, 誰在阻擋我發言~『我憤怒』. 誰在發言辱罵我,請堅持『人的尊重』.
回复 支持 反对

使用道具 举报

好人卡的 该用户已被删除
发表于 2006-11-26 20:53:59 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

193

主题

902

帖子

9515

积分

⑦老手

請堅持『人的尊重』

积分
9515
 楼主| 发表于 2006-11-26 20:57:52 | 显示全部楼层
這個【字下阴影】的脚本如何把他写入原有换Window_Message的脚本里.

#==============================================================================
# ■ Window_Message
#------------------------------------------------------------------------------
#  显示文章的信息窗口。
#==============================================================================

class Window_Message < Window_Selectable
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
  self.contents.clear
  self.contents.font.color = normal_color
  x = y = 0
  @cursor_width = 0
  # 到选择项的下一行字
  if $game_temp.choice_start == 0
    x = 8
  end
  # 有等待显示的文字的情况下
  if $game_temp.message_text != nil
    text = $game_temp.message_text
    # 限制文字处理
    begin
      last_text = text.clone
      text.gsub!(/\\\\[Vv]\\[([0-9]+)\\]/) { $game_variables[$1.to_i] }
    end until text == last_text
    text.gsub!(/\\\\[Nn]\\[([0-9]+)\\]/) do
      $game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
    end
    # 为了方便、将 "\\\\\\\\" 变换为 "\\000"
    text.gsub!(/\\\\\\\\/) { "\\000" }
    # "\\\\C" 变为 "\\001" に、"\\\\G" 变为 "\\002"
    text.gsub!(/\\\\[Cc]\\[([0-9]+)\\]/) { "\\001[#{$1}]" }
    text.gsub!(/\\\\[Gg]/) { "\\002" }
    # c 获取 1 个字 (如果不能取得文字就循环)
    while ((c = text.slice!(/./m)) != nil)
      # \\\\ 的情况下
      if c == "\\000"
        # 还原为本来的文字
        c = "\\\\"
      end
      # \\C[n] 的情况下
      if c == "\\001"
        # 更改文字色
        text.sub!(/\\[([0-9]+)\\]/, "")
        color = $1.to_i
        if color >= 0 and color <= 7
          self.contents.font.color = text_color(color)
        end
        # 下面的文字
        next
      end
      # \\G 的情况下
      if c == "\\002"
        # 生成金钱窗口
        if @gold_window == nil
          @gold_window = Window_Gold.new
          @gold_window.x = 560 - @gold_window.width
          if $game_temp.in_battle
            @gold_window.y = 192
          else
            @gold_window.y = self.y >= 128 ? 32 : 384
          end
          @gold_window.opacity = self.opacity
          @gold_window.back_opacity = self.back_opacity
        end
        # 下面的文字
        next
      end
      # 另起一行文字的情况下
      if c == "\\n"
        # 刷新选择项及光标的高
        if y >= $game_temp.choice_start
          @cursor_width = [@cursor_width, x].max
        end
        # y 加 1
        y += 1
        x = 0
        # 移动到选择项的下一行
        if y >= $game_temp.choice_start
          x = 8
        end
        # 下面的文字
        next
      end
      # 描绘文字
      for i in 0...self.contents.font.size/2
        self.contents.font.color = Color.new(255,255,255 - 255/self.contents.font.size * i,255)
        rect = Rect.new(4 + x, 32 * y, 40, self.contents.font.size-i*2)
        self.contents.draw_text(rect, c)      
      end
      # x 为要描绘文字的加法运算
      x += self.contents.text_size(c).width
    end
  end
  # 选择项的情况
  if $game_temp.choice_max > 0
    @item_max = $game_temp.choice_max
    self.active = true
    self.index = 0
  end
  # 输入数值的情况
  if $game_temp.num_input_variable_id > 0
    digits_max = $game_temp.num_input_digits_max
    number = $game_variables[$game_temp.num_input_variable_id]
    @input_number_window = Window_InputNumber.new(digits_max)
    @input_number_window.number = number
    @input_number_window.x = self.x + 8
    @input_number_window.y = self.y + $game_temp.num_input_start * 32
  end
end
end
真實的我沒有一個不『沖動』, 誰在阻擋我發言~『我憤怒』. 誰在發言辱罵我,請堅持『人的尊重』.
回复 支持 反对

使用道具 举报

好人卡的 该用户已被删除
发表于 2006-11-26 21:00:01 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

193

主题

902

帖子

9515

积分

⑦老手

請堅持『人的尊重』

积分
9515
 楼主| 发表于 2006-11-26 21:09:29 | 显示全部楼层
#脚本功能:蹦字文章
#使用方法:替换Window_Message类,其中打####的行是我修改过的,具体内容可以参看注释
#效果:变为类似RM2003的对话效果,一个字一个字蹦
#版权:未知,有任何版权纠纷,本站不负任何责任。
class Window_Message < Window_Selectable
# ------------------------------------
def initialize
  super(0, 0, 652, 123)
  self.contents = Bitmap.new(width - 32, height - 32)
  self.visible = false
  self.z = 180
  @update_text = true
  @fade_in = false
  @fade_out = false
  @contents_showing = false
  @cursor_width = 0
#############################################################################
  @wait_count = 0
#############################################################################
  self.active = false
  self.index = -1
end
# ------------------------------------
def dispose
  terminate_message
  $game_temp.message_window_showing = false
  if @input_number_window != nil
    @input_number_window.dispose
  end
  super
end
# ------------------------------------
def terminate_message
  self.active = false
  self.pause = false
  self.index = -1
  self.contents.clear
  @update_text = true
  @contents_showing = false
  if $game_temp.message_proc != nil
    $game_temp.message_proc.call
  end
  $game_temp.message_text = nil
  $game_temp.message_proc = nil
  $game_temp.choice_start = 99
  $game_temp.choice_max = 0
  $game_temp.choice_cancel_type = 0
  $game_temp.choice_proc = nil
  $game_temp.num_input_start = 99
  $game_temp.num_input_variable_id = 0
  $game_temp.num_input_digits_max = 0
  if @gold_window != nil
    @gold_window.dispose
    @gold_window = nil
  end
end
# ------------------------------------
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
self.contents.font.color = normal_color
x = y = 0
@cursor_width = 0
# 到选择项的下一行字
if $game_temp.choice_start == 0
  x = 8
end
# 有等待显示的文字的情况下
if $game_temp.message_text != nil
  text = $game_temp.message_text
  # 限制文字处理
  begin
    last_text = text.clone
    text.gsub!(/\\\\[Vv]\\[([0-9]+)\\]/) { $game_variables[$1.to_i] }
  end until text == last_text
  text.gsub!(/\\\\[Nn]\\[([0-9]+)\\]/) do
    $game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
  end
  # 为了方便、将 "\\\\\\\\" 变换为 "\\000"
  text.gsub!(/\\\\\\\\/) { "\\000" }
  # "\\\\C" 变为 "\\001" に、"\\\\G" 变为 "\\002"
  text.gsub!(/\\\\[Cc]\\[([0-9]+)\\]/) { "\\001[#{$1}]" }
  text.gsub!(/\\\\[Gg]/) { "\\002" }
  # c 获取 1 个字 (如果不能取得文字就循环)
  while ((c = text.slice!(/./m)) != nil)
    # \\\\ 的情况下
    if c == "\\000"
    # 还原为本来的文字
    c = "\\\\"
    end
    # \\C[n] 的情况下
    if c == "\\001"
    # 更改文字色
    text.sub!(/\\[([0-9]+)\\]/, "")
    color = $1.to_i
    if color >= 0 and color <= 7
      self.contents.font.color = text_color(color)
    end
    # 下面的文字
    next
    end
    # \\G 的情况下
    if c == "\\002"
    # 生成金钱窗口
    if @gold_window == nil
      @gold_window = Window_Gold.new
      @gold_window.x = 560 - @gold_window.width
      if $game_temp.in_battle
        @gold_window.y = 192
      else
        @gold_window.y = self.y >= 128 ? 32 : 384
      end
      @gold_window.opacity = self.opacity
      @gold_window.back_opacity = self.back_opacity
    end
    # 下面的文字
    next
    end
    # 另起一行文字的情况下
    if c == "\\n"
    # 刷新选择项及光标的高
    if y >= $game_temp.choice_start
      @cursor_width = [@cursor_width, x].max
    end
    # y 加 1
    y += 1
    x = 0
    # 移动到选择项的下一行
    if y >= $game_temp.choice_start
      x = 8
    end
    # 下面的文字
    next
    end
    # 描绘文字
    for i in 0...self.contents.font.size/2
    self.contents.font.color = Color.new(255,255,255 - 255/self.contents.font.size * i,255)
    rect = Rect.new(4 + x, 32 * y, 40, self.contents.font.size-i*2)
    self.contents.draw_text(rect, c)     
    end
    # x 为要描绘文字的加法运算
    x += self.contents.text_size(c).width
  end
end
# 选择项的情况
if $game_temp.choice_max > 0
  @item_max = $game_temp.choice_max
  self.active = true
  self.index = 0
end
# 输入数值的情况
if $game_temp.num_input_variable_id > 0
  digits_max = $game_temp.num_input_digits_max
  number = $game_variables[$game_temp.num_input_variable_id]
  @input_number_window = Window_InputNumber.new(digits_max)
  @input_number_window.number = number
  @input_number_window.x = self.x + 8
  @input_number_window.y = self.y + $game_temp.num_input_start * 32
end
end
end
# ------------------------------------

def reset_window
  if $game_temp.in_battle
    self.y = 16
  else
    case $game_system.message_position
    when 0
    self.y = 16
    when 1
    self.y = 160
    when 2
    self.y = 360
    end
  end
  if $game_system.message_frame == 0
    self.opacity = 255
  else
    self.opacity = 0
  end
  self.back_opacity = 160
end
# ------------------------------------
def update_text
  if @text != nil
#############################################################################
    @wait_count = 3   #此处修改字的弹出速度,改为0为每桢一个字,2为每3桢一个字,越大越慢
#############################################################################
    while ((c = @text.slice!(/./m)) != nil)
    if c == "\\000"
      c = "\\\\"
    end
    if c == "\\001"
      @text.sub!(/\\[([0-9]+)\\]/, "")
      color = $1.to_i
      if color >= 0 and color <= 7
        self.contents.font.color = text_color(color)
      end
    end
    if c == "\\002"
      if @gold_window == nil
        @gold_window = Window_Gold.new
        @gold_window.x = 560 - @gold_window.width
        if $game_temp.in_battle
        @gold_window.y = 192
        else
        @gold_window.y = self.y >= 128 ? 32 : 384
        end
        @gold_window.opacity = self.opacity
        @gold_window.back_opacity = self.back_opacity
      end
      next
    end
    if c == "\\n"
      if @y >= $game_temp.choice_start
        @cursor_width = [@cursor_width, @x].max
      end
      @y += 1
      @x = 0
      if @y >= $game_temp.choice_start
        @x = 8
      end
      next
    end
    self.contents.draw_text(4 + @x, 32 * @y, 40, 32, c)
    @x += self.contents.text_size(c).width
#############################################################################
    $game_system.se_play($data_system.decision_se) #去掉#可以有声效,也可自定义声效
#############################################################################
    return
    end
  end
  if $game_temp.choice_max > 0
    @item_max = $game_temp.choice_max
    self.active = true
    self.index = 0
  end
  if $game_temp.num_input_variable_id > 0
    digits_max = $game_temp.num_input_digits_max
    number = $game_variables[$game_temp.num_input_variable_id]
    @input_number_window = Window_InputNumber.new(digits_max)
    @input_number_window.number = number
    @input_number_window.x = self.x + 8
    @input_number_window.y = self.y + $game_temp.num_input_start * 32
  end
  @update_text = false #š
end
# ------------------------------------
def update
  super
  if @fade_in
    self.contents_opacity = 255
    if @input_number_window != nil
    @input_number_window.contents_opacity = 255
    end
    if self.contents_opacity == 255
    @fade_in = false
    end
  end
  if @input_number_window != nil
    @input_number_window.update
    if Input.trigger?(Input::C)
    $game_system.se_play($data_system.decision_se)
    $game_variables[$game_temp.num_input_variable_id] =
      @input_number_window.number
    $game_map.need_refresh = true
    @input_number_window.dispose
    @input_number_window = nil
    terminate_message
    end
    return
  end
  if @contents_showing
#############################################################################
    if @update_text
    if @wait_count == 0
      update_text
      return
    else
      @wait_count -=1
      return
    end
    end
#############################################################################
    if $game_temp.choice_max == 0
    self.pause = true
    end
    if self.pause == true && Input.dir4 != 0
    terminate_message
    end
    if Input.trigger?(Input::B)
    if $game_temp.choice_max > 0 and $game_temp.choice_cancel_type > 0
      $game_system.se_play($data_system.cancel_se)
      $game_temp.choice_proc.call($game_temp.choice_cancel_type - 1)
      terminate_message
    end
    terminate_message if self.pause == true
    end
    if Input.trigger?(Input::C)
    if $game_temp.choice_max > 0
      $game_system.se_play($data_system.decision_se)
      $game_temp.choice_proc.call(self.index)
    end
    terminate_message
    end
    return
  end
  if @fade_out == false and $game_temp.message_text != nil
    @contents_showing = true
    $game_temp.message_window_showing = true
    reset_window
    refresh
    Graphics.frame_reset
    self.visible = true
    self.contents_opacity = 0
    if @input_number_window != nil
    @input_number_window.contents_opacity = 0
    end
    @fade_in = true
    return
  end
  if self.visible
    @fade_out = true
    self.opacity = 0
    if self.opacity == 0
    self.visible = false
    @fade_out = false
    $game_temp.message_window_showing = false
    end
    return
  end
end
# ------------------------------------
def update_cursor_rect
  if @index >= 0
    n = $game_temp.choice_start + @index
    self.cursor_rect.set(8, n * 32, @cursor_width, 32)
  else
    self.cursor_rect.empty
  end
end
我用了.對話時全卡子. [s:6]
真實的我沒有一個不『沖動』, 誰在阻擋我發言~『我憤怒』. 誰在發言辱罵我,請堅持『人的尊重』.
回复 支持 反对

使用道具 举报

38

主题

3468

帖子

1

积分

超级版主

传说中的Bunny火神~!

Rank: 8Rank: 8

积分
1
发表于 2006-11-26 21:12:32 | 显示全部楼层
我用了.對話時全卡子.

听不懂。 [s:5]
我突然发现,我是一个很幸运的好人。老婆真好~ 点我进入JQ(激情)教程范例收集!
回复 支持 反对

使用道具 举报

193

主题

902

帖子

9515

积分

⑦老手

請堅持『人的尊重』

积分
9515
 楼主| 发表于 2006-11-26 21:16:04 | 显示全部楼层
替换与原脚本不同的部分即可。


我用了這個【字下阴影】的脚本如何把他写入原有换Window_Message的脚本里.

.對話時全卡了.
真實的我沒有一個不『沖動』, 誰在阻擋我發言~『我憤怒』. 誰在發言辱罵我,請堅持『人的尊重』.
回复 支持 反对

使用道具 举报

38

主题

3468

帖子

1

积分

超级版主

传说中的Bunny火神~!

Rank: 8Rank: 8

积分
1
发表于 2006-11-26 21:29:55 | 显示全部楼层
看到有不同的地方就修改过来。 [s:4]
我突然发现,我是一个很幸运的好人。老婆真好~ 点我进入JQ(激情)教程范例收集!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|幻想森林

GMT+8, 2025-6-27 21:15 , Processed in 0.014935 second(s), 20 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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