にそのメッセージが表示され、パソコンが返事をするプログラムをつくっています。
なんとか常に一番新しいメッセージが見えるように、メッセージボックスが
更新されるたびにページをスクロールするようにできたのですが
更新してからスクロールするまでの間に一瞬だけページの一番上に戻って
どうしてもチラついているみたいになってしまいます。
毎回ではないのですがどうしても気になります。なんとかする方法はないでしょうか?
よろしくお願いします。
#define EM_LINESCROLL $000000B6 *main cls 1 sdim user sdim sp sp="メッセージ" pos 5,250 onkey gosub *push input user,490,20 pos 5,5 mesbox sp,490,230,4 *kousin ;メッセージボックス更新 objprm 0,"" wait 50 scr+10 objprm 1,sp sendmsg objinfo(1,2), EM_LINESCROLL, 0,scr stop *push if iparam ! 13 : return *hatuwa ;ユーザーメッセージ表示 wait 5 scr+10 ct+1 sp+"\n\n"+user objprm 1,sp sendmsg objinfo(1,2), EM_LINESCROLL, 0,scr *henji ;返事表示 sp+"\n\nABCDE" :goto*kousin return