9、[程序4]

START

PRUGBC    LD       GR0，DATA

LEA      GR1，0

LEA      GR3，48

LOOP1     CPL      GR0，WDT，GR1

JP2      LOOP2

ST       GR3，BTASC，GR1

LEA      GR1，1，GR1

LEA      GR2，-4，GR1

JN2      LOOP1

(1)

LOOP2     LEA      GR2，48

LOOP3     CPL      GR0，WDT，GR1

JMI      NEXT

(2)

LEA      GR2，1，GR2

JMP      LOOP3

NEXT (3)

LEA      GR1，1，GR1

LEA      GR2，-4，GR1

JNZ       LOOP2

LAST (4) ；处理个位数

(5)

EXIT

C48      DC        48

WDT      DC        10000

DC    1000

DC   100

DC   10

BTASC   DS    5

DATA   DC    #FA59H

END