ex4 1

A>£tf SCAN.ASM

Create source program;

^łV

‘y” represents carriage return.

□RG

1-OOH

łSTART OF TRANSIENT

iAREA/

M^I

Bi LEN

łLENGTH DF UEGTOR TG 5CAN/

m

C t 0

;lwger_rst ualue sd far/

LDOP

WI

Hi YECT

tBABE DF UECTOR/

LGOP:

Moy

fli M

;get ualue/

BUC

C

iLARGER UALUE IN C?/

JNC

NFDUND

łJUMR IF LARGER YALUE NDT

(FOUND/

!

NEW

LARGEST

YALUE* STDRE

IT TD C/

MOU

Ci A

NFOUND

inx

H

TTO NEXT ELEMENT/

DCR

B

i MORĘ TG SCAN?/

JNZ

LOOP

iFOR ANGTHERy

T

!

END

□F SCAN

ł BTDRE C/