.版本 2
.子程序 __启动窗口_鼠标左键被按下, 逻辑型
.参数 x, 整数型
.参数 y, 整数型
.参数 u, 整数型
.局部变量 l, 整数型, 静态, , 鼠标指针判断变量
.判断开始 (_启动窗口.宽度 > 400 且 _启动窗口.高度 > 200)
Tps = 1
.判断开始 (x < 4 且 y < 取用户区高度 () - 6 且 y > 6)
l = 1
.判断开始 (l = 1)
_启动窗口.发送信息 (274, 61441, 0) ' 左边
.默认
.判断结束
.判断 (x > 取用户区宽度 () - 4 且 y < 取用户区高度 () - 6 且 y > 6)
l = 2
.判断开始 (l = 2)
_启动窗口.发送信息 (274, 61442, 0) ' 右边
.默认
.判断结束
.判断 (y < 4 且 x < 取用户区宽度 () - 6 且 x > 6)
l = 3
.判断开始 (l = 3)
_启动窗口.发送信息 (274, 61443, 0) ' 顶边
.默认
.判断结束
.判断 (y > 取用户区高度 () - 4 且 x < 取用户区宽度 () - 6 且 x > 6)
l = 4
.判断开始 (l = 4)
_启动窗口.发送信息 (274, 61446, 0) ' 下边
.默认
.判断结束
.判断 (x < 6 且 y < 6)
l = 5
.判断开始 (l = 5)
_启动窗口.发送信息 (274, 61444, 0) ' 左上
.默认
.判断结束
.判断 (x > 取用户区宽度 () - 6 且 y < 6)
l = 6
.判断开始 (l = 6)
_启动窗口.发送信息 (274, 61445, 0) ' 右上
.默认
.判断结束
.判断 (x > 取用户区宽度 () - 6 且 y > 取用户区高度 () - 6)
l = 7
.判断开始 (l = 7)
_启动窗口.发送信息 (274, 61448, 0) ' 右下
.默认
.判断结束
.判断 (x < 6 且 y > 取用户区高度 () - 6)
l = 8
.判断开始 (l = 8)
_启动窗口.发送信息 (274, 61447, 0) ' 左下
.默认
.判断结束
.默认
.判断结束