右下角弹出公告缓慢弹出

右下角弹出公告缓慢弹出例子。

.如果 (伸缩判断 ＝ 真)
.如果真 (窗口1.顶边 ＞ 取屏幕高度 () － 窗口1.高度 － 30)
窗口1.移动 (, 窗口1.顶边 － 1, , )
.如果真结束

.否则
.如果真 (窗口1.顶边 ＜ 取屏幕宽度 ())
窗口1.移动 (, 窗口1.顶边 ＋ 1, , )