cseg segment
assume cs:cseg
org 100h
jmp start
count dw 18h
pp proc
push ax
push dx
dec count
jnz next
mov count ,12h
mov dl,'L'
mov ah,2
int 21h
next:
pop dx
pop ax
iret
pp endp
start: xor ax,ax
mov es,ax
mov bx,0070h
mov es:[bx],offset pp
mov es:[bx+2],seg pp
mov ah,1ch
int 21h
mov dx,offset start
int 27h
cseg ends
end start