using "USING 0"directive

;--------------------------------------
name one

extrn code (loop2,loop3)

prog 	segment code


	cseg at 0
	using 0
	jmp start

	rseg prog
start:	mov sp,#30h

loop:
	mov r1,#1
	mov r2,#2
	lcall loop2
	lcall loop3
	jmp loop

	end
;--------------------------------------
name two

public loop2

	prg1 segment code

	rseg prg1
	using 1
loop2:
	mov r3,#3
	mov r4,#4
	ret

	end
;--------------------------------------
name three

public loop3

prg2 segment code

	rseg prg2
	using 2
loop3:
	mov r5,#5
	mov r6,#6
	ret

	end
;--------------------------------------