2008年5月13日火曜日

TACK Local Links:テストコード末尾データの復元操作:テストコード

テストコード末尾データの復元操作の単体テストです
dat\\null.txt:空のテキスト
dat\\tmp_HSP_LINK.txt:データ復元操作の対象
ちなみにテキストの行数は11行です
処理しやすいように11行のテキストに9行追加して
20行にします
NO.001
TITLE:HSPオフィシャルホームページ
URL :http://www.onionsoft.net/hsp/
memo1:フリー・インタプリタ・HSPのオフィシャルサイト
memo2:
memo3:
memo4:
memo5:
memo6:
memo7:
NO.002

以下テストコード
#include "set_note_begin.hsp"
#include "set_note_last.hsp"
init_at_set_note_last "URL"
sdim dat,1024
notesel dat;*1
noteload "dat\\null.txt"
def_set_note_begin
def_set_note_last
notesave "dat\\null_c03.txt"
mes notemax
exec "notepad dat\\null_c03.txt"

sdim dat_b,1024
notesel dat_b;*2
noteload "dat\\tmp_HSP_LINK.txt"
def_set_note_begin
def_set_note_last
notesave "dat\\null_d01.txt"
mes notemax
exec "notepad dat\\null_d01.txt"
stop

*1:空テキストを操作
*2:11行のテキストを操作
今まで、テキスト操作→保存→手動で開く
といった作業をしていたんですけど
スクリプトの中でexecを使用して
自動的に開けば楽なことに気付きました(ぉ

0 件のコメント: