Line=5 ;スクロールする行数 Time=50 ;感度 ~WheelDown:: ~WheelUp:: SetTimer,Scroll,%Time% Count+=%Line% StringTrimLeft,Key,A_ThisHotkey,1 Return Scroll: Loop,%Count% { If A_PriorHotkey<>%A_ThisHotkey% Break Send,{%Key%} Sleep,%A_Index% } Count=-%Line% SetTimer,Scroll,Off Return http://pc11.2ch.net/test/read.cgi/software/1201502896/917