MAIN:
MOV 50H, #0 ;先用0充當最小值.
MOV R0, #40H ;起始地址.
LOOP: MOV A, @R0 ;取出壹個數.
CLR C
SUBB A, 50H ;減去最小值.
JNC NEXT ;無借位(即夠減)轉移.
MOV 50H, @R0 ;否則就用這個數當最小值.
NEXT: INC R0 ;轉向下壹個地址.
CJNE R0, #4AH, LOOP;不到最後就轉到前面去循環比較.
SJMP $ ;暫停.
END ;完.