IF ($u500>=2) LB0 密碼正確,那么跳轉到LB0處執行,否則繼續向下執行。
$u570=$u570+1 密碼輸入錯誤計數+1
IF ($570>=3) LB 1 密碼輸入錯誤3次,那么跳轉到LB1,否則出現錯誤提示
&u557=0 出現錯誤提示畫面在當前窗體的那個重疊窗口中,當前為0號重疊窗口。
$u558=1 0號重疊窗口顯示重疊庫中1號重疊畫面
sys(ovlp_show) $u557 調用系統功能,顯示重疊畫面
ret 結束宏,返回畫面
LB0:
$u502=30
sys(set_scrn) $502 顯示第30號畫面
哪個笨蛋寫的程序,竟然在這里不加RET,難道想出現畫面跳躍?
LB1:
$u502=1
sys(set_scrn) $502 顯示第1號畫面
Good Luck~