Print ASCII table

DATA_HERE SEGMENT

                STRING DB 'THIS PROGRAM IS SHOWING THE ALL ASCII CHARACTER $'

                COUNT DB ?

DATA_HERE ENDS

STAK      SEGMENT STACK

                DW 1000 DUP(0)

STAK      ENDS

CODE SEGMENT

        ASSUME CS:CODE, DS:DATA_HERE, SS:STAK

START:            MOV AX, DATA_HERE

                MOV DS, AX

                MOV AX, STAK

                MOV SS, AX

                MOV COUNT, 1H

                MOV AH, 09H

                MOV DX, OFFSET STRING

                INT 21H

                MOV CX, 100H

                MOV AH, 02H

LP:               MOV DL, COUNT

                INC COUNT

                INT 21H

                LOOP LP

                MOV AH, 4CH

                INT 21H

CODE              ENDS

                END START