光标控制

sblkhgm

我设置
横的  @column_max = 2   是 2排
竖的  @item_max = 4       是 4 行
请问怎么控制  光标 上下左右移动

1. class Window_44 < Window_Selectable
   
2.   #--------------------------------------------------------------------------
   
3.   # ● 初始化对像
   
4.   #     width    : 窗口的宽
   
5.   #     commands : 命令字符串序列
   
6.   #--------------------------------------------------------------------------
   
7. def initialize
   
8.    
   
9.     super(80, 48, 600, 600)
   
10.     self.contents = Bitmap.new(600, 600)
    
11.     self.opacity = 100
    
12.   
    
13.     #refresh
    
14.     @item_max = 4
    
15.     @column_max = 2
    
16.     self.index = 0
    
17.    
    
18.   end
    
19.   #--------------------------------------------------------------------------
    
20. #--------------------------------------------------------------------------
    
21. 
    
22.   #--------------------------------------------------------------------------
    
23.   
    
24.   # ● 刷新
    
25.   #     index : 项目编号
    
26.   #--------------------------------------------------------------------------
    
27.   #--------------------------------------------------------------------------
    
28.   # ● 更新光标举行
    
29.   #--------------------------------------------------------------------------
    
30.   def update_cursor_rect
    
31.     # 光标位置不满 0 的情况下
    
32.     if @index < 0
    
33.       self.cursor_rect.empty
    
34.       return
    
35.     end
    
36.     # 获取当前的行
    
37.     row = @index / @column_max
    
38.     # 当前行被显示开头行前面的情况下
    
39.     if row < self.top_row
    
40.       # 从当前行向开头行滚动
    
41.       self.top_row = row
    
42.     end
    
43.     # 当前行被显示末尾行之后的情况下
    
44.     if row > self.top_row + (self.page_row_max - 1)
    
45.       # 从当前行向末尾滚动
    
46.       self.top_row = row - (self.page_row_max - 1)
    
47.     end
    
48.     # 计算光标的宽
    
49.    
    
50.     # 计算光标坐标
    
51.    
    
52.        x = @index % @column_max * 30 + 20
    
53.        y = @index / @column_max * 30 + 146
    
54.      
    
55.   
    
56.     # 更新国标矩形
    
57.     self.cursor_rect.set(x, y, 65, 50)
    
58.   end
    
59.   #--------------------------------------------------------------------------
    
60.   # ● 刷新画面
    
61.   #--------------------------------------------------------------------------
    
62.   def update
    
63.   
    
64.     # 可以移动光标的情况下
    
65.     if self.active and @item_max > 0 and @index >= 0
    
66.        # 方向键下被按下的情况下
    
67.       if Input.repeat?(Input::DOWN) and @index<18
    
68.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
    
69.         # 或光标位置在(项目数-列数)之前的情况下
    
70.         if (@column_max == 1 and Input.trigger?(Input::DOWN)) or
    
71.            @index < @item_max - @column_max
    
72.           # 光标向下移动
    
73.           $game_system.se_play($data_system.cursor_se)
    
74.           @index = (@index + @column_max) % @item_max
    
75.         end
    
76.       end
    
77.       # 方向键上被按下的情况下
    
78.       if Input.repeat?(Input::UP)
    
79.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
    
80.         # 或光标位置在列之后的情况下
    
81.         if (@column_max == 1 and Input.trigger?(Input::UP)) or
    
82.            @index >= @column_max
    
83.           # 光标向上移动
    
84.           $game_system.se_play($data_system.cursor_se)
    
85.           @index = (@index - @column_max + @item_max) % @item_max
    
86.         end
    
87.       end
    
88.       if Input.repeat?(Input::RIGHT) or
    
89.         @index <= @column_max
    
90.         $game_system.se_play($data_system.cursor_se)
    
91.         @index = (@index - @column_max + 10) % @item_max
    
92.       end
    
93.       
    
94.       
    
95.       
    
96.       
    
97.       
    
98.       
    
99.       
    
100.       
     
101. 
     
102.     end
     
103.     # 刷新帮助文本 (update_help 定义了继承目标)
     
104.     if self.active and @help_window != nil
     
105.       update_help
     
106.     end
     
107.     # 刷新光标矩形
     
108.     update_cursor_rect
     
109.   end
     
110. 
     
111. end
     

复制代码

hys111111

1. class Window_44 < Window_Selectable
   
2.   #--------------------------------------------------------------------------
   
3.   # ● 初始化对像
   
4.   #     width    : 窗口的宽
   
5.   #     commands : 命令字符串序列
   
6.   #--------------------------------------------------------------------------
   
7. def initialize
   
8.    
   
9.     super(80, 48, 600, 600)
   
10.     self.contents = Bitmap.new(600, 600)
    
11.     self.opacity = 100
    
12.   
    
13.     self.active = true
    
14.     #refresh
    
15.     @item_max = 4
    
16.     @column_max = 2
    
17.     self.index = 0
    
18.    
    
19.   end
    
20.   #--------------------------------------------------------------------------
    
21. #--------------------------------------------------------------------------
    
22. 
    
23.   #--------------------------------------------------------------------------
    
24.   
    
25.   # ● 刷新
    
26.   #     index : 项目编号
    
27.   #--------------------------------------------------------------------------
    
28.   #--------------------------------------------------------------------------
    
29.   # ● 更新光标举行
    
30.   #--------------------------------------------------------------------------
    
31.   def update_cursor_rect
    
32.     # 光标位置不满 0 的情况下
    
33.     if @index < 0
    
34.       self.cursor_rect.empty
    
35.       return
    
36.     end
    
37.     # 获取当前的行
    
38.     row = @index / @column_max
    
39.     # 当前行被显示开头行前面的情况下
    
40.     if row < self.top_row
    
41.       # 从当前行向开头行滚动
    
42.       self.top_row = row
    
43.     end
    
44.     # 当前行被显示末尾行之后的情况下
    
45.     if row > self.top_row + (self.page_row_max - 1)
    
46.       # 从当前行向末尾滚动
    
47.       self.top_row = row - (self.page_row_max - 1)
    
48.     end
    
49.     # 计算光标的宽
    
50.    
    
51.     # 计算光标坐标
    
52.    
    
53.        x = @index % @column_max * 30 + 20
    
54.        y = @index / @column_max * 30 + 146
    
55.      
    
56.   
    
57.     # 更新国标矩形
    
58.     self.cursor_rect.set(x, y, 65, 50)
    
59.   end
    
60.   #--------------------------------------------------------------------------
    
61.   # ● 刷新画面
    
62.   #--------------------------------------------------------------------------
    
63.   def update
    
64.       super
    
65.     # 可以移动光标的情况下
    
66.     if self.active and @item_max > 0 and @index >= 0
    
67.        # 方向键下被按下的情况下
    
68.       if Input.repeat?(Input::DOWN) and @index<18
    
69.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
    
70.         # 或光标位置在(项目数-列数)之前的情况下
    
71.         if (@column_max == 1 and Input.trigger?(Input::DOWN)) or
    
72.            @index < @item_max - @column_max
    
73.           # 光标向下移动
    
74.           $game_system.se_play($data_system.cursor_se)
    
75.           @index = (@index + @column_max) % @item_max
    
76.         end
    
77.       end
    
78.       # 方向键上被按下的情况下
    
79.       if Input.repeat?(Input::UP)
    
80.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
    
81.         # 或光标位置在列之后的情况下
    
82.         if (@column_max == 1 and Input.trigger?(Input::UP)) or
    
83.            @index >= @column_max
    
84.           # 光标向上移动
    
85.           $game_system.se_play($data_system.cursor_se)
    
86.           @index = (@index - @column_max + @item_max) % @item_max
    
87.         end
    
88.       end
    
89.       if Input.repeat?(Input::RIGHT) or
    
90.         @index <= @column_max
    
91.         $game_system.se_play($data_system.cursor_se)
    
92.         @index = (@index - @column_max + 10) % @item_max
    
93.       end
    
94.       if Input.repeat?(Input::LEFT) or
    
95.         @index >= @column_max
    
96.         $game_system.se_play($data_system.cursor_se)
    
97.         @index = (@index + @column_max + 10) % @item_max
    
98.       end
    
99.       
    
100.       
     
101.       
     
102.       
     
103.       
     
104.       
     
105.       
     
106. 
     
107.     end
     
108.     # 刷新帮助文本 (update_help 定义了继承目标)
     
109.     if self.active and @help_window != nil
     
110.       update_help
     
111.     end
     
112.     # 刷新光标矩形
     
113.     update_cursor_rect
     
114.   end
     
115. 
     
116. end

复制代码

完成

sblkhgm

hys111111 发表于 2012-7-5 20:13
完成

请问下  我 Window_44.new调用没反应  是为什么

道化右手

#==============================================================================
$ShowCursor = Win32API.new("user32", "ShowCursor", 'i', 'l')
$GetCursorPos = Win32API.new("user32", "GetCursorPos", 'p', 'i')
$ScreenToClient = Win32API.new("user32", "ScreenToClient", 'ip', 'i')
$GetActiveWindow = Win32API.new("user32", "GetActiveWindow", nil, 'l')
$Window_HWND = $GetActiveWindow.call
$GetKeyState = Win32API.new("user32", "GetKeyState", 'i', 'i')
#$FindWindow = Win32API.new("user32", "FindWindow", 'pp', 'i')
#$HookStart  = Win32API.new("mouse_hook.dll", "HookStart", 'i', nil)
#$HookEnd  = Win32API.new("mouse_hook.dll", "HookEnd", nil, nil)
#$GetMouseStatus  = Win32API.new("mouse_hook.dll", "GetMouseStatus", 'i', 'i')
#$Window_HWND = $FindWindow.call(nil, 'mousetry')

module Mouse   
LEFT = 0x01
RIGHT = 0x02

def self.init(sprite = nil)
#   $HookStart.call($Window_HWND)
   $ShowCursor.call(0)
   
   @show_cursor = false
   
   @mouse_sprite = Sprite.new
   @mouse_sprite.z = 99999
   @mouse_sprite.bitmap = Bitmap.new('Graphics/Icons/001-Weapon01.png')
   #@mouse_sprite.bitmap.fill_rect(Rect.new(0, 0, 32, 32), Color.new(0, 0, 0))

   @left_press = false
   @right_press = false
   @left_trigger = false
   @right_trigger = false
   @left_repeat = false
   @right_repeat = false
   @click_lock = false
   
   update
end
def self.exit
   @mouse_sprite.bitmap.dispose
   @mouse_sprite.dispose
   @show_cursor = true
#    $HookEnd.call
   $ShowCursor.call(1)
end
def self.mouse_debug
   return @mouse_debug.bitmap
end
def self.update
   left_down = $GetKeyState.call(0x01)
   right_down = $GetKeyState.call(0x02)
   
   @click_lock = false
   mouse_x, mouse_y = self.get_mouse_pos
   if @mouse_sprite != nil
     @mouse_sprite.x = mouse_x
     @mouse_sprite.y = mouse_y
   end
   if left_down[7] == 1
     @left_repeat = (not @left_repeat)
     @left_trigger = (not @left_press)
     @left_press = true
   else
     @left_press = false
     @left_trigger = false
     @left_repeat = false
   end
   if right_down[7] == 1
     @right_repeat = (not @right_repeat)
     @right_trigger = (not @right_press)
     @right_press = true
   else
     @right_press = false
     @right_trigger = false
     @right_repeat = false
   end
end
def self.get_mouse_pos
   point_var = [0, 0].pack('ll')
   if $GetCursorPos.call(point_var) != 0
     if $ScreenToClient.call($Window_HWND, point_var) != 0
       x, y = point_var.unpack('ll')
       if (x < 0) or (x > 10000) then x = 0 end
       if (y < 0) or (y > 10000) then y = 0 end
       if x > 640 then x = 640 end
       if y > 480 then y = 480 end
       return x, y
     else
       return 0, 0
     end
   else
     return 0, 0
   end
end
def self.press?(mouse_code)
   if mouse_code == LEFT
     if @click_lock
       return false
     else
       return @left_press
     end
   elsif mouse_code == RIGHT
     return @right_press
   else
     return false
   end
end
def self.trigger?(mouse_code)
   if mouse_code == LEFT
     if @click_lock
       return false
     else
       return @left_trigger
     end
   elsif mouse_code == RIGHT
     return @right_trigger
   else
     return false
   end
end
def self.repeat?(mouse_code)
   if mouse_code == LEFT
     if @click_lock
       return false
     else
       return @left_repeat
     end
   elsif mouse_code == RIGHT
     return @right_repeat
   else
     return false
   end
end
def self.click_lock?
   return @click_lock
end
def self.click_lock
   @click_lock = true
end
def self.click_unlock
   @click_lock = false
end
end
module Input
if @self_update == nil
   @self_update = method('update')
   @self_press = method('press?')
   @self_trigger = method('trigger?')
   @self_repeat = method('repeat?')
end
def self.update
   @self_update.call
   Mouse.update
end
def self.press?(key_code)
   if @self_press.call(key_code)
     return true
   end
   if key_code == C
     return Mouse.press?(Mouse::LEFT)
   elsif key_code == B
     return Mouse.press?(Mouse::RIGHT)
   else
     return @self_press.call(key_code)
   end
end
def self.trigger?(key_code)
   if @self_trigger.call(key_code)
     return true
   end
   if key_code == C
     return Mouse.trigger?(Mouse::LEFT)
   elsif key_code == B
     return Mouse.trigger?(Mouse::RIGHT)
   else
     return @self_trigger.call(key_code)
   end
end
def self.repeat?(key_code)
   if @self_repeat.call(key_code)
     return true
   end
   if key_code == C
     return Mouse.repeat?(Mouse::LEFT)
   elsif key_code == B
     return Mouse.repeat?(Mouse::RIGHT)
   else
     return @self_repeat.call(key_code)
   end
end
end
class Window_Selectable
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   #self.cursor_rect.empty
   self_update
   if self.active and @item_max > 0
     index_var = @index
     tp_index = @index
     mouse_x, mouse_y = Mouse.get_mouse_pos
     mouse_not_in_rect = true
     for i in 0...@item_max
       @index = i
       update_cursor_rect
       top_x = self.cursor_rect.x + self.x + 16
       top_y = self.cursor_rect.y + self.y + 16
       bottom_x = top_x + self.cursor_rect.width
       bottom_y = top_y + self.cursor_rect.height
       if (mouse_x > top_x) and (mouse_y > top_y) and
          (mouse_x < bottom_x) and (mouse_y < bottom_y)
         mouse_not_in_rect = false
         if tp_index != @index
           tp_index = @index
           $game_system.se_play($data_system.cursor_se)
         end
         break
       end
     end
     if mouse_not_in_rect
       @index = index_var
       update_cursor_rect
       Mouse.click_lock
     else
       Mouse.click_unlock                 
     end
   end
end
end
class Window_NameInput
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   #self.cursor_rect.empty
   self_update
   if self.active
     index_var = @index
     mouse_x, mouse_y = Mouse.get_mouse_pos
     mouse_not_in_rect = true
     for i in (0...CHARACTER_TABLE.size).to_a.push(180)
       @index = i
       update_cursor_rect
       top_x = self.cursor_rect.x + self.x + 16
       top_y = self.cursor_rect.y + self.y + 16
       bottom_x = top_x + self.cursor_rect.width
       bottom_y = top_y + self.cursor_rect.height
       #
       if (mouse_x > top_x) and (mouse_y > top_y) and
          (mouse_x < bottom_x) and (mouse_y < bottom_y)
         mouse_not_in_rect = false
         break
       end
     end
     if mouse_not_in_rect
       @index = index_var
       update_cursor_rect
       Mouse.click_lock
     else
       Mouse.click_unlock
     end
   end
end  
end
class Window_InputNumber
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   #self.cursor_rect.empty
   self_update
   mouse_x, mouse_y = Mouse.get_mouse_pos
   if self.active and @digits_max > 0
     index_var = @index
     mouse_not_in_rect = true
     for i in 0...@digits_max
       @index = i
       update_cursor_rect
       top_x = self.cursor_rect.x + self.x + 16
       bottom_x = top_x + self.cursor_rect.width
       #
       if (mouse_x > top_x) and (mouse_x < bottom_x)
         mouse_not_in_rect = false
         break
       end
     end
     if mouse_not_in_rect
       @index = index_var
       update_cursor_rect
       Mouse.click_lock
     else
       Mouse.click_unlock
     end
   end
   if @last_mouse_y == nil
     @last_mouse_y = mouse_y
   end
   check_pos = (@last_mouse_y - mouse_y).abs
   if check_pos > 10
     $game_system.se_play($data_system.cursor_se)
     place = 10 ** (@digits_max - 1 - @index)
     n = @number / place % 10
     @number -= n * place
     n = (n + 1) % 10 if mouse_y < @last_mouse_y
     n = (n + 9) % 10 if mouse_y > @last_mouse_y
     @number += n * place
     refresh
     @last_mouse_y = mouse_y
   end
end
end
class Scene_File
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   mouse_x, mouse_y = Mouse.get_mouse_pos
   Mouse.click_lock
   idx = 0
   for i in @savefile_windows
     top_x = i.x + 16
     top_y = i.y + 16
     bottom_x = top_x + i.width
     bottom_y = top_y + i.height
     if (mouse_x > top_x) and (mouse_y > top_y) and
        (mouse_x < bottom_x) and (mouse_y < bottom_y)
       i.selected = true
       if @file_index != idx  
         @file_index = idx
         $game_system.se_play($data_system.cursor_se)
       end            
       Mouse.click_unlock
     else
       i.selected = false
     end
     idx += 1
   end
   self_update
end
end
class Arrow_Enemy
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   mouse_x, mouse_y = Mouse.get_mouse_pos
   idx = 0
   for i in $game_troop.enemies do
     if i.exist?
       top_x = i.screen_x - self.ox
       top_y = i.screen_y - self.oy
       bottom_x = top_x + self.src_rect.width
       bottom_y = top_y + self.src_rect.height
       if (mouse_x > top_x - $敌人选框扩大) and (mouse_y > top_y - $敌人选框扩大) and
          (mouse_x < bottom_x + $敌人选框扩大) and (mouse_y < bottom_y + $敌人选框扩大)
         if @index != idx
           $game_system.se_play($data_system.cursor_se)
           @index = idx
         end
       end
     end
     idx += 1
   end
   self_update
end
end
class Arrow_Actor
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   mouse_x, mouse_y = Mouse.get_mouse_pos
   idx = 0
   for i in $game_party.actors do
     if i.exist?
       top_x = i.screen_x - self.ox
       top_y = i.screen_y - self.oy
       bottom_x = top_x + self.src_rect.width
       bottom_y = top_y + self.src_rect.height
       if (mouse_x > top_x - $角色选框扩大) and (mouse_y > top_y - $角色选框扩大) and
          (mouse_x < bottom_x + $角色选框扩大) and (mouse_y < bottom_y + $角色选框扩大)
         if @index != idx
           $game_system.se_play($data_system.cursor_se)
           @index = idx
         end
       end
     end
     idx += 1
   end
   self_update
end
end
class Game_Player
if @self_alias == nil
   alias self_update update
   @self_alias = true
end
def update
   mouse_x, mouse_y = Mouse.get_mouse_pos
   if Mouse.trigger?(Mouse::LEFT)
     unless $game_system.map_interpreter.running? or
            @move_route_forcing or $game_temp.message_window_showing
       @mouse_sta = 1
       trg_x = (mouse_x + $game_map.display_x / 4) / 32
       trg_y = (mouse_y + $game_map.display_y / 4) / 32
     end
   end
   if @mouse_sta != nil and @mouse_sta == 1
     unless moving? or $game_system.map_interpreter.running? or
            @move_route_forcing or $game_temp.message_window_showing
       if @paths_id != nil and @paths != nil and @paths_id <= @paths.size
         case @paths[@paths_id]
         when 6
           @last_move_x = true
           move_right
           @paths_id += 1
           @direction = 6
         when 4
           @last_move_x = true
           move_left
           @paths_id += 1
           @direction = 4
         when 2
           @last_move_x = false
           move_down
           @direction = 2
           @paths_id += 1
         when 8
           @last_move_x = false
           move_up
           @direction = 8
           @paths_id += 1
            
         when 1
           @last_move_x = false
           move_lower_left
           @direction = 1
           @paths_id += 1
         when 3
           @last_move_x = false
           move_lower_right
           @direction = 3
           @paths_id += 1
         when 7
           @last_move_x = false
           move_upper_left
           @direction = 7
           @paths_id += 1
         when 9
           @last_move_x = false
           move_upper_right
           @direction = 9
           @paths_id += 1
         end
       else
         @mouse_sta = 0
       end
     end
   end
   self_update
end
end
Mouse.init
END { Mouse.exit }

chd114

1. #==============================================================================
   
2. $ShowCursor = Win32API.new("user32", "ShowCursor", 'i', 'l')
   
3. $GetCursorPos = Win32API.new("user32", "GetCursorPos", 'p', 'i')
   
4. $ScreenToClient = Win32API.new("user32", "ScreenToClient", 'ip', 'i')
   
5. $GetActiveWindow = Win32API.new("user32", "GetActiveWindow", nil, 'l')
   
6. $Window_HWND = $GetActiveWindow.call
   
7. $GetKeyState = Win32API.new("user32", "GetKeyState", 'i', 'i')
   
8. #$FindWindow = Win32API.new("user32", "FindWindow", 'pp', 'i')
   
9. #$HookStart  = Win32API.new("mouse_hook.dll", "HookStart", 'i', nil)
   
10. #$HookEnd  = Win32API.new("mouse_hook.dll", "HookEnd", nil, nil)
    
11. #$GetMouseStatus  = Win32API.new("mouse_hook.dll", "GetMouseStatus", 'i', 'i')
    
12. #$Window_HWND = $FindWindow.call(nil, 'mousetry')
    
13. 
    
14. module Mouse   
    
15. LEFT = 0x01
    
16. RIGHT = 0x02
    
17. 
    
18. def self.init(sprite = nil)
    
19. #   $HookStart.call($Window_HWND)
    
20.    $ShowCursor.call(0)
    
21.    
    
22.    @show_cursor = false
    
23.    
    
24.    @mouse_sprite = Sprite.new
    
25.    @mouse_sprite.z = 99999
    
26.    @mouse_sprite.bitmap = Bitmap.new('Graphics/Icons/001-Weapon01.png')
    
27.    #@mouse_sprite.bitmap.fill_rect(Rect.new(0, 0, 32, 32), Color.new(0, 0, 0))
    
28. 
    
29.    @left_press = false
    
30.    @right_press = false
    
31.    @left_trigger = false
    
32.    @right_trigger = false
    
33.    @left_repeat = false
    
34.    @right_repeat = false
    
35.    @click_lock = false
    
36.    
    
37.    update
    
38. end
    
39. def self.exit
    
40.    @mouse_sprite.bitmap.dispose
    
41.    @mouse_sprite.dispose
    
42.    @show_cursor = true
    
43. #    $HookEnd.call
    
44.    $ShowCursor.call(1)
    
45. end
    
46. def self.mouse_debug
    
47.    return @mouse_debug.bitmap
    
48. end
    
49. def self.update
    
50.    left_down = $GetKeyState.call(0x01)
    
51.    right_down = $GetKeyState.call(0x02)
    
52.    
    
53.    @click_lock = false
    
54.    mouse_x, mouse_y = self.get_mouse_pos
    
55.    if @mouse_sprite != nil
    
56.      @mouse_sprite.x = mouse_x
    
57.      @mouse_sprite.y = mouse_y
    
58.    end
    
59.    if left_down[7] == 1
    
60.      @left_repeat = (not @left_repeat)
    
61.      @left_trigger = (not @left_press)
    
62.      @left_press = true
    
63.    else
    
64.      @left_press = false
    
65.      @left_trigger = false
    
66.      @left_repeat = false
    
67.    end
    
68.    if right_down[7] == 1
    
69.      @right_repeat = (not @right_repeat)
    
70.      @right_trigger = (not @right_press)
    
71.      @right_press = true
    
72.    else
    
73.      @right_press = false
    
74.      @right_trigger = false
    
75.      @right_repeat = false
    
76.    end
    
77. end
    
78. def self.get_mouse_pos
    
79.    point_var = [0, 0].pack('ll')
    
80.    if $GetCursorPos.call(point_var) != 0
    
81.      if $ScreenToClient.call($Window_HWND, point_var) != 0
    
82.        x, y = point_var.unpack('ll')
    
83.        if (x < 0) or (x > 10000) then x = 0 end
    
84.        if (y < 0) or (y > 10000) then y = 0 end
    
85.        if x > 640 then x = 640 end
    
86.        if y > 480 then y = 480 end
    
87.        return x, y
    
88.      else
    
89.        return 0, 0
    
90.      end
    
91.    else
    
92.      return 0, 0
    
93.    end
    
94. end
    
95. def self.press?(mouse_code)
    
96.    if mouse_code == LEFT
    
97.      if @click_lock
    
98.        return false
    
99.      else
    
100.        return @left_press
     
101.      end
     
102.    elsif mouse_code == RIGHT
     
103.      return @right_press
     
104.    else
     
105.      return false
     
106.    end
     
107. end
     
108. def self.trigger?(mouse_code)
     
109.    if mouse_code == LEFT
     
110.      if @click_lock
     
111.        return false
     
112.      else
     
113.        return @left_trigger
     
114.      end
     
115.    elsif mouse_code == RIGHT
     
116.      return @right_trigger
     
117.    else
     
118.      return false
     
119.    end
     
120. end
     
121. def self.repeat?(mouse_code)
     
122.    if mouse_code == LEFT
     
123.      if @click_lock
     
124.        return false
     
125.      else
     
126.        return @left_repeat
     
127.      end
     
128.    elsif mouse_code == RIGHT
     
129.      return @right_repeat
     
130.    else
     
131.      return false
     
132.    end
     
133. end
     
134. def self.click_lock?
     
135.    return @click_lock
     
136. end
     
137. def self.click_lock
     
138.    @click_lock = true
     
139. end
     
140. def self.click_unlock
     
141.    @click_lock = false
     
142. end
     
143. end
     
144. module Input
     
145. if @self_update == nil
     
146.    @self_update = method('update')
     
147.    @self_press = method('press?')
     
148.    @self_trigger = method('trigger?')
     
149.    @self_repeat = method('repeat?')
     
150. end
     
151. def self.update
     
152.    @self_update.call
     
153.    Mouse.update
     
154. end
     
155. def self.press?(key_code)
     
156.    if @self_press.call(key_code)
     
157.      return true
     
158.    end
     
159.    if key_code == C
     
160.      return Mouse.press?(Mouse::LEFT)
     
161.    elsif key_code == B
     
162.      return Mouse.press?(Mouse::RIGHT)
     
163.    else
     
164.      return @self_press.call(key_code)
     
165.    end
     
166. end
     
167. def self.trigger?(key_code)
     
168.    if @self_trigger.call(key_code)
     
169.      return true
     
170.    end
     
171.    if key_code == C
     
172.      return Mouse.trigger?(Mouse::LEFT)
     
173.    elsif key_code == B
     
174.      return Mouse.trigger?(Mouse::RIGHT)
     
175.    else
     
176.      return @self_trigger.call(key_code)
     
177.    end
     
178. end
     
179. def self.repeat?(key_code)
     
180.    if @self_repeat.call(key_code)
     
181.      return true
     
182.    end
     
183.    if key_code == C
     
184.      return Mouse.repeat?(Mouse::LEFT)
     
185.    elsif key_code == B
     
186.      return Mouse.repeat?(Mouse::RIGHT)
     
187.    else
     
188.      return @self_repeat.call(key_code)
     
189.    end
     
190. end
     
191. end
     
192. class Window_Selectable
     
193. if @self_alias == nil
     
194.    alias self_update update
     
195.    @self_alias = true
     
196. end
     
197. def update
     
198.    #self.cursor_rect.empty
     
199.    self_update
     
200.    if self.active and @item_max > 0
     
201.      index_var = @index
     
202.      tp_index = @index
     
203.      mouse_x, mouse_y = Mouse.get_mouse_pos
     
204.      mouse_not_in_rect = true
     
205.      for i in 0...@item_max
     
206.        @index = i
     
207.        update_cursor_rect
     
208.        top_x = self.cursor_rect.x + self.x + 16
     
209.        top_y = self.cursor_rect.y + self.y + 16
     
210.        bottom_x = top_x + self.cursor_rect.width
     
211.        bottom_y = top_y + self.cursor_rect.height
     
212.        if (mouse_x > top_x) and (mouse_y > top_y) and
     
213.           (mouse_x < bottom_x) and (mouse_y < bottom_y)
     
214.          mouse_not_in_rect = false
     
215.          if tp_index != @index
     
216.            tp_index = @index
     
217.            $game_system.se_play($data_system.cursor_se)
     
218.          end
     
219.          break
     
220.        end
     
221.      end
     
222.      if mouse_not_in_rect
     
223.        @index = index_var
     
224.        update_cursor_rect
     
225.        Mouse.click_lock
     
226.      else
     
227.        Mouse.click_unlock                 
     
228.      end
     
229.    end
     
230. end
     
231. end
     
232. class Window_NameInput
     
233. if @self_alias == nil
     
234.    alias self_update update
     
235.    @self_alias = true
     
236. end
     
237. def update
     
238.    #self.cursor_rect.empty
     
239.    self_update
     
240.    if self.active
     
241.      index_var = @index
     
242.      mouse_x, mouse_y = Mouse.get_mouse_pos
     
243.      mouse_not_in_rect = true
     
244.      for i in (0...CHARACTER_TABLE.size).to_a.push(180)
     
245.        @index = i
     
246.        update_cursor_rect
     
247.        top_x = self.cursor_rect.x + self.x + 16
     
248.        top_y = self.cursor_rect.y + self.y + 16
     
249.        bottom_x = top_x + self.cursor_rect.width
     
250.        bottom_y = top_y + self.cursor_rect.height
     
251.        #
     
252.        if (mouse_x > top_x) and (mouse_y > top_y) and
     
253.           (mouse_x < bottom_x) and (mouse_y < bottom_y)
     
254.          mouse_not_in_rect = false
     
255.          break
     
256.        end
     
257.      end
     
258.      if mouse_not_in_rect
     
259.        @index = index_var
     
260.        update_cursor_rect
     
261.        Mouse.click_lock
     
262.      else
     
263.        Mouse.click_unlock
     
264.      end
     
265.    end
     
266. end  
     
267. end
     
268. class Window_InputNumber
     
269. if @self_alias == nil
     
270.    alias self_update update
     
271.    @self_alias = true
     
272. end
     
273. def update
     
274.    #self.cursor_rect.empty
     
275.    self_update
     
276.    mouse_x, mouse_y = Mouse.get_mouse_pos
     
277.    if self.active and @digits_max > 0
     
278.      index_var = @index
     
279.      mouse_not_in_rect = true
     
280.      for i in 0...@digits_max
     
281.        @index = i
     
282.        update_cursor_rect
     
283.        top_x = self.cursor_rect.x + self.x + 16
     
284.        bottom_x = top_x + self.cursor_rect.width
     
285.        #
     
286.        if (mouse_x > top_x) and (mouse_x < bottom_x)
     
287.          mouse_not_in_rect = false
     
288.          break
     
289.        end
     
290.      end
     
291.      if mouse_not_in_rect
     
292.        @index = index_var
     
293.        update_cursor_rect
     
294.        Mouse.click_lock
     
295.      else
     
296.        Mouse.click_unlock
     
297.      end
     
298.    end
     
299.    if @last_mouse_y == nil
     
300.      @last_mouse_y = mouse_y
     
301.    end
     
302.    check_pos = (@last_mouse_y - mouse_y).abs
     
303.    if check_pos > 10
     
304.      $game_system.se_play($data_system.cursor_se)
     
305.      place = 10 ** (@digits_max - 1 - @index)
     
306.      n = @number / place % 10
     
307.      @number -= n * place
     
308.      n = (n + 1) % 10 if mouse_y < @last_mouse_y
     
309.      n = (n + 9) % 10 if mouse_y > @last_mouse_y
     
310.      @number += n * place
     
311.      refresh
     
312.      @last_mouse_y = mouse_y
     
313.    end
     
314. end
     
315. end
     
316. class Scene_File
     
317. if @self_alias == nil
     
318.    alias self_update update
     
319.    @self_alias = true
     
320. end
     
321. def update
     
322.    mouse_x, mouse_y = Mouse.get_mouse_pos
     
323.    Mouse.click_lock
     
324.    idx = 0
     
325.    for i in @savefile_windows
     
326.      top_x = i.x + 16
     
327.      top_y = i.y + 16
     
328.      bottom_x = top_x + i.width
     
329.      bottom_y = top_y + i.height
     
330.      if (mouse_x > top_x) and (mouse_y > top_y) and
     
331.         (mouse_x < bottom_x) and (mouse_y < bottom_y)
     
332.        i.selected = true
     
333.        if @file_index != idx  
     
334.          @file_index = idx
     
335.          $game_system.se_play($data_system.cursor_se)
     
336.        end            
     
337.        Mouse.click_unlock
     
338.      else
     
339.        i.selected = false
     
340.      end
     
341.      idx += 1
     
342.    end
     
343.    self_update
     
344. end
     
345. end
     
346. class Arrow_Enemy
     
347. if @self_alias == nil
     
348.    alias self_update update
     
349.    @self_alias = true
     
350. end
     
351. def update
     
352.    mouse_x, mouse_y = Mouse.get_mouse_pos
     
353.    idx = 0
     
354.    for i in $game_troop.enemies do
     
355.      if i.exist?
     
356.        top_x = i.screen_x - self.ox
     
357.        top_y = i.screen_y - self.oy
     
358.        bottom_x = top_x + self.src_rect.width
     
359.        bottom_y = top_y + self.src_rect.height
     
360.        if (mouse_x > top_x - $敌人选框扩大) and (mouse_y > top_y - $敌人选框扩大) and
     
361.           (mouse_x < bottom_x + $敌人选框扩大) and (mouse_y < bottom_y + $敌人选框扩大)
     
362.          if @index != idx
     
363.            $game_system.se_play($data_system.cursor_se)
     
364.            @index = idx
     
365.          end
     
366.        end
     
367.      end
     
368.      idx += 1
     
369.    end
     
370.    self_update
     
371. end
     
372. end
     
373. class Arrow_Actor
     
374. if @self_alias == nil
     
375.    alias self_update update
     
376.    @self_alias = true
     
377. end
     
378. def update
     
379.    mouse_x, mouse_y = Mouse.get_mouse_pos
     
380.    idx = 0
     
381.    for i in $game_party.actors do
     
382.      if i.exist?
     
383.        top_x = i.screen_x - self.ox
     
384.        top_y = i.screen_y - self.oy
     
385.        bottom_x = top_x + self.src_rect.width
     
386.        bottom_y = top_y + self.src_rect.height
     
387.        if (mouse_x > top_x - $角色选框扩大) and (mouse_y > top_y - $角色选框扩大) and
     
388.           (mouse_x < bottom_x + $角色选框扩大) and (mouse_y < bottom_y + $角色选框扩大)
     
389.          if @index != idx
     
390.            $game_system.se_play($data_system.cursor_se)
     
391.            @index = idx
     
392.          end
     
393.        end
     
394.      end
     
395.      idx += 1
     
396.    end
     
397.    self_update
     
398. end
     
399. end
     
400. class Game_Player
     
401. if @self_alias == nil
     
402.    alias self_update update
     
403.    @self_alias = true
     
404. end
     
405. def update
     
406.    mouse_x, mouse_y = Mouse.get_mouse_pos
     
407.    if Mouse.trigger?(Mouse::LEFT)
     
408.      unless $game_system.map_interpreter.running? or
     
409.             @move_route_forcing or $game_temp.message_window_showing
     
410.        @mouse_sta = 1
     
411.        trg_x = (mouse_x + $game_map.display_x / 4) / 32
     
412.        trg_y = (mouse_y + $game_map.display_y / 4) / 32
     
413.      end
     
414.    end
     
415.    if @mouse_sta != nil and @mouse_sta == 1
     
416.      unless moving? or $game_system.map_interpreter.running? or
     
417.             @move_route_forcing or $game_temp.message_window_showing
     
418.        if @paths_id != nil and @paths != nil and @paths_id <= @paths.size
     
419.          case @paths[@paths_id]
     
420.          when 6
     
421.            @last_move_x = true
     
422.            move_right
     
423.            @paths_id += 1
     
424.            @direction = 6
     
425.          when 4
     
426.            @last_move_x = true
     
427.            move_left
     
428.            @paths_id += 1
     
429.            @direction = 4
     
430.          when 2
     
431.            @last_move_x = false
     
432.            move_down
     
433.            @direction = 2
     
434.            @paths_id += 1
     
435.          when 8
     
436.            @last_move_x = false
     
437.            move_up
     
438.            @direction = 8
     
439.            @paths_id += 1
     
440.             
     
441.          when 1
     
442.            @last_move_x = false
     
443.            move_lower_left
     
444.            @direction = 1
     
445.            @paths_id += 1
     
446.          when 3
     
447.            @last_move_x = false
     
448.            move_lower_right
     
449.            @direction = 3
     
450.            @paths_id += 1
     
451.          when 7
     
452.            @last_move_x = false
     
453.            move_upper_left
     
454.            @direction = 7
     
455.            @paths_id += 1
     
456.          when 9
     
457.            @last_move_x = false
     
458.            move_upper_right
     
459.            @direction = 9
     
460.            @paths_id += 1
     
461.          end
     
462.        else
     
463.          @mouse_sta = 0
     
464.        end
     
465.      end
     
466.    end
     
467.    self_update
     
468. end
     
469. end
     
470. Mouse.init
     
471. END { Mouse.exit }

复制代码

我这个是帮我上面的那个人发的···

sblkhgm

sblkhgm 发表于 2012-7-6 21:08
请问下  我 Window_44.new调用没反应  是为什么

Project1.rar (187.61 KB, 下载次数: 52)

2012-7-9 15:01 上传

点击文件名下载附件

你看下这范例

hys111111

Project1.rar (188.11 KB, 下载次数: 28)

2012-7-10 08:25 上传

点击文件名下载附件

已经改好了。
另外，我把音效屏蔽掉了，为节约内存。（不知道为什么虽然在if里面但是还是一直响）
使用方法：$game_temp.window_44 = true
退出方法：按B键