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

Project1

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

[RMVA发布] 通行度快速设置

[复制链接]

Lv1.梦旅人

梦石
0
星屑
180
在线时间
829 小时
注册时间
2010-6-26
帖子
671
跳转到指定楼层
1
发表于 2015-6-10 18:22:43 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
本帖最后由 企鹅达达 于 2015-6-10 18:24 编辑
  1. =begin
  2.                通行度快速设置
  3.                           by 企鹅达达
  4. 2015.6.10  v1.0

  5.     首先,你每个图块文件先设置一次,然后把记录了该文件图块编号、页代码写在下面的
  6. 表内,事件脚本输入:

  7. PG_WRITE_DATA::write_data_tileflag

  8.     保存后运行游戏,触发该事件,游戏会自动关闭,接着不做任何操作关闭编辑器(这很
  9. 重要),接着再打开就会发现随机组合的图块通行度都设置好了。脚本会自动识别使用的图
  10. 块文件名,无论你把文件放在B、C、D、E哪一个页面都无所谓
  11.    这也能防止某个文件图块变更之后要一起更改所有用到这个文件的通行度。现在,你只
  12. 要把模板上的通行度改掉,再运行脚本就ok了。

  13. =end
  14. PG_TILESETS_WRITE_DATA = {
  15. #-----------------[图块编号,页代码]--------------
  16. "World_B"      =>[1,"B"],
  17. "Outside_B"    =>[2,"B"],
  18. "Outside_C"    =>[2,"C"],
  19. "Inside_B"     =>[3,"B"],
  20. "Inside_C"     =>[3,"C"],
  21. "Dungeon_B"    =>[4,"B"],
  22. "Dungeon_C"    =>[4,"C"],

  23. "World_A1"      =>[1,nil],
  24. "World_A2"      =>[1,nil],

  25. "Outside_A1"   =>[2,nil],
  26. "Outside_A2"   =>[2,nil],
  27. "Outside_A3"   =>[2,nil],
  28. "Outside_A4"   =>[2,nil],
  29. "Outside_A5"   =>[2,nil],

  30. "Inside_A1"    =>[3,nil],
  31. "Inside_A2"    =>[3,nil],
  32. "Inside_A4"    =>[3,nil],
  33. "Inside_A5"    =>[3,nil],

  34. "Dungeon_A1"    =>[4,nil],
  35. "Dungeon_A2"    =>[4,nil],
  36. "Dungeon_A4"    =>[4,nil],
  37. "Dungeon_A5"    =>[4,nil],


  38. #----------------------------------
  39. }

  40. #  PG_WRITE_DATA::write_data_tileflag
  41. module PG_WRITE_DATA
  42.   #--------------------------------------------------------------------------
  43.   # ● Classes
  44.   #--------------------------------------------------------------------------
  45.   def self.write_data_tileflag
  46.     filename = "Data/Tilesets.rvdata2"
  47.     $data = load_data(filename)
  48.     $data.each do |data|
  49.       #=================BCDE通行设置============
  50.       #
  51.       4.times do |n|
  52.         next if data.nil?
  53.         next if data.tileset_names[n+5].nil? || data.tileset_names[n+5] == ""
  54.         fs = PG_TILESETS_WRITE_DATA[data.tileset_names[n+5]]
  55.         if fs.nil?
  56.           text = "缺少"+ data.tileset_names[n+5]+"的信息!"
  57.           msgbox(text)
  58.         end
  59.         256.times do |i|     # B为0,C为1,D为2,E为3
  60.           case fs[1]
  61.           when "B"; e = 0
  62.           when "C"; e = 1
  63.           when "D"; e = 2
  64.           when "E"; e = 3
  65.           else; next
  66.           end
  67.           data.flags[i+256*n] = $data[fs[0]].flags[i+256*e]
  68.         end
  69.       end
  70.       #
  71.       #=================BCDE通行设置============
  72.       #=================A5通行设置==============
  73.       #
  74.       for i in 1536..1663
  75.         next if data.nil?
  76.         next if data.tileset_names[4].nil? || data.tileset_names[4] == ""
  77.         fs = PG_TILESETS_WRITE_DATA[data.tileset_names[4]]
  78.         if fs.nil?
  79.           text = "缺少"+ data.tileset_names[4]+"的信息!"
  80.           msgbox(text)
  81.         end
  82.         data.flags[i] = $data[fs[0]].flags[i]
  83.       end
  84.       #
  85.       #=================A5通行设置==============
  86.       #=================A1通行设置==============
  87.       #
  88.       for i in 2048..2815
  89.         next if data.nil?
  90.         next if data.tileset_names[0].nil? || data.tileset_names[0] == ""
  91.         fs = PG_TILESETS_WRITE_DATA[data.tileset_names[0]]
  92.         if fs.nil?
  93.           text = "缺少"+ data.tileset_names[0]+"的信息!"
  94.           msgbox(text)
  95.         end
  96.         data.flags[i] = $data[fs[0]].flags[i]
  97.       end
  98.       #
  99.       #=================A1通行设置==============
  100.       #=================A2通行设置==============
  101.       #
  102.       for i in 2816..4351
  103.         next if data.nil?
  104.         next if data.tileset_names[1].nil? || data.tileset_names[1] == ""
  105.         fs = PG_TILESETS_WRITE_DATA[data.tileset_names[1]]
  106.         if fs.nil?
  107.           text = "缺少"+ data.tileset_names[1]+"的信息!"
  108.           msgbox(text)
  109.         end
  110.         data.flags[i] = $data[fs[0]].flags[i]
  111.       end
  112.       #
  113.       #=================A2通行设置==============
  114.       #=================A3通行设置==============
  115.       #
  116.       for i in 4352..5887
  117.         next if data.nil?
  118.         next if data.tileset_names[2].nil? || data.tileset_names[2] == ""
  119.         fs = PG_TILESETS_WRITE_DATA[data.tileset_names[2]]
  120.         if fs.nil?
  121.           text = "缺少"+ data.tileset_names[2]+"的信息!"
  122.           msgbox(text)
  123.         end
  124.         data.flags[i] = $data[fs[0]].flags[i]
  125.       end
  126.       #
  127.       #=================A3通行设置==============
  128.       #=================A4通行设置==============
  129.       #
  130.       for i in 5888..6655
  131.         next if data.nil?
  132.         next if data.tileset_names[3].nil? || data.tileset_names[3] == ""
  133.         fs = PG_TILESETS_WRITE_DATA[data.tileset_names[3]]
  134.         if fs.nil?
  135.           text = "缺少"+ data.tileset_names[3]+"的信息!"
  136.           msgbox(text)
  137.         end
  138.         data.flags[i] = $data[fs[0]].flags[i]
  139.       end
  140.       #
  141.       #=================A4通行设置==============
  142.     end
  143.     save_data($data, filename)
  144.     SceneManager::exit
  145.   end
  146. end
复制代码

评分

参与人数 1星屑 +200 收起 理由
taroxd + 200 好创意,赞一个

查看全部评分

新手们!不要被看扁了!我们也会用论坛搜索,我们也会自己找脚本,我们也会自己点击关闭按钮旁边的小问号!
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

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

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

GMT+8, 2024-4-30 04:56

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

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