行頭のタブとスペースを取り除く

プログラミング言語って行頭と行末のタブとスペースを取り除いてくれますよね
シナリオにそんな機能もつけたいと思い
まずは行頭のタブとスペースを取り除くスクリプトを書いてみました
2byte文字の関係で行末のタブとスペースの取り除き方はわからないけどな！

sdim sn,4000 sdim tmp_sn,256 notesel sn noteload "scenario_test02.txt" repeat notemax noteget tmp_sn,cnt l_tmp_sn=strlen(tmp_sn) css=" " cs=peek(css,0) c=peek(tmp_sn,0) if c=='\t'|c==cs{flag=1} else {flag=0} while(flag) l_tmp_sn-- tmp_s=strmid(tmp_sn,-1,(l_tmp_sn)) tmp_sn=tmp_s c=peek(tmp_sn,0) if c!='\t'&c!=cs{_break} wend noteadd tmp_sn,cnt,1 loop stop