' サンプル1 - 変換・確定・削除の処理の雛形 CONST MYSELF = 0 ' 自分のゲート番号 (ゲート0: フロントエンドからの要求) CONST TARGET = 1 ' 接続先ゲート番号 (ゲート1: 辞書プロセスへの処理依頼) SET GATE = CREATEOBJECT("SKKGate") SET SHELL = CREATEOBJECT("WScript.Shell") ' メイン DO WHILE 1 ' 待機 ID = GATE.SYNC(MYSELF, 1) ' 終了 (停止要求 -1 / 二重起動 -2) IF ID < 0 THEN IF ID = -2 THEN SHELL.POPUP "停止します" GATE.SYNC -1, MYSELF END IF EXIT DO END IF INDEX = GATE.GET CAND = GATE.GET(1) ATTR = GATE.GET(2) SELECT CASE ID ' 変換 CASE 0 RESULT = SPLIT(GATE.SEARCH((INDEX), (ATTR), TARGET), CHR(3)) FOR I = 0 TO UBOUND(RESULT) GATE.PUT (RESULT(I)) NEXT ' 補完 CASE 1 RESULT = SPLIT(GATE.ABBREV((INDEX), (ATTR), TARGET), CHR(3)) FOR I = 0 TO UBOUND(RESULT) GATE.PUT (RESULT(I)) NEXT ' 確定 CASE 2 GATE.UPDATE (INDEX), (CAND), (ATTR), TARGET ' 削除 CASE 3 GATE.DELETE (INDEX), (CAND), (ATTR), TARGET rem ' 予約 rem CASE ELSE rem GATE.EXEC TARGET END SELECT LOOP