2008年8月19日火曜日

シンプルな文字列操作

簡単なテストで文字列操作のやり方がわかってきたところで関数を一つ
文字列の中に\nがあればそれ以前
文字列の中に\nがなければ文字列全部
を返す関数を作ってみました
複数行の文字列から、最初の一行
単一行の文字列であれば文字列全部を返す関数です
goto *@f
#defcfunc div_one var pre
loc=instr(pre,0,"\n")
if loc==-1:return pre
return strmid(pre,0,loc)
*@
s="123\n45"
logmes "s:"+div_one(s)
t="12345"
logmes "t:"+div_one(t)
stop

シンプルな関数ですが意外と使い道がありそう

そうそう。久しぶりに実験室を更新しました

button命令による割り込み時の繰り返し命令の動作

0 件のコメント: