pps
       
**Multiplakation:** (Ergebnis max. 8 Bit)

var1 * var2 = var3


           .proc mul8
           lda #0
           beq loop2
    doadd
           clc
           adc var1
    loop1
           asl var1
    loop2
           lsr var2
           bcs doadd
           bne loop1
           sta var3        ; das Ergebnis steht in var3
           rts
           .endp
    
  
Dr. Irata

**Multiplakation:** (Ergebnis max. 16 Bit)

var1 * var2 = var3/var3+1

            .proc mul8	
      loop
             dec var2
             bmi weiter
             clc
             lda var3
             adc var1
             sta var3
             lda var3+1
             adc #0
             sta var3+1
             jmp loop
       weiter
             rts
             .endp