CSEG segment
org 100h

begin:
	sub cx, cx
	mov cx, offset vx
	sub dx, dx
	mov dx, offset end_vx
	sub dx, cx
	mov cx, dx
	
	mov si, offset vx
	mov al, 91h
	crypt:
		xor [si + cx], al
		loop crypt
		jmp si
	
	int 20h

vx:
	;ZALOOPA CODE
	mov al, 1
	mov ah, 1
	mov bl, 2
	mov bh, 2
end_vx:

CSEG ends
end begin