自分で作るのならこんな感じになります。
複数子のリンクを表示したいのなら少し改造する必要が有ります。
#define ctype MyPtInRect(%1,%2,%3) (%3(0) <= %1 and %3(1) <= %2 and %3(2) >= %1 and %3(3) >= %2)
// 表示する文字のサイズを取得
text = "クリックしてくださいな"
pos 100,100
rect.0 = ginfo_cx , ginfo_cy
mes text
rect.2 = rect(0) +ginfo_mesx , rect(1) +ginfo_mesy
// メインルーチン
*@
redraw 0
// 背景更新
color 255,255,255 : boxf
color
// 文字列とマウスのあたり判定
if MyPtInRect(mousex , mousey , rect) {
line rect.0 ,rect.3 ,rect.2 ,rect.3
getkey key,1
if key : gosub *label_Click
}
// 文字列の表示
pos rect.0 , rect.1 : mes text
redraw 1 : wait 1
goto*@b
*label_Click
dialog "click"
return