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

Project1

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

[已经解决] 关于天圣的AVG范例CG系统脚本

[复制链接]

Lv4.逐梦者

梦石
0
星屑
6281
在线时间
492 小时
注册时间
2010-8-27
帖子
254
跳转到指定楼层
1
 楼主| 发表于 2013-2-15 16:52:30 | 显示全部楼层 |只看大图 回帖奖励 |倒序浏览 |阅读模式

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

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

x
本帖最后由 zxlxp2006 于 2013-2-15 18:28 编辑
  1. #--------------------------------------------------------------------------
  2. # ● 刷新画面
  3. #--------------------------------------------------------------------------
  4.   def update
  5.   $mouse_x, $mouse_y = Mouse.get_mouse_pos #获得鼠标的即时坐标
  6.     # 按下 B 键的情况下
  7.     if Input.trigger?(Input::B)
  8.       # 演奏取消 SE
  9.       $game_system.se_play($data_system.cancel_se)
  10.       # 切换到菜单画面
  11.       $scene = Scene_Title.new
  12.       return
  13.     end
  14.   #
  15.    
  16.     #【重点注意】关于鼠标的刷新。其实原理就是判断鼠标是否落在缩略图上。
  17.      
  18.     #如果落在上面了,则给变量赋值表示选中了某CG。否则将变量清零。
  19.      
  20.     #以CG1为例,上面设置过X坐标100,Y坐标40(左上角原点坐标)。
  21.     #宽高分别是120和90(按你自己做的缩略图大小)。
  22.      
  23.     #所以,CG左上角在(100,40)处,右上角在(220,40)处,左下角在(100,130)处,
  24.      
  25.     #右下角在(220,130)处。(还搞不清的自己画个长方形就知道怎么回事了)
  26.    
  27.     #所以鼠标的X坐标如果在100~220之间同时Y坐标在40~130之间,
  28.    
  29.     #即表示鼠标移动到了这张缩略图上。

  30.    
  31.   if $mouse_x <= 220 and $mouse_x >= 100 and $mouse_y <= 130 and $mouse_y >= 40
  32.      if $game_party.item_number(1) > 0 #CG已经获得时才进行判定
  33.    if $game_variables[3] != 1 #如果现在还没选中该CG的话
  34.     $game_system.se_play($data_system.cursor_se)
  35.     $game_variables[3] = 1    #当前选定CG1
  36.     @cg_window.refresh #刷新一下CG窗口,让原本半透明的CG正回来
  37.     end
  38.     end
  39.    
  40.   elsif $mouse_x <= 370 and $mouse_x >= 250 and $mouse_y <= 130 and $mouse_y >= 40
  41.     if $game_party.item_number(2) > 0 #CG2已经获得时才进行判定
  42.     if $game_variables[3] != 2 #如果现在还没选中该CG的话
  43.     $game_system.se_play($data_system.cursor_se)
  44.     $game_variables[3] = 2   #当前选定CG2
  45.     @cg_window.refresh
  46.     end
  47.     end #这是第二张CG的判定范例。需要更多请用elsif继续接下去。
  48.    
  49.   elsif $mouse_x <= 520 and $mouse_x >= 400 and $mouse_y <= 130 and $mouse_y >= 40
  50.     if $game_party.item_number(3) > 0 #CG2已经获得时才进行判定
  51.     if $game_variables[3] != 3 #如果现在还没选中该CG的话
  52.     $game_system.se_play($data_system.cursor_se)
  53.     $game_variables[3] = 3   #当前选定CG2
  54.     @cg_window.refresh
  55.     end
  56.     end
  57.   
  58.   else
  59.     $game_variables[3] = 0
  60.     @cg_window.refresh
  61.   end

  62.    if Input.trigger?(Input::C)
  63.     if $game_variables[3] != 0 #有CG被选中的时候
  64.     $game_system.se_play($data_system.decision_se)
  65.     $game_map.setup(2) #移动到2号地图。(地图ID在新建地图可看到)编号自己能改。
  66.     $game_player.moveto(0,0)
  67.     $game_player.refresh
  68.     $game_map.autoplay
  69.     $game_map.update
  70.     $scene = Scene_Map.new
  71.     #接下来显示出CG或者制作回想之类的内容就都是那张地图上的事情了。
  72.     #因为3号变量已经被赋值,所以直接利用条件分歧显示不同图片即可。
  73.   end
  74. end   

  75. end
  76. end
复制代码
  1. =begin

  2. ★修改方面的罗嗦★

  3. 素材替换和排版参见Scene_Menu,这个就不说了。

  4. 这系统其实用起来原理很简单,自定义的部分也多,当然最麻烦的也在于此。
  5. 脚本里你需要修改的大部分只是数字,我会尽可能详细地解释,也欢迎repo使用中
  6. 出现的问题。

  7. =end

  8. class Window_CG < Window_Base
  9.   #--------------------------------------------------------------------------
  10.   # ● 初始化窗口
  11.   #--------------------------------------------------------------------------
  12.   def initialize
  13.     super(-16, -16, 656, 496) #去掉因为边框而导致的坐标误差
  14.     self.contents = Bitmap.new(width - 32, height - 32)
  15.     self.opacity = 0
  16.     refresh
  17.   end
  18.   #--------------------------------------------------------------------------
  19.   # ● 刷新
  20.   #--------------------------------------------------------------------------
  21.   def refresh
  22.     self.contents.clear
  23. #从这里开始进入缩略图出现与否的判定。做好教程里提到的『三步骤』之后,
  24. #系统已经记录了你继承的物品数据。接下来就是直接用其判定。
  25. #注意3号变量被用来记录当前选定CG的编号。
  26. #请看下面的例子。
  27. #=========================================================
  28. if $game_party.item_number(1) > 0 #1号物品(CG1)如果已经获得的话
  29.     bitmap=Bitmap.new("Graphics/pictures/CG1_s")  #显示CG1的缩略图
  30.     src_rect = Rect.new(0, 0, bitmap.width, bitmap.height)  
  31.     if $game_variables[3] == 1
  32.     self.contents.blt(100, 40, bitmap, src_rect,255)
  33.     #前两个数字是坐标可自定义。最后一个数字是判定当该CG被选中时透明度是正常的。
  34.     else        #否则透明度降低表示尚未被选中。
  35.       self.contents.blt(100, 40, bitmap, src_rect,155)
  36.       end
  37.   end
  38. #=========================================================
  39. #这是CG2的设置,改几个小地方即可
  40.   if $game_party.item_number(2) > 0 #这里是对应的2号物品
  41.     bitmap=Bitmap.new("Graphics/pictures/CG2_s")  #显示CG2的缩略图
  42.     src_rect = Rect.new(0, 0, bitmap.width, bitmap.height)  
  43.     if $game_variables[3] == 2 #选中CG变量改为2
  44.     self.contents.blt(250, 40, bitmap, src_rect,255) #坐标……
  45.     else                    
  46.       self.contents.blt(250, 40, bitmap, src_rect,155)  
  47.       end
  48. #=========================================================
  49. #这是CG2的设置,改几个小地方即可
  50.   if $game_party.item_number(3) > 0 #这里是对应的2号物品
  51.     bitmap=Bitmap.new("Graphics/pictures/CG3_s")  #显示CG2的缩略图
  52.     src_rect = Rect.new(0, 0, bitmap.width, bitmap.height)  
  53.     if $game_variables[3] == 3 #选中CG变量改为2
  54.     self.contents.blt(400, 40, bitmap, src_rect,255) #坐标……
  55.     else                    
  56.       self.contents.blt(400, 40, bitmap, src_rect,155)  
  57.       end
  58. #=========================================================
  59.     #以此类推,做好你的CG3、CG4……这样基础排版就已经完成了。
  60.    #没有得到的CG,因为物品数为0,所以不会显示出来。底图上可以画个空框啥的……
  61.    
  62.   end
  63. end
  64. end
复制代码
我是一个真·脚本白痴……
我照着注释改的还是改错了……系统提示“Ocorreu um erro em SyntaxError, durante operação de script(在脚本运行中出现了错误的语法)”。
完全两眼一抹黑……求教……
感激不尽,呃,可以的话请尽量说得通俗易懂些?、

另外有涉及的一段脚本,CG系统是采用把CG做成物品的形式,增加一个“CG1”以后输入一段脚本
“file = File.open("Save/CG.rxdata", "wb")
Marshal.dump($game_party,file)
file.close”

范例本体已传百度网盘,请戳
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

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

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

GMT+8, 2024-11-1 07:38

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

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