Project1

标题: 帮忙改个键位，谢谢 [打印本页]
作者: guoyq1988    时间: 2013-12-3 12:46
标题: 帮忙改个键位，谢谢
虽然@芯☆淡茹水 说对照全键盘脚本改
但是鄙人愚笨，改了之后一直出错
所以只能来求助了
请路过的大神帮忙或指点下
怎么把瞬移(键盘上的z键)改成(键盘上的a键)
谢谢

脚本如下
  1. #==============================================================================
  2. # ★【  瞬移  】★
  3. #==============================================================================
  4. #  by -> 芯☆淡如水
  5. #==============================================================================
  6. # ● 使用方法：复制该脚本，插入到 main 前。
  7. #==============================================================================
  8. #   瞬移！这个就不用多介绍了，常玩游戏的都知道其概念。
  9. #   如果实在不知道，请测试范例工程。
  10. #==============================================================================
  11. # ● 设置：
  12. #-----------------------------------------------------------------------------
  13. # 瞬移开启/关闭的开关 ID。
  14. TELEPORT_SWITCHE_ID = 1
  15. #------------------------------------------------------------------------------
  16. # 启动瞬移的按钮（A 对应键盘 Z 键）
  17. TELEPORT_INPOT = Input::A
  18. #-----------------------------------------------------------------------------
  19. # 瞬移时播放的动画 ID
  20. TELEPORT_ANIMATION_ID = 101
  21. #-----------------------------------------------------------------------------
  22. # 瞬移的距离（格，地图图块单元）
  23. TELEPORT_RANGE = 5
  24. #-----------------------------------------------------------------------------
  25. # 瞬移时地图画面的滚动速度（大地图才滚动）
  26. SCROLL_AGI = 5
  27. #-----------------------------------------------------------------------------
  28. # 瞬移消耗的 SP （消耗带头角色的 SP）
  29. TELEPORT_SP = 10
  30. #==============================================================================
  31. class Game_Character
  32.   #--------------------------------------------------------------------------
  33.   def teleport
  34.     actor = $game_party.actors[0]
  35.     if actor.sp < TELEPORT_SP
  36.       $game_system.se_play($data_system.buzzer_se)
  37.       return
  38.     end
  39.     case @direction
  40.     when 2
  41.       new_x = @x
  42.       new_y = @y + TELEPORT_RANGE
  43.       while ! passable?(new_x, new_y, 0)
  44.         break if new_y == @y
  45.         new_y -= 1
  46.       end
  47.       distance = (new_y - @y).abs
  48.     when 4
  49.       new_x = @x - TELEPORT_RANGE
  50.       new_y = @y
  51.       while ! passable?(new_x, new_y, 0)
  52.         break if new_x == @x
  53.         new_x += 1
  54.       end
  55.       distance = (new_x - @x).abs
  56.     when 6
  57.       new_x = @x + TELEPORT_RANGE
  58.       new_y = @y
  59.       while ! passable?(new_x, new_y, 0)
  60.         break if new_x == @x
  61.         new_x -= 1
  62.       end
  63.       distance = (new_x - @x).abs
  64.     when 8
  65.       new_x = @x
  66.       new_y = @y - TELEPORT_RANGE
  67.       while ! passable?(new_x, new_y, 0)
  68.         break if new_y == @y
  69.         new_y += 1
  70.       end
  71.       distance = (new_y - @y).abs
  72.     end
  73.     actor.sp -= TELEPORT_SP
  74.     $game_player.animation_id = TELEPORT_ANIMATION_ID
  75.     @real_x = new_x * 128
  76.     @real_y = new_y * 128
  77.     $game_map.start_scroll(@direction, distance, SCROLL_AGI)
  78.     @x = new_x
  79.     @y = new_y
  80.   end
  81. end
  82. #==============================================================================
  83. class Scene_Map
  84.   #--------------------------------------------------------------------------
  85.   alias add_update_xdrs update
  86.   def update
  87.     if Input.trigger?(TELEPORT_INPOT)
  88.       $game_player.teleport if $game_switches[TELEPORT_SWITCHE_ID]
  89.     end
  90.     add_update_xdrs
  91.   end
  92. end
  93. #==============================================================================
复制代码
作者: 艾拉梅德    时间: 2013-12-3 14:21
全键盘脚本64行，分明写着$R_Key_A         = 0x41        # A key
然后是脚本上面的解释：
Kboard.keyboard(键位)  返回是否按下这个键的判断。
#     比如条件分歧：Kboard.keyboard($R_Key_H)
#                   则当按下键盘H键的时候条件分歧成立
还用我说吗。。。
作者: fux2    时间: 2013-12-3 15:23
把17行的Input::A改成Input::X
作者: batfjtn    时间: 2013-12-3 15:56
本帖最后由 batfjtn 于 2013-12-3 16:02 编辑

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


全键盘加强
RUBY 代码复制
  1. #1、Kboard.press?(key) 同 Input.press?(key)
  2. #2、Kboard.repeat?(key) 同 Input.repeat?(key)
  3. #3、Kboard.trigger?(key) 同 Input.trigger?(key)
  4.  
  5.  
  6. module Kboard
  7.  
  8.  module_function
  9.  
  10.  @R_Key_Hash = {}
  11.  @R_Key_Repeat = {}
  12.  
  13.  GetKeyState = Win32API.new("user32","GetAsyncKeyState",['I'],'I')
  14.  
  15.  def press?(rkey)
  16.    return GetKeyState.call(rkey) != 0
  17.  end
  18.  
  19.  def repeat?(rkey)
  20.    result = GetKeyState.call(rkey)
  21.    if result != 0
  22.      if @R_Key_Repeat[rkey].nil?
  23.        @R_Key_Repeat[rkey] = 0
  24.        return true
  25.      end
  26.      @R_Key_Repeat[rkey] += 1
  27.    else
  28.      @R_Key_Repeat[rkey] = nil
  29.      @R_Key_Hash[rkey] = 0
  30.    end
  31.    if !@R_Key_Repeat[rkey].nil? and @R_Key_Repeat[rkey] > 4 # 4乃准确数字
  32.      @R_Key_Repeat[rkey] = 0
  33.      return true
  34.    else
  35.      return false
  36.    end
  37.  end
  38.  
  39.  def trigger?(rkey)
  40.    result = GetKeyState.call(rkey)
  41.    if @R_Key_Hash[rkey] == 1 and result != 0
  42.      return false
  43.    end
  44.    if result != 0
  45.      @R_Key_Hash[rkey] = 1
  46.      return true
  47.    else
  48.      @R_Key_Hash[rkey] = 0
  49.      return false
  50.    end
  51.  end
  52.  
  53. end

键盘加好后...


修改87行

class Scene_Map
  #--------------------------------------------------------------------------
  alias add_update_xdrs update
  def update
    if Input.trigger?(TELEPORT_INPOT)
      $game_player.teleport if $game_switches[TELEPORT_SWITCHE_ID]
    end
    add_update_xdrs
  end
end

把if Input.trigger?(TELEPORT_INPOT)

改为

if Kboard.trigger?($R_Key_M)

就OK了...

这样就按M~~!!!

可以对照上面的去修改~~!!!

2更:

修改好的~!快键为M键~~!

RUBY 代码复制
  1. #==============================================================================
  2. # ★【  瞬移  】★
  3. #==============================================================================
  4. #  by -> 芯☆淡如水
  5. #==============================================================================
  6. # ● 使用方法：复制该脚本，插入到 main 前。
  7. #==============================================================================
  8. #   瞬移！这个就不用多介绍了，常玩游戏的都知道其概念。
  9. #   如果实在不知道，请测试范例工程。
  10. #==============================================================================
  11. # ● 设置：
  12. #-----------------------------------------------------------------------------
  13. # 瞬移开启/关闭的开关 ID。
  14. TELEPORT_SWITCHE_ID = 1
  15. #------------------------------------------------------------------------------
  16. # 启动瞬移的按钮（A 对应键盘 Z 键）
  17. TELEPORT_INPOT = Input::A
  18. #-----------------------------------------------------------------------------
  19. # 瞬移时播放的动画 ID
  20. TELEPORT_ANIMATION_ID = 101
  21. #-----------------------------------------------------------------------------
  22. # 瞬移的距离（格，地图图块单元）
  23. TELEPORT_RANGE = 5
  24. #-----------------------------------------------------------------------------
  25. # 瞬移时地图画面的滚动速度（大地图才滚动）
  26. SCROLL_AGI = 5
  27. #-----------------------------------------------------------------------------
  28. # 瞬移消耗的 SP （消耗带头角色的 SP）
  29. TELEPORT_SP = 10
  30. #==============================================================================
  31. class Game_Character
  32.   #--------------------------------------------------------------------------
  33.   def teleport
  34.     actor = $game_party.actors[0]
  35.     if actor.sp < TELEPORT_SP
  36.       $game_system.se_play($data_system.buzzer_se)
  37.       return
  38.     end
  39.     case @direction
  40.     when 2
  41.       new_x = @x
  42.       new_y = @y + TELEPORT_RANGE
  43.       while ! passable?(new_x, new_y, 0)
  44.         break if new_y == @y
  45.         new_y -= 1
  46.       end
  47.       distance = (new_y - @y).abs
  48.     when 4
  49.       new_x = @x - TELEPORT_RANGE
  50.       new_y = @y
  51.       while ! passable?(new_x, new_y, 0)
  52.         break if new_x == @x
  53.         new_x += 1
  54.       end
  55.       distance = (new_x - @x).abs
  56.     when 6
  57.       new_x = @x + TELEPORT_RANGE
  58.       new_y = @y
  59.       while ! passable?(new_x, new_y, 0)
  60.         break if new_x == @x
  61.         new_x -= 1
  62.       end
  63.       distance = (new_x - @x).abs
  64.     when 8
  65.       new_x = @x
  66.       new_y = @y - TELEPORT_RANGE
  67.       while ! passable?(new_x, new_y, 0)
  68.         break if new_y == @y
  69.         new_y += 1
  70.       end
  71.       distance = (new_y - @y).abs
  72.     end
  73.     actor.sp -= TELEPORT_SP
  74.     $game_player.animation_id = TELEPORT_ANIMATION_ID
  75.     @real_x = new_x * 128
  76.     @real_y = new_y * 128
  77.     $game_map.start_scroll(@direction, distance, SCROLL_AGI)
  78.     @x = new_x 
  79.     @y = new_y
  80.   end
  81. end
  82. #==============================================================================
  83. class Scene_Map
  84.   #--------------------------------------------------------------------------
  85.   alias add_update_xdrs update
  86.   def update
  87.     if Kboard.trigger?($R_Key_M)
  88.       $game_player.teleport if $game_switches[TELEPORT_SWITCHE_ID]
  89.     end
  90.     add_update_xdrs
  91.   end
  92. end
  93. #==============================================================================
作者: guoyq1988    时间: 2013-12-3 20:00
谢谢三位解答，问题解决了
@myownroc 结贴



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