鼠标脚本选项页的滚动……

水迭澜

难道就没人发现站上的鼠标脚本都存在选项超过一页无法滚动的问题吗= =+只能用键盘控制……这样的话还不如直接用键盘呢……
今天更新了一下Window_Selectable，
这个东西的用途就是在选择项超过一页的时候，点击窗口外面自动往下滚动。看懂的也可以把点击范围限制在窗口的下/上方某个区域……甚至自制选项条……

原鼠标脚本出现那个BUG的原因是没有更改Window_Selectable的update里边控制选项滚动的部分，这样鼠标的移动到窗口最下边的时候，程序发现已经可以翻页了，就往下移动了光标。如果是键盘操作那么光标会停下来，然而鼠标判断index是用屏幕位置来判断的……也就是说，这个时候鼠标指着的index已经又往下移动了。于是程序又要命令光标往下移动……这个过程会一直反复，直到鼠标指向最后一页为止。

这个修改其实只是把判断滚动的东西移动到了update里- -，鼠标不在选项窗口内的时候点左键才能滚动，是向哪个方向滚动取决于鼠标的Y坐标是在窗口的上半部分还是下半部分……
本来想过其他修改方法，例如飞鱼在5楼说的加两个按键的方法=v=+不过这个好象是最省事的……MS冲突性也不高-v-+就这样了……

另外用了这个键盘就不能控制窗口滚动了~不过……有了鼠标还何必用键盘呢（被PIA……）

要用的可以直接替换鼠标脚本的相应位置……也就是class Window_Selectable那段~

1. 
   
2. class Window_Selectable
   
3.   if @self_alias == nil
   
4.     alias self_update update
   
5.     @self_alias = true
   
6.   end
   
7.   def update
   
8.     #self.cursor_rect.empty
   
9.     self_update
   
10.     if self.active and @item_max > 0
    
11.       index_var = @index
    
12.       tp_index = @index
    
13.       mouse_x, mouse_y = Mouse.get_mouse_pos
    
14.       mouse_not_in_rect = true
    
15.       for i in 0...@item_max
    
16.         @index = i
    
17.         update_cursor_rect
    
18.         top_x = self.cursor_rect.x + self.x + 16
    
19.         top_y = self.cursor_rect.y + self.y + 16
    
20.         bottom_x = top_x + self.cursor_rect.width
    
21.         bottom_y = top_y + self.cursor_rect.height
    
22.         if (mouse_x > top_x) and (mouse_y > top_y) and
    
23.            (mouse_x < bottom_x) and (mouse_y < bottom_y)
    
24.           mouse_not_in_rect = false
    
25.           if tp_index != @index
    
26.             tp_index = @index
    
27.             $game_system.se_play($data_system.cursor_se)
    
28.           end
    
29.           break
    
30.         end
    
31.       end
    
32.       if mouse_not_in_rect
    
33.         #  row = @index / @column_max
    
34.           # 当前行被显示开头行前面的情况下
    
35.           if self.top_row < row_max-page_row_max and Mouse.press?(Mouse::LEFT) and mouse_y>self.y+self.height/2
    
36.             self.top_row +=1
    
37.           end
    
38.           # 当前行被显示末尾行之后的情况下
    
39.           if self.top_row > 0 and Mouse.press?(Mouse::LEFT) and mouse_y<=self.y+self.height/2#self.top_row + (self.page_row_max - 1)
    
40.             # 从当前行向末尾滚动
    
41.             self.top_row -=1
    
42.           end
    
43.         @index = index_var
    
44.         if self.is_a?(Window_Target)
    
45.           @index=-3
    
46.         end
    
47.         update_cursor_rect
    
48.         Mouse.click_lock
    
49.       else
    
50.         Mouse.click_unlock               
    
51.       end
    
52.     end
    
53.   end
    
54.   def update_cursor_rect
    
55.     # 光标位置不满 0 的情况下
    
56.     if @index < 0
    
57.       self.cursor_rect.empty
    
58.       return
    
59.     end
    
60.     # 获取当前的行
    
61.     row = @index / @column_max
    
62.     # 当前行被显示开头行前面的情况下
    
63.     if row < self.top_row
    
64.       # 从当前行向开头行滚动
    
65.       self.cursor_rect.empty
    
66.       return
    
67.     end
    
68.     # 当前行被显示末尾行之后的情况下
    
69.     if row > self.top_row + (self.page_row_max - 1)
    
70.       # 从当前行向末尾滚动
    
71.       self.cursor_rect.empty
    
72.       return
    
73.     end
    
74.     # 计算光标的宽
    
75.     cursor_width = self.width / @column_max - 32
    
76.     # 计算光标坐标
    
77.     x = @index % @column_max * (cursor_width + 32)
    
78.     y = @index / @column_max * 32 - self.oy
    
79.     # 更新光标矩形
    
80.     self.cursor_rect.set(x, y, cursor_width, 32)
    
81.   end
    
82. end

复制代码

水迭澜

问题是不是每个鼠标都有滚轮=v=+
不过这东西只是随手写的，做个参考而已……

幻の飞鱼

这个……其实很早就有人问过，尝试解决过，不是很完美……因为增加了两个按扭=。=
LZ很强大

水迭澜

默默地顶上来一下。。。木有人处理这帖灭？

水迭澜

望LS，差不多吧。
然后用一个sprite放在鼠标的位置来伪它= =bbb
然后就是在window_selectable里判断它是否在选项那里~

火鸡三毛老大

最好是可以选择鼠标和键盘...选择时键盘鼠标双使用...选择后支持单个....防止玩家没有键盘或鼠标..{/cy}