PNG文件输出[发布预备]

小传子

1. #==============================================================================
   
2. # PNG文件输出
   
3. #   用法：bitmap.save2png(filename)
   
4. # BY:轮回者
   
5. #==============================================================================
   
6. 
   
7. class Bitmap  
   
8.   
   
9.   # 是否自动颠倒上下？
   
10.   #   false时输出图像上下会颠倒,但并不能节省很多时间
    
11.   SWITCH_UP2DOWN = true
    
12.   
    
13.   # 存入PNG文件
    
14.   def save2png(filename)
    
15.     file = File.open(filename,"wb")
    
16.     file.write(make_png_header)
    
17.     file.write(make_png_ihdr)
    
18.     file.write(make_png_idat)
    
19.     file.write(make_png_iend)
    
20.     file.close
    
21.   end
    
22.   
    
23.   # PNG文件头数据块
    
24.   def make_png_header
    
25.     return [0x89,0x50,0x4e,0x47,0x0d,0x0a,0x1a,0x0a].pack("C*")
    
26.   end
    
27. 
    
28.   # PNG文件情报头数据块(IHDR)
    
29.   def make_png_ihdr
    
30.     ih_size = [13].pack("N")
    
31.     ih_sign = "IHDR"
    
32.     ih_width = [width].pack("N")
    
33.     ih_height = [height].pack("N")
    
34.     ih_bit_depth = [8].pack("C")
    
35.     ih_color_type = [6].pack("C")
    
36.     ih_compression_method = [0].pack("C")
    
37.     ih_filter_method = [0].pack("C")
    
38.     ih_interlace_method = [0].pack("C")
    
39.     string = ih_sign + ih_width + ih_height + ih_bit_depth + ih_color_type +
    
40.             ih_compression_method + ih_filter_method + ih_interlace_method
    
41.     ih_crc = [Zlib.crc32(string)].pack("N")
    
42.     return ih_size + string + ih_crc
    
43.   end
    
44.   
    
45.   # PNG图像数据(IDAT)
    
46.   def make_png_idat
    
47.     header = "\x49\x44\x41\x54"
    
48.     data = SWITCH_UP2DOWN ? make_png_data : make_png_data2
    
49.     data = Zlib::Deflate.deflate(data, 8)
    
50.     crc = [Zlib.crc32(header + data)].pack("N")
    
51.     size = [data.length].pack("N")
    
52.     return size + header + data + crc
    
53.   end
    
54.   
    
55.   # PNG图像数据(点阵);自动颠倒上下
    
56.   def make_png_data
    
57.     data = get_data.unpack('x2aX2aX2ax2a'*height*width).to_s
    
58.     len = width * 4      
    
59.     for y in 0...height
    
60.       break if 2*y >= height - 1
    
61.       nth1 = y * len      
    
62.       nth2 = (height - 1 - y) * len      
    
63.       tStr = data[nth1,len]      
    
64.       data[nth1, len] = data[nth2, len]      
    
65.       data[nth2, len] = tStr
    
66.     end
    
67.    
    
68.     for y in 0...height
    
69.       nth = (height - 1 - y) * width * 4
    
70.       data.insert(nth,"\000")
    
71.     end
    
72.     return data
    
73.   end
    
74.   
    
75.   # PNG图像数据(点阵);不自动颠倒上下
    
76.   def make_png_data2
    
77.     data = get_data.unpack('x2aX2aX2ax2a'*height*width).to_s
    
78.     for y in 0...height
    
79.       nth = (height - 1 - y) * width * 4
    
80.       data.insert(nth,"\000")
    
81.     end
    
82.     return data
    
83.   end  
    
84.   
    
85.   # PNG文件尾数据块(IEND)
    
86.   def make_png_iend
    
87.     ie_size = [0].pack("N")
    
88.     ie_sign = "IEND"
    
89.     ie_crc = [Zlib.crc32(ie_sign)].pack("N")
    
90.     return ie_size + ie_sign + ie_crc
    
91.   end
    
92.   
    
93.   # 获取数据
    
94.   def get_data
    
95.     data = "rgba" * width * height
    
96.     RtlMoveMemory_pi.call(data, address, data.length)
    
97.     return data
    
98.   end
    
99. end
    
100. 
     
101. #==============================================================================
     
102. # Bitmap类修改尝试
     
103. #==============================================================================
     
104. 
     
105. class Bitmap
     
106.   # 取得点（x，y）的颜色(Color)
     
107.   def get_pixel_plus(x, y)
     
108.     data = "rgba"
     
109.     nth = ((height - 1 - y) * width + x) * data.length
     
110.     RtlMoveMemory_pi.call(data, address + nth, data.length)   
     
111.     clr_ary = data.unpack('c*')
     
112.     return Color.new(clr_ary[2],clr_ary[1],clr_ary[0],clr_ary[3])
     
113.   end
     
114.   
     
115.   # 设定点（x，y）的颜色为 color(Color)
     
116.   def set_pixel_plus(x, y, color)
     
117.     data = [color.blue,color.green,color.red,color.alpha].pack('c*')
     
118.     nth = ((height - 1 - y) * width + x) * data.length
     
119.     RtlMoveMemory_ip.call(address + nth, data, data.length)
     
120.     return self
     
121.   end
     
122. end
     
123. 
     
124. #==============================================================================
     
125. # 快速存储Bitmap的Marshal（修改版）By 柳之一
     
126. #==============================================================================
     
127. class Font
     
128.   def marshal_dump;end
     
129.   def marshal_load(obj);end
     
130. end
     
131. 
     
132. class Bitmap
     
133.   attr_accessor :address
     
134.   # 初始化传送到内存的API函数
     
135.   RtlMoveMemory_pi = Win32API.new('kernel32', 'RtlMoveMemory', 'pii', 'i')
     
136.   RtlMoveMemory_ip = Win32API.new('kernel32', 'RtlMoveMemory', 'ipi', 'i')
     
137.   
     
138.   # 保存
     
139.   def _dump(limit)
     
140.     data = "rgba" * width * height
     
141.     RtlMoveMemory_pi.call(data, address, data.length)
     
142.     [width, height, Zlib::Deflate.deflate(data)].pack("LLa*") # 压缩
     
143.   end
     
144.   
     
145.   # 读取
     
146.   def self._load(str)
     
147.     w, h, zdata = str.unpack("LLa*"); b = new(w, h)
     
148.     RtlMoveMemory_ip.call(b.address, Zlib::Inflate.inflate(zdata), w * h * 4); b
     
149.   end
     
150.   
     
151.   # [[[bitmap.object_id * 2 + 16] + 8] + 16] == 数据的开头
     
152.   #
     
153.   def address
     
154.     @address = ini_address if @address.nil?
     
155.     return @address
     
156.   end
     
157.   
     
158.   def ini_address
     
159.     buffer, ad = "xxxx", object_id * 2 + 16
     
160.     RtlMoveMemory_pi.call(buffer, ad, 4); ad = buffer.unpack("L")[0] + 8
     
161.     RtlMoveMemory_pi.call(buffer, ad, 4); ad = buffer.unpack("L")[0] + 16
     
162.     RtlMoveMemory_pi.call(buffer, ad, 4); ad = buffer.unpack("L")[0]
     
163.     return ad
     
164.   end
     
165. end
     
166. 
     
167. #==============================================================================
     
168. # 回收站～
     
169. #==============================================================================
     
170. 
     
171. =begin
     
172. class Color_Plus
     
173.   # 初始化实例变量
     
174.   attr_accessor :red
     
175.   attr_accessor :green
     
176.   attr_accessor :blue
     
177.   attr_accessor :alpha
     
178. 
     
179.   # 初始化
     
180.   def initialize(red, green, blue, alpha=255)
     
181.     @red   = red
     
182.     @green = green
     
183.     @blue  = blue
     
184.     @alpha = alpha
     
185.   end
     
186.   
     
187.   # 设定所有属性
     
188.   def set(red, green, blue, alpha=255)
     
189.     @red   = red
     
190.     @green = green
     
191.     @blue  = blue
     
192.     @alpha = alpha
     
193.   end
     
194. end
     
195. =end
     
196. 
     

复制代码

用到了某柳的东西,感觉轮子这个还是不错的{/hx}

轮回者

以下引用danny8376于2008-7-5 22:47:34的发言：

这是直接调用内存输出PNG的
直接把内存的点阵资料转存
因为一次就把全部的点阵信息输出了
所以效率比一点一点的读快多了

我之前有尝试过
但就苦在不知如何对内存的资料解码

话说有个有趣的事
内存的图是上下颠倒的耶

不止如此！
修复上下颠倒不耗时间，但内存中的某点的储存格式是"bgra"，改回“rgba”才费时

yanzheng868

那个站有成人内容
未成年人误入！
（小声的：包括我自己）

苏菲娅

没错是这个站

虽然我猜这工具无可避免地会泛滥起来
但为了不让部分隐私意识特强的人感到难过
楼上的还是编辑掉吧{/gg}

同时建议高人研究有效的加密脚本
加密和解密的戏才能继续唱下去．．．大家的脚本技术也会随之提高．．．{/hx}

苏菲娅

以下引用yanzheng868于2008-7-6 15:58:35的发言：

……
这东西已经普及了么
RGSSAD释放者

[本贴由作者于 2008-7-6 15:59:53 最后编辑]

下午偶然在某港站bbs上看到此物
而且不用注册就可以下．．．{/gg}

#=============================================================================
# *** RGSSAD Extractor
#=============================================================================
# Created by vgvgf
# Version: 1.02
# Last Modification: 20/03/08
#=============================================================================
# *** Author's Note
# Stealing is bad, realy bad. Don't do that! If you want to cheat a game, or
# if you are curious and want to know how a game is made for learning, that's
# OK, but if you are stealing unique scripts or graphics, you are a bad
# person.
# PD: I will kill a kitty for each stolen resource.
#=============================================================================
# *** Credits
#   * www.66rpg.com
#     - PNG files saver
#=============================================================================
# *** Version Histiory
#  - 1.00, 15/03/08
#    First Release
#  - 1.01, 19/03/08
#    Fixed a little bug.
#    Better modified RGSS102E.dll.
#  - 1.02, 20/03/08
#    Fixed fatal error when reading RGSSAD Data.txt and RGSSAD Graphics.txt.
#    Removed FileUtils.rb dependency.
#    Removed REAL_TIME_LOGGER, now it is by default.
#    Improved code.
#=============================================================================
# *** Description
# This program will extract the files contained by the RGSSAD files. The
# only problem, is that for extracting a file it needs to have the file's path.
# So it try to read all the programs data(Actors, classes, maps, events, etc)
# in search of the file paths, but if the paths are in the scripts the program
# may not obtain all the paths.
#=============================================================================
# *** How to use
# First, you need to place this "RGSSAD Extractor.rb" file, and the
# "RGSS102E.dll" in the game folder. You will need to change the "Library"
# field from the "Game.ini" file to "RGSS102E.dll", and after that execute
# Game.exe.
#
# This script will try to extract all the files listed in the database of the
# game, including maps and events. It will also read all the strings included
# in the scripts(Scripts.rxdata, and events) and search for sprites if the
# SCRIPT_STRINGS_READER flag is on, but it may doesn't work at 100%.
# So if it can't extract some files, you can use IN_GAME_EXTRACTOR option
# for extracting the sprites when playing the game, but it will only
# extract the sprites loaded by the game, so you will need to play the game
# until all sprites are loaded by it.
# You can also create a file named "RGSSAD Graphics.txt" in the game folder,
# containing the paths of the files(one path per line) that aren't listed in
# the database, events or maps; for manualy adding them into the extract list.
#
# * INCLUDE_RTP
# If you want to extract the files, that are already listed in the rtps, use
# this option. This may be useful, when the game have resources that have been
# edited from the rtp, and they conserve the same name. You can also use
# the "RGSSAD Graphics.txt" file for the same purpose, if you know the name
# of the edited files.
#
# * IN_GAME_EXTRACTOR
# This option will extract all the files used by the game when playing it.
# It's very useful, when the game stores the files path in the scripts data.
# The bad part is that you will need to play the game for extracting the sprites.
# It also puts the $DEBUG variable to true, and includes a frame skipper, for
# playing faster. For activating it press F5, and it will skip 5 frames per
# each Graphics.update, you can still press F5 for adding more frames to skip,
# you can press F6 for reducing the amount of frames to skip, and with F7 you
# will reset the frame skipper to normal speed.
#
# * SCRIPT_STRINGS_READER
# If this option is on, the extractor will read all the strings included in
# the scripts and will search for more sprites to extract. It is useful, when
# there are some sprites only listed in the scripts data.
#
# * "RGSSAD Graphics.txt"
# If you want to extract specifical graphic files from a RGSSAD, that aren't
# included in the database data, you can add a list of them in this file.
# You can inlude one file's path per line in this file. It must be a complete
# path for example: Graphics/Characters/Hero1
# You can also include files that aren't placed in the default folders, for
# example: Graphics/Cursors/Red Cursor
# Note: Don't use the file extensions here.
#
# * "RGSSAD Data.txt"
# If you want to extract specifical data files from a RGSSAD, that aren't
# the default ones, you can add a list of them in this file.
# You can inlude one file's path per line in this file. It must be a complete
# path for example: Data/Options.rxdata
# You can also include files that aren't placed in the default data folder,
# or have diferent extension, for example: BattleData/Battle01.bin
# Note: You need to include the extensions here.
#=============================================================================

if $RGSS_SCRIPTS.nil?
  Thread.new {system('Game.exe')}
  exit
end

#=============================================================================
# *** Options (Edit freely here)
#=============================================================================
INCLUDE_RTP = false
IN_GAME_EXTRACTOR = false
SCRIPT_STRINGS_READER = true

#=============================================================================
# *** Classes & methods definitions
#=============================================================================
#=============================================================================
# ** ZLIB
#=============================================================================
module Zlib
省略．．．
end

#=============================================================================
# ** Bitmap
#=============================================================================
class Bitmap
省略．．．
end

#=============================================================================
# ** Make folders
#=============================================================================
def create_folder(path)
省略．．．

end

#=============================================================================
# ** Copy file
#=============================================================================
def copy_file(s, d)
  begin
省略．．．
end

#=============================================================================
# ** Extract Data
#=============================================================================
def extract_data(o, f, saved_data = [])
省略．．．

end

#=============================================================================
# *** Initialize
#=============================================================================
log = File.open('RGSSAD Extractor log.txt', 'w')
省略．．．
#=============================================================================
# *** Script's strings reader
#=============================================================================
string_reader = false
省略．．．
end

#=============================================================================
# *** Search graphics files
#=============================================================================
sprites = {}
省略．．．

#=============================================================================
# ** Graphics List check
#=============================================================================
if FileTest.exists?('RGSSAD Graphics.txt')
省略．．．
#=============================================================================
# ** Extract data files
#=============================================================================
省略．．．
#=============================================================================
# *** Extract graphic files
#=============================================================================
省略．．．

#=============================================================================
# *** Finalize
#=============================================================================
log.puts("*** RGSSAD Extraction - #{Time.now.strftime("Finished at %d/%m/%Y(d/m/y) %H:%M:%S")} - Extraction time #{sprintf("%02d", h)}:#{sprintf("%02d", m)}:#{sprintf("%02d", s)}")省略．．．

#=============================================================================
# ** In Game Extraction
#=============================================================================
省略．．．
省略．．．
省略．．．
省略．．．
省略．．．
省略．．．
end

yanzheng868

#============================================================================
# *** RGSSAD Extractor version 1.02, created by vgvgf
#============================================================================
*** RGSSAD Extraction - Started at 21/06/2008(d/m/y) 15:46:41
* Sprites founded inside the scripts - Total 68
省略

*** RGSSAD Extraction - Finished at 21/06/2008(d/m/y) 16:04:24 - Extraction time 00:11:58
[/quote]

……
这东西已经普及了么
RGSSAD释放者