PAGE    60,132




;ÄÄÄÄÄÄÄÄÄÄ CODE_SEG_1  ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ

CODE_SEG_1	segment para public
		assume  CS:CODE_SEG_1, DS:CODE_SEG_1, SS:CODE_SEG_1, ES:CODE_SEG_1


		org	100h


;±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
;±
;±		ENTRY POINT
;±
;±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±


;±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
;±
;±		PROCEDURE proc_start
;±
;±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±

proc_start	proc	far
start:		; N-Ref=0
		mov	AH,0			
		mov	AL,3			
		int	10h			; BIOS Service func ( ah ) = 0
						; Set video mode
						;AL = video mode
                mov     cx, 128
                mov     bl, 5
tekrar:
                push cx
                mov     AH,9
                mov     AL,'E'
                mov     CX,1           
		int	10h			; BIOS Service func ( ah ) = 9
						; Write char and attribute
						;AL-char BH-page BL-attrib
						; CX-number of chars to rep

                pop cx
                add bl, 10h
                xor ax, ax
                int 16h
                loop  tekrar
                int	20h			; Program terminate
proc_start	endp


CODE_SEG_1	ends



		end	start