ϰ3.16
DATA  SEGMENT
    BLOCK  DB  -7112-90-7034-15645-12
           DB  -3-42301211-9-867-56
     CN  EQU  $-BLOCK
     COUNT  DB  ?
DATA  ENDS
CODE  SEGMENT
      ASSUME  DS:DATACS:CODE
START:MOV  AXDATA
      MOV  DSAX
      MOV  DL0
      LEA  SIBLOCK
      MOV  CXCN
LP:  MOV  AL[SI]
      TEST AL80H
      JZ   NEXT
      INC  DL
NEXT:INC  SI
      LOOP  LP
      MOV  COUNTDL
      MOV  AH4CH
      INT  21H
CODE ENDS
      END  START
