[XP/VX]将不足画面大小的远景图扩展至画面大小

各种压力的猫君

根据VX讨论区问题制作：http://rpg.blue/thread-214013-2-1.html

---

使用了轮回者的输出Bitmap到Png脚本，在此表示感谢。

[Ntec]Bitmap2Png v1.0 第一部分（输出Btimap到Png）

1. #==============================================================================
   
2. # ■ [Ntec]Bitmap2Png v1.0
   
3. #------------------------------------------------------------------------------
   
4. # 　 将Bitmap输出为Png图片。
   
5. #-------------------------------------------------------------------------------
   
6. #    更新作者： 各种压力的猫君
   
7. #    原始作者： 轮回者（协力：柳之一）
   
8. #    使用协议： Ntec 支援层脚本
   
9. #    RGSS版本： RGSS/RGSS2 (Rpg Maker XP/VX)
   
10. #-------------------------------------------------------------------------------
    
11. #    更新记录：
    
12. #    ◇2011-12-15 v 1.0 by 各种压力的猫君
    
13. #    └在原始版本基础上加以修改以适应NEKO_tec脚本内部调用；
    
14. #    ◆2008-06-14 v 0.0 by 轮回者 (feat 柳之一)
    
15. #    └原始版本；
    
16. #-------------------------------------------------------------------------------
    
17. #    插入位置：
    
18. #      尽可能靠近脚本编辑器脚本列表顶端。
    
19. #    使用说明：
    
20. #      NEKO_tec 支援层脚本，内部调用。
    
21. #===============================================================================
    
22. 
    
23. #-------------------------------------------------------------------------------
    
24. # ▼ Ntec 通用配置模块
    
25. #-------------------------------------------------------------------------------
    
26. module Ntec
    
27.   module Bitmap2Png
    
28.     # 版本号
    
29.     VERSION = 1.0
    
30.   end
    
31. end
    
32. 
    
33. #==============================================================================
    
34. # PNG文件输出
    
35. #   用法：bitmap.save2png(filename)
    
36. # BY:轮回者
    
37. #==============================================================================
    
38. 
    
39. class Bitmap  
    
40.   
    
41.   # 是否自动颠倒上下？
    
42.   #   false时输出图像上下会颠倒,但并不能节省很多时间
    
43.   SWITCH_UP2DOWN = true
    
44.   
    
45.   # 存入PNG文件
    
46.   def save2png(filename)
    
47.     file = File.open(filename,"wb")
    
48.     file.write(make_png_header)
    
49.     file.write(make_png_ihdr)
    
50.     file.write(make_png_idat)
    
51.     file.write(make_png_iend)
    
52.     file.close
    
53.   end
    
54.   
    
55.   # PNG文件头数据块
    
56.   def make_png_header
    
57.     return [0x89,0x50,0x4e,0x47,0x0d,0x0a,0x1a,0x0a].pack("C*")
    
58.   end
    
59. 
    
60.   # PNG文件情报头数据块(IHDR)
    
61.   def make_png_ihdr
    
62.     ih_size = [13].pack("N")
    
63.     ih_sign = "IHDR"
    
64.     ih_width = [width].pack("N")
    
65.     ih_height = [height].pack("N")
    
66.     ih_bit_depth = [8].pack("C")
    
67.     ih_color_type = [6].pack("C")
    
68.     ih_compression_method = [0].pack("C")
    
69.     ih_filter_method = [0].pack("C")
    
70.     ih_interlace_method = [0].pack("C")
    
71.     string = ih_sign + ih_width + ih_height + ih_bit_depth + ih_color_type +
    
72.             ih_compression_method + ih_filter_method + ih_interlace_method
    
73.     ih_crc = [Zlib.crc32(string)].pack("N")
    
74.     return ih_size + string + ih_crc
    
75.   end
    
76.   
    
77.   # PNG图像数据(IDAT)
    
78.   def make_png_idat
    
79.     header = "\x49\x44\x41\x54"
    
80.     data = SWITCH_UP2DOWN ? make_png_data : make_png_data2
    
81.     data = Zlib::Deflate.deflate(data, 8)
    
82.     crc = [Zlib.crc32(header + data)].pack("N")
    
83.     size = [data.length].pack("N")
    
84.     return size + header + data + crc
    
85.   end
    
86.   
    
87.   # PNG图像数据(点阵);自动颠倒上下
    
88.   def make_png_data
    
89.     data = get_data.unpack('x2aX2aX2ax2a'*height*width).to_s
    
90.     len = width * 4      
    
91.     for y in 0...height
    
92.       break if 2*y >= height - 1
    
93.       nth1 = y * len      
    
94.       nth2 = (height - 1 - y) * len      
    
95.       tStr = data[nth1,len]      
    
96.       data[nth1, len] = data[nth2, len]      
    
97.       data[nth2, len] = tStr
    
98.     end
    
99.    
    
100.     for y in 0...height
     
101.       nth = (height - 1 - y) * width * 4
     
102.       data.insert(nth,"\000")
     
103.     end
     
104.     return data
     
105.   end
     
106.   
     
107.   # PNG图像数据(点阵);不自动颠倒上下
     
108.   def make_png_data2
     
109.     data = get_data.unpack('x2aX2aX2ax2a'*height*width).to_s
     
110.     for y in 0...height
     
111.       nth = (height - 1 - y) * width * 4
     
112.       data.insert(nth,"\000")
     
113.     end
     
114.     return data
     
115.   end  
     
116.   
     
117.   # PNG文件尾数据块(IEND)
     
118.   def make_png_iend
     
119.     ie_size = [0].pack("N")
     
120.     ie_sign = "IEND"
     
121.     ie_crc = [Zlib.crc32(ie_sign)].pack("N")
     
122.     return ie_size + ie_sign + ie_crc
     
123.   end
     
124.   
     
125.   # 获取数据
     
126.   def get_data
     
127.     data = "rgba" * width * height
     
128.     RtlMoveMemory_pi.call(data, address, data.length)
     
129.     return data
     
130.   end
     
131. end
     
132. 
     
133. #==============================================================================
     
134. # Bitmap类修改尝试
     
135. #==============================================================================
     
136. 
     
137. class Bitmap
     
138.   # 取得点（x，y）的颜色(Color)
     
139.   def get_pixel_plus(x, y)
     
140.     data = "rgba"
     
141.     nth = ((height - 1 - y) * width + x) * data.length
     
142.     RtlMoveMemory_pi.call(data, address + nth, data.length)   
     
143.     clr_ary = data.unpack('c*')
     
144.     return Color.new(clr_ary[2],clr_ary[1],clr_ary[0],clr_ary[3])
     
145.   end
     
146.   
     
147.   # 设定点（x，y）的颜色为 color(Color)
     
148.   def set_pixel_plus(x, y, color)
     
149.     data = [color.blue,color.green,color.red,color.alpha].pack('c*')
     
150.     nth = ((height - 1 - y) * width + x) * data.length
     
151.     RtlMoveMemory_ip.call(address + nth, data, data.length)
     
152.     return self
     
153.   end
     
154. end
     
155. 
     
156. #==============================================================================
     
157. # 快速存储Bitmap的Marshal（修改版）By 柳之一
     
158. #==============================================================================
     
159. 
     
160. class Font
     
161.   def marshal_dump;end
     
162.   def marshal_load(obj);end
     
163. end
     
164. 
     
165. class Bitmap
     
166.   attr_accessor :address
     
167.   
     
168.   # API
     
169.   RtlMoveMemory_pi = Win32API.new('kernel32', 'RtlMoveMemory', 'pii', 'i')
     
170.   RtlMoveMemory_ip = Win32API.new('kernel32', 'RtlMoveMemory', 'ipi', 'i')
     
171.   
     
172.   # Save
     
173.   def _dump(limit)
     
174.     data = "rgba" * width * height
     
175.     RtlMoveMemory_pi.call(data, address, data.length)
     
176.     [width, height, Zlib::Deflate.deflate(data)].pack("LLa*") # 压缩
     
177.   end
     
178.   
     
179.   # Read
     
180.   def self._load(str)
     
181.     w, h, zdata = str.unpack("LLa*"); b = new(w, h)
     
182.     RtlMoveMemory_ip.call(b.address, Zlib::Inflate.inflate(zdata), w * h * 4); b
     
183.   end
     
184.   
     
185.   def address
     
186.     @address = ini_address if @address.nil?
     
187.     return @address
     
188.   end
     
189.   
     
190.   def ini_address
     
191.     buffer, ad = "xxxx", object_id * 2 + 16
     
192.     RtlMoveMemory_pi.call(buffer, ad, 4); ad = buffer.unpack("L")[0] + 8
     
193.     RtlMoveMemory_pi.call(buffer, ad, 4); ad = buffer.unpack("L")[0] + 16
     
194.     RtlMoveMemory_pi.call(buffer, ad, 4); ad = buffer.unpack("L")[0]
     
195.     return ad
     
196.   end
     
197. end
     
198. 
     
199. #-------------------------------------------------------------------------------
     
200. # ■ End of Script
     
201. #    本脚本来自66RPG.com　　Script form 66RPG.com.
     
202. #    严禁用于商业用途 　　　Mustn't be used for commercial/business purpose.
     
203. #    转载请保留此信息 　　　Keep this message when repost.
     
204. #-------------------------------------------------------------------------------

复制代码

[Ntec]Para_Expander v1.1 第二部分（本体）

1. #==============================================================================
   
2. # ■ [Ntec]Para_Expander (Parallaxes_expander) v1.1
   
3. #------------------------------------------------------------------------------
   
4. # 　 将比画面小的远景图居中扩充到画面大小。（在四周添加边框）
   
5. #    四周边框的颜色由原图左上角第一个像素的颜色决定。
   
6. #-------------------------------------------------------------------------------
   
7. #    脚本作者： 各种压力的猫君
   
8. #    使用协议： 严禁用于商业用途
   
9. #    RGSS版本： RGSS/RGSS2 (Rpg Maker XP/VX)
   
10. #    必需脚本： [Ntec]Bitmap2Png v 1.0 以上（原始脚本 by 轮回者 feat 柳之一）
    
11. #-------------------------------------------------------------------------------
    
12. #    更新记录：
    
13. #    ◇2011-12-15 v1.1 by 各种压力的猫君
    
14. #    └紧急修正backup目录不存在时报错（现在可以自动生成目录）；
    
15. #    ◇2011-12-15 v1.0 by 各种压力的猫君
    
16. #    └初版；
    
17. #-------------------------------------------------------------------------------
    
18. #    插入位置：
    
19. #      必需脚本之下，尽可能靠近脚本编辑器脚本列表顶端。
    
20. #      若要修改分辨率，请在本脚本之前修改。
    
21. #    使用方法：
    
22. #      ※请先在通用配置模块中配置相应设定※
    
23. #      运行游戏即可，执行过程中会弹出提示窗口。
    
24. #      成功执行本脚本之后请在通用配置模块中关掉开关或删除本脚本。
    
25. #    脚本说明：
    
26. #      支持的输入格式有png、bmp、jpg，但都会被输出为png。
    
27. #      原始文件会被移动到远景图目录下的backup文件夹中。
    
28. #      本脚本为双远景辅助用脚本，其他情况用处不大。
    
29. #===============================================================================
    
30. 
    
31. #-------------------------------------------------------------------------------
    
32. # ▼ Ntec 通用配置模块
    
33. #-------------------------------------------------------------------------------
    
34. 
    
35. module Ntec
    
36.   module Para_Expander
    
37.    
    
38.     # 远景图目录（为空时自动获取，若未修改默认目录请留空）
    
39.     dir = ""
    
40.    
    
41.     # 画面分辨率（为0时自动获取，若未对默认分辨率做修改此处请保留0）
    
42.     screen_width  = 0  # 宽度（如需指定请同时指定高度）
    
43.     screen_height = 0  # 高度（如需指定请同时指定宽度）
    
44.    
    
45. "┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓"
    
46. "┃　　　　　　[Ntec]　自定义内容到此结束，以下内容切勿随意修改　　　　　　┃"
    
47. "┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛"
    
48. 
    
49.     # 检测运行环境
    
50.     if RUBY_VERSION == "1.9.2"
    
51.       print "检测到当前运行环境为RGSS3 (Rpg Maker VX Ace)\n" +
    
52.             "\n本脚本暂不支持此运行环境\n" +
    
53.             "\n按确定键退出"
    
54.       exit
    
55.     end
    
56.     if defined? $TEST
    
57.       DIR = "Graphics/Parallaxes/" unless dir != ""
    
58.       if screen_width != 0 and screen_height != 0
    
59.         SW = screen_width
    
60.         SH = screen_height
    
61.       else
    
62.         SW = Graphics.width
    
63.         SH = Graphics.height
    
64.       end
    
65.       print "检测到当前运行环境为RGSS2 (Rpg Maker VX)\n" +
    
66.             "\n分辨率设置为：" + SW.to_s + "×" + SH.to_s + "\n" +
    
67.             "远景目录设置为：" + DIR.to_s
    
68.     else
    
69.       DIR = "Graphics/Panoramas/" unless dir != ""
    
70.       if screen_width != 0 and screen_height != 0
    
71.         SW = screen_width
    
72.         SH = screen_height
    
73.       else
    
74.         SW = 640
    
75.         SH = 480
    
76.       end
    
77.       print "检测到当前运行环境为RGSS (Rpg Maker XP)" +
    
78.              "\n分辨率设置为：" + SW.to_s + "×" + SH.to_s + "\n" +
    
79.             "远景目录设置为：" + DIR.to_s
    
80.     end
    
81.     # 版本号
    
82.     VERSION = 1.0
    
83.     # 错误时操作
    
84.     ON_ERROR = "exit"
    
85.     # 检测必需脚本
    
86.     unless defined? Ntec::Bitmap2Png::VERSION and
    
87.                     Ntec::Bitmap2Png::VERSION >= 1.0
    
88.       print "必需脚本[Ntec]Bitmap2Png不存在或版本过低。"
    
89.       eval Ntec::Para_Expander::ON_ERROR
    
90.     end
    
91.   end
    
92. end
    
93. 
    
94. #-------------------------------------------------------------------------------
    
95. # ▼ Parallaxes_expander Class
    
96. #-------------------------------------------------------------------------------
    
97. 
    
98. class Parallaxes_expander
    
99.   
    
100.   #--------------------------------------------------------------------------
     
101.   # ● 初始化：检测远景图，存入数组
     
102.   #--------------------------------------------------------------------------
     
103.   
     
104.   def initialize
     
105.     # 检测远景图，存入数组
     
106.     @pnglist = Dir.glob(Ntec::Para_Expander::DIR + "*.png")
     
107.     @bmplist = Dir.glob(Ntec::Para_Expander::DIR + "*.bmp")
     
108.     @jpglist = Dir.glob(Ntec::Para_Expander::DIR + "*.jpg")
     
109.     if @pnglist.size + @bmplist.size + @jpglist.size == 0
     
110.       print "没有检测到远近图文件，请确认远景图目录设置正确。"
     
111.       eval Ntec::Para_Expander::ON_ERROR
     
112.     else
     
113.       print "检测到以下格式远景图：\n" +
     
114.             @pnglist.size.to_s + "个png格式远景图\n" +
     
115.             @bmplist.size.to_s + "个bmp格式远景图\n" +
     
116.             @jpglist.size.to_s + "个jpg格式远景图\n" +
     
117.             "\n按确定键开始分析 (step 1 of 2)"
     
118.       # 转到扫描bitmap尺寸
     
119.       scan_bitmap_size
     
120.     end
     
121.   end
     
122.   
     
123.   #--------------------------------------------------------------------------
     
124.   # ● 扫描bitmap尺寸
     
125.   #--------------------------------------------------------------------------
     
126.   
     
127.   def scan_bitmap_size
     
128.     # 初始化数组
     
129.     @do_list = []
     
130.     # 初始化计数器
     
131.     count = 0
     
132.     # 处理png格式
     
133.     for png in @pnglist
     
134.       temp_bitmap = Bitmap.new(png)
     
135.       if temp_bitmap.width  < Ntec::Para_Expander::SW or
     
136.          temp_bitmap.height < Ntec::Para_Expander::SH
     
137.         # 压入数组
     
138.         @do_list.push png
     
139.       end
     
140.       temp_bitmap.dispose
     
141.       # 计数器进位
     
142.       count += 1
     
143.       # 每处理20次回收内存，防止内存溢出
     
144.       if count % 20 == 0
     
145.         GC.start
     
146.       end
     
147.     end
     
148.     # 处理bmp格式
     
149.     for bmp in @bmplist
     
150.       temp_bitmap = Bitmap.new(bmp)
     
151.       if temp_bitmap.width  < Ntec::Para_Expander::SW or
     
152.          temp_bitmap.height < Ntec::Para_Expander::SH
     
153.         # 压入数组
     
154.         @do_list.push bmp
     
155.       end
     
156.       temp_bitmap.dispose
     
157.       # 计数器进位
     
158.       count += 1
     
159.       # 每处理20次回收内存，防止内存溢出
     
160.       if count % 20 == 0
     
161.         GC.start
     
162.       end
     
163.     end
     
164.     # 处理jpg格式
     
165.     for jpg in @jpglist
     
166.       temp_bitmap = Bitmap.new(jpg)
     
167.       if temp_bitmap.width  < Ntec::Para_Expander::SW or
     
168.          temp_bitmap.height < Ntec::Para_Expander::SH
     
169.         # 压入数组
     
170.         @do_list.push jpg
     
171.       end
     
172.       temp_bitmap.dispose
     
173.       # 计数器进位
     
174.       count += 1
     
175.       # 每处理20次回收内存，防止内存溢出
     
176.       if count % 20 == 0
     
177.         GC.start
     
178.       end
     
179.     end
     
180.     # 转到处理bitmap
     
181.     print "检测到需要处理的远景图" + @do_list.size.to_s + "张\n" +
     
182.           "\n处理过程将花费较长时间，请耐心等待。\n" +
     
183.           "处理过程中请务必确保本窗口为激活状态，若失去焦点将暂停处理。\n" +
     
184.           "\n按确定键开始处理 (step 2 of 2)"
     
185.     expand_bitmap
     
186.   end
     
187.   
     
188.   #--------------------------------------------------------------------------
     
189.   # ● 扩展bitmap
     
190.   #--------------------------------------------------------------------------
     
191.   
     
192.   def expand_bitmap
     
193.     # 记录现在时间
     
194.     @begin_time = Time.now
     
195.     # 生成底Bitmap
     
196.     expanded_width  = Ntec::Para_Expander::SW
     
197.     expanded_height = Ntec::Para_Expander::SH
     
198.     @expanded_bitmap = Bitmap.new(expanded_width, expanded_height)
     
199.     @expanded_rect   = @expanded_bitmap.rect
     
200.     # 初始化计数器
     
201.     count = 0
     
202.     @count = 0
     
203.     # 主循环，处理bitmap
     
204.     for bitmap in @do_list
     
205.       # 读入待处理bitmap
     
206.       small_bitmap = Bitmap.new(bitmap)
     
207.       small_width  = small_bitmap.width
     
208.       small_height = small_bitmap.height
     
209.       src_rect = small_bitmap.rect
     
210.       small_x = (expanded_width - small_width) / 2
     
211.       small_y = (expanded_height - small_height) /2
     
212.       # 生成输出bitmap
     
213.       new_bitmap = @expanded_bitmap.clone
     
214.       expanded_color = small_bitmap.get_pixel(0, 0)
     
215.       new_bitmap.fill_rect(@expanded_rect, expanded_color)
     
216.       new_bitmap.blt(small_x, small_y, small_bitmap, src_rect)
     
217.       # 储存bitmap
     
218.       save_bitmap(new_bitmap, bitmap)
     
219.       new_bitmap.dispose
     
220.       # 计数器进位
     
221.       count += 1
     
222.       # 每处理20次回收内存，防止内存溢出
     
223.       if count % 20 == 0
     
224.         GC.start
     
225.       end
     
226.     end
     
227.     # 转到处理完成
     
228.     expand_done
     
229.   end
     
230.   
     
231.   #--------------------------------------------------------------------------
     
232.   # ● 储存bitmap
     
233.   #--------------------------------------------------------------------------
     
234.   
     
235.   def save_bitmap(bitmap, filename)
     
236.     # 生成文件名
     
237.     dirname  = File.dirname(filename)
     
238.     basename = File.basename(filename)
     
239.     savename = File.basename(filename, ".*")
     
240.     backupdir = dirname + "/backup/"
     
241.     backupname = backupdir + basename
     
242.     createname = dirname + "/" + savename + ".png"
     
243.     # 生成备份目录
     
244.     Dir.mkdir(backupdir) unless FileTest.exist?(backupdir)
     
245.     # 备份原文件
     
246.     File.rename(filename, backupname)
     
247.     # 储存新文件
     
248.     bitmap.save2png(createname)
     
249.     # 计数器进位
     
250.     @count += 1
     
251.   end
     
252. 
     
253.   #--------------------------------------------------------------------------
     
254.   # ● 处理完成
     
255.   #--------------------------------------------------------------------------
     
256.   
     
257.   def expand_done
     
258.     time = Time.now - @begin_time
     
259.     print "处理完成\n共处理：" + @count.to_s + "张远景图，\n" +
     
260.           "耗时：" + time.to_s + "秒\n" +
     
261.           "\n 按确定键退出"
     
262.     exit
     
263.   end
     
264.   
     
265. end
     
266. 
     
267. #-------------------------------------------------------------------------------
     
268. # ▼ Run Script
     
269. #-------------------------------------------------------------------------------
     
270. 
     
271. Parallaxes_expander.new
     
272. 
     
273. #-------------------------------------------------------------------------------
     
274. # ■ End of Script
     
275. #    本脚本来自66RPG.com　　Script form 66RPG.com.
     
276. #    严禁用于商业用途 　　　Mustn't be used for commercial/business purpose.
     
277. #    转载请保留此信息 　　　Keep this message when repost.
     
278. #-------------------------------------------------------------------------------

复制代码

使用说明：
将第一个脚本放置于脚本编辑器顶端，第二个脚本放置于其下，保存并运行游戏即可。
生成完毕后删除两个脚本即可。

紧急修正：
请手工在远景图目录下新建backup文件夹，否则脚本可能报错。
↑v1.1已紧急修正。

范例工程：
暂不提供