#include "hspcmp.as"
sdim txt, 128, 2
sdim kakucyoushi, 3, 2
kakucyoushi = "as", "ax"
pos 10, 10 : mes "実行ASファイル"
pos 160, 10 : input txt.0, 200, 20
pos 360, 10 : button "参照", *sansyou
pos 10, 40 : mes "作成AXファイル"
pos 160, 40 : input txt.1, 200, 20
pos 360, 40 : button "参照", *sansyou
pos 10, 70 : button "実行", *running
stop
*sansyou
// 押した参照ボタン番号(0:AS側 1:AX側)
push = stat / 2
dialog kakucyoushi.push, 16 + push
if stat : objprm push * 2, refstr
stop
*running
if (txt.0 = "") || (txt.1 = "") {
dialog "ファイル名を指定してください。"
} else {
hsc_ini txt.0 // スクリプトファイル名を指定する
hsc_objname txt.1 // 作成する中間ファイル名を指定する
hsc_comp 1 // 中間ファイル作成する(0はEXE作成時に使う)
run txt.1 // 作成した中間ファイルを実行する
delete txt.1 // 中間ファイルを削除する(必要な場合はこの処理を削る)
}
stop
|