汇编语言程式设计：第五节 程式写作

码值
   14:        AND    AX,001EH     ; 24个有效双数值
   15:        PUSH    BX         ; 保留后用
   16:        PUSH    DX         ; 同上
   17:        MOV    SI,AX         ; AX不能间接定址
   18:        AND    CL,07H         ; 有效值
   19:        CALL    CCODTB[SI]   ; 假设CS=DS
   20:        POP    DX
   21:        POP    BX
   22:        JMP    CCODIN         ; 本程式主流程
   23: CCOD00:                 ; CODe为码
   24:        ADD    SP,6         ; 本程式为子程序
   25:        RET             ; 码为０执行完毕
   26: CCOD06:                 ; 06为 E,F
   27:        SHL    CL,1         ; E,F 粗细值加倍
   28: CLFT02:                 ; LeFT指左横
   29:        ADD    BH,BL         ; 02为输入码 A,B
   30:        SHR    BH,1         ; 左起BH中点值
   31:        JMP    CHOR00         ; HORizon 画横
   32: CCOD08:             &