VX保存图片

yangff

先别激动,我说的图片是rvpic。
众所周知，RGSS里无法直接保存图片。
一般保存PNG使用轮回大大的PNG脚本
效率及底。
这个脚本输出速度比轮回者的快
并且有两种版本
一种输出544*416只要2~4秒
但是输出文件高达7.8MB
---------------------------
另外一种是高压缩比例
输出>20秒
容易死机
但输出后只有200KB
并且不影响质量
------------------------
读入均为2~4S
使用方法
保存
a = Pic.new
a.save_bitmap(bitmap对象,输出名称)
载入
a = Pic.new
bitmap对象 = a.load_bitmap
高速型：

1. 
   
2. class Pic
   
3.   def save_bitmap(bitmap,name)
   
4.     @name = name
   
5.     @bitmap = bitmap
   
6.    # bitmap.dispose
   
7.     $save = []
   
8.     @w = @bitmap.width
   
9.     @h = @bitmap.height
   
10.     for x in 1..@w
    
11.       for y in 1..@h
    
12.         tmp = @bitmap.get_pixel(x,y)
    
13.         $save[x] = [] if $save[x] == nil
    
14.         $save[x][y] = tmp
    
15.       end
    
16.     end
    
17.     save($save)
    
18.   end
    
19.   def save(dat)
    
20.     $datehand = []
    
21.     $datehand[0] = @w
    
22.     $datehand[1] = @h
    
23.    # $save = Zlib::Deflate.deflate($save.to_s, 2)
    
24.     file = File.open(@name, "wb")
    
25.     Marshal.dump($datehand,           file)
    
26.     Marshal.dump($save,               file)
    
27.     file.close
    
28.   end
    
29.   def load_bitmap(name)
    
30.     load(name)
    
31.     @name = name
    
32.     @w = $datehand[0]
    
33.     @h = $datehand[1]
    
34.     @bitmap = Bitmap.new(@w,@h)
    
35.    # $save = Zlib::Inflate.inflate($save)
    
36. #    $save1 = $save.to_ary
    
37. #    $save = $save1
    
38.     for x in 1..@w
    
39.       for y in 1..@h
    
40.         @bitmap.set_pixel(x, y, tmp)
    
41.       end
    
42.     end
    
43.     return @bitmap
    
44.   end
    
45.   def load(name)
    
46.     file = File.open(name, "rb")
    
47.     $datehand           = Marshal.load(file)
    
48.     $save               = Marshal.load(file)
    
49.     file.close
    
50.   end
    
51. end
    

复制代码

高压缩比：

1. class Pic
   
2.   def save_bitmap(bitmap,name)
   
3.     @name = name
   
4.     @bitmap = bitmap
   
5.    # bitmap.dispose
   
6.     $save = []
   
7.     @w = @bitmap.width
   
8.     @h = @bitmap.height
   
9.     for x in 1..@w
   
10.       for y in 1..@h
    
11.         tmp = @bitmap.get_pixel(x,y)
    
12.         $save[x] = [] if $save[x] == nil
    
13.         $save[x][y] = [] if $save[x][y] == nil #tmp
    
14.         $save[x][y][0] = tmp.red
    
15.         $save[x][y][1] = tmp.green
    
16.         $save[x][y][2] = tmp.blue
    
17.         $save[x][y][3] = tmp.alpha
    
18.       end
    
19.     end
    
20.     save($save)
    
21.   end
    
22.   def save(dat)
    
23.     $datehand = []
    
24.     $datehand[0] = @w
    
25.     $datehand[1] = @h
    
26.     $save = Zlib::Deflate.deflate($save.to_s, 2) #修改 2)为更高压缩比更大，速度更慢
    
27.     file = File.open(@name, "wb")
    
28.     Marshal.dump($datehand,           file)
    
29.     Marshal.dump($save,               file)
    
30.     file.close
    
31.   end
    
32.   def load_bitmap(name)
    
33.     load(name)
    
34.     @name = name
    
35.     @w = $datehand[0]
    
36.     @h = $datehand[1]
    
37.     @bitmap = Bitmap.new(@w,@h)
    
38.     $save = Zlib::Inflate.inflate($save)
    
39. #    $save1 = $save.to_ary
    
40. #    $save = $save1
    
41.     for x in 1..@w
    
42.       for y in 1..@h
    
43.         a = Color.new($save[x][y][0], $save[x][y][1], $save[x][y][2],$save[x][y][3])
    
44.         @bitmap.set_pixel(x, y, a)
    
45.       end
    
46.     end
    
47.     return @bitmap
    
48.   end
    
49.   def load(name)
    
50.     file = File.open(name, "rb")
    
51.     $datehand           = Marshal.load(file)
    
52.     $save               = Marshal.load(file)
    
53.     file.close
    
54.   end
    
55. end
    

复制代码

yangff

以下引用zmgy于2008-2-5 14:17:26的发言：

话说能把BMP格式变成JPEG或者GIF格式不？那样无论从速度或容量上来说都会小很多的说

输出的是.rvpic