VIPArcher基础设置
在新窗口中打开脚本页
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
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
module VIPArcher
#--------------------------------------------------------------------------
# ● 需要的 Windows API 函数
#--------------------------------------------------------------------------
GetWindowThreadProcessId = Win32API.new('user32', 'GetWindowThreadProcessId', 'lp', 'l')
GetWindow = Win32API.new('user32', 'GetWindow', 'll', 'l')
GetClassName = Win32API.new('user32', 'GetClassName', 'lpl', 'l')
GetWindowText = Win32API.new('user32', 'GetWindowText', 'lpl', 'l')
GetCurrentThreadId = Win32API.new('kernel32', 'GetCurrentThreadId', 'V', 'l')
GetForegroundWindow = Win32API.new('user32', 'GetForegroundWindow', 'V', 'l')
ShellExecuteA = Win32API.new('shell32', 'ShellExecuteA', 'pppppi', 'i')
#--------------------------------------------------------------------------
# ● 获取窗口句柄 by: 紫苏
#--------------------------------------------------------------------------
def self.get_window_handle
threadID = GetCurrentThreadId.call
hWnd = GetWindow.call(GetForegroundWindow.call, 0)
while hWnd != 0
if threadID == GetWindowThreadProcessId.call(hWnd, 0)
className = " " * 11
GetClassName.call(hWnd, className, 12)
break if className == "RGSS Player"
end
hWnd = GetWindow.call(hWnd, 2)
end
return hWnd
end
#--------------------------------------------------------------------------
# ● 打开地址
# VIPArcher.open_url(addr)
#--------------------------------------------------------------------------
def self.open_url(addr)
ShellExecuteA.call(0,'open',addr,0, 0, 1)
end
end
class Game_Interpreter
#--------------------------------------------------------------------------
# ● 获取事件显示的图片的 Bitmap 对象 不存在则返回 nil
#--------------------------------------------------------------------------
def get_bitmap(id = 0)
spriteset = SceneManager.scene.instance_variable_get(:@spriteset)
sprite = spriteset.instance_variable_get(:@picture_sprites)[id]
sprite ? sprite.bitmap : nil
end
end
#==============================================================================
# Game.ini 配置文件读取及设置
#==============================================================================
class IniFile
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :filename
#--------------------------------------------------------------------------
# ● Win32API
#--------------------------------------------------------------------------
GetPrivateProfileString = Win32API.new('kernel32','GetPrivateProfileString' , 'ppppip', 'i')
WritePrivateProfileString = Win32API.new('kernel32','WritePrivateProfileString', 'pppp' , 'i')
#--------------------------------------------------------------------------
# ● 初始化对象
#--------------------------------------------------------------------------
def initialize(filename = './Game.ini')
@filename = filename
end
#--------------------------------------------------------------------------
# ● 获取配置
#--------------------------------------------------------------------------
def [](section, key, default_value = '')
l = GetPrivateProfileString.call(section, key, default_value,
buffer = [].pack('x256'), buffer.size, @filename); buffer[0, l]
end
#--------------------------------------------------------------------------
# ● 设置配置
#--------------------------------------------------------------------------
def []=(section, key, value)
WritePrivateProfileString.call(section, key, value.to_s, @filename)
end
end
class String
#--------------------------------------------------------------------------
# ● 常量定义
#--------------------------------------------------------------------------
MultiByteToWideChar = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
WideCharToMultiByte = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')
Codepages = {
:System => 0, :UTF7 => 65000, :UTF8 => 65001,
:S_JIS => 932, :GB2312 => 936, :BIG5 => 950,
}
#--------------------------------------------------------------------------
# ● 伪 iconv 编码转换
#--------------------------------------------------------------------------
# s : 原始编码，可使用 Codepages 中的符号或者直接使用代码页值。
# d : 目标编码，同上。
#--------------------------------------------------------------------------
def iconv s, d
src = s.is_a?(Symbol)? Codepages[s] : s
dest = d.is_a?(Symbol)? Codepages[d] : d
len = MultiByteToWideChar.call src, 0, self, -1, nil, 0
buf = "\0" * (len * 2)
MultiByteToWideChar.call src, 0, self, -1, buf, buf.size / 2
len = WideCharToMultiByte.call dest, 0, buf, -1, nil, 0, nil, nil
ret = "\0" * len
WideCharToMultiByte.call dest, 0, buf, -1, ret, ret.size, nil, nil
self.respond_to?(:force_encoding) ?
ret.force_encoding("ASCII-8BIT").delete("\000") : ret.delete("\000")
end
#--------------------------------------------------------------------------
# ● 快捷方式：从 ANSI 转为 UTF-8 编码
#--------------------------------------------------------------------------
def s2u
self.respond_to?(:force_encoding) ?
iconv(:System, :UTF8).force_encoding("utf-8") : iconv(:System, :UTF8)
end
#--------------------------------------------------------------------------
# ● 快捷方式：从 UTF-8 转为 ANSI 编码
#--------------------------------------------------------------------------
def u2s
iconv(:UTF8, :System)
end
end
#--------------------------------------------------------------------------
# ● 备注的读取
#--------------------------------------------------------------------------
class RPG::BaseItem
#--------------------------------------------------------------------------
# ● 读取备注的基本方法
# note : 备注文字
# default : 缺省值
#--------------------------------------------------------------------------
def renote(note,default = nil)
result = /<#{note}\s+(\S+)\s*>/ =~ @note ? $1 : default
result
end
end
class Bitmap
#--------------------------------------------------------------------------
# ● 由白色渐变到实际的字体颜色的渐变字
# level : 渐变等级，值越高效果越差。效率越好。不可为 0
#--------------------------------------------------------------------------
def draw_gradient_text(x, y, w, h, str, align = 0, level = 1)
if font.color == Color.new(255, 255, 255)
draw_text(x, y, w, h, str, align); return self
end; buffer, buffer.font = Bitmap.new(w, h), font.dup
delta = (alpha = font.color.alpha) / h * level
buffer.font.out_color, buffer.font.shadow = Color.new, false
rect, buffer.font.color = Rect.new(0, 0, w, level), Color.new(255, 255, 255)
draw_text(x, y, w, h, str, align); buffer.draw_text(0, 0, w, h, str, align)
y.upto(y + h) { |n| next unless n % level == 0
blt(x, n, buffer, rect, alpha -= delta); rect.y += level
}; buffer.dispose; self
end
end
