伪·640*480的窗口

yangff

版权声明！！！！
本脚本为美兽制作XP版修改！！！！！！！
后果就是连FPS都米了
代码：

1. if $myfirst == nil
   
2. 
   
3.   $myfirst = 'myGod'  
   
4.   宽度=640
   
5.   高度=480
   
6.   游戏ini名=".\\Game.ini"
   
7.   val = "\0"*256
   
8.   gps = Win32API.new('kernel32', 'GetPrivateProfileString','pppplp', 'l')
   
9.   gps.call("Game", "Title", "", val, 256, 游戏ini名)
   
10.   val.delete!("\0")
    
11.   title = val
    
12.   fw = Win32API.new('user32', 'FindWindow', 'pp', 'i')
    
13.   hWnd = fw.call("RGSS Player", title)
    
14.   swp = Win32API.new('user32', 'SetWindowPos', 'lliiiii', 'i')
    
15. 
    
16.   pointwds = [0,0,0,0].pack('llll')
    
17.   pointcet = [0, 0].pack('ll')
    
18. 
    
19.   wdsrect = Win32API.new('user32.dll', 'GetWindowRect', 'lp', 'l')
    
20.   client_screen = Win32API.new("user32", "ClientToScreen", 'ip', 'i')
    
21. 
    
22.   wdsrect.call(hWnd,pointwds)
    
23.   client_screen.call(hWnd, pointcet)
    
24. 
    
25.   wds = pointwds.unpack('llll')
    
26.   cet = pointcet.unpack('ll')
    
27. 
    
28. # addw =  wds[2] - wds[0] - 640
    
29. # addh =  wds[3] - wds[1] - 480
    
30.   addw =  wds[2] - wds[0] - 544
    
31.   addh =  wds[3] - wds[1] - 416
    
32.   #x = wds[0] - (宽度 - 640) / 2
    
33.   #y = wds[1] - (高度 - 480) / 2
    
34.   x = wds[0] - (宽度 - 544) / 2
    
35.   y = wds[1] - (高度 - 416) / 2
    
36.   swp.call(hWnd, 0, x, y, 宽度 + addw, 高度 + addh, 0x20)
    
37.   
    
38. end

复制代码

亿万星辰

Graphics.resize_screen(640, 480)   {/fd}

美兽

这个是XP的，其余版本出现的任何问题我都不负责，另外，不要改我的脚本……

yangff

不修改计算增加=640-640=0

柳柳

以下引用亿万星辰于2008-1-20 19:12:35的发言：

Graphics.resize_screen(640, 480)   

楼主，这样不就行了么……一行……

柳柳

囧……这样啊。