Mercurial > hg > Members > kono > nitros9-code
view 3rdparty/customboots/boisy/testadd.a @ 2444:597d98fc261e
RFM: never say die
| author | aaronwolfe |
|---|---|
| date | Fri, 26 Feb 2010 05:24:46 +0000 |
| parents | 69b4e5d37906 |
| children | 6bc8200fd0ba |
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 ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u ldd a,u addd b,u lbra top endsect