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

Project1

 找回密码
 注册会员
搜索
查看: 1669|回复: 3
打印 上一主题 下一主题

[已经解决] L&B CG系统报错

[复制链接]

Lv1.梦旅人

梦石
0
星屑
2065
在线时间
24 小时
注册时间
2013-4-13
帖子
4
跳转到指定楼层
1
发表于 2013-7-16 13:49:50 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

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

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

x
第一次发帖,请各位包涵。
标题:为什么L&B CG系统报错,请求解决方案。
因为脚本简单,故不提供工程和图片,请见谅。
随意新建工程,将以下脚本粘贴入工程。(注释为原作者添加,脚本第46行报错,已标记。错误原因:include?未定义。)
此脚本只需在事件中显示过前缀为cg的并且在PICYURES文件夹下的图片,即可自动存入数据库。(Graphics/Pictures/cg*)
望各位能够指出错误,谢谢!
=begin
class RPG::System
  def cg_open
    if @cg_open.nil?
      return (@cg_open = [])
    else
      return @cg_open
    end
  end
end
=end
class Interpreter
  alias baozi_is_a_gay_command_231 command_231
  def command_231
    $cg_list |= ["Graphics/Pictures/#{@parameters[1]}"]
    save_data($cg_list, "Data/CG_List.rxdata")
    baozi_is_a_gay_command_231
  end
  def open_all_cg
    arr = Dir["Graphics/Pictures/cg*"]
    arr.delete(".")
    arr.delete("..")
    arr.each{|line| line[-4,4] = ""}
    $cg_list |= arr
    save_data($cg_list, "Data/CG_List.rxdata")
  end
end
class Scene_CG
  def main
    #changeTitle("CG鉴赏".to_ansi + "\000")
    @preview = []
    @bg = Window_Base.new(0,0,640,480)
    @bg.z = -1000
    @secected = -1
    @cg_detail = Sprite.new

    arr = Dir["Graphics/Pictures/cg*"]
    arr.delete(".")
    arr.delete("..")
    arr.each{|line| line[-4,4] = ""}
    #@cgs = arr & $cg_list
    #for i in 0...arr.size
    #  if arr[i]
    @cgs = arr
    for bn in 0...arr.size
      if $cg_list.include?(arr[bn])###########################这里报错!!!###################
        s = Sprite.new
        s.bitmap = Bitmap.new(arr[bn])
        s.zoom_x = 0.2
        s.zoom_y = 0.2
        s.z = 999
        s.x = bn % 4 * 160 + 16
        s.y = (bn / 4).truncate * 120 + 16
        @preview.push(s)
      else
        s = Sprite.new
        s.bitmap = Bitmap.new(128,96)
        s.bitmap.draw_text(0,(96 - 32)/2,128,32,"未取得此CG",1)
        s.z = 999
        s.x = bn % 4 * 160 + 16
        s.y = (bn / 4).truncate * 120 + 16
        @preview.push(s)
      end
    end
    Graphics.transition
    # 主循环
    loop do
      # 刷新游戏画面
      Graphics.update
      # 刷新输入情报
      Input.update
      # 刷新画面
      update
      # 如果画面切换的话就中断循环
      if $scene != self
        break
      end
    end
    Graphics.freeze
    for i in @preview
      i.dispose
    end
    @bg.dispose
  end
  def update
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      if @cg_detail.z == 1000
        @cg_detail.z = -1000
        @cg_detail.bitmap = nil
      else
        $scene = Scene_Title.new(true)
      end
    end
    return if @preview.empty?
    x,y = Mouse.get_mouse_pos
    for i in @preview
      if x >= i.x && x <= (i.x + i.bitmap.width*i.zoom_x) && y >= i.y && y <= (i.y + i.zoom_y*i.bitmap.height)
        @bg.cursor_rect = Rect.new(i.x-17,i.y-17,130,98)
      end
    end
    if Input.trigger?(Input::C)
      for i in @preview
        if x >= i.x && x <= (i.x + i.bitmap.width) && y >= i.y && y <= (i.y + i.bitmap.height)
          @selected = @preview.index(i)
        end
      end
      if $cg_list.include?(@cgs[@selected])
        $game_system.se_play($data_system.decision_se)
        @cg_detail.bitmap = @preview[@selected].bitmap
        @cg_detail.z = 1000
      else
        $game_system.se_play($data_system.buzzer_se)
      end
    end
  end
end
注:此脚本应该是独立的。

点评

此脚本不是独立的,因为未调用过open_all_cg。  发表于 2013-7-16 21:38

Lv1.梦旅人

梦石
0
星屑
2065
在线时间
24 小时
注册时间
2013-4-13
帖子
4
2
 楼主| 发表于 2013-7-17 09:56:35 | 只看该作者
本帖最后由 泥路留痕 于 2013-7-18 14:50 编辑

抱歉,能说得更清楚些吗,在原系统全局搜素cg_open,发现只有在此脚本内定义,而其他地方均没有调用过。
见图,这8个地方均被注释掉了(=begin)。而BackGroundMusic与此脚本没有多大关系,因为粘贴上去仍然报错。
   Scripts.rxdata (142.01 KB, 下载次数: 17) 脚本文件在这里(重新编辑过的)。

001.jpg (23.21 KB, 下载次数: 13)

001.jpg

点评

呃,下不到……  发表于 2013-7-18 13:00
明白,全局搜索open_all_cg,结果是其他地方均没有调用过。 我将帖子编辑一下吧,将L&B全部脚本文件上传,帮忙看一下,再次感谢!  发表于 2013-7-17 20:25
不是cg_open而是open_all_cg  发表于 2013-7-17 10:06
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
2065
在线时间
24 小时
注册时间
2013-4-13
帖子
4
3
 楼主| 发表于 2013-7-18 12:20:36 | 只看该作者
本帖最后由 泥路留痕 于 2013-7-18 15:07 编辑

补充:麻烦版主结贴吧,已经...可以了,只是并没有正确答案稍微有点可惜了。
回复 支持 反对

使用道具 举报

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

本版积分规则

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

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-11-26 15:05

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

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