
CODE    SEGMENT
	ORG 100H
	ASSUME CS:CODE,DS:CODE,ES:CODE


START:
	jmp     begin
	db      'á.¥Œk†d‰M–$'

begin:
	 MOV    BX, 0B800H   ; i was lazy so this supports only this            
	 mov    es, bx       ; screen not mono
	 mov    bx, 3998d    ; the end
	 mov    si, bx
	 mov    cx, 1000d    ; number o words
	 xor    bx, bx
	 xor    di, di       ; start at zero

reverse:
	 MOV    AX, ES:[DI]  ; first one      
	 mov    bx, es:[si]  ; opposite one
	 mov    es:[di], bx  ; switch
	 mov    es:[si], ax  ; switch
	 inc    di           ; count up
	 inc    di
	 dec    si           ; count down
	 dec    si
	 loop   reverse      ; do this 1000 times
	 MOV    AH,4CH       ; quit       
	 INT    21H 

CODE    ENDS
	END START
