LXI H, 2500
	MOV C,M	Count
	INX H
	MOV A,M	First Number
	DCR C
LOOP	INX H
	CMP M
	JNC AHEAD	A < M => Carry
	MOV A,M	<< if M greater.
AHEAD	DCR C
	JNZ LOOP
	STA 2600	(largest of series)
	HLT

JNC : LARGER

JC   : SMALLER