身份證校驗規則

變量1 ＝ 到整數 (編輯框1.內容)
變量2 ＝ 到整數 (編輯框2.內容)
變量3 ＝ 到整數 (編輯框3.內容)
變量4 ＝ 到整數 (編輯框4.內容)
變量5 ＝ 到整數 (編輯框5.內容)
變量6 ＝ 到整數 (編輯框6.內容)
變量7 ＝ 到整數 (編輯框7.內容)
變量8 ＝ 到整數 (編輯框8.內容)
變量9 ＝ 到整數 (編輯框9.內容)
變量10 ＝ 到整數 (編輯框10.內容)
變量11 ＝ 到整數 (編輯框11.內容)
變量12 ＝ 到整數 (編輯框12.內容)
變量13 ＝ 到整數 (編輯框13.內容)
變量14 ＝ 到整數 (編輯框14.內容)
變量15 ＝ 到整數 (編輯框15.內容)
變量16 ＝ 到整數 (編輯框16.內容)
變量17 ＝ 到整數 (編輯框17.內容)
變量18 ＝ 到整數 (編輯框18.內容)
變量100 ＝ 變量1 × 7 ＋ 變量2 × 9 ＋ 變量3 × 10 ＋ 變量4 × 5 ＋ 變量5 × 8 ＋ 變量6 × 4 ＋ 變量7 × 2 ＋ 變量8 × 1 ＋ 變量9 × 6 ＋ 變量10 × 3 ＋ 變量11 × 7 ＋ 變量12 × 9 ＋ 變量13 × 10 ＋ 變量14 × 5 ＋ 變量15 × 8 ＋ 變量16 × 4 ＋ 變量17 × 2
變量 ＝ 變量100 ％ 11
.若是真 (變量 ＝ 0)
    校驗碼 ＝ 1
.若是真結束

.若是真 (變量 ＝ 1)
    校驗碼 ＝ 0
.若是真結束

.若是真 (變量 ＝ 2)
    校驗碼 ＝ 10
.若是真結束

.若是真 (變量 ＝ 3)
    校驗碼 ＝ 9
.若是真結束

.若是真 (變量 ＝ 4)
    校驗碼 ＝ 8
.若是真結束

.若是真 (變量 ＝ 5)
    校驗碼 ＝ 7
.若是真結束

.若是真 (變量 ＝ 6)
    校驗碼 ＝ 6
.若是真結束

.若是真 (變量 ＝ 7)
    校驗碼 ＝ 5
.若是真結束

.若是真 (變量 ＝ 8)
    校驗碼 ＝ 4
.若是真結束

.若是真 (變量 ＝ 9)
    校驗碼 ＝ 3
.若是真結束

.若是真 (變量 ＝ 10)
    校驗碼 ＝ 2
.若是真結束


.若是 (校驗碼 ＝ 變量18)
    信息框 (「地球上確實存在這個身份證號碼」, 0, )
.不然
    信息框 (「地球上不存在這個身份證號碼，您是從外星來的吧」, 0, )

.若是結束