【本ヌレだよ】Sleipnir 3.40【全員集合】

IE7とIE8でCtrl+ホイールのフォントサイズ変更が利かないのは本スレで散々既出だよ
長くなりすぎるからフレーム対策は省く。
onmousewheelがwindowで動けば話は早いんだがな。

// ==UserScript==
// @name 実験コード
// @include *
// @type SleipnirScript
// ==/UserScript==

var ScriptControl = CreateObject("ScriptControl");
if (ScriptControl && !_window[ScriptName]) {
_window[ScriptName] = true;
ScriptControl.Language = "JScript";
ScriptControl.AddObject("ScriptControl", ScriptControl);
ScriptControl.AddObject("sleipnir", sleipnir, true);
ScriptControl.AddObject("_window", _window);
ScriptControl.Eval("_window.attachEvent('onunload', function(){ScriptControl=null;});");
ScriptControl.AddCode(hoge);
ScriptControl.Run("hoge", _window);
}

function hoge(window)
{
window.document.attachEvent("onmousewheel", function(e){
if (sleipnir.API.CtrlDown) {
sleipnir.Echo(e.wheelDelta);
sleipnir.API.ExecuteAction((e.wheelDelta + 120 ? "In" : "De") + "creaseFontSize");
sleipnir.API.ExecuteAction("SetFocusView");
}
});
}