push ax
push bx
push cx
push dx
mov cx,000a
l1:
mov ax,cx
mov [l4],ax
mov bx,0001 ;dos fucntion
mov dx,l2   ;text location
mov cx,l3   ;size of text (15, 000f)
mov ah,40   ;dos function
int 21
mov ax,[l4]
mov cx,ax
loop l1
pop dx
pop cx
pop bx
pop ax
ret
l2:
db "Era Scarecrow"
db 0d,0a
$l3
l4:
db 00,00