お願いします。
#include "hspcmp.as" sdim txt, 128 pack = "start.ax" pos 10, 10 : mes "使用ASファイル" pos 160, 10 : input txt, 200, 20 pos 360, 10 : button gosub "参照", *sansyou pos 10, 40 : button gosub "作成", *making stop *sansyou dialog "", 16, "使用ファイル" if stat : objprm 0, refstr return *making if txt = "" { dialog "ファイル名を指定してください。" } else { chdir dir_exe // ランタイムのフォルダに移動 bsave "packfile", pack, strlen(pack) // PackFile作成 hsc_ini txt // スクリプトファイル名を指定する hsc_objname pack // デフォルト中間ファイル名を指定する hsc_comp 0 // デバッグ情報を付加しない pack_ini getpath(txt, 9) // PACKFILEマネージャの初期化を行う pack_make 0 // EXEに埋め込むDPM作成 pack_exe 0 // 標準モード(1:フルスクリーン 2:スクリーンセイバー) dialog "作成しました。" } return