clrscr() function in ALP

Assembly Program to simulate 'cls' Command of DOS (clrscr)

Program is as follows:
;Program for cls command in ALP
assume cs:code
code segment
start:  mov ah,06
        mov al,0
        mov al,0
        mov cx,0000
        mov dh,24
        mov dl,79
        int 10h
        mov ah,02h
        mov bh,0
        mov dx,0
        mov ah,4ch
        int 21h
code ends
end start

To run this program open Tasm 1.4(TechApple.net)
> tasm clrscr.asm
>tlink clrscr.obj
>clrscr
Output:

If you need any type of program just notify me in Comment Box above