Mercurial > hg > Members > kono > nitros9-code

view lib/kreiderclib/ccmult.as @ 3162:c44cd20907bd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sysgo.asm: Delete trailing whitespace, fix indent (no functional change) Add comments and vertical whitespace for readability.
author Neal Crook <foofoobedoo@gmail.com>
date Thu, 06 Apr 2017 22:04:46 +0100
parents 1647f1874cdf
children
line wrap: on
line source

* Disassembly by Os9disasm of ccmult.r

 section code

ccmult: tsta   
 bne   L0015 
 tst   2,s 
 bne   L0015 
 lda   3,s 
 mul    
 ldx   ,s 
 stx   2,s 
 ldx   #0 
 std   ,s 
 puls  d,pc 
L0015 pshs  d 
 ldd   #0 
 pshs  d 
 pshs  d 
 lda   5,s 
 ldb   9,s 
 mul    
 std   2,s 
 lda   5,s 
 ldb   8,s 
 mul    
 addd  1,s 
 std   1,s 
 bcc   L0032 
 inc   ,s 
L0032 lda   4,s 
 ldb   9,s 
 mul    
 addd  1,s 
 std   1,s 
 bcc   L003f 
 inc   ,s 
L003f lda   4,s 
 ldb   8,s 
 mul    
 addd  ,s 
 std   ,s 
 ldx   6,s 
 stx   8,s 
 ldx   ,s 
 ldd   2,s 
 leas  8,s 
 rts    

 endsect