幻想森林

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

[RMVX] 怎么让滚动字母脚本滚动完关闭游戏?

[复制链接]

21

主题

24

帖子

274

积分

③业余

积分
274
发表于 2007-10-27 22:00:33 | 显示全部楼层 |阅读模式
怎么让滚动字母脚本滚动完关闭游戏?

困扰好久了.


#——————————————————————————————————————
# Scene_Credit GB
#——————————————————————————————————————


#——使用注意:默认会返回地图,如果需要返回开头,请将本脚本中的
#return_scene = Scene_Map.new改为return_scene = Scene_Title.new

class Scene_Credit
  CREDIT=<<_END_
≡≡≡≡≡≡≡≡≡≡≡
   
231231231231233212
3213123213213
213213213123213213

_END_
end

class Scene_Credit

  def initialize(return_scene = nil)
    @sprite = Sprite.new
    @sprite.bitmap = Bitmap.new("Graphics/Pictures/12")
    @sprite.x = 0
    @sprite.y = 0
    if return_scene.nil?
      return_scene = return_scene = return_scene = Scene_Title.new
    end
    @return_scene = return_scene
  end
  
  def scene_start
    credit_lines = CREDIT.split(/\n/)
    credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
    credit_lines.each_index do |i|
      line = credit_lines
      credit_bitmap.draw_text(0,i * 32,280,32,line,0.1)
    end
    @credit_sprite = Sprite.new(Viewport.new(0,20,340,400))
    @credit_sprite.bitmap = credit_bitmap
    @credit_sprite.oy = -430
    @frame_index = 0
    @last_flag = false
  end

  def scene_end
    @credit_sprite.dispose
    @sprite.dispose
  end
  
  def last?
    return (@frame_index >= @credit_sprite.bitmap.height + 480)
  end
  
  def last
    if not @last_flag
      Audio.bgm_fade(10000)
      @last_flag = true
      @last_count = 0
    else
      @last_count += 1
    end
    if @last_count >= 300
      $scene = @return_scene
    end
  end
  
  def update
    @frame_index += 1
    return if cancel?
    last if last?
    @credit_sprite.oy += 1
  end

  def cancel?
    if Input.trigger?(Input::B)
      $scene = @return_scene
      return true
    end
    return false
  end

  def main
    scene_start
    # 过渡
    Graphics.transition
    # 主循环
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    # 准备过渡
    Graphics.freeze
    scene_end
  end
end



-----------------------------------------------------------------------------------------
谢谢!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

[s:1]  [s:1]  [s:1]
回复

使用道具 举报

1

主题

25

帖子

277

积分

③业余

积分
277
发表于 2007-10-27 22:11:37 | 显示全部楼层
在dif main
下插入$game_switches[40]=NO(或true,哪个对用哪个)
在def update的最后输入$scene=Scene_Title.new
在Scene_Title类中最前面加个判定
if $game_switches[40]=NO
  exit
end


看看可能不对那么就继续问
~~~~~~~~~~无视我鄙视我把```````````````
回复 支持 反对

使用道具 举报

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

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-6-21 14:56 , Processed in 0.010364 second(s), 20 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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