HASHTBL cursor

cursor[CUR_APPSTARTING] = "砂時計付き矢印カーソル"
cursor[CUR_ARROW] = "標準矢印カーソル"
cursor[CUR_CROSS] = "十字カーソル"
cursor[CUR_HAND] = "ハンドカーソル（Windows2000以降）"
cursor[CUR_HELP] = "クエスチョンマーク付き矢印カーソル"
cursor[CUR_IBEAM] = "アイビーム（縦線）カーソル"
cursor[CUR_NO] = "禁止カーソル"
cursor[CUR_SIZEALL] = "４方向矢印カーソル"
cursor[CUR_SIZENESW] = "斜め左下がりの両方向矢印カーソル"
cursor[CUR_SIZENS] = "上下両方向矢印カーソル"
cursor[CUR_SIZENWSE] = "斜め右下がりの両方向矢印カーソル"
cursor[CUR_SIZEWE] = "左右両方向矢印カーソル"
cursor[CUR_UPARROW] = "垂直の矢印カーソル"
cursor[CUR_WAIT] = "砂時計カーソル"

SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit")

WHILE TRUE
	FUKIDASI(cursor[MUSCUR()])
	SLEEP(0.001)
WEND

//////////////////////////////////////////////////
// 【引数】
//   
// 【戻り値】
//   
//////////////////////////////////////////////////
PROCEDURE forceQuit()
	EXITEXIT
FEND