雅やかさに欠ける方法ですけど、透明なウィンドウを作りディスプレイの最上位に置く事で
結果的にオブジェクトへのマウスクリックを阻害すると言う手もあります。以下は一例ですが
リストビューを作るのが面倒だったのでリストボックスで代用しています。
//シールを貼ってクリックを無効化する(No.4806の名無し様のソースを参照)
//終了はALT+F4で
#include "user32.as"
#define MAIN_WINDOW 0
#define SEAL_WINDOW 1
#define SEAL_SX 120
#define SEAL_SY 90
#define SEAL_PX 240
#define SEAL_PY 180
#define SEAL_DISPX wx+SEAL_PX+3
#define SEAL_DISPY wy+SEAL_PY+27
#define SET_WX gsel MAIN_WINDOW : wx = ginfo_wx1
#define SET_WY gsel MAIN_WINDOW : wy = ginfo_wy1
screen MAIN_WINDOW, 640, 480, 0
objsize SEAL_SX, SEAL_SY
pos SEAL_PX, SEAL_PY
listbox list, 0, "ウツボット\nサボネア\nマスキッパ\n次は誰だろ?\nひゃっはー"
SET_WX
SET_WY
bgscr SEAL_WINDOW, SEAL_SX, SEAL_SY, 0, SEAL_DISPX, SEAL_DISPY
gsel SEAL_WINDOW, 2
color 192, 255, 224
boxf
GetWindowLong hwnd,-20
SetWindowLong hwnd,-20,stat|$80000
SetLayeredWindowAttributes hwnd,0xffffff,128,3
*前口上は変わっても、吹っ飛び捨て台詞は変わらない
pre_wx = wx
pre_wy = wy
SET_WX
SET_WY
if (pre_wx ! wx) | (pre_wy ! wy) {
gsel SEAL_WINDOW
width , , SEAL_DISPX, SEAL_DISPY
}
wait 17
goto *前口上は変わっても、吹っ飛び捨て台詞は変わらない