如何让游戏在按下红叉后不关闭？(已解决)

翠靈月

确切的说，是希望在按下红叉后弹窗，按是关闭，按否继续游戏


自己用多功能 DLL SiNova v10015脚本瞎JB捣鼓弄出来的结果是：
1回到游戏后画面刷新卡成狗
2直接卡死
3用各种开关条件瞎搞一波自己也不懂的骚操作，回到游戏后暂时没问题，但是再按一次红叉就会立刻直接关闭

请各位大佬指点正确的使用姿势

hyperzlib

1. window.onbeforeunload=function(){
   
2.     return '你确定要关闭游戏吗？';
   
3. };

复制代码

guoxiaomi

alias _old_exit exit
def exit
...

魔法丶小肉包

先用黄鸡的脚本模板然后拿过来改一改
不过注意1点：
选择取消的时候（不退出游戏）你自己写，我这里只是强行来了遍rgss_main { SceneManager.run }而已（对这些不怎么了解所以这是目前想到的唯一方法，所以我只能改到这了）
[pre lang="ruby"]module MFXRB
MessageBoxW            = Win32API.new('user32', 'MessageBoxW',            'lppl',   'l')  
  def self.callMessageBoxW(hint, title, icon, button,hWnd = 0)
    MessageBoxW.call(hWnd, hint.u2w, title.u2w, icon | button)
  end
end
class String
  def w2u
    self.unpack("S*").pack("U*").sub(/\0+$/, '')
  end
  def u2w
    self.unpack("U*").pack("S*") + "\0\0"
  end
  def f_e
    self.force_encoding(__ENCODING__)
  end
      
      def byte_length
        ret = 0
        self.each_byte{ret+=1}
        ret
      end
      
      def address
        [self].pack("p").unpack("L")[0]
      end
      
    end

    module Fux2

      module Win32Tools
        RtlMoveMemoryLP = Win32API.new('kernel32','RtlMoveMemory','lpl','l')
        RtlMoveMemoryPL = Win32API.new('kernel32','RtlMoveMemory','pll','l')
        GetModuleHandle = Win32API.new('kernel32','GetModuleHandle','p','l')
        VirtualProtect = Win32API.new('kernel32','VirtualProtect','lllp','l')
      
        def self.readmem(buf,addr,len)
          RtlMoveMemoryPL.call(buf,addr,len)
        end
      
        def self.writemem(addr,buf,len)
          RtlMoveMemoryLP.call(addr,buf,len)
        end
      
        def self.unprotect(addr,len)
          VirtualProtect.call(addr,len,0x40,"\0"*4)
        end
      
        def self.init
          @@hModule = GetModuleHandle.call("RGSS300.dll")
        end
      
        def self.module_handle
          @@hModule
        end
      
        init
      end
      module Exit_Hook
      
        @@hwnd = 0
      
        Addr_Close_Catch = Win32Tools.module_handle+0x17F396
        Addr_Eval = Win32Tools.module_handle+0xC580
        Addr_Hwnd = Win32Tools.module_handle+0x25EB00
      
        Code_Close_Catch = "\x90"*23

        Str_Close_Catch = "Fux2::Exit_Hook.exit_func"
      
        def self.unprotectfunc(func)
          Fux2::Win32Tools.unprotect(func.address,func.byte_length)
        end
      
        def self.unprotect_all
          unprotectfunc(Code_Close_Catch)
        end
      
        def self.hook_exit
          cad = Code_Close_Catch.address
          cal = Code_Close_Catch.byte_length
          rem = "\0"*5
          Fux2::Win32Tools.readmem(rem,Addr_Close_Catch,5)
          rem = rem.unpack("C*")
          retn_addr = Addr_Close_Catch+5-cad-cal
          hook_addr = cad-Addr_Close_Catch-5
          Fux2::Win32Tools.writemem(Addr_Close_Catch,[0xE9,hook_addr].pack("CL"),5)
          eval_addr = Addr_Eval-cad-10
          hook_code = [0x68,Str_Close_Catch.address,0xE8,eval_addr,0x83,0xC4,0x4,*rem,0xE9,retn_addr].pack("CLCLCCCCCCCCCL")
          Fux2::Win32Tools.writemem(cad,hook_code,cal)
        end
      
        def self.get_hwnd
          rem = "\0"*4
          Fux2::Win32Tools.readmem(rem,Addr_Hwnd,4)
          base_addr = rem.unpack("L")[0]
          Fux2::Win32Tools.readmem(rem,base_addr+8,4)
          @@hwnd = rem.unpack("L")[0]
        end
      
        def self.hwnd
          @@hwnd
        end
      
        def self.exit_func
          if MFXRB.callMessageBoxW("确定关闭游戏吗？","",32,1) == 1
          exit
          else
          DataManager.save_game(0)
          rgss_main { SceneManager.run }
         
          end
        end
      
        hook_exit
      
      end
    end[/pre]

翠靈月

guoxiaomi 发表于 2017-10-25 09:12
alias _old_exit exit
def exit
...

虽然我知道应该还要再加些其他代码，不过能力不足就先直接添加了
添加后达成了不退出并进行游戏的目的
但又有了新问题
假如设为１号开关开启后按红叉不退出，之后即使１号开关关闭也一样无法退出
代换为主楼的情况就是第一次按否，之后再按是也关不了游戏
请大佬开示

guoxiaomi

翠靈月 发表于 2017-10-25 19:03
虽然我知道应该还要再加些其他代码，不过能力不足就先直接添加了
添加后达成了不退出并进行游戏的目的
但 ...

可以理解为，按下X会调用Kernel#exit方法，所以这里把这个方法直接改写了，就无法退出了。

我不太熟悉win32api的功能，不知道怎么调出有选项的对话框，我的处理大概是这样：

1. alias _old_exit exit
   
2. def exit
   
3.   w = Window_Exit.new
   
4.   loop do
   
5.     Graphics.update
   
6.     Input.update
   
7.     w.update
   
8.     case w.choice
   
9.     when 0
   
10.       _old_exit
    
11.     when 1
    
12.        break
    
13.     else
    
14.     end
    
15.   end
    
16.   w.dispose
    
17. end

复制代码

大概就是这种感觉吧？按下X之后打开一个（游戏里的）窗口，让玩家选择是否退出。

我好像理解了你的意思……要用开关控制对吧：

1. alias _old_exit exit
   
2. def exit
   
3.   _old_exit if $game_variables[1]
   
4. end

复制代码

Lemax

请问楼主如果解决问题，可以请你代码发一下吗，我可能也需要这个。:)

Lemax

没事的，怎么样都行，我也可以学习一下。

翠靈月

Lemax 发表于 2017-10-26 17:34
没事的，怎么样都行，我也可以学习一下。

即使看到很蠢的用法也求别笑