401.     调用 Msg.ShowScrTXT(RX + 5,LY + 21,RX + 250,LY + 37,"还有" & cishu & " 次要完成","00de00")
402.     令 ti = ti + 6000
403. 循环结束
404. 调用 全部完成