请问是否有办法增加热键?

timmyyayaya

8 k7 W9 j/ j7 ?1 p) n' O
4 P% g- U4 F, ^6 T8 g5 P之前虽然有在板上问过，不过还是不清楚该如何设置，
! _* {3 Q' l' g$ j: Q! L不知道有没有人在国外找到XAS的增加热键脚本，或是知道该怎么去写RGSS。

ML4455739

% }  c: w' c' c  Y% A( @* v
! a- P8 ^+ h) M# fXAS在国内外都算不冷不热的东西，开发热度不强
照LZ所说增加按键就至少需要考虑两个方面
一是按键数量(全键盘解决可能)二是右下角的UI等。
8 I4 d6 D# X9 ^0 E/ `
附：LZ的3.91我也没下过，不知道是不是汉化的反正结构很奇怪一定是

timmyyayaya

XAS的结构大家说都很怪，
我是想让右下角的ＵＩ热键多一些，
# v# F% B* I3 A( j' u! v& v/ l) L原本是一个技能、一个物品，
变成８个技能／物品。

ML4455739

方法肯定是有，只是这是大工程，没什么人会愿意去做。

timmyyayaya

在下找到了这个脚本，不过套上去有些地方会出错，
* t6 o* a5 e! O4 `4 t+ C$ D' q! ~不知道有人能帮忙看一下吗？

1. #===============================================================================
   % m4 A8 t# i$ J& {% s
2. # XAS - Hot Key HUD
   
3. #===============================================================================
   
4. # By Mr_Wiggles
   * ~( |% O% Y3 ^
5. # Version 1.3
   
6. # 7/6/10
   5 F% u( y0 J* E2 U. \& z4 O. u5 I7 M% Q
7. #-------------------------------------------------------------------------------
   # H8 R2 C7 N8 ]) v' Q% ^
8. # Instructions:
   
9. #  Fill in the constants bellow, paste this script above main and bellow XAS in
   
10. #  your script data base. BE SURE TO SET TO THE RIGHT XAS VERSION!!
    " i* t9 E; x% \/ C' \( _3 M
11. #
    # Q5 ~- x! z: B, x% A
12. #  Place the "Hot_Keys_HUD" picture file into your game directory
    / H; Y7 ]/ k0 L, _0 \+ K0 r
13. #  Graphics/Pictures folder.
    ! Y1 f/ k; f* z3 j
14. #-------------------------------------------------------------------------------
    + W- l2 @" m2 s
15. # Directions of Use:
    , z& F+ w8 J) D6 B4 ?
16. #  Simple just press a number key (1 - 5) when the quick skill or item menu is
    
17. #  Showing.
    
18. #===============================================================================
    0 p# W* e3 F9 P  w; \+ N: i! w9 @
19. HUD_X = 0 # X pos of HUD
    : H- ?. A$ B. a$ u4 d; U1 Z& L: F
20. HUD_Y = 0 # Y pos of HUD
    & l* @+ f$ L" Y
21. 
    
22. # Set true  if XAS 3.7f
    4 {* ?' s) W/ d% m+ \) r% o' X* D) a
23. # set false if XAS 3.6
    : Z  x0 F6 m6 L6 [  S
24. XASVER_37 = true
    * n9 J0 A9 b8 c$ L& d) ]
25. 
    
26. #===============================================================================
    ' Y. @4 X; r& g
27. # Numkeys Module
    9 d" F1 R/ j6 w$ C$ H+ k" Q
28. #===============================================================================
    
29. module Input
    
30.   Numkey = {1 => 1049, 2 => 1050, 3 => 1051, 4 => 1052, 5 => 1053}
    
31.   class << self
    
32.     Key = Win32API.new('user32','GetAsyncKeyState',['i'],'i')
    
33.    
    - W: a( U2 V( u- D7 K) |
34.     def testkey(key)
    ! J- l( v- [# J1 _( ?) r8 }
35.       Key.call(key) & 0x01 == 1
    $ l* X. K. a1 d/ z4 n
36.     end
    
37.    
    ( A# ~+ b" k, ~( g
38.     alias hud_key_update update
    5 t2 |1 G/ z: _: ]2 W% J4 G- G
39.     def update
    $ I9 U; |9 c+ D
40.       hud_key_update
    
41.       @pressed = []
    , P% X( Q3 L9 f+ D# C$ y# f4 I
42.       for key in Numkey.values
    $ Y6 d* U* U3 C) b( q, {7 O1 U
43.         key -= 1000
    
44.         @pressed.push(key) if testkey(key)
    
45.       end
    
46.     end
    # R; W6 x* l) i
47.    
    
48.     def pressed?(key)
    
49.       key -= 1000
    
50.       @pressed = [] if @pressed.nil?
    
51.       return true if @pressed.include?(key)
    , E3 _3 {8 [) h0 H1 I: F/ r& Z! i
52.       return false
    / f4 L2 l" R/ C& ^. r& H5 O' r/ @
53.     end
    ; O" f) R2 r4 N' F0 v; {
54.    
    
55.     alias hud_key_press? press?
    3 i4 W! a. h* _3 d, k3 M" J! Y
56.     def press?(key)
    
57.       return pressed?(key) if key.to_f > 1000
    # ~& m/ S( Y0 n! S, N% g+ I. @
58.       hud_key_press?(key)
    5 g- H9 o; V% \  Y. C6 ~
59.     end
    : s6 t( X( E* I# x/ p
60.   end
    
61. end
    
62. 
    
63. #===============================================================================
    
64. # Game Player
    
65. #===============================================================================
    
66. class Game_Player < Game_Character
    " N% P  A8 b! f9 h
67.   attr_accessor :hud_equip
    
68.   
    ; w- n5 F- E& H, [+ E+ c
69.   alias hot_key_hud_init initialize
    : j. j2 {5 S* ^! l9 F3 w
70.   def initialize
    ' Z  X' k" I3 y" ^/ V- c: T
71.     hot_key_hud_init
    % A3 ]! }% b# w. b: _" U. j
72.     @hud_equip = []
    : R6 q. P8 H: O* i' C- ^* [( A
73.   end
    
74.   
    
75.   def equip_item_to_hud(n, item)
    # m9 l5 ~4 B( S* b" h# O8 R( X
76.     if item.nil?
    
77.       $game_system.se_play($data_system.buzzer_se)
    ! f+ C* T! S5 P5 F1 X
78.       return
    3 b" a5 G% F- i7 {9 i9 s  G
79.     end
    9 e2 G" o  X* d4 ]
80.     $game_system.se_play($data_system.decision_se)
    8 m0 R9 o7 R6 {1 Q  L% Y
81.     @hud_equip[@hud_equip.index(item)] = nil if @hud_equip.include?(item)
    
82.     @hud_equip[n] = item
    
83.   end
    
84. end
    3 [# _  T- P% Q8 n5 U
85. 
    
86. #===============================================================================
    
87. # Quick Skill Window
    ; t5 ?5 i7 m( k  Z! M
88. #===============================================================================
    9 ?1 K0 x9 l1 ^5 }2 h
89. if XASVER_37 == false
    
90.   class Xas_Scene_Skill
    
91.     alias hud_quick_menu_main main
    
92.     def main
      `: V$ k& D& u. q  o, v
93.       @hot_key_hud = Hot_Key_HUD.new
      g6 l0 Q( J1 v! h1 H: j
94.       hud_quick_menu_main
    - [4 V8 ?" E0 o; F  U! j
95.       @hot_key_hud.dispose
    
96.     end
    
97.    
    7 x: c5 @6 y" y. o
98.     alias hotkey_hud_qucik_menu_update update
    
99.     def update
    
100.       hotkey_hud_qucik_menu_update
     & e. |; O& i0 j$ v% O! l! r
101.       # Hot Key num 1
     
102.       if Input.press?(Input::Numkey[1])
     ; ?* x! \/ M9 w3 k
103.         $game_player.equip_item_to_hud(0, @skill_window.skill)
     
104.       # Hot Key num 2
     6 F5 w' e7 c/ L- D4 g
105.       elsif Input.press?(Input::Numkey[2])
     
106.         $game_player.equip_item_to_hud(1, @skill_window.skill)
     
107.       # Hot Key num 3
     
108.       elsif Input.press?(Input::Numkey[3])
     
109.         $game_player.equip_item_to_hud(2, @skill_window.skill)
     
110.       # Hot Key num 4
     * e8 t! u3 {  n6 H
111.       elsif Input.press?(Input::Numkey[4])
     
112.         $game_player.equip_item_to_hud(3, @skill_window.skill)
     " l- D) L' ]% l4 z7 X
113.       # Hot Key num 5
     : p1 Q/ \$ j8 G8 I" l/ o  d0 V
114.       elsif Input.press?(Input::Numkey[5])
     5 A* N7 N4 R2 a" w' q
115.         $game_player.equip_item_to_hud(4, @skill_window.skill)
     
116.       end
     
117.       @hot_key_hud.update
     
118.     end
     % g3 N+ z, g8 L, R
119.   end
     
120. else
     
121.   class Quick_Menu_Skill
     $ F. T/ w' H0 J
122.     alias hud_quick_menu_main main
     ; q% w: T- n8 N
123.     def main
     
124.       @hot_key_hud = Hot_Key_HUD.new
     
125.       hud_quick_menu_main
     7 p0 l& r: M2 B( A/ p. o5 y; X5 @
126.       @hot_key_hud.dispose
     
127.     end
     ) P5 r9 Y( r5 b8 w6 Q
128.    
     8 |) X; g7 {) ~; t  Z4 r' r0 p
129.     alias hotkey_hud_qucik_menu_update update
     
130.     def update
     % I: _7 e" a, i
131.       hotkey_hud_qucik_menu_update
     
132.       # Hot Key num 1
     ( ?% [1 y, v/ X5 r
133.       if Input.press?(Input::Numkey[1])
     * i) Y3 O: c5 j* \
134.         $game_player.equip_item_to_hud(0, @skill_window.skill)
     : E' P& l; f- ^' E( D& G5 J, J2 n0 @7 X6 T, v
135.       # Hot Key num 2
     / p5 M: e" U. l9 ^1 s6 U. n
136.       elsif Input.press?(Input::Numkey[2])
     
137.         $game_player.equip_item_to_hud(1, @skill_window.skill)
     3 m" \1 _- o9 ]6 `3 D4 K  L
138.       # Hot Key num 3
     # _# G8 @" N1 v. g% D9 j2 K! E
139.       elsif Input.press?(Input::Numkey[3])
     / ]* A6 O5 y4 f( U, S4 z
140.         $game_player.equip_item_to_hud(2, @skill_window.skill)
     
141.       # Hot Key num 4
       q' a+ s# \7 U# U, M; a9 M1 g, r
142.       elsif Input.press?(Input::Numkey[4])
     , _/ n8 B$ I7 c' Q% d4 p5 x
143.         $game_player.equip_item_to_hud(3, @skill_window.skill)
     
144.       # Hot Key num 5
     
145.       elsif Input.press?(Input::Numkey[5])
     
146.         $game_player.equip_item_to_hud(4, @skill_window.skill)
     : K1 t7 J! F( H' x) E# u* x
147.       end
     
148.       @hot_key_hud.update
     
149.     end
     9 i/ g' L$ C+ Q
150.   end
     ; n6 V$ ?! }0 ^& g
151. end
     8 l3 F0 i- R! q2 D# g, k  e. m$ t
152. 
     " z0 y' o8 O) @+ y8 f' |0 l  G
153. #===============================================================================
     ) |0 C' J: e5 G+ A0 m' B
154. # Quick Item Window
     
155. #===============================================================================
     % e3 J0 A. }- B% H! {! W; L
156. if XASVER_37 == false
     # G$ C: U4 _$ f6 X- ~& h
157.   class Xas_Scene_Item
     - c- Q" P4 L( W
158.     alias hud_quick_menu_main main
     3 G4 i/ r# d/ s2 i2 C1 w
159.     def main
     
160.       @hot_key_hud = Hot_Key_HUD.new
     % m! u. S: _8 N8 r% F% J4 |) a: j
161.       hud_quick_menu_main
     6 g( X( X4 u) k9 [) s, b; p. S
162.       @hot_key_hud.dispose
     6 i7 B$ \4 U" Z& r
163.     end
     
164.    
     
165.     alias hud_key_update update
     , T: B9 U/ Q6 K: y, d
166.     def update
     8 K1 o3 R6 a. F2 n+ X3 `% I% X
167.       hud_key_update
     # ]% {- \, A0 j# t" |; }
168.       # Hot Key num 1
     
169.       if Input.press?(Input::Numkey[1])
     3 w. k& A3 L. b- A  m
170.         $game_player.equip_item_to_hud(0, @item_window.item)
     
171.       # Hot Key num 2
     
172.       elsif Input.press?(Input::Numkey[2])
     
173.         $game_player.equip_item_to_hud(1, @item_window.item)
     
174.       # Hot Key num 3
     ' B: H0 K- z; J/ @' Q
175.       elsif Input.press?(Input::Numkey[3])
     
176.         $game_player.equip_item_to_hud(2, @item_window.item)
     
177.       # Hot Key num 4
     
178.       elsif Input.press?(Input::Numkey[4])
     % {% U* F" D# U% V5 t$ K
179.         $game_player.equip_item_to_hud(3, @item_window.item)
     
180.       # Hot Key num 5
     % m! d! L7 ]1 {) F0 j$ `
181.       elsif Input.press?(Input::Numkey[5])
     . z, L5 `; B' m! z% z
182.         $game_player.equip_item_to_hud(4, @item_window.item)
     
183.       end
     
184.       @hot_key_hud.update
     
185.     end
     
186.   end
     0 J/ k7 a" T& n$ p
187. else
     
188.   class Quick_Menu_Item
     
189.     alias hud_quick_menu_main main
     ' o' j4 l) Y0 f7 _* f7 t
190.     def main
     
191.       @hot_key_hud = Hot_Key_HUD.new
     $ U) q# E' @/ h, \% L
192.       hud_quick_menu_main
     9 L# c) T; F! d5 d- P& d+ b5 R
193.       @hot_key_hud.dispose
     
194.     end
     
195.    
     
196.     alias hud_key_update update
       f# a; h( s% v' j
197.     def update
     / R1 ~) y; T% t5 w: n5 m. ^& R
198.       hud_key_update
     
199.       # Hot Key num 1
     ; _; _$ C/ ], E# Q: H& W6 e
200.       if Input.press?(Input::Numkey[1])
     
201.         $game_player.equip_item_to_hud(0, @item_window.item)
     
202.       # Hot Key num 2
     
203.       elsif Input.press?(Input::Numkey[2])
     : H+ d7 Z. y/ H$ q  @
204.         $game_player.equip_item_to_hud(1, @item_window.item)
     
205.       # Hot Key num 3
     
206.       elsif Input.press?(Input::Numkey[3])
     1 A0 }/ j4 Z5 s* D% V: B' u
207.         $game_player.equip_item_to_hud(2, @item_window.item)
     8 ~7 _7 c) S8 p, c5 a5 G* ^
208.       # Hot Key num 4
     
209.       elsif Input.press?(Input::Numkey[4])
     
210.         $game_player.equip_item_to_hud(3, @item_window.item)
     ' R+ ]6 ?. Q3 v! g3 v
211.       # Hot Key num 5
     
212.       elsif Input.press?(Input::Numkey[5])
     9 b$ ^& o% b# b2 Y# N. Q
213.         $game_player.equip_item_to_hud(4, @item_window.item)
     
214.       end
     # u; `3 Y' {8 z, L
215.       @hot_key_hud.update
     
216.     end
     
217.   end
     # l$ V0 A# L3 ], H
218. end
     * h, d) W. d+ F/ b
219. 
     # \% U: a6 T  J- H5 ]' u
220. #===============================================================================
     
221. # HUD Window
     
222. #===============================================================================
     
223. class Hot_Key_HUD < Window_Base
     
224.   def initialize(x = HUD_X - 10, y = HUD_Y - 15)
     7 T6 Y# X# Q* f7 j; d
225.     super(x, y, 220, 80)
     
226.     self.contents = Bitmap.new(width - 32, height - 32)
     
227.     self.opacity = 0
     + \, F" L  v2 |
228.     @actor = $game_party.actors[0]
     
229.     refresh
     $ S& s& r6 j0 g& s4 V9 s8 Z! d
230.   end
     $ {, [! L$ v0 }  R: d' h6 B1 u
231. 
       A, q& C* K  k- G
232.   def refresh
     3 @5 b- [4 n: M4 \& i+ i
233.     self.contents.clear
     & S9 a' o' d2 b  l( L
234.     bitmap = RPG::Cache.picture("Hot_Keys_HUD")
     * V& d" G0 ]2 r6 ^1 N+ N
235.     self.contents.blt(0, 0, bitmap, Rect.new(0, 0, 160, 32))
     
236.     for i in 0..4
     
237.       x = 32 * i + 4
     4 k$ w  Q+ D( h2 b" m% U3 _6 Y
238.       item = $game_player.hud_equip[i]
     
239.       next if item.nil?
     
240.       if item.is_a?(RPG::Weapon)
     
241.         item = nil if $game_party.weapon_number(item.id) == 0 and
     
242.           @actor.weapon_id != item.id
     ! p8 ~% B5 G" f; I4 z+ {
243.       elsif item.is_a?(RPG::Armor)
     
244.         item = nil if $game_party.armor_number(item.id) == 0 and
     
245.           @actor.armor1_id != item.id
     ; ~1 G( {( e6 l1 M  W
246.       elsif item.is_a?(RPG::Item)
     
247.         item = nil if $game_party.item_number(item.id) == 0 or
     
248.           !$game_party.item_can_use?(item.id)
     ' y. |! d$ u8 q3 u. V
249.       end
     
250.       bitmap = RPG::Cache.icon(item.icon_name)
     
251.       self.contents.blt(x, 4, bitmap, Rect.new(0, 0, 24, 24))
     ! S6 D7 z. }2 R, ^2 ^6 q
252.     end
     
253.   end
     9 v! n7 R2 _: t5 {! v& N
254.   
     
255.   def equip(item)
     1 X, o0 h% K" ?2 y
256.     if item.nil?
     / Y% D" k: U5 z8 |3 J* a
257.       $game_system.se_play($data_system.buzzer_se)
     
258.       return
     
259.     end
     1 {: k8 U2 s4 c7 o  r& h
260.     if item.is_a?(RPG::Skill)
     
261.       if [email protected]_can_use?(item.id)
     - c6 U; V$ O- j* t; A
262.         $game_system.se_play($data_system.buzzer_se)
     * L. r9 W/ _) q/ C1 `' E. c
263.         return
     # c2 M# E9 r1 ^: z* t6 J0 Q% G% n
264.       end
     , K" Q7 I* ~5 m1 i# ~$ E7 i% r% t$ H
265.       $game_system.xas_skill_id = item.id
     6 C- L5 E' E& W1 a2 Y/ @
266.     elsif item.is_a?(RPG::Weapon)
     9 D( F6 G4 |- m: ]  C
267.       @actor.equip(0, item.id)
     
268.     elsif item.is_a?(RPG::Armor)
       h  H' X" ^4 D6 Z7 O, e- \
269.       @actor.equip(1, item.id)
     
270.     elsif item.is_a?(RPG::Item)
     " P+ G, C. z' H
271.       item_tool_id = XAS::XASITEM_ID[item.id]
     0 x$ l  j% P6 P$ q7 j9 k6 K$ F
272.       if item_tool_id != nil
     ( ]1 \' o# ~9 t% t2 h
273.         unless $game_party.item_can_use?(item.id)
     ) |5 o& h5 I, T5 B& j/ ]. f" ]; f
274.           $game_system.se_play($data_system.buzzer_se)
     ! ~1 M. N/ l9 y! N3 ?) |! r
275.           return
     , r. h* f  l- ~7 i
276.         end
     
277.         $game_system.xas_item_id = item.id
       Q: U# Y: n4 P, }8 u0 L9 _# a& J& ?
278.       end
     
279.     end
     % ~& T( [( h5 {
280.     $game_system.se_play($data_system.equip_se)
     
281.   end
     
282.   
     6 H( l- F/ s% {* z- h
283.   def update
     
284.     @actor = $game_party.actors[0]
     
285.     @hot_keys = $game_player.hud_equip
     
286.     refresh
     8 M) m8 _% \  F7 n8 i1 h; B. T
287.     return if !$scene.is_a?(Scene_Map)
     
288.     if Input.press?(Input::Numkey[1])
     
289.       equip($game_player.hud_equip[0])
     
290.     elsif Input.press?(Input::Numkey[2])
     
291.       equip($game_player.hud_equip[1])
     
292.     elsif Input.press?(Input::Numkey[3])
     
293.       equip($game_player.hud_equip[2])
     
294.     elsif Input.press?(Input::Numkey[4])
     
295.       equip($game_player.hud_equip[3])
     
296.     elsif Input.press?(Input::Numkey[5])
     
297.       equip($game_player.hud_equip[4])
     1 v" h; r8 F7 @) k" x( L- K! n
298.     end
     ; {" x" _- y( j& s
299.   end
     
300. end
     ; u# I1 B1 B( }+ ~/ |# y& \
301. 
     " T5 ?* y: w5 w, e, Z/ A8 g" Q( `2 Q& O
302. #===============================================================================
     $ g6 z' Z% o7 y+ w! J' \
303. # Scene Map
     : y3 u% h0 ~* U& ^
304. #===============================================================================
       g1 Z7 W$ X: t2 q; u0 C
305. class Scene_Map
     
306.   alias hot_key_hud_init main
     
307.   def main
     4 s0 ?2 z& L. @6 a: Z  `8 S% {
308.     @hot_key_hud = Hot_Key_HUD.new
     : @- y+ D; g, Y4 }+ S/ h& Z0 z, Y& H
309.     @hot_key_hud.visible = !$game_switches[XAS_HUDDISABLE_HUD_SWITCH]
     
310.     hot_key_hud_init
       ]7 q) x. B/ z: |; e; G
311.     @hot_key_hud.dispose
     2 m1 h8 _7 E5 ^$ r! s% U
312.   end
     
313.   
     9 d8 x: w8 N$ ^. e; g0 L
314.   alias hot_key_hud_update update
     
315.   def update
     
316.     hot_key_hud_update
     : J" x, {4 z/ D
317.     @hot_key_hud.update
     0 Y, O8 ?- |! k9 c
318.     @hot_key_hud.visible = !$game_switches[XAS_HUDDISABLE_HUD_SWITCH]
     2 r, U7 B9 l# k$ d  X. Z
319.     @hot_key_hud.update if !$game_switches[XAS_HUDDISABLE_HUD_SWITCH]
     
320.   end
     ! u8 u2 F( c8 n7 m; U3 j1 A
321. end

复制代码

ML4455739

7 {4 g5 {  [+ p9 q3 Z% ]: y
问题是什么？应该不会是缺失文件吧？.....
. e' w0 n& Q, U( R! x
有关XAS_HUDDISABLE_HUD_SWITCH的我看了一下，
$ L$ m* L0 v" q+ }7 v6 r0 {因为没下过脚本所提及的XAS版本不清楚内部结构，

0 c* \. ]6 l: [! b# i  ~( d这个可能是XAS版本不同或者是个非独立的脚本，即以下两种出错可能
1.本脚本只适用于XAS 3.7f版本或 XAS 3.6版本
2.这个脚本是从别的完整游戏中提取的，需要其他相关脚本的支持

timmyyayaya

版本确实是不一样，
; |$ v, h5 i4 p" i, ~' G; p跳出的错误讯息
这行item = $game_player.hud_equip[i]
NoMethodError undefined method `[]’ for nil:Class
是否有办法整合呢?

ML4455739

3.91我不清楚用了哪些脚本想整合起来很困难。。
先在238行上面加上

1. p $game_player.hud_equip

复制代码

看返回些啥，如果是nil的话，估计是75~82行出了问题。

ML4455739

timmyyayaya 发表于 2012-4-4 15:19
版本确实是不一样，
  n* _7 j. q9 n9 c, q, Q- K跳出的错误讯息
* p, [: p$ L" \/ H这行item = $game_player.hud_equip

5 D: O* C7 ]9 B+ @3 D顺便一下，我使用默认XAS 3.82的，经过微调可以直接使用，且功效完全正常。

ML4455739

" q# |  o, e" B1 d82行的

1. @hud_equip[n] = item

复制代码

加一行变为：

1. 
   
2. p @hud_equip;p n;p item
   
3. @hud_equip[n] = item

复制代码

会弹出三个框，再次检验其返回值，若有任何一个是nil，
5 w1 i' h" z* _. ?# c' b根据测试得出的结论，肯定是冲突了。
% e7 M* _0 @# W$ b
7 v$ |3 e0 V  G5 b, r$ q8 t8 X) E请LZ有耐心，如果不发工程的话，想整合脚本需要不少步骤多次检验。