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

Project1

 找回密码
 注册会员
搜索
查看: 32766|回复: 48

[RMVA发布] ACE分辨率内存补丁(免DLL修改)感谢小黄鸡(:

  [复制链接]

Lv1.梦旅人

炎发灼眼的讨伐者

梦石
0
星屑
50
在线时间
1707 小时
注册时间
2007-8-4
帖子
904
发表于 2012-2-14 22:07:39 | 显示全部楼层 |阅读模式

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

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

x
本帖最后由 灼眼的夏娜 于 2012-2-15 20:43 编辑

更新,调整reset方式。(修正过渡问题

RUBY 代码复制
  1. #encoding:utf-8
  2. #==============================================================================
  3. # ■ String
  4. #------------------------------------------------------------------------------
  5. #  String 类追加定义。
  6. #==============================================================================
  7.  
  8. class String
  9.   #----------------------------------------------------------------------------
  10.   # ● API
  11.   #----------------------------------------------------------------------------
  12.   @@MultiByteToWideChar  = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
  13.   @@WideCharToMultiByte  = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
  14.   #----------------------------------------------------------------------------
  15.   # ● UTF-8 转 Unicode
  16.   #----------------------------------------------------------------------------
  17.   def u2w
  18.     i = @@MultiByteToWideChar.call(65001, 0 , self, -1, nil,0)
  19.     buffer = "\0" * (i*2)
  20.     @@MultiByteToWideChar.call(65001, 0 , self, -1, buffer, i)
  21.     buffer.chop!
  22.     return buffer
  23.   end  
  24.   #----------------------------------------------------------------------------
  25.   # ● UTF-8 转系统编码
  26.   #----------------------------------------------------------------------------
  27.   def u2s
  28.     i = @@MultiByteToWideChar.call(65001, 0 , self, -1, nil,0)
  29.     buffer = "\0" * (i*2)
  30.     @@MultiByteToWideChar.call(65001, 0 , self, -1, buffer, i)
  31.     i = @@WideCharToMultiByte.call(0, 0, buffer, -1, nil, 0, nil, nil)
  32.     result = "\0" * i
  33.     @@WideCharToMultiByte.call(0, 0, buffer, -1, result, i, nil, nil)
  34.     result.chop!
  35.     return result
  36.   end
  37.   #----------------------------------------------------------------------------
  38.   # ● 系统编码转 UTF-8
  39.   #----------------------------------------------------------------------------
  40.   def s2u
  41.     i = @@MultiByteToWideChar.call(0, 0, self, -1, nil, 0)
  42.     buffer = "\0" * (i*2)
  43.     @@MultiByteToWideChar.call(0, 0, self, -1, buffer, buffer.size / 2)
  44.     i = @@WideCharToMultiByte.call(65001, 0, buffer, -1, nil, 0, nil, nil)
  45.     result = "\0" * i
  46.     @@WideCharToMultiByte.call(65001, 0, buffer, -1, result, result.size, nil, nil)
  47.     result.chop!
  48.     return result
  49.   end
  50. end
  51.  
  52. #==============================================================================
  53. # ■ AceResolutionMemoryPatch
  54. #------------------------------------------------------------------------------
  55. #  用于调整RMACE分辨率的内存补丁脚本,免修改DLL。
  56. #
  57. #   by 灼眼的夏娜(感谢fux2君提供内存地址)
  58. #==============================================================================
  59. # 更多脚本请转到 [url]www.66rpg.com[/url]。
  60. #==============================================================================
  61. module AceResolutionMemoryPatch
  62.  
  63.   GetModuleFileName       = Win32API.new("kernel32", "GetModuleFileName", "lpl", "l")
  64.   GetPrivateProfileString = Win32API.new("kernel32", "GetPrivateProfileString", "pppplp", "l")
  65.   GetModuleHandle         = Win32API.new("kernel32", "GetModuleHandle", "p", "l")
  66.   RtlMoveMemory           = Win32API.new("kernel32", "RtlMoveMemory", "pli", "v")
  67.   RtlMoveMemoryLP         = Win32API.new("kernel32", "RtlMoveMemory", "lpi", "v")
  68.   VirtualProtect          = Win32API.new("kernel32", "VirtualProtect", "lllp", "i")
  69.   FindWindow              = Win32API.new("user32", "FindWindow", "pp", "l")
  70.  
  71.   module_function
  72.  
  73.   def patch(width = 800, height = 600)
  74.     # 获取句柄
  75.     path = 0.chr * 256
  76.     return false if 0 == GetModuleFileName.call(0, path, path.size)
  77.     path = path.s2u.gsub!(/.exe/ ,".ini").u2s
  78.     buff = 0.chr * 256
  79.     return false if 0 == GetPrivateProfileString.call("Game", "Library", nil, buff, buff.size, path)
  80.     buff.delete!("\0")
  81.     rgsshandle = GetModuleHandle.call(buff)
  82.     # 获取标题名和脚本名字
  83.     title = 0.chr * 256
  84.     return false if 0 == GetPrivateProfileString.call("Game", "Title", nil, title, title.size, path)
  85.     title = title.s2u.delete("\0").u2s
  86.     scripts = 0.chr * 256
  87.     return false if 0 == GetPrivateProfileString.call("Game", "Scripts", nil, scripts, scripts.size, path)
  88.     scripts = scripts.s2u.delete("\0").u2w
  89.     # 地址表
  90.     addr =
  91.     {
  92.       # 直接宽度替换
  93.       :w0 => [0x000016EE, 0x000020F6, 0x000020FF, 0x0010DFED, 0x0010E025, 0x0010E059, 0x0010E08D, 0x000019AA, 0x00001A5B, 0x0001C528, 0x0001F49C, 0x0010E7E7, 0x0010EFE9],
  94.       # 直接高度替换
  95.       :h0 => [0x000016E9, 0x00002106, 0x0000210F, 0x0010DFE8, 0x0010E020, 0x0010E054, 0x0010E088, 0x000019A5, 0x00001A56, 0x0001C523, 0x0001F497, 0x0010E803, 0x0010EFF9],
  96.  
  97.       # 宽度+32
  98.       :w1 => [0x000213E4],
  99.       # 高度+32
  100.       :h1 => [0x000213DF],
  101.  
  102.       # 最大宽度/32+1
  103.       :w2 => [0x00021FE1],
  104.       # 最大高度/32+1
  105.       :h2 => [0x00021F5D]
  106.     }
  107.     # 更新
  108.     w0 = [width].pack("L")
  109.     addr[:w0].each{|ofs| return false if !write_memory(rgsshandle + ofs, w0)}
  110.     h0 = [height].pack("L")
  111.     addr[:h0].each{|ofs| return false if !write_memory(rgsshandle + ofs, h0)}
  112.     w1 = [width + 32].pack("L")
  113.     addr[:w1].each{|ofs| return false if !write_memory(rgsshandle + ofs, w1)}
  114.     h1 = [height + 32].pack("L")
  115.     addr[:h1].each{|ofs| return false if !write_memory(rgsshandle + ofs, h1)}
  116.     w2 = [width / 32 + 1].pack("C")
  117.     addr[:w2].each{|ofs| return false if !write_memory(rgsshandle + ofs, w2)}
  118.     h2 = [height / 32 + 1].pack("C")
  119.     addr[:h2].each{|ofs| return false if !write_memory(rgsshandle + ofs, h2)}
  120.     # 重启
  121.     rgssgamemain = Win32API.new(buff, "RGSSGameMain", "ipp", "v")
  122.     rgssgamemain.call(FindWindow.call("RGSS Player", title), scripts, "")
  123.     # 补丁成功
  124.     return true
  125.   end
  126.  
  127.   def write_memory(addr, str)
  128.     old = 0.chr * 4
  129.     return false if 0 == VirtualProtect.call(addr, str.size, 0x40, old)
  130.     RtlMoveMemoryLP.call(addr, str, str.size)
  131.     return false if 0 == VirtualProtect.call(addr, str.size, old.unpack("L").first, old)
  132.     return true
  133.   end
  134.   private_class_method :write_memory
  135.  
  136.   def read_byte(addr)
  137.     dst = 0.chr * 1
  138.     RtlMoveMemory.call(dst, addr, dst.size)
  139.     return dst.unpack("C").first
  140.   end
  141.   private_class_method :read_byte
  142.  
  143.   def read_dword(addr)
  144.     dst = 0.chr * 4
  145.     RtlMoveMemory.call(dst, addr, dst.size)
  146.     return dst.unpack("L").first
  147.   end
  148.   private_class_method :read_dword
  149.  
  150. end
  151.  
  152. unless $ace_patched
  153.   $ace_patched = true
  154.   raise "应用分辨率补丁失败!" unless AceResolutionMemoryPatch.patch
  155.   #raise RGSSReset.new
  156. end
  157.  
  158. Graphics.resize_screen(800, 600)

评分

参与人数 3星屑 +620 +1 收起 理由
夏箜洛 + 1 太棒了!!!
david50407 + 20 膜拜
退屈£无聊 + 600

查看全部评分

RMXP&RMVX通用Web化完成- -|||

Lv1.梦旅人

粉蜘蛛秀秀

梦石
0
星屑
76
在线时间
39 小时
注册时间
2007-6-4
帖子
384

贵宾第1届Title华丽大赛新人奖

发表于 2012-2-14 22:09:29 | 显示全部楼层

评分

参与人数 1星屑 -40 收起 理由
Kimu -40 .....前辈不要带头水,还是纯表情....

查看全部评分

回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
100
在线时间
5250 小时
注册时间
2011-10-7
帖子
1885

开拓者贵宾

发表于 2012-2-14 22:54:25 | 显示全部楼层
纯粹来膜拜夏娜大人的凌飘过~
(郁闷,当纯水扣吧,郁闷的是水区活动发经验到手软,我却一分拿不到……)

点评

捏(:  发表于 2012-2-14 23:19

评分

参与人数 1星屑 -100 收起 理由
Kimu -100 真心没见过如此的水贴

查看全部评分

回复 支持 反对

使用道具 举报

Lv2.观梦者

(?????)

梦石
0
星屑
695
在线时间
1327 小时
注册时间
2011-7-18
帖子
3184

贵宾

发表于 2012-2-14 23:08:40 | 显示全部楼层
万能的夏娜大出现了 _ _
能改完之后直接Dump出来么?
手动改dll计算那几个数值略麻烦 = = b
发布游戏的时候还是希望不要直接对内存操作……

点评

喵娘注意外面的dll是加壳的嗯。  发表于 2012-2-15 00:33
囧(万能o.o 这脚本我只是临时需要而负责编码而已,完全没技术含量(:不都是小黄鸡提供的么(笑 直接dump内存映像?  发表于 2012-2-14 23:18
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (管理员)

老黄鸡

梦石
0
星屑
39352
在线时间
7470 小时
注册时间
2009-7-6
帖子
13482

开拓者贵宾

发表于 2012-2-15 00:32:03 | 显示全部楼层
Shy07 发表于 2012-2-14 23:28
渐变似乎还是锁定了 640×480 = =

囧,哪里漏掉了吗,明早补上。
RGDirect - DirectX驱动的RGSS,点我了解.
RM全系列成套系统定制请联系QQ1213237796
不接受对其他插件维护的委托
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
1281 小时
注册时间
2006-8-27
帖子
590
发表于 2012-2-15 00:51:35 | 显示全部楼层
本帖最后由 wbsy8241 于 2012-2-15 00:59 编辑

SSS.PNG

测试系统:XP SP3
1.下面有黑条(非左上角对齐以后:上下位移,左右正常 上下移动后最下格是黑的然后画面滚动)
2.FPS下降明显{640x480=>60FPS, 800x600=>46FPS, 1024x768=>20FPS)}  改DLL的1024x768仍为60FPS
3.无法指定640x480 800x600 1024x768 以外的全屏
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (管理员)

老黄鸡

梦石
0
星屑
39352
在线时间
7470 小时
注册时间
2009-7-6
帖子
13482

开拓者贵宾

发表于 2012-2-15 01:10:53 | 显示全部楼层
本帖最后由 fux2 于 2012-2-15 01:19 编辑
wbsy8241 发表于 2012-2-15 00:51
测试系统:XP SP3
1.下面有黑条(非左上角对齐以后:上下位移,左右正常 上下移动后最下格是黑的然后画面滚动 ...


32的倍数即可,至于黑边,咱这里没有,目测是因为设置分辨率不能整除32的原因。
RGDirect - DirectX驱动的RGSS,点我了解.
RM全系列成套系统定制请联系QQ1213237796
不接受对其他插件维护的委托
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
1281 小时
注册时间
2006-8-27
帖子
590
发表于 2012-2-15 01:22:08 | 显示全部楼层
本帖最后由 wbsy8241 于 2012-2-15 01:25 编辑
fux2 发表于 2012-2-15 01:10
32的倍数即可,至于黑边,咱这里没有,目测是因为设置分辨率不能整除32的原因。 ...


地图画够大再移动, 只有我说的那3个分辨率 就算800*480 也是无法全屏
600/32 = 18.75
(是可以进游戏但无法全屏 按ALT+ENTER 画面只是闪几并不会全屏)
回复 支持 反对

使用道具 举报

Lv5.捕梦者 (管理员)

老黄鸡

梦石
0
星屑
39352
在线时间
7470 小时
注册时间
2009-7-6
帖子
13482

开拓者贵宾

发表于 2012-2-15 07:14:27 | 显示全部楼层
本帖最后由 fux2 于 2012-2-15 07:19 编辑

@Shy07@灼眼的夏娜@wbsy8241
貌似有点问题……
内存地址一个没漏,直接改dll之后一切正常。
目测是第一次载入dll的时候某些东西就已经固定了……

点评

改好了(RGSSReset重启改成RGSSGameMain重启了(:  发表于 2012-2-15 11:57
囧,那很难找的样子  发表于 2012-2-15 09:47
看了下 漏掉了2个地址(不够加上了貌似还是没效(囧 还得把第一次加载后修改过的内容补丁掉了?  发表于 2012-2-15 09:43

评分

参与人数 1星屑 +900 收起 理由
eve592370698 + 900 Rgss限制还是太多,恐怕内存地址访问受限..

查看全部评分

RGDirect - DirectX驱动的RGSS,点我了解.
RM全系列成套系统定制请联系QQ1213237796
不接受对其他插件维护的委托
回复 支持 反对

使用道具 举报

Lv1.梦旅人

炎发灼眼的讨伐者

梦石
0
星屑
50
在线时间
1707 小时
注册时间
2007-8-4
帖子
904
 楼主| 发表于 2012-2-15 20:44:05 | 显示全部楼层
过渡问题修正(:
RMXP&RMVX通用Web化完成- -|||
回复 支持 0 反对 1

使用道具 举报

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

本版积分规则

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

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

GMT+8, 2024-3-28 20:23

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

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