
;Draws a diagonal line of 'smile faces'
;  starting at the tope left corner of the screen
;--------------------------------------------------
code_seg segment
	assume cs:code_seg
start:	push	ds	  ;for return
	mov	ax,0
	push	ax

	mov	ah,0fh	  ;set BH to active 
	int	10h	  ;  display page
	mov	ah,0	  ;select 80 x 25 BW
	mov	al,3	  ;  text mode
	int	10h
	mov	cx,1	  ;character count=1
	mov	dx,0	  ;start at row 0 col 0
set_crs:
	mov	ah,2	  ;set new cursor 
	int	10h	  ;  position
	mov	al,2	  ;display char
	mov	ah,0ah	  ;write char to screen
	int	10h
	inc	dh	  ;point to next row & col
	inc	dl
	cmp	dh,25	  ;bottom of screen ?
	jne	set_crs
	ret		  ;yes,exit
code_seg ends
;--------------------------------------------------
	 end	start
