窗口淡入淡出和贴边隐藏模块

.如果真 (取鼠标水平位置 () ＞ 取屏幕宽度 () － 3 且 取鼠标垂直位置 () ＞ 窗口名称.顶边 且 取鼠标垂直位置 () ＜ 窗口名称.顶边 ＋ 窗口名称.高度)
窗口名称.左边 ＝ 取屏幕宽度 () － 窗口名称.宽度
.如果真结束
.如果真 (窗口名称.左边 ≥ 取屏幕宽度 () － 窗口名称.宽度 且 窗口名称.顶边 ＞ 0 且 窗口名称.顶边 ＜ 取屏幕高度 () － 窗口名称.高度)
.如果真 (取鼠标垂直位置 () ＜ 窗口名称.顶边 或 取鼠标垂直位置 () ＞ 窗口名称.顶边 ＋ 窗口名称.高度 或 取鼠标水平位置 () ＜ 取屏幕宽度 () － 窗口名称.宽度)
窗口名称.左边 ＝ 取屏幕宽度 () － 3