1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
|
module Sl_Settings
module Ani_View
SPD = 1
FLN = "anim"
GetPrivateProfileString = Win32API.new('kernel32', 'GetPrivateProfileString', 'ppppip', 'i')
def get_info(key, default_value)
buffer = [].pack('x256')
section = 'Ani_View'
filename = './Game.ini'
get_option = Proc.new do |key, default_value|
l = GetPrivateProfileString.call(section, key, default_value, buffer, buffer.size, filename)
buffer[0, l]
end
return get_option.call(key, default_value)
end
def row
get_info('ROW', '1').to_i
end
def col
get_info('COL', '1').to_i
end
def spd
get_info('SPEED', '1').to_i
end
def filename
get_info('FILENAME', 'anim')
end
end
end
module SceneManager
class << self
include Sl_Settings::Ani_View
def run
args = $BTEST ? [] : [row, col, spd, filename]
@scene = first_scene_class.new(*args)
@scene.main while @scene
end
def first_scene_class
$BTEST ? Scene_Battle : Scene_Ani
end
end
end
class Scene_Ani < Scene_Base
def initialize(row, col, speed = Sl_Settings::Ani_View::SPD, filename = Sl_Settings::Ani_View::FLN)
super()
@row = row
@col = col
@filename = filename
@speed = speed
@frame = 0
@frame_cnt = 0
@sprite = Sprite.new
@sprite.bitmap = Cache.picture(@filename)
w = @sprite.bitmap.width / @col
h = @sprite.bitmap.height / @row
@sprite.x = (Graphics.width - w) / 2
@sprite.y = (Graphics.width - h) / 2
end
def update
super
update_ani if @frame_cnt % @speed == 0
@frame_cnt += 1
if Input.trigger?(:C) || Input.trigger?(:B)
SceneManager.exit
end
end
def update_ani
x = @frame % @col
y = @frame / @col
w = @sprite.bitmap.width / @col
h = @sprite.bitmap.height / @row
rect = Rect.new(x * w, y * h, w, h)
@sprite.src_rect = rect
@frame += 1
@frame %= @row * @col
end
def terminate
super
@sprite.dispose
end
end
|
