通常はobjimageが楽だと思いますが、
背景に画像を使っているならマウス座標から色を変えるのが
一番楽だと思います。
モジュール化してみました。
#module
#deffunc hMes str p1, int r1_, int g1_, int b1_, int r2_, int g2_, int b2_
sdim string, 256: string=p1
r1=r1_ : g1=g1_ : b1=b1_
r2=r2_ : g2=g2_ : b2=b2_
cx=ginfo(22) : cy=ginfo(23)
color r1, g1, b1
pos cx, cy : mes string
if (mousex>=cx)&(mousex<=(cx+ginfo_mesx))&(mousey>=cy)&(mousey<=(cy+ginfo_mesy)){
color r2, g2, b2 : pos cx, cy : mes string
}
return 0
#global
font "MS UI GOTHIC", 31, 0
*main
redraw 0
color 255, 255, 255 : boxf
pos 50, 50
hMes "テストです。", 0,0,0 , 255,0,0
mes
redraw
await 15
goto *main