.版本 2
.子程序 __启动窗口_创建完毕
连续赋值 (假, 选择夹1.可视, 选择夹2.可视, 选择夹3.可视, 选择夹4.可视, 选择夹5.可视, 选择夹6.可视)
.子程序 _按钮1_被单击
.如果 (选择夹1.可视 = 假)
连续赋值 (假, 选择夹2.可视, 选择夹3.可视, 选择夹4.可视, 选择夹5.可视, 选择夹6.可视)
选择夹1.可视 = 真
.否则
选择夹1.可视 = 假
.如果结束
.子程序 _按钮2_被单击
.如果 (选择夹2.可视 = 假)
连续赋值 (假, 选择夹1.可视, 选择夹3.可视, 选择夹4.可视, 选择夹5.可视, 选择夹6.可视)
选择夹2.可视 = 真
.否则
选择夹2.可视 = 假
.如果结束
.子程序 _按钮3_被单击
.如果 (选择夹3.可视 = 假)
连续赋值 (假, 选择夹1.可视, 选择夹2.可视, 选择夹4.可视, 选择夹5.可视, 选择夹6.可视)
选择夹3.可视 = 真
.否则
选择夹3.可视 = 假
.如果结束
.子程序 _按钮4_被单击
.如果 (选择夹4.可视 = 假)
连续赋值 (假, 选择夹1.可视, 选择夹2.可视, 选择夹3.可视, 选择夹5.可视, 选择夹6.可视)
选择夹4.可视 = 真
.否则
选择夹4.可视 = 假
.如果结束
.子程序 _按钮5_被单击
.如果 (选择夹5.可视 = 假)
连续赋值 (假, 选择夹1.可视, 选择夹2.可视, 选择夹3.可视, 选择夹4.可视, 选择夹6.可视)
选择夹5.可视 = 真
.否则
选择夹5.可视 = 假
.如果结束
.子程序 _按钮6_被单击
.如果 (选择夹6.可视 = 假)
连续赋值 (假, 选择夹1.可视, 选择夹2.可视, 选择夹3.可视, 选择夹4.可视, 选择夹5.可视)
选择夹6.可视 = 真
.否则
选择夹6.可视 = 假
.如果结束