Project1

标题: 按键问题 [打印本页]
作者: zwx235g    时间: 2009-11-22 15:05
标题: 按键问题
我想把按键修改一下
原     上         ↑
    左   右     ←  →
       下         ↓
改成：
       上            ↑或I      
    左   右     ←或J    →或L
       下            ↓或K            注意：（有两套方案）

注意：（是修改角色行走，光标的移动，）
谢谢
作者: 上帝的眼睛    时间: 2009-11-22 15:12
  1. #==============================================================================
  2. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
  3. #==============================================================================

  5. #============================================================================
  6. # ■ Keyboard Script
  7. #----------------------------------------------------------------------------
  8. # 　By: Cybersam
  9. #   Date: 25/05/05
  10. #   Version 4
  11. #============================================================================
  12. # 66对此脚本使用方法的说明(可能不是很准确，反正大体能用)：
  13. #
  14. # ★、Kboard.keyboard(键位)  返回是否按下这个键的判断。
  15. #     比如条件分歧：Kboard.keyboard($R_Key_H)
  16. #                   则当按下键盘H键的时候条件分歧成立
  17. #
  18. # ★、Kboard.keyb(键位) == 1 当连续按住某键返回真，否则为false
  19. #     比如条件分歧：Kboard.keyb($R_Key_U) == 1
  20. #                   则当持续按下键盘U的时候条件分歧成立
  21. #
  22. # ★、Kboard.key(键位,1) 似乎可以做开关用。按下一次变为true，再按变false
  23. #============================================================================

  25. module Kboard
  26.   #==========================================================================
  27.   # 以下是全键盘按键列表
  28.   #--------------------------------------------------------------------------
  29.   $Rmouse_BUTTON_L = 0x01        # left mouse button
  30.   $Rmouse_BUTTON_R = 0x02        # right mouse button
  31.   $Rmouse_BUTTON_M = 0x04        # middle mouse button
  32.   $Rmouse_BUTTON_4 = 0x05        # 4th mouse button
  33.   $Rmouse_BUTTON_5 = 0x06        # 5th mouse button
  34.   #--------------------------------------------------------------------------
  35.   $R_Key_BACK      = 0x08        # BACKSPACE key
  36.   $R_Key_TAB       = 0x09        # TAB key
  37.   $R_Key_RETURN    = 0x0D        # ENTER key
  38.   $R_Key_SHIFT     = 0x10        # SHIFT key
  39.   $R_Key_CTLR      = 0x11        # CTLR key
  40.   $R_Key_ALT       = 0x12        # ALT key
  41.   $R_Key_PAUSE     = 0x13        # PAUSE key
  42.   $R_Key_CAPITAL   = 0x14        # CAPS LOCK key
  43.   $R_Key_ESCAPE    = 0x1B        # ESC key
  44.   $R_Key_SPACE     = 0x20        # SPACEBAR
  45.   $R_Key_PRIOR     = 0x21        # PAGE UP key
  46.   $R_Key_NEXT      = 0x22        # PAGE DOWN key
  47.   $R_Key_END       = 0x23        # END key
  48.   $R_Key_HOME      = 0x24        # HOME key
  49.   $R_Key_LEFT      = 0x25        # LEFT ARROW key
  50.   $R_Key_UP        = 0x26        # UP ARROW key
  51.   $R_Key_RIGHT     = 0x27        # RIGHT ARROW key
  52.   $R_Key_DOWN      = 0x28        # DOWN ARROW key
  53.   $R_Key_SELECT    = 0x29        # SELECT key
  54.   $R_Key_PRINT     = 0x2A        # PRINT key
  55.   $R_Key_SNAPSHOT  = 0x2C        # PRINT SCREEN key
  56.   $R_Key_INSERT    = 0x2D        # INS key
  57.   $R_Key_DELETE    = 0x2E        # DEL key
  58.   #--------------------------------------------------------------------------
  59.   $R_Key_0         = 0x30        # 0 key
  60.   $R_Key_1         = 0x31        # 1 key
  61.   $R_Key_2         = 0x32        # 2 key
  62.   $R_Key_3         = 0x33        # 3 key
  63.   $R_Key_4         = 0x34        # 4 key
  64.   $R_Key_5         = 0x35        # 5 key
  65.   $R_Key_6         = 0x36        # 6 key
  66.   $R_Key_7         = 0x37        # 7 key
  67.   $R_Key_8         = 0x38        # 8 key
  68.   $R_Key_9         = 0x39        # 9 key
  69.   #--------------------------------------------------------------------------
  70.   $R_Key_A         = 0x41        # A key
  71.   $R_Key_B         = 0x42        # B key
  72.   $R_Key_C         = 0x43        # C key
  73.   $R_Key_D         = 0x44        # D key
  74.   $R_Key_E         = 0x45        # E key
  75.   $R_Key_F         = 0x46        # F key
  76.   $R_Key_G         = 0x47        # G key
  77.   $R_Key_H         = 0x48        # H key
  78.   $R_Key_I         = 0x49        # I key
  79.   $R_Key_J         = 0x4A        # J key
  80.   $R_Key_K         = 0x4B        # K key
  81.   $R_Key_L         = 0x4C        # L key
  82.   $R_Key_M         = 0x4D        # M key
  83.   $R_Key_N         = 0x4E        # N key
  84.   $R_Key_O         = 0x4F        # O key
  85.   $R_Key_P         = 0x50        # P key
  86.   $R_Key_Q         = 0x51        # Q key
  87.   $R_Key_R         = 0x52        # R key
  88.   $R_Key_S         = 0x53        # S key
  89.   $R_Key_T         = 0x54        # T key
  90.   $R_Key_U         = 0x55        # U key
  91.   $R_Key_V         = 0x56        # V key
  92.   $R_Key_W         = 0x57        # W key
  93.   $R_Key_X         = 0x58        # X key
  94.   $R_Key_Y         = 0x59        # Y key
  95.   $R_Key_Z         = 0x5A        # Z key
  96.   #--------------------------------------------------------------------------
  97.   $R_Key_LWIN      = 0x5B        # Left Windows key (Microsoft Natural keyboard)
  98.   $R_Key_RWIN      = 0x5C        # Right Windows key (Natural keyboard)
  99.   $R_Key_APPS      = 0x5D        # Applications key (Natural keyboard)
  100.   #--------------------------------------------------------------------------
  101.   $R_Key_NUMPAD0   = 0x60        # Numeric keypad 0 key
  102.   $R_Key_NUMPAD1   = 0x61        # Numeric keypad 1 key
  103.   $R_Key_NUMPAD2   = 0x62        # Numeric keypad 2 key
  104.   $R_Key_NUMPAD3   = 0x63        # Numeric keypad 3 key
  105.   $R_Key_NUMPAD4   = 0x64        # Numeric keypad 4 key
  106.   $R_Key_NUMPAD5   = 0x65        # Numeric keypad 5 key
  107.   $R_Key_NUMPAD6   = 0x66        # Numeric keypad 6 key
  108.   $R_Key_NUMPAD7   = 0x67        # Numeric keypad 7 key
  109.   $R_Key_NUMPAD8   = 0x68        # Numeric keypad 8 key
  110.   $R_Key_NUMPAD9  = 0x69        # Numeric keypad 9 key
  111.   $R_Key_MULTIPLY  = 0x6A        # Multiply key (*)
  112.   $R_Key_ADD       = 0x6B        # Add key (+)
  113.   $R_Key_SEPARATOR = 0x6C        # Separator key
  114.   $R_Key_SUBTRACT  = 0x6D        # Subtract key (-)
  115.   $R_Key_DECIMAL   = 0x6E        # Decimal key
  116.   $R_Key_DIVIDE    = 0x6F        # Divide key (/)
  117.   #--------------------------------------------------------------------------
  118.   $R_Key_F1        = 0x70        # F1 key
  119.   $R_Key_F2        = 0x71        # F2 key
  120.   $R_Key_F3        = 0x72        # F3 key
  121.   $R_Key_F4        = 0x73        # F4 key
  122.   $R_Key_F5        = 0x74        # F5 key
  123.   $R_Key_F6        = 0x75        # F6 key
  124.   $R_Key_F7        = 0x76        # F7 key
  125.   $R_Key_F8        = 0x77        # F8 key
  126.   $R_Key_F9        = 0x78        # F9 key
  127.   $R_Key_F10       = 0x79        # F10 key
  128.   $R_Key_F11       = 0x7A        # F11 key
  129.   $R_Key_F12       = 0x7B        # F12 key
  130.   #--------------------------------------------------------------------------
  131.   $R_Key_NUMLOCK   = 0x90        # NUM LOCK key
  132.   $R_Key_SCROLL    = 0x91        # SCROLL LOCK key
  133.   #--------------------------------------------------------------------------
  134.   $R_Key_LSHIFT    = 0xA0        # Left SHIFT key
  135.   $R_Key_RSHIFT    = 0xA1        # Right SHIFT key
  136.   $R_Key_LCONTROL  = 0xA2        # Left CONTROL key
  137.   $R_Key_RCONTROL  = 0xA3        # Right CONTROL key
  138.   $R_Key_L_ALT    = 0xA4        # Left ALT key
  139.   $R_Key_R_ALT    = 0xA5        # Right ALT key
  140.   #--------------------------------------------------------------------------
  141.   $R_Key_SEP      = 0xBC        # , key
  142.   $R_Key_DASH      = 0xBD        # - key
  143.   $R_Key_DOTT      = 0xBE        # . Key
  144.   #--------------------------------------------------------------------------
  145.   GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
  146.   GetKeyboardState = Win32API.new("user32","GetKeyState",['I'],'I')
  147.   GetSetKeyState = Win32API.new("user32","SetKeyboardState",['I'],'I')
  148.   #--------------------------------------------------------------------------
  149.   module_function
  150.   #--------------------------------------------------------------------------
  151.   def keyb(rkey)
  152.      if GetKeyState.call(rkey) != 0
  153.        return 1
  154.      end
  155.      return 0
  156.   end
  157.    #--------------------------------------------------------------------------
  158.   def keyboard(rkey)
  159.     GetKeyState.call(rkey) & 0x01 == 1  #
  160.   end
  161.   #--------------------------------------------------------------------------
  162.   def key(rkey, key = 0)
  163.     GetKeyboardState.call(rkey) & 0x01 == key #
  164.   end
  165. end

  167. #==============================================================================
  168. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
  169. #==============================================================================
复制代码
把这个脚本放入MAIN之前
在Game_Player的221行下面添加如下内容
  1.       if Kboard.keyb($R_Key_I) == 1
  2.         move_up
  3.       end
  4.       if Kboard.keyb($R_Key_J) == 1
  5.         move_left
  6.       end
  7.       if Kboard.keyb($R_Key_L) == 1
  8.         move_right
  9.       end
  10.       if Kboard.keyb($R_Key_K) == 1
  11.         move_down
  12.       end
复制代码
作者: zwx235g    时间: 2009-11-24 13:14
2楼的，
注意：（是修改角色行走，光标的移动，）
作者: DeathKing    时间: 2009-11-24 13:30
2楼的，
注意：（是修改角色行走，光标的移动，）
zwx235g 发表于 2009-11-24 13:14


2#完全是正解，不知道LZ所谓的“光标的移动”是什么意思？
作者: zwx235g    时间: 2009-11-25 13:06
2#完全是正解，不知道LZ所谓的“光标的移动”是什么意思？

,,
意思是指 标题选项，对话框光标。。。
作者: 奶油Da蛋糕    时间: 2009-11-25 13:34

  2. $cake = Win32API.new 'user32.dll', 'keybd_event', ['i', 'i', 'l', 'l'], 'v'
  3. class << Graphics
  4. alias update_cake update
  5. def update
  6. update_cake
  7.       if Kboard.keyb($R_Key_I) == 1
  8.         $cake.call 0x26, 0, 0, 0
  9.         $cake.call 0x26, 0, 2, 0
  10.       end
  11.       if Kboard.keyb($R_Key_J) == 1
  12.         $cake.call 0x25, 0, 0, 0
  13.         $cake.call 0x25, 0, 2, 0
  14.       end
  15.       if Kboard.keyb($R_Key_L) == 1
  16.         $cake.call 0x27, 0, 0, 0
  17.         $cake.call 0x27, 0, 2, 0
  18.       end
  19.       if Kboard.keyb($R_Key_K) == 1
  20.         $cake.call 0x28, 0, 0, 0
  21.         $cake.call 0x28, 0, 2, 0
  22.       end
  23. end
  24. end
复制代码
作者: 上帝的眼睛    时间: 2009-11-28 23:14
话说LZ的语气让我很不爽，算了，忍……
[line]1[/line]
把一下脚本放入Window_Selectable169行以下部分
  1.             if Kboard.keyboard($R_Key_K)
  2.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
  3.         # 或光标位置在(项目数-列数)之前的情况下
  4.         if (@column_max == 1 and Input.trigger?(Input::DOWN)) or
  5.            @index < @item_max - @column_max
  6.           # 光标向下移动
  7.           $game_system.se_play($data_system.cursor_se)
  8.           @index = (@index + @column_max) % @item_max
  9.         end
  10.       end
  11.       # 方向键上被按下的情况下
  12.       if Kboard.keyboard($R_Key_I)
  13.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
  14.         # 或光标位置在列之后的情况下
  15.         if (@column_max == 1 and Input.trigger?(Input::UP)) or
  16.            @index >= @column_max
  17.           # 光标向上移动
  18.           $game_system.se_play($data_system.cursor_se)
  19.           @index = (@index - @column_max + @item_max) % @item_max
  20.         end
  21.       end
  22.       # 方向键右被按下的情况下
  23.       if Kboard.keyboard($R_Key_L)
  24.         # 列数为 2 以上并且、光标位置在(项目数 - 1)之前的情况下
  25.         if @column_max >= 2 and @index < @item_max - 1
  26.           # 光标向右移动
  27.           $game_system.se_play($data_system.cursor_se)
  28.           @index += 1
  29.         end
  30.       end
  31.       # 方向键左被按下的情况下
  32.       if Kboard.keyboard($R_Key_J)
  33.         # 列数为 2 以上并且、光标位置在 0 之后的情况下
  34.         if @column_max >= 2 and @index > 0
  35.           # 光标向左移动
  36.           $game_system.se_play($data_system.cursor_se)
  37.           @index -= 1
  38.         end
  39.       end
复制代码




欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X3.1