[XP] Pauza

[thieffer119]

~ Pauza podczas gry ~

Krótki opis:
Skrypt pozwala zapauzować grę klawiszem F12

Autor:
Zeriab

Skrypt:

Spoiler: (Otwórz)

Kod: (Zaznacz wszystko)

#==============================================================================
      # ** Pausing with F12
      #------------------------------------------------------------------------------
      # Zeriab
      # Version 1.1
      # 2009-05-25 (Year-Month-Day)
      #------------------------------------------------------------------------------
      # * Version History :
      #
      #   Version 1.0 -------------------------------------------------- (2009-05-22)
      #   - First release
      #
      #   Version 1.1 -------------------------------------------------- (2009-05-25)
      #   - The pause image now appears immediately when F12 is pressed.
      #   - Transitions are cut short rather than restarted when F12 is pressed.
      #------------------------------------------------------------------------------
      # * Description :
      #
      #   This script changes the functionality of pressing F12 during the game
      #   from resetting the game to (un)pausing the game. A picture is displayed
      #   while the game is paused. (Having a picture is optional)
      #------------------------------------------------------------------------------
      # * License :
      #
      #   Copyright (C) 2009  Zeriab
      #
      #   This program is free software: you can redistribute it and/or modify
      #   it under the terms of the GNU Lesser Public License as published by
      #   the Free Software Foundation, either version 3 of the License, or
      #   (at your option) any later version.
      #
      #   This program is distributed in the hope that it will be useful,
      #   but WITHOUT ANY WARRANTY; without even the implied warranty of
      #   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      #   GNU Lesser Public License for more details.
      #
      #   For the full license see <http://www.gnu.org/licenses/>
      #   The GNU General Public License: http://www.gnu.org/licenses/gpl.txt
      #   The GNU Lesser General Public License: http://www.gnu.org/licenses/lgpl.txt
      #------------------------------------------------------------------------------
      # * Compatibility :
      #
      #   Is most likely not compatible with other F12 prevention scripts.
      #------------------------------------------------------------------------------
      # * Instructions :
      #
      #   Place this script anywhere above main.
      #   The image file 'pause' present in Graphics/Pictures is used.
      #   Note: No picture is shown if there is no 'pause' in Graphics/Pictures.
      #==========================================================================​====
      #==========================================================================​===
      # ** Reset class (because it won't be defined until F12 is pressed otherwise)
      #==========================================================================​===
      class Reset < Exception
      end
      #==========================================================================​===
      # ** Module Graphics
      #==========================================================================​===

      module Graphics
        class << self
          #-------------------------------------------------------------------------
          # * Aliases Graphics.update and Graphics.transition
          #-------------------------------------------------------------------------
          unless self.method_defined?(:zeriab_f12_pause_update)
            alias_method(:zeriab_f12_pause_update, :update)
            alias_method(:zeriab_f12_pause_transition, :transition)
           end
          #-------------------------------------------------------------------------
          # Change the update method so F12 toggles pause
          #-------------------------------------------------------------------------
          def update(*args)
            # Try to update normally
            begin
              zeriab_f12_pause_update(*args)
              return
            rescue Reset
              # Do nothing
            end
            done = false
            # Store frame count
            frame_count = Graphics.frame_count
            # Show pause image
            @sprite = Sprite.new
            @sprite.z = 9999
            begin
              @sprite.bitmap = RPG::Cache.picture('pause')
            rescue
              @sprite.bitmap = Bitmap.new(32,32)
            end
            # Keep trying to do the update
            while !done
              begin
            zeriab_f12_pause_update(*args)
                done = true
              rescue Reset
          # Do Nothing
              end
            end
            # F12 has been released, update until it is pressed again
            while done
              begin
                zeriab_f12_pause_update(*args)
              rescue Reset
              done = false
              end
            end
            # F12 has been pressed, keep trying to update
            while !done
              begin

[cj2]

thieffer119 napisał(a):      # ** Pausing with F12
      #------------------------------------------------------------------------------
      # Zeriab
      # Version 1.1
      # 2009-05-25 (Year-Month-Day)

Śmiem twierdzić, że autorstwa Zeriaba, google potwierdza.

[thieffer119]

Faktycznie, ja ślepy :P

[krzak1414]

jeśli zmienię f12 na np f3 to dalej będzie działać?

[Ayene]

Nie będzie działać. Zresztą wystarczyło sprawdzić.