启动画面（弹出窗口，RGE最适合）

一箭烂YiJL

0.序
这个是我的"伪 3D Map"在 v0.4 阶段的东西，如果认为不适合在这里发布，版主请移至 RGE 专区。
主要功能：弹出一个启动画面窗口（无框边位图，透明度）
支援格式：bmp，而且不能透明背景（VX/XP 可以先加载至 Bitmap 类，再存为 bmp 或者制作 hBitmap 结构）
（RGE 最适合使用）

1.开始
图（伪3D Map）：

经过序的介绍后，就要说如何应用。专门给脚本加载过长的游戏使用。
RGE：在 main RGE.init （生成主窗口）的游戏，在最前放进脚本页。
VX/XP：先要给 Game.exe 去掉 ShowWindow（反汇编），然后在最前放进脚本页，以及自己在 main 调用ShowWindow。ps2：XP 请有心人帮助弄范例（而且尤其关注 XP 编码（转换））。
ps3：请放置 Splash.bmp！
在每一个加载阶段也可以切换窗口文字（内容），例如脚本页：

Splash (启动画面脚本)

操作：Splash.redraw("正在就加载精灵类")

▼ Sprite

。。。。。。（精灵类父类）

操作：Splash.redraw("正在就加载游戏物件")

▼ 游戏物件

。。。。。。（游戏物件）

操作：Splash.release（结束启动画面）

mian

2.脚本

1. 
   
2. #==============================================================================
   
3. # ■ Splash by YiJL
   
4. #------------------------------------------------------------------------------
   
5. # 　启动画面。
   
6. #   
   
7. #   - Splash.init
   
8. #     初始化
   
9. #
   
10. #   - Splash.redraw(str)
    
11. #     改变显示文字
    
12. #
    
13. #   - Splash.release
    
14. #     释放窗口
    
15. #
    
16. #==============================================================================
    
17. 
    
18. module Splash
    
19.   #--------------------------------------------------------------------------
    
20.   # ● Win32API
    
21.   #--------------------------------------------------------------------------
    
22.   M2W = Win32API.new("kernel32", "MultiByteToWideChar",  "ilpipi" , "i")
    
23.   CreateWindowEx = Win32API.new("user32", "CreateWindowExW", "lpplllllllll", "l")
    
24.   ShowWindow = Win32API.new("user32", "ShowWindow", "ll", "l")
    
25.   LoadImage = Win32API.new("user32", "LoadImageW", "lpllll", "l")
    
26.   GetCurrentProcess = Win32API.new("kernel32", "GetCurrentProcess", "v", "l")
    
27.   SelectObject = Win32API.new("gdi32", "SelectObject", "ll", "l")
    
28.   DeleteObject = Win32API.new("gdi32", "DeleteObject", "l", "l")
    
29.   GetDC = Win32API.new("user32", "GetDC", "l", "l")
    
30.   ReleaseDC = Win32API.new("user32", "ReleaseDC", "ll", "l")
    
31.   DestroyWindow = Win32API.new("user32", "DestroyWindow", "l", "l")
    
32.   GetSystemMetrics = Win32API.new("user32", "GetSystemMetrics", "l", "l")
    
33.   TextOut = Win32API.new("gdi32", "TextOutW", "lllpl", "l")
    
34.   CreatePatternBrush = Win32API.new("gdi32", "CreatePatternBrush", "l", "l")
    
35.   CreateFont = Win32API.new("gdi32", "CreateFontW", "lllllllllllllp", "l")
    
36.   FillRect = Win32API.new("user32", "FillRect", "lpl", "l")
    
37.   SetBkMode = Win32API.new("gdi32", "SetBkMode", "ll", "l")
    
38.   Sleep = Win32API.new("kernel32", "Sleep", "l", "v")
    
39.   SetLWndAttri = Win32API.new("user32", "SetLayeredWindowAttributes", "llll", "l")
    
40.   PeekMessage = Win32API.new("user32", "PeekMessageW", "pllll", "l")
    
41.   #--------------------------------------------------------------------------
    
42.   # ● 常量
    
43.   #--------------------------------------------------------------------------
    
44.   BMPW = 600                 # 位图长度
    
45.   BMPH = 360                 # 位图高度
    
46.   BMPP = "Splash.bmp"        # 位图路径
    
47.   FONT = "Microsoft YaHei"   # 显示字体
    
48.   WAIT = 1                   # 等待时间(s)
    
49.   TXTX = 30                  # 字体显示 x 坐标
    
50.   TXTY = 210                 # 字体显示 y 坐标
    
51.   FNTS = 24                  # 字体大小
    
52.   #--------------------------------------------------------------------------
    
53.   # ● 初始化
    
54.   #--------------------------------------------------------------------------
    
55.   def self.init
    
56.     if @hSplashWnd.nil?
    
57.       hInstance = GetCurrentProcess.call
    
58.       @hSplashWnd = CreateWindowEx.call(0x80000, wchar("#32771"), wchar("Splash"),
    
59.       0x80000000, (GetSystemMetrics.call(0) - BMPW) / 2,
    
60.       (GetSystemMetrics.call(1) - BMPH) / 2, BMPW, BMPH, 0, 0, hInstance, 0)
    
61.       ShowWindow.call(@hSplashWnd, 1)
    
62.       SetLWndAttri.call(@hSplashWnd, 0, 220, 2)
    
63.       hDC = GetDC.call(@hSplashWnd)
    
64.       @hBitmap = LoadImage.call(hInstance, wchar(BMPP), 0, BMPW, BMPH, 0x10)
    
65.       @hFont = CreateFont.call(FNTS, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 0, wchar(FONT))
    
66.       @hBrush = CreatePatternBrush.call(@hBitmap)
    
67.       FillRect.call(hDC, [0, 0, BMPW, BMPH].pack("l*"), @hBrush)
    
68.       SetBkMode.call(hDC, 1)
    
69.       SelectObject.call(hDC, @hFont)
    
70.       str = " "
    
71.       TextOut.call(hDC, TXTX, TXTY, wchar(str), str.split(//u).size)
    
72.       ReleaseDC.call(@hSplashWnd, hDC)
    
73.       msg = " " * 28
    
74.       time = Time.now
    
75.       while Time.now - time < WAIT
    
76.         # 防止无响应
    
77.         PeekMessage.call(msg, @hSplashWnd, 0, 0, 0)
    
78.         Sleep.call(500)
    
79.       end
    
80.     end
    
81.   end
    
82.   #--------------------------------------------------------------------------
    
83.   # ● 重画
    
84.   #--------------------------------------------------------------------------
    
85.   def self.redraw(str)
    
86.     unless @hSplashWnd.nil?
    
87.       hDC = GetDC.call(@hSplashWnd)
    
88.       FillRect.call(hDC, [0, 0, BMPW, BMPH].pack("l*"), @hBrush)
    
89.       SetBkMode.call(hDC, 1)
    
90.       SelectObject.call(hDC, @hFont)
    
91.       TextOut.call(hDC, TXTX, TXTY, wchar(str), str.split(//u).size)
    
92.       ReleaseDC.call(@hSplashWnd, hDC)
    
93.       msg = " " * 28
    
94.       time = Time.now
    
95.       while Time.now - time < WAIT
    
96.         # 防止无响应
    
97.         PeekMessage.call(msg, @hSplashWnd, 0, 0, 0)
    
98.         Sleep.call(500)
    
99.       end
    
100.     end
     
101.   end
     
102.   #--------------------------------------------------------------------------
     
103.   # ● 释放
     
104.   #--------------------------------------------------------------------------
     
105.   def self.release
     
106.     unless @hSplashWnd.nil?
     
107.       DeleteObject.call(@hFont)
     
108.       DeleteObject.call(@hBitmap)
     
109.       DeleteObject.call(@hBrush)
     
110.       DestroyWindow.call(@hSplashWnd)
     
111.       hSplashWnd = nil
     
112.     end
     
113.   end
     
114.   #--------------------------------------------------------------------------
     
115.   # ● unicode 编码
     
116.   #--------------------------------------------------------------------------
     
117.   def self.wchar(str)
     
118.     length = M2W.call(65001, 0, str, -1, 0, 0) << 1
     
119.     buffer = " " * length
     
120.     M2W.call(65001, 0, str, -1, buffer, length)
     
121.     return buffer
     
122.   end
     
123. end
     
124. 
     
125. Splash.init

复制代码

3.范例
VX： 启动画面.zip (948.11 KB, 下载次数: 2152)

2011-10-12 21:39 上传

点击文件名下载附件

（感谢月夜神音的编辑支援）
XP：waiting for 有心人中。。

七千

各种V5~抢占沙发

fux2

看到那陀api才刚学的我表示蛋疼。

tamashii

Fake...
Fake / Stray Night...........
Unlicensed bread works...

月夜神音

剑兰前辈回来了吗~~！前辈的东西不能不支持~~
VX范例： 启动画面VX.rar (836.06 KB, 下载次数: 111)

2011-10-18 18:20 上传

点击文件名下载附件

DeathKing

JUI套件啊啊啊啊啊啊啊………………

七千

其实这个账号哦不是马甲呢

各种压力的猫君

求验证：
这个脚本能不能解决WIN7打开RM游戏假死的问题
（就是说把假死的那段换成这个加载图……）

一箭烂YiJL

各种压力的猫君 发表于 2011-10-11 23:01
求验证：
这个脚本能不能解决WIN7打开RM游戏假死的问题
（就是说把假死的那段换成这个加载图……） ...

Win7 有关？
不了解什么状况。

RM 游戏假死是指：

1.XP 10s bug？
紫苏有帖子解决。一般脚本中 XP 应该要加 Graphics.update。

2.VX 加载过慢假死？
外加用那些 API 封装好的 dll，在反遍汇删 ShowWindow 的同一个地方，调用之。
并且要在 main 之前 ShowWindow 。

回复 月夜神音 的帖子
非常感谢提供范例！你所说的问题就是忘了 Splash.release。
现在并且会显示加载项目，我会在主楼放置 VX 的范例。
（VX 有 RTPSETUP.exe。）

退屈￡无聊

翻着手册勉强看懂了一点点- -……
API的DC是我永远的伤……