org 100h

stksg segment stack
db 32 dup("stack")
stksg ends
codesg segmant para 'code'
main proc far
assume cs:codesg
mov ah,2h ;cursor move
mov dh,10 ;row
mov dl,15 ;column
mov bh,0 ;page number
int 10h
mov ax,ac00h
int 21h

main endp
codesg ends
end main