HSPTV!掲示板

	pww=""

	nen=gettime(0)
	gatu=gettime(1)
	niti=gettime(3)
	zi=gettime(4)
	hunn=gettime(5)
	gekouzi=""
	gekouhunn=""
	zero=""

	#include "hsp3util.as"
	#include "obj.as"
	#include "user32.as"
	cpw=nen+niti*100/gatu*niti/32*1000*5698/56;年＋日×100÷月
*a012

	gradf 0,sy,640,480, 1, $b2d0e3,$f8fbfd
	GSEL 0,-1
	ax=ginfo_dispx:ay=ginfo_dispy
	bgscr 5,422,222,,(ginfo_dispx-422)/2,(ginfo_dispy-222)/2
	color 0 , 128 , 255		; 色を設定
	boxf
	color 0,0,0

	pos 132,70:font "Arial",12,17:mes ""
	pos 78,82:font "Verdana",30,16:mes "Quit PassWord?"
	input pww,160
	sendmsg objinfo_hwnd(0),204,'*
	pos 238,118:button"OK",*stb
	onkey *stbb
	stop
*stbb
	if iparam=13 : goto *stb
	stop
*stb
	if pww="":else:goto*a0
	stop

*a0
cls
bgscr 2,ax,ay,,0,0,ax,ay
onkey 0
*akousin
	
	slog="コンピュータ室使用状況 \n入室人数"+nin+"人\n\n"+plog+""
	color 0,0,0
	gradf 0,sy,10000,1000, 1, $b2d0e3,$f8fbfd
	font "ＭＳ ゴシック" , 80 , 1		; フォントを設定
	POS 0,0:mes"Alt+F4で終了します"
	


	pos 400,500
	objsize 200,100


	zi=gettime(4)
	hunn=gettime(5)
	byo=gettime(6)



	redraw 0
	if hunn<10:zero1=0:else:zero1=""
	font "verdana",60
	color 0,0,255
	pos 850,130:mes ""+zi+":"+zero1+""+hunn+"  "+byo+""
	redraw 1
	pos 400,450
	button"a",*aaa:btna1=0
	button"b",*aaa:btna2=1
	button"c",*aaa:btna3=2
button"Quit",*owaria:btna3=2
	pos 700,300
	font "system" , 20 , 0		; フォントを設定
	color 0,0,0

	font"verdana",60

	font "msゴシック",25

	wait 100	

	goto*akousin
	stop

*owaria
	pwp=""
	objgray btna1,0
	objgray btna2,0
	objgray btna3,0
	objgray 3,0

	#include "user32.as"

bgscr 5,422,222,,(ginfo_dispx-422)/2,(ginfo_dispy-222)/2

	color 0 , 128 , 255		; 色を設定
	boxf
	color 0,0,0

pos 132,70:font "Arial",12,17:mes ""
pos 78,82:font "Verdana",30,16:mes "Quit PassWord?"
input pwp,160
	sendmsg objinfo_hwnd(0),204,'*
	pos 238,118:button"OK",*owarib
	button"Cancel",*a1234
	onkey *owaribb
	stop
*owaribb
	
	if iparam=13 : goto *owarib
	stop
*owarib
	if pwp=pww:end:else:goto*a0
	stop
*a1234

	goto*a0
*aaa
	dialog "あいうえお":goto*a0

これでQuitぼたんを押すとABCボタンは無効化になるんですけど
たま〜に、カーソルを合わせると復帰して有効になり、
クリックして正常に役割を果たし、動いてしまいます(ジャンプしてしまう。)

どうすれば無効化でそのまま続けられますか？

「goto*akousin」を削除します。
たくさんのボタンができてしまうので、
４つ無効化しただけでは全然足りません。

ANTARESさんの言うとおり

ボタンが繰り返し毎に同じ場所に重なって生成され続けている状態です。

なおスクリプトが可読性が低い状態になっているようです。
この場合は goto ではなく gosub によるサブルーチンジャンプを使用したほうが解りやすいスクリプトになると思います。

gosub でヘルプ検索して見ることをお勧めします。

わぁすごい…
皆さんの言うとおり復帰がなくなりました。
ありがとうございます