IF GETKEYSTATE(TGL_IME) THEN KBD(VK_KANJI,CLICK)
DIM get_ID[GETALLWIN()]
DIM m = 0
DIM count_m = 0
FOR i = 0 to GETALLWIN()-1
IFB POS("MAGI" ,STATUS(ALL_WIN_ID[i],ST_TITLE)) <> 0 THEN
get_ID[m] = ALL_WIN_ID[i]
IF GETITEM(ALL_WIN_ID[i],ITM_ACCTXT) <> 0 THEN
DIM num = GETITEM(ALL_WIN_ID[i], EVAL("ITM_ACCTXT"))
FOR k = 0 TO num - 1
IF POS("終了(ESC)",ALL_ITEM_LIST[k]) <> 0 THEN
CTRLWIN(get_ID[m], MAX)
CTRLWIN(get_ID[m], ACTIVATE)
CLKITEM(get_ID[m], "終了(ESC)", CLK_ACC)
ENDIF
IF POS("クリア",ALL_ITEM_LIST[k]) <> 0 THEN
CTRLWIN(get_ID[m], MAX)
CTRLWIN(get_ID[m], ACTIVATE)
CLKITEM(get_ID[m], "終了", CLK_ACC)
ENDIF
NEXT
ENDIF
ENDIF
m = m + 1
NEXT
count_m = m