.版本 2 .支持库 spec .程序集 窗口程序集1 .程序集变量 atom, 整数型 .子程序 __启动窗口_创建完毕 .局部变量 x, 文本型 .如果真 (是否为调试版 ()) 调试输出 (“编译后才行”) 结束 () .如果真结束 x ＝ “f0sd9890f 8g098h07fg0h)$(*%()^&*$&80450uij pg” ' 什么都行 .如果真 (查找全局原子 (x) ≠ 0) 信息框 (“不能这样”, 0, ) 结束 () .如果真结束 atom ＝ 添加全局原子 (x) .子程序 __启动窗口_可否被关闭, 逻辑型 删除全局原子 (atom)