あまり優秀ではないですが、mesbox内でコマンド入力ぽいものを書いてみました。
getkeyでやれる程度のことしか要求してないなら、いいのかな。
制御が面倒なので getkey でなく onkey を使ってしまいましたが
getkeyへの置き換えは容易だと思います。
onkey gosub *in
sdim buf,8192
sdim logbuf,8192
sdim linebuf,256
mesbox buf,ginfo_winx,ginfo_winy,0:IDmesbox=stat
gosub *modify
stop
*in
if(iparam==13){
logbuf+="\n>"+linebuf
linebuf=""
gosub *modify
return
}
if(iparam==8){
if(linebuf!=""){
poke linebuf,strlen(linebuf)-1,0
gosub *modify
}
return
}
linebuf += strf("%c",iparam)
gosub *modify
return
*modify
buf=logbuf+"\n>"+linebuf
objprm IDmesbox,buf
return