HSPTV!掲示板

sdim buf, 1024
pos 30, 80
font "meiryo", 
objmode 2
mesbox buf, 200,240,2 : hEdit = objinfo(stat,2)

pos 10,10
objsize 50,50
button "テスト",*test

*test
poke buf, strlen(buf), "TEST FORM !!\n"
objprm 0, buf
sendmsg hEdit,0xb5,7,0
stop

MesBox内で指定の行までTEST FORMと書き込まれると自動的にMesBox内を全クリーンするにはどうすればいいのでしょうか？
色々調べてみたのですが分かりませんでした
回答よろしくお願いします

10行オーバーでクリアするとして、
15行目の前に次を追加

notesel buf
if notemax>10:buf="":objprm 0, ""

こんなに早く回答ありがとうございます！！
解決しました！！