2009年12月18日金曜日

テキストに行番号をつけるサンプルスクリプト

前書いたスクリプトがわかりにくかったので
プリントアウトしたかったんですけど
ついでに行番号も欲しいよな。と思い
テキストに行番号をつけるスクリプトを書いてみました


sdim sss,4096
notesel sss
noteload "FILE_char2q_q2char_can_2byte_0_6.hsp"
repeat notemax
s=""
noteget s,cnt
ss=str(cnt+1)+":"+s
noteadd ss,cnt,1
loop
notesave "tmp.txt"
stop

0 件のコメント: