home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The C Users' Group Library 1994 August
/
wc-cdrom-cusersgrouplibrary-1994-08.iso
/
vol_300
/
316_01
/
div.z8
< prev
next >
Wrap
Text File
|
1990-05-16
|
439b
|
26 lines
.hlist
/
/---- divide from page 25
/
COUNT = w0
DIVISOR = w1
DIVIDEND_HI = w2
DIVIDEND_LO = w3
/
mov $8,COUNT
cmp DIVIDEND_HI,DIVISOR
bugt 1f
scf
ret
1: rlc DIVIDEND_LO
rlc DIVIDEND_HI
bcs 2f
cmp DIVIDEND_HI,DIVISOR
bugt 3f
2: sub DIVISOR,DIVIDEND_HI
scf
3: sob COUNT,1b
rlc DIVIDEND_LO
ret