【临别的邪恶发布】窗体半透明+渐隐退出

R-零

(估计这货快沉了，路过的发表下意见)
因为31号就要走了，所以，先放个东西在这里，具体看脚本，XP下测试结果没有bug
这个是使用窗体半透明函数，仅在win2000及以上版本有效(相信没有谁用win98了吧)

1. #==============================================================================
   
2. # 邪恶窗体半透明 R-零  2011 / 9 / 28
   
3. #
   
4. # 31号就要走了啊，所以就把这个东西放出来了
   
5. # 下面的几个函数都是直接中文写的，需要的可以直接拿走
   
6. # 脚本使用方法：
   
7. # 改变透明度 不透明度  注 0～255
   
8. # 附加效果，退出时渐隐,包括bgm
   
9. # 完毕
   
10. #==============================================================================
    
11. $初始不透明度 = 255
    
12. def 百分比获得(t,maxt)
    
13.   return 100.0 * t / maxt  # ** 2
    
14. end
    
15. def 获取当前窗口句柄
    
16.   return Win32API.new("user32","GetActiveWindow","","l").call
    
17. end
    
18. def 改变窗体属性(h)
    
19.   return Win32API.new("user32","SetWindowLong","lil","l").call(h,-20,0x00080000  )
    
20. end
    
21. def 改变透明度(op,h = 获取当前窗口句柄 )
    
22.   return Win32API.new("user32","SetLayeredWindowAttributes","llil","l").call(h,0,op,2)
    
23. end
    
24. module Kernel
    
25. alias origin_exit exit unless method_defined? :exit
    
26. def exit(*args)
    
27.    hw = 获取当前窗口句柄
    
28.    改变窗体属性( hw)
    
29.     bgm = $game_system.playing_bgm
    
30.    for i in 1..10
    
31.     op = $初始不透明度 * 百分比获得( 10 - i ,10) / 100
    
32.     改变透明度(op,hw)
    
33.     Audio.bgm_play("Audio/BGM/" + bgm.name, bgm.volume * 百分比获得( 10 - i ,10) / 100, bgm.pitch) if bgm.name != nil
    
34.    end
    
35.    origin_exit(*args)
    
36. end
    
37. end
    
38. 改变窗体属性(获取当前窗口句柄)
    
39. 改变透明度($初始不透明度,获取当前窗口句柄)

复制代码

练手.zip (200.57 KB, 下载次数: 470)

2011-8-28 12:21 上传

点击文件名下载附件

李梦遥

R零是新手不解释，你就是个混蛋！

不会脚本

路过来看的，表示对我没用......暂且收下......


不会脚本于2011-8-28 14:40补充以下内容：
我被耍了......我可爱的内存.....

精灵使者

精灵毫无目的的说：“获取窗口句柄”可以参考紫苏的“精确获得窗口句柄”一文

R-零

精灵使者 发表于 2011-8-28 20:34
精灵毫无目的的说：“获取窗口句柄”可以参考紫苏的“精确获得窗口句柄”一文 ...

这个东西的句柄完全可以由"获得当前活动窗口句柄"来获得,因为按下"关闭"按钮时,窗口一定是活动的.

话说,精灵前辈提醒的那东西还要改造主程序是不

精灵使者

不是，紫苏的脚本是现成的，直接HWND到那里即可

越前リョーマ

完全只想要退出时的渐变效果而不想要窗口半透明（你自己设置255啊混蛋），囧

忧雪の伤

1. 9999.times { $初始不透明度 = nil }

复制代码

天使喝可乐

这个脚本对游戏稳定没影响吧？
另外能否加上 退出时弹窗提示是否退出