Mercurial > hg > Members > kono > nitros9-code

view 3rdparty/customboots/boisy/testadd.a @ 3140:03b580a02945

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Allow CoCo3FPGA-specific build of superdesc.asm Added new conditional CC3FPGA and code to "level1/modules/superdesc.asm" to reflect changes needed to build the new SD card descriptors for the Coco3FPGA.
author Bill Pierce <merlinious999@gmail.com>
date Sat, 04 Feb 2017 11:06:26 +0100
parents 6bc8200fd0ba
children
line wrap: on
line source

tylg           set       $01     Prgrm+Objct
atrv           set       $80+rev ReEnt+rev
rev            set       $00
edition        set       5

               psect     testadd_a,tylg,atrv,edition,200,start

               vsect
a              rmb       2
b              rmb       2
               endsect

* capture two parameters
start          ldd       #0000
               std       a,u
               std       b,u

* if no params, just go straight to multiplication
               lda       ,x
               cmpa      #C$CR
               beq       go
               
* get first number
               lbsr      DEC_BIN
               std       a,u
               leax      ,y
               lbsr      TO_NON_SP

* if no second number, go straight to multiplication
               cmpb      #C$CR
               beq       go
               lbsr      DEC_BIN
               std       b,u

go               
               orcc      #IntMasks
top               
               ldd       a,u
               addd      b,u
               bra       top
               
               endsect