home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Dr. CD ROM (Annual Premium Edition)
/
premium.zip
/
premium
/
IBMOS2_2
/
KATCAL.ZIP
/
k0000007.pgm
< prev
next >
Wrap
Text File
|
1990-05-12
|
219b
|
13 lines
* An example of looping register compares
:INIT
mov r1, 8
mov r2, 1
mov r3, 0
:LOOP_for_printing!?
mov r5, r1
wd Reg 1 =
wd r1
sub r1, r2
jg r1, r3, loop_for_printing!?
:DONE
halt