1. >> 無回答
2.>> たぶん、既出の回答で十分でしょうか以下のようにbutton命令を使わない方法もあります。
画像を用意し(button1.bmp<118*38>,button2.bmp<118*38>,button3.bmp<118*38>)コメントアウトした行のコメントアウトを解除し、最後に;ついてる3行をコメントアウト
するば、できます。ちなみに、bgscrなのにタイトルバー的なものをつけてみました。(フルスクリーンでないので動かせないと不便なので)
bgscr 0,120,140
;buffer 2:picload "button1.bmp"
;buffer 3:picload "button2.bmp"
;buffer 4:picload "button3.bmp"
;gsel 0
onclick gosub *click
color:boxf
color 50,50,255:boxf 1,1,118,18
color 255,255,50:pos 10,1:mes " 仮想OS"
color 0,255,255:boxf 1,21,118,58
color 255,0,0:pos 10,27:font "",30:mes "ボタンA";
;pos 0,21:gcopy 2
color 0,255,255:boxf 1,61,118,98
color 255,0,0:pos 10,67:font "",30:mes "ボタンB";
;pos 0,21:gcopy 3
color 0,255,255:boxf 1,101,118,138
color 255,0,0:pos 30,107:font "",30:mes "終了";
;pos 0,21:gcopy 4
stop
*click
if (mousey>0)&(mousey<20){
MX=mousex:MY=mousey
repeat
stick key,256
iF(key^256):break
ScreenX=ginfo_mx-MX
ScreenY=ginfo_my-MY
width ,,ScreenX,ScreenY
await 1
loop
}
if (mousey>20)&(mousey<60):dialog "ボタンAだよ!"
if (mousey>60)&(mousey<100):dialog "ボタンBだよ!"
if (mousey>100)&(mousey<140):end
return