Mikrocontroller.net - Benutzerbeiträge [de]

Xilinx timing constraints

2021-03-25T18:03:48Z

Avrsteffen: /* Setzen von timing constraints für Xilinx */

== Setzen von timing constraints für Xilinx ==
=== Problem ===
Hallo ich habe folgenden VHDL Code:

<syntaxhighlight lang="vhdl">
architecture VERHALTEN of TEST is
signal Di : STD_LOGIC_VECTOR(7 downto 0);
begin

process (CLK,RESET)
begin
if RESET = '0' then
Di <= (others => '0');
elsif CLK = '1' and CLK'event then
Di <= not Di;
end if;
end process;

O <= to_bitvector(std_logic_vector(Di));

end VERHALTEN;
</syntaxhighlight>

Und wenn ich das Timing erstelle (generate Timing) bekomme ich zwei
Warnungen die ich mir nicht erklären kann:

WARNING:Cpld:310 - Cannot apply TIMESPEC TS1000 =
PERIOD:PERIOD_CLK:0.000 nS
WARNING:Cpld:2 - Cannot apply TIMESPEC AUTO_TS_F2F =

Wenn ich anstatt "Di <= not Di;" ersatzweise "Di <= Di + 1;"
einsetze bekomme ich keine Warnungen mehr.

=== Antwort ===

Hm, da man nicht viel weiss muß man qualifiziert raten.
Ich nehmen an, du baust einen CPLD und hast keine Timingconstraints
angegeben
(.ucf file wäre hier hilfreich).

Ein Timing-constraint besteht aus drei Teilen:
# der Name des constraints
# Pfade(Netze) die constraint (eine Randbedingung erhalten) werden
# eine Grenze die die Signallaufzeit nicht verletzen darf (die Randbedingung)

Die Warning ("cannot apply ...") heisst :
(2) ist nicht gegeben also es gibt im Design keine Pfade die auf dieses constraint passen (also es gibt keine Netze mit diesen Namen, oder keine Netze zwischen diesen Primitiven).

Die angemeckerten constraints scheinen automatisch erzeugt, also hat sich der Entwickler nicht überlegt, ob diese Pfade überhaupt in diesem Design vorkommen können.

Im Design mit der Warning schalten die FF jeden Takt um, sie toggeln. Bei CPLD's wird daher die FF in den Toggle-mode konfiguriert. Die Logik der Makrozelle und die switch matrix wird nicht genutzt.

Im zweiten Design ohne die Warnings werden die FF in jedem Takt mit einem neuen Wert geladen. Dieses Wert wird durch Kombinatorik (NAND-Gatter etc) gewonnen. Heisst in diesem design ist sehr wohl die Makrocell Logik und
wahrscheinlich auch die switchmatrix genutzt. Die FF werden wohl im
Modus, D_FF mit Enable und synchronen Set/Reset genutzt. Also es gibt etliche genutzte Pfade mehr in dem Counterdesign.

Damit findet im zweiten design der timinganalyzer sehr wohl Pfade, auf die die
Timingconstraints zutreffen und hat somit keinen Grund die Warnung "cannot apply ..." auszugeben.

Wahrscheinlich kannst du die warnings ignorieren, du hast nur mehr constraints vorgegeben als (in disem design) überprüfbar sind. Obwohl lieber ein constraint zuviel als zuwenig.

Du musst auf jeden fall überprüfen, was die angemeckerten constraints bedeuten:
*Sind sie automatisch generiert?
*Welche Pfade werden durch die constraints geprüft?
*Werden diese Pfade in deinem Design genutzt?

=== Weiterführende Links ===
[https://blogs.cuit.columbia.edu/zp2130/configure_sta_environment/ Timing Constraits sehr gut erklärt (englisch)]

[[Category:Xilinx ISE]]

Multiplikation in Assembler

2020-12-11T17:35:13Z

Avrsteffen:

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
Die Cycle Time der einzelnen Funktionen sind in der Tabelle zusammengefasst.

{| class="wikitable"
|-
! HW !! 16x8!! 16x16!! 24x8!! 24x16!! 24x24!! 32x8!! 32x16!! 32x24!! 32x32
|-
| mul|| 14 || 26 || 21 || 40 || 57|| 29 || 49 || 75 || 102
|-
| mulsu|| 20 || 27 || 21 || 41 || 60 || 29 || 54 || 78 || 106
|-
| muls|| 19|| 28|| 23 || 42 || 63 || 38 || 60 || 86 || 112
|}

=== unsigned x unsigned ===
==== mul_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x8_24.inc
;* Mutiply 16x8 -> 24 bit (unsigned * unsigned)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 10 cycles + 4 (RET) = 14 Cycles
;*
;******************************************************************************
mul_16x8:
; R5:R2 = R17:R16 * R21:R20

mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
clr R4
mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
ret
</syntaxhighlight>
}}

==== mul_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x16_32.inc
;* Mutiply 16x16 -> 32 bit (unsigned * unsigned)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 22 cycles + 4 (RET) = 26 Cycles
;*
;******************************************************************************
mul_16x16:
push R9
; R5:R2 = R17:R16 * R21:R20
sub R9,R9
mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
mul R21,R17 ; AH * BH
movw R5:R4,R1:R0

mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
adc R5,R9

mul R20,R17 ; AL * BH
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x8_32.inc
;* Mutiply 24x8 -> 32 bit (unsigned * unsigned)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 17 cycles + 4 (RET) = 21 Cycles
;*
;******************************************************************************
mul_24x8:
push R9
; R5:R2 = R16 * R22:R20
sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x16_40.inc
;* Mutiply 24x16 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 36 cycles + 4 (RET) = 40 Cycles
;*
;******************************************************************************
mul_24x16:
push R9
; R6:R2 = R17:R16 * R22:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R17 ; AH*BH
mov R5,R0
mov R6,R1

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AH*BL
add R4,R0
adc R5,R1
adc R6,R9

mul R20,R17 ; AL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R21,R17 ; AM*BH
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x24_48.inc
;* Mutiply 24x24 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 53 cycles + 4 (RET) = 57 Cycles
;*
;******************************************************************************
mul_24x24:
push R9
push R10
push R11

; R7:R2 = R18:R16 * R22:R20

sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0
mul R22,R18 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AM*BL
movw R11:R10,R1:R0
mul R22,R17 ; AH*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R18 ; AM*BH
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R21,R17 ; AM*BM
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R20,R18 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x8_40.inc
;* Mutiply 32x8 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 25 cycles + 4 (RET) = 29 Cycles
;*
;******************************************************************************
mul_32x8:
push R9
; R6:R2 = R16 * R23:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R23,R16 ; AH*BL
mov R5,R0
mov R6,R1

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AM*BL
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x16_48.inc
;* Mutiply 32x16 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 45 cycles + 4 (RET) = 49 Cycles
;*
;******************************************************************************
mul_32x16:
push R9
; R7:R2 = R17:R16 * R23:R20
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R17 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R23,R16 ; AH*BL
add R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AXL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R21,R17 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R22,R17 ; AM*BH
add R5,R0
adc R6,R1
adc R7,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x24_56.inc
;* Mutiply 32x24 -> 56 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 71 cycles + 4 (RET) = 75 Cycles
;*
;******************************************************************************
mul_32x24:
push R9
push R10
push R11

; R8:R2 = R18:R16 * R23:R20

sub R6,R6 ; NULL
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R18 ; AH*BH
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL
movw R11:R10,R1:R0
mul R23,R16 ; AH*BL
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM
movw R11:R10,R1:R0
mul R22,R17 ; AM*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM
movw R11:R10,R1:R0
mul R23,R17 ; AH*BM
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R20,R18 ; AXL*BH
movw R11:R10,R1:R0
mul R22,R18 ; AM*BH
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R21,R18 ; AL*BH
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mulsu16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * unsigned)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 16 cycles + 4 (RET) = 20 Cycles
;*
;******************************************************************************
mulsu_16x8:
push R10
sub R10,R10 ; NULL
clr R4
mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
adc R4,R10
mulsu R21,R16 ; AH x BL (s*u)
sbc R4,R10
add R3,R0
adc R4,R1
pop R10
ret
</syntaxhighlight>
}}
==== mulsu_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mulsu16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * unsigned)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 23 cycles + 4 (RET) = 27 Cycles
;*
;******************************************************************************
mulsu_16x16:
push R10
sub R10,R10 ; NULL

mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
mulsu R21,R17 ; AH x BH (s*u)
movw R5:R4,R1:R0

mulsu R21,R16 ; AH x BL (s*u)
sbc R5,R10
add R3,R0
adc R4,R1
adc R5,R10

mul R20,R17 ; AL x BH (u*u)
add R3,R0
adc R4,R1
adc R5,R10
pop R10
ret
</syntaxhighlight>
}}
==== mulsu_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * unsigned)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 17 cycles + 4 (RET) = 21 Cycles
;*
;***********************************************************************************
mulsu_24x8:
push R10
sub R10,R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0
mulsu R22,R16 ; AH x BL
movw R5:R4,R1:R0
mul R21,R16 ; AM x BL
add R3,R0
adc R4,R1
adc R5,R10
pop R10
ret
</syntaxhighlight>
}}
==== mulsu_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * unsigned)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 37 cycles + 4 (RET) = 41 Cycles
;*
;***********************************************************************************
mulsu_24x16:
push R10
clr R4
sub R10,R10 ; NULL

mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
mulsu R22,R17 ; AH x BH (s*u)
mov R5,R0
mov R6,R1

mul R21,R16 ; AM x BL (u*u)
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R22,R16 ; AH x BL (s*u)
sbc R6,R10
add R4,R0
adc R5,R1
adc R6,R10

mul R20,R17 ; AL x BH (u*u)
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mul R21,R17 ; AM x BH (u*u)
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}
==== mulsu_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * unsigned)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
mulsu_24x24:
push R8
push R9
push R10
sub R10,R10 ; NULL
mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
mul R21,R17 ; AM x BM (u*u)
movw R5:R4,R1:R0
mulsu R22,R17 ; AH x BH (s*u)
movw R7:R6,R1:R0

mulsu R22,R17 ; AH x BM (s*u)
sbc R7,R10 ; signed DUMMY
movw R9:R8,R1:R0
mul R21,R16 ; AM x BL (u*u)
add R3,R0
adc R4,R1
adc R5,R8
adc R6,R9
adc R7,R10

mul R21,R18 ; AM x BH (u*u)
movw R9:R8,R1:R0
mul R20,R17 ; AL x BM (u*u)
add R3,R0
adc R4,R1
adc R5,R8
adc R6,R9
adc R7,R10

mulsu R22,R16 ; AH x BL (s*u)
sbc R6,R10 ; signed DUMMY
sbc R7,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10
adc R7,R10

mul R20,R18 ; AL x BH (u*u)
add R4,R0
adc R5,R1
adc R6,R10
adc R7,R10
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * unsigned)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 25 cycles + 4 (RET) = 29 Cycles
;*
;***********************************************************************************
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * unsigned)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 50 cycles + 4 (RET) = 54 Cycles
;*
;***********************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * unsigned)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 74 cycles + 4 (RET) = 78 Cycles
;*
;***********************************************************************************
mulsu_32x24:
push R9
push R10
push R11
sub R9,R9
clr R6
mul R20,R16 ; AXL x BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM x BL (u*u)
movw R5:R4,R1:R0
mulsu R23,R18 ; AH x BH (s*u)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL x BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH x BL (s*u)
sbc R7,R9 ; signed DUMMY
sbc R8,R9 ; signed DUMMY
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL x BM (u*u)
movw R11:R10,R1:R0
mul R21,R18 ; AL x BH (u*u)
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL x BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH x BM (s*u)
sbc R8,R9 ; signed DUMMY
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R18 ; AXL x BH (u*u)
movw R11:R10,R1:R0
mul R22,R18 ; AM x BH (u*u)
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}
==== mulsu_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 102 cycles + 4 (RET) = 106 Cycles
;*
;***********************************************************************************
mulsu_32x32:
push R10
push R11
push R12
push R13
push R14
sub R14,R14 ; NULL

mul R20,R16 ; AXL x BXL (u*u)
movw R3:R2,R1:R0
mul R21,R17 ; AL x BL (u*u)
movw R5:R4,R1:R0
mul R22,R18 ; AM x BM (u*u)
movw R7:R6,R1:R0
mulsu R23,R19 ; AH x BH (s*u)
movw R9:R8,R1:R0

mul R20,R17 ; AXL x BL (u*u)
movw R11:R10,R1:R0
mul R21,R18 ; AL x BM (u*u)
movw R13:R12,R1:R0
mul R22,R19 ; AM x BH (u*u)
add R3,R10
adc R4,R11
adc R5,R12
adc R6,R13
adc R7,R0
adc R8,R1
adc R9,R14

mul R21,R16 ; AL x BXL (u*u)
movw R11:R10,R1:R0
mul R22,R17 ; AM x BL (u*u)
movw R13:R12,R1:R0
mulsu R23,R18 ; AH x BM (s*u)
sbc R9,R14
add R3,R10
adc R4,R11
adc R5,R12
adc R6,R13
adc R7,R0
adc R8,R1
adc R9,R14

mul R20,R18 ; AXL x BM (u*u)
movw R11:R10,R1:R0
mul R21,R19 ; AL x BH (u*u)
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R14
adc R9,R14

mul R22,R16 ; AM x BXL (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH x BL (s*u)
sbc R8,R14 ; signed DUMMY
sbc R9,R14 ; signed DUMMY
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R14
adc R9,R14

mulsu R23,R16 ; AH*BXL (s*u)
sbc R7,R14
sbc R8,R14
sbc R9,R14
add R5,R0
adc R6,R1
adc R7,R14
adc R8,R14
adc R9,R14

mul R20,R19 ; AXL x BH (u*u)
add R5,R0
adc R6,R1
adc R7,R14
adc R8,R14
adc R9,R14

pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
SOFTWARE VERSION --> Datei:

HARDWARE VERSION --> [[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

[[Kategorie:AVR-Arithmetik]]

Datei:MULT ASM.zip

2020-12-06T17:50:02Z

Avrsteffen: Avrsteffen lud eine neue Version von Datei:MULT ASM.zip hoch

Beinhaltet die Include Dateien dieser Projektseite

Multiplikation in Assembler

2020-12-06T17:45:17Z

Avrsteffen: /* Download */

Multiplikation in Assembler

2020-12-06T17:41:55Z

Avrsteffen: /* signed x unsigned */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
Die Cycle Time der einzelnen Funktionen sind in der Tabelle zusammengefasst.

{| class="wikitable"
|-
! HW !! 16x8!! 16x16!! 24x8!! 24x16!! 24x24!! 32x8!! 32x16!! 32x24!! 32x32
|-
| mul|| 14 || 26 || 21 || 40 || 57|| 29 || 49 || 75 || 102
|-
| mulsu|| 20 || 27 || 21 || 41 || 60 || 29 || 54 || 78 || 106
|-
| muls|| 19|| 28|| 23 || 42 || 63 || 38 || 60 || 86 || 112
|}

=== unsigned x unsigned ===
==== mul_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x8_24.inc
;* Mutiply 16x8 -> 24 bit (unsigned * unsigned)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 10 cycles + 4 (RET) = 14 Cycles
;*
;******************************************************************************
mul_16x8:
; R5:R2 = R17:R16 * R21:R20

mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
clr R4
mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
ret
</syntaxhighlight>
}}

==== mul_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x16_32.inc
;* Mutiply 16x16 -> 32 bit (unsigned * unsigned)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 22 cycles + 4 (RET) = 26 Cycles
;*
;******************************************************************************
mul_16x16:
push R9
; R5:R2 = R17:R16 * R21:R20
sub R9,R9
mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
mul R21,R17 ; AH * BH
movw R5:R4,R1:R0

mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
adc R5,R9

mul R20,R17 ; AL * BH
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x8_32.inc
;* Mutiply 24x8 -> 32 bit (unsigned * unsigned)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 17 cycles + 4 (RET) = 21 Cycles
;*
;******************************************************************************
mul_24x8:
push R9
; R5:R2 = R16 * R22:R20
sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x16_40.inc
;* Mutiply 24x16 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 36 cycles + 4 (RET) = 40 Cycles
;*
;******************************************************************************
mul_24x16:
push R9
; R6:R2 = R17:R16 * R22:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R17 ; AH*BH
mov R5,R0
mov R6,R1

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AH*BL
add R4,R0
adc R5,R1
adc R6,R9

mul R20,R17 ; AL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R21,R17 ; AM*BH
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x24_48.inc
;* Mutiply 24x24 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 53 cycles + 4 (RET) = 57 Cycles
;*
;******************************************************************************
mul_24x24:
push R9
push R10
push R11

; R7:R2 = R18:R16 * R22:R20

sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0
mul R22,R18 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AM*BL
movw R11:R10,R1:R0
mul R22,R17 ; AH*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R18 ; AM*BH
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R21,R17 ; AM*BM
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R20,R18 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x8_40.inc
;* Mutiply 32x8 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 25 cycles + 4 (RET) = 29 Cycles
;*
;******************************************************************************
mul_32x8:
push R9
; R6:R2 = R16 * R23:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R23,R16 ; AH*BL
mov R5,R0
mov R6,R1

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AM*BL
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x16_48.inc
;* Mutiply 32x16 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 45 cycles + 4 (RET) = 49 Cycles
;*
;******************************************************************************
mul_32x16:
push R9
; R7:R2 = R17:R16 * R23:R20
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R17 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R23,R16 ; AH*BL
add R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AXL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R21,R17 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R22,R17 ; AM*BH
add R5,R0
adc R6,R1
adc R7,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x24_56.inc
;* Mutiply 32x24 -> 56 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 71 cycles + 4 (RET) = 75 Cycles
;*
;******************************************************************************
mul_32x24:
push R9
push R10
push R11

; R8:R2 = R18:R16 * R23:R20

sub R6,R6 ; NULL
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R18 ; AH*BH
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL
movw R11:R10,R1:R0
mul R23,R16 ; AH*BL
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM
movw R11:R10,R1:R0
mul R22,R17 ; AM*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM
movw R11:R10,R1:R0
mul R23,R17 ; AH*BM
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R20,R18 ; AXL*BH
movw R11:R10,R1:R0
mul R22,R18 ; AM*BH
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R21,R18 ; AL*BH
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mulsu16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * unsigned)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 16 cycles + 4 (RET) = 20 Cycles
;*
;******************************************************************************
mulsu_16x8:
push R10
sub R10,R10 ; NULL
clr R4
mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
adc R4,R10
mulsu R21,R16 ; AH x BL (s*u)
sbc R4,R10
add R3,R0
adc R4,R1
pop R10
ret
</syntaxhighlight>
}}
==== mulsu_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mulsu16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * unsigned)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 23 cycles + 4 (RET) = 27 Cycles
;*
;******************************************************************************
mulsu_16x16:
push R10
sub R10,R10 ; NULL

mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
mulsu R21,R17 ; AH x BH (s*u)
movw R5:R4,R1:R0

mulsu R21,R16 ; AH x BL (s*u)
sbc R5,R10
add R3,R0
adc R4,R1
adc R5,R10

mul R20,R17 ; AL x BH (u*u)
add R3,R0
adc R4,R1
adc R5,R10
pop R10
ret
</syntaxhighlight>
}}
==== mulsu_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * unsigned)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 17 cycles + 4 (RET) = 21 Cycles
;*
;***********************************************************************************
mulsu_24x8:
push R10
sub R10,R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0
mulsu R22,R16 ; AH x BL
movw R5:R4,R1:R0
mul R21,R16 ; AM x BL
add R3,R0
adc R4,R1
adc R5,R10
pop R10
ret
</syntaxhighlight>
}}
==== mulsu_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * unsigned)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 37 cycles + 4 (RET) = 41 Cycles
;*
;***********************************************************************************
mulsu_24x16:
push R10
clr R4
sub R10,R10 ; NULL

mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
mulsu R22,R17 ; AH x BH (s*u)
mov R5,R0
mov R6,R1

mul R21,R16 ; AM x BL (u*u)
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R22,R16 ; AH x BL (s*u)
sbc R6,R10
add R4,R0
adc R5,R1
adc R6,R10

mul R20,R17 ; AL x BH (u*u)
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mul R21,R17 ; AM x BH (u*u)
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}
==== mulsu_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * unsigned)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
mulsu_24x24:
push R8
push R9
push R10
sub R10,R10 ; NULL
mul R20,R16 ; AL x BL (u*u)
movw R3:R2,R1:R0
mul R21,R17 ; AM x BM (u*u)
movw R5:R4,R1:R0
mulsu R22,R17 ; AH x BH (s*u)
movw R7:R6,R1:R0

mulsu R22,R17 ; AH x BM (s*u)
sbc R7,R10 ; signed DUMMY
movw R9:R8,R1:R0
mul R21,R16 ; AM x BL (u*u)
add R3,R0
adc R4,R1
adc R5,R8
adc R6,R9
adc R7,R10

mul R21,R18 ; AM x BH (u*u)
movw R9:R8,R1:R0
mul R20,R17 ; AL x BM (u*u)
add R3,R0
adc R4,R1
adc R5,R8
adc R6,R9
adc R7,R10

mulsu R22,R16 ; AH x BL (s*u)
sbc R6,R10 ; signed DUMMY
sbc R7,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10
adc R7,R10

mul R20,R18 ; AL x BH (u*u)
add R4,R0
adc R5,R1
adc R6,R10
adc R7,R10
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * unsigned)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 25 cycles + 4 (RET) = 29 Cycles
;*
;***********************************************************************************
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * unsigned)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 50 cycles + 4 (RET) = 54 Cycles
;*
;***********************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * unsigned)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 74 cycles + 4 (RET) = 78 Cycles
;*
;***********************************************************************************
mulsu_32x24:
push R9
push R10
push R11
sub R9,R9
clr R6
mul R20,R16 ; AXL x BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM x BL (u*u)
movw R5:R4,R1:R0
mulsu R23,R18 ; AH x BH (s*u)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL x BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH x BL (s*u)
sbc R7,R9 ; signed DUMMY
sbc R8,R9 ; signed DUMMY
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL x BM (u*u)
movw R11:R10,R1:R0
mul R21,R18 ; AL x BH (u*u)
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL x BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH x BM (s*u)
sbc R8,R9 ; signed DUMMY
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R18 ; AXL x BH (u*u)
movw R11:R10,R1:R0
mul R22,R18 ; AM x BH (u*u)
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}
==== mulsu_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION mulsu32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 102 cycles + 4 (RET) = 106 Cycles
;*
;***********************************************************************************
mulsu_32x32:
push R10
push R11
push R12
push R13
push R14
sub R14,R14 ; NULL

mul R20,R16 ; AXL x BXL (u*u)
movw R3:R2,R1:R0
mul R21,R17 ; AL x BL (u*u)
movw R5:R4,R1:R0
mul R22,R18 ; AM x BM (u*u)
movw R7:R6,R1:R0
mulsu R23,R19 ; AH x BH (s*u)
movw R9:R8,R1:R0

mul R20,R17 ; AXL x BL (u*u)
movw R11:R10,R1:R0
mul R21,R18 ; AL x BM (u*u)
movw R13:R12,R1:R0
mul R22,R19 ; AM x BH (u*u)
add R3,R10
adc R4,R11
adc R5,R12
adc R6,R13
adc R7,R0
adc R8,R1
adc R9,R14

mul R21,R16 ; AL x BXL (u*u)
movw R11:R10,R1:R0
mul R22,R17 ; AM x BL (u*u)
movw R13:R12,R1:R0
mulsu R23,R18 ; AH x BM (s*u)
sbc R9,R14
add R3,R10
adc R4,R11
adc R5,R12
adc R6,R13
adc R7,R0
adc R8,R1
adc R9,R14

mul R20,R18 ; AXL x BM (u*u)
movw R11:R10,R1:R0
mul R21,R19 ; AL x BH (u*u)
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R14
adc R9,R14

mul R22,R16 ; AM x BXL (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH x BL (s*u)
sbc R8,R14 ; signed DUMMY
sbc R9,R14 ; signed DUMMY
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R14
adc R9,R14

mulsu R23,R16 ; AH*BXL (s*u)
sbc R7,R14
sbc R8,R14
sbc R9,R14
add R5,R0
adc R6,R1
adc R7,R14
adc R8,R14
adc R9,R14

mul R20,R19 ; AXL x BH (u*u)
add R5,R0
adc R6,R1
adc R7,R14
adc R8,R14
adc R9,R14

pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T17:34:45Z

Avrsteffen: /* Hardware Version */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
Die Cycle Time der einzelnen Funktionen sind in der Tabelle zusammengefasst.

{| class="wikitable"
|-
! HW !! 16x8!! 16x16!! 24x8!! 24x16!! 24x24!! 32x8!! 32x16!! 32x24!! 32x32
|-
| mul|| 14 || 26 || 21 || 40 || 57|| 29 || 49 || 75 || 102
|-
| mulsu|| 20 || 27 || 21 || 41 || 60 || 29 || 54 || 78 || 106
|-
| muls|| 19|| 28|| 23 || 42 || 63 || 38 || 60 || 86 || 112
|}

=== unsigned x unsigned ===
==== mul_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x8_24.inc
;* Mutiply 16x8 -> 24 bit (unsigned * unsigned)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 10 cycles + 4 (RET) = 14 Cycles
;*
;******************************************************************************
mul_16x8:
; R5:R2 = R17:R16 * R21:R20

mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
clr R4
mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
ret
</syntaxhighlight>
}}

==== mul_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x16_32.inc
;* Mutiply 16x16 -> 32 bit (unsigned * unsigned)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 22 cycles + 4 (RET) = 26 Cycles
;*
;******************************************************************************
mul_16x16:
push R9
; R5:R2 = R17:R16 * R21:R20
sub R9,R9
mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
mul R21,R17 ; AH * BH
movw R5:R4,R1:R0

mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
adc R5,R9

mul R20,R17 ; AL * BH
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x8_32.inc
;* Mutiply 24x8 -> 32 bit (unsigned * unsigned)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 17 cycles + 4 (RET) = 21 Cycles
;*
;******************************************************************************
mul_24x8:
push R9
; R5:R2 = R16 * R22:R20
sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x16_40.inc
;* Mutiply 24x16 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 36 cycles + 4 (RET) = 40 Cycles
;*
;******************************************************************************
mul_24x16:
push R9
; R6:R2 = R17:R16 * R22:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R17 ; AH*BH
mov R5,R0
mov R6,R1

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AH*BL
add R4,R0
adc R5,R1
adc R6,R9

mul R20,R17 ; AL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R21,R17 ; AM*BH
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x24_48.inc
;* Mutiply 24x24 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 53 cycles + 4 (RET) = 57 Cycles
;*
;******************************************************************************
mul_24x24:
push R9
push R10
push R11

; R7:R2 = R18:R16 * R22:R20

sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0
mul R22,R18 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AM*BL
movw R11:R10,R1:R0
mul R22,R17 ; AH*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R18 ; AM*BH
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R21,R17 ; AM*BM
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R20,R18 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x8_40.inc
;* Mutiply 32x8 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 25 cycles + 4 (RET) = 29 Cycles
;*
;******************************************************************************
mul_32x8:
push R9
; R6:R2 = R16 * R23:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R23,R16 ; AH*BL
mov R5,R0
mov R6,R1

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AM*BL
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x16_48.inc
;* Mutiply 32x16 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 45 cycles + 4 (RET) = 49 Cycles
;*
;******************************************************************************
mul_32x16:
push R9
; R7:R2 = R17:R16 * R23:R20
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R17 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R23,R16 ; AH*BL
add R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AXL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R21,R17 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R22,R17 ; AM*BH
add R5,R0
adc R6,R1
adc R7,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x24_56.inc
;* Mutiply 32x24 -> 56 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 71 cycles + 4 (RET) = 75 Cycles
;*
;******************************************************************************
mul_32x24:
push R9
push R10
push R11

; R8:R2 = R18:R16 * R23:R20

sub R6,R6 ; NULL
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R18 ; AH*BH
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL
movw R11:R10,R1:R0
mul R23,R16 ; AH*BL
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM
movw R11:R10,R1:R0
mul R22,R17 ; AM*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM
movw R11:R10,R1:R0
mul R23,R17 ; AH*BM
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R20,R18 ; AXL*BH
movw R11:R10,R1:R0
mul R22,R18 ; AM*BH
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R21,R18 ; AL*BH
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:31:10Z

Avrsteffen: /* unsigned x unsigned */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x8_24.inc
;* Mutiply 16x8 -> 24 bit (unsigned * unsigned)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 10 cycles + 4 (RET) = 14 Cycles
;*
;******************************************************************************
mul_16x8:
; R5:R2 = R17:R16 * R21:R20

mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
clr R4
mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
ret
</syntaxhighlight>
}}

==== mul_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul16x16_32.inc
;* Mutiply 16x16 -> 32 bit (unsigned * unsigned)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 22 cycles + 4 (RET) = 26 Cycles
;*
;******************************************************************************
mul_16x16:
push R9
; R5:R2 = R17:R16 * R21:R20
sub R9,R9
mul R20,R16 ; AL * BL
movw R3:R2,R1:R0
mul R21,R17 ; AH * BH
movw R5:R4,R1:R0

mul R21,R16 ; AH * BL
add R3,R0
adc R4,R1
adc R5,R9

mul R20,R17 ; AL * BH
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x8_32.inc
;* Mutiply 24x8 -> 32 bit (unsigned * unsigned)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 17 cycles + 4 (RET) = 21 Cycles
;*
;******************************************************************************
mul_24x8:
push R9
; R5:R2 = R16 * R22:R20
sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x16_40.inc
;* Mutiply 24x16 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 36 cycles + 4 (RET) = 40 Cycles
;*
;******************************************************************************
mul_24x16:
push R9
; R6:R2 = R17:R16 * R22:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R17 ; AH*BH
mov R5,R0
mov R6,R1

mul R21,R16 ; AM*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AH*BL
add R4,R0
adc R5,R1
adc R6,R9

mul R20,R17 ; AL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R21,R17 ; AM*BH
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul24x24_48.inc
;* Mutiply 24x24 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 53 cycles + 4 (RET) = 57 Cycles
;*
;******************************************************************************
mul_24x24:
push R9
push R10
push R11

; R7:R2 = R18:R16 * R22:R20

sub R9,R9 ; NULL
mul R20,R16 ; AL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AH*BL
movw R5:R4,R1:R0
mul R22,R18 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AM*BL
movw R11:R10,R1:R0
mul R22,R17 ; AH*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R18 ; AM*BH
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9

mul R21,R17 ; AM*BM
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R20,R18 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x8_40.inc
;* Mutiply 32x8 -> 40 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 25 cycles + 4 (RET) = 29 Cycles
;*
;******************************************************************************
mul_32x8:
push R9
; R6:R2 = R16 * R23:R20

sub R4,R4 ; NULL
sub R9,R9
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R23,R16 ; AH*BL
mov R5,R0
mov R6,R1

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9

mul R22,R16 ; AM*BL
add R4,R0
adc R5,R1
adc R6,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x16_48.inc
;* Mutiply 32x16 -> 48 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 45 cycles + 4 (RET) = 49 Cycles
;*
;******************************************************************************
mul_32x16:
push R9
; R7:R2 = R17:R16 * R23:R20
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R17 ; AH*BH
movw R7:R6,R1:R0

mul R21,R16 ; AL*BL
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R23,R16 ; AH*BL
add R5,R0
adc R6,R1
adc R7,R9

mul R20,R17 ; AXL*BH
add R3,R0
adc R4,R1
adc R5,R9
adc R6,R9
adc R7,R9

mul R21,R17 ; AL*BH
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9

mul R22,R17 ; AM*BH
add R5,R0
adc R6,R1
adc R7,R9
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x24_56.inc
;* Mutiply 32x24 -> 56 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 71 cycles + 4 (RET) = 75 Cycles
;*
;******************************************************************************
mul_32x24:
push R9
push R10
push R11

; R8:R2 = R18:R16 * R23:R20

sub R6,R6 ; NULL
sub R9,R9 ; NULL
mul R20,R16 ; AXL*BL
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL
movw R5:R4,R1:R0
mul R23,R18 ; AH*BH
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL
movw R11:R10,R1:R0
mul R23,R16 ; AH*BL
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM
movw R11:R10,R1:R0
mul R22,R17 ; AM*BM
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM
movw R11:R10,R1:R0
mul R23,R17 ; AH*BM
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R20,R18 ; AXL*BH
movw R11:R10,R1:R0
mul R22,R18 ; AM*BH
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R21,R18 ; AL*BH
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

pop R11
pop R10
pop R9
ret
</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:26:32Z

Avrsteffen: /* mul_16x8_24 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:26:12Z

Avrsteffen: /* mul_16x16_32 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:25:55Z

Avrsteffen: /* mul_24x8_32 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:25:31Z

Avrsteffen: /* mul_24x16_40 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:25:15Z

Avrsteffen: /* mul_24x24_48 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:24:48Z

Avrsteffen: /* mul_32x8_40 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:24:23Z

Avrsteffen: /* mul_32x16_48 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:23:57Z

Avrsteffen: /* mul_32x24_56 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
}}

==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T15:22:52Z

Avrsteffen: /* mul_32x32_64 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION mul32x32_64.inc
;* Mutiply 32x32 -> 64 bit (unsigned * unsigned)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: -
;* 98 cycles + 4 (RET) = 102 Cycles
;*
;******************************************************************************
mul_32x32:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:13:04Z

Avrsteffen: /* muls_32x32_64 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x32_64.inc
;* Mutiply 32x32 -> 64 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
;***********************************************************************************
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R7,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R9,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:12:00Z

Avrsteffen: /* muls_32x16_48 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x16_48.inc
;* Mutiply 32x16 -> 48 bit (signed * signed)
;*
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
;***********************************************************************************
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:11:09Z

Avrsteffen: /* muls_32x8_40 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x8_40.inc
;* Mutiply 32x8 -> 40 bit (signed * signed)
;*
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 34 cycles + 4 (RET) = 38 Cycles
;*
;***********************************************************************************
muls_32x8:
push R10
clr R4
sub R10,R10 ; NULL

muls R23,R16 ; AH x BL (s*s)
mov R5,R0
mov R6,R1

mulsu R16,R20 ; BL x AXL (s*u)
sbc R4,R10
sbc R5,R10
sbc R6,R10
movw R3:R2,R1:R0
adc R4,R10
adc R5,R10
adc R6,R10

mulsu R16,R21 ; BL x AL (s*u)
sbc R5,R10 ; signed DUMMY
sbc R6,R10 ; signed DUMMY
add R3,R0
adc R4,R1
adc R5,R10
adc R6,R10

mulsu R16,R22 ; BL x AM (s*u)
sbc R6,R10 ; signed DUMMY
add R4,R0
adc R5,R1
adc R6,R10

pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:10:01Z

Avrsteffen: /* muls_24x24_48 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls24x24_48.inc
;* Mutiply 24x24 -> 48 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:08:55Z

Avrsteffen: /* muls_24x16_40 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x16_40.inc
;* Mutiply 24x16 -> 40 bit (signed * signed)
;*
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6 R5:R4:R3:R2
;*
;* Scrached Register: -
;* 38 cycles + 4 (RET) = 42 Cycles
;*
;******************************************************************************
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls_24x24_48.inc
;* Mutiply 24x16 -> 64 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:08:16Z

Avrsteffen: /* muls_24x8_32 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x16_32.inc
;* Mutiply 16x16 -> 32 bit (signed * signed)
;*
;* AH AL BH BL E3 E2 E1 E0
;* R21:R20 x R17:R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 13 cycles + 4 (RET) = 17 Cycles
;*
;******************************************************************************
muls_16x16:
push R10
clr R10
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
mulsu R17, R20 ; (signed)bh * al
sbc R5, R10
add R3, R0
adc R4, R1
adc R5, R10
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls24x8_32.inc
;* Mutiply 24x8 -> 32 bit (signed * signed)
;*
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* Scrached Register: -
;* 19 cycles + 4 (RET) = 23 Cycles
;*
;******************************************************************************
muls_24x8:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls_24x24_48.inc
;* Mutiply 24x16 -> 64 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:07:16Z

Avrsteffen: /* muls_16x16_32 */

Multiplikation in Assembler

2020-12-06T00:04:36Z

Avrsteffen: /* muls_32x24_56 */

Autor: Steffen H.

Dies ist eine Sammlung von verschiedenen Assembler Include-Datein für einen 8-Bit AVR zur Multiplikation in Hardware oder Software.

== Einleitung ==

Ich habe diesen Wiki zur '''Multiplikation in Assembler''' erstellt da ich hauptsächlich Programmschnipsel für eine "unsigned" Multiplikation gefunden habe oder diese nicht in der benötigten Bytegröße vorhanden war. Deshalb findet ihr hier verschiedene Sub-Programme zur "unsigned" und "signed" Multiplikation.

== Wie funktioniert das ganze? ==
Die Sub-Programme sind Include Dateien. Diese müssen im .cseg Teil des Programms eingebunden werden. Liegen diese Include Datein im Hauptverzeichnis des Assembler Projektes, also da wo auch die "main.asm" liegt, werden diese so eingebunden:
<syntaxhighlight lang="avrasm">
.include "Datei.inc"
</syntaxhighlight>
Man kann die Include-Dateien aber auch an beliebiger anderer Stelle ablegen. Dann müssen diese aber mit voller Baumstruktur eingebunden werden. Beispiel:
<syntaxhighlight lang="avrasm">
.include "C:\AVR\Libraries\Datei.inc"
</syntaxhighlight>

Für die reinen Software Lösungen ist eine Datei Namens '''"sw_mul.inc"''' vor allen anderen MUL-Includes einzubinden. Und die Software
MUL-Includes unterscheiden sich zu den Hardware MUL-Includes im vorangestellten '''"_"''' wie zum Beispiel _muls_32x16_48.inc.

Der Aufbau des Dateinamens ist schon fast selbsterklärend.
*mul -> unsigned x unsigned Multiplikation
*mulsu -> signed x unsigned Multiplikation
*muls -> signed x signed Multiplikation

Dann kommt die Byte-Größe wie zum Beispiel _32x16 und dann die Result-Größe _48.
Die Eingangsbytes sind dabei fest vorgeschrieben! Und die '''Unteren r11..r0 Register werden zerstört'''. Wer diese in Benutzung hat, sollte diese vorher sichern.

Was es noch zu beachten gibt, sind eventuelle Änderungen an "rcall's" die in "calls" umgewandelt werden müssen wenn die Sprungadresse zum Unterprogramm mehr als 2000 Byte Programmcounter entfernt ist. Dies bemängelt dann aber das Atmel Studio in einer Fehlermeldung.

== Benutzte Register ==

In allen Include Dateien werden nach folgendem Muster die Register wie folgt benutzt:
{| class="wikitable"
|-
!MULT !! r23!! r22!! r21!! r20!! r19!! r18!! r17!! r16!! r9!! r8!! r7!! r6!! r5!! r4!! r3!! r2
|-
|16x8|| || ||A1||A0|| || || ||B0|| || || || || || E2|| E1|| E0
|-
| 16x16|| || || A1|| A2|| || || B1|| B0|| || || || || E3|| E2 || E1|| E0
|-
| 24x8|| || A2|| A1|| A0|| || || || B0|| || || || || E3|| E2|| E1|| E0
|-
| 24x16|| || A2|| A1|| A0|| || || B1|| B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 24x24|| || A2|| A1|| A0|| || B2|| B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x8|| A3 || A2|| A1|| A0|| || || || B0|| || || || E4|| E3|| E2|| E1|| E0
|-
| 32x16|| A3 || A2|| A1|| A0|| || || B1|| B0|| || || E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x24|| A3 || A2|| A1|| A0|| || B2|| B1|| B0|| || E6|| E5|| E4|| E3|| E2|| E1|| E0
|-
| 32x32|| A3 || A2|| A1|| A0|| B3|| B2|| B1|| B0|| E7|| E6|| E5|| E4|| E3|| E2|| E1|| E0
|}

== Software Version ==
=== MACRO ===

Hier muss vorher zwingend die "sw_mult.inc" Datei eingebunden werden. Diese besteht teilweise aus Makros um die in den weiteren MUL-Include-Dateien verwendeten Funktionen nutzen zu können. Vor allem die richtige Erzeugung des '''Z'''ero und '''C'''arry '''Flags'''!
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
.macro mul_
;---------------------------------
;mul Befehl in Software als Makro
;---------------------------------
clr r1 ;Ergebnis = 0
push @0 ;Multiplikant wegspeichern
sec ;Multiplikant ersetzt gleichzeitig den Schleifenzähler
ror @0 ;Eine 1 rein, LSB raus
rjmp mul2 ;Beim 1. Durchgang, gleich LSB auswerten
mul1: lsr @0 ;Bit (von 1..7 Niederwertige zuerst) ins Carry (Multiplikand)
breq mul4 ;Wenn die 1 von sec (oben) wieder im Carry ist, Ende
mul2: brcc mul3 ;Wenn 0, Addition überspringen
add r1,@1 ;Ansonsten Multiplikator ins Highbyte addieren
mul3: ror r1 ;Produkt mit evt. Übertrag nach rechts schieben
ror r0
rjmp mul1 ;Noch ne Runde (von insgesamt 8)
mul4: push r16
in r16,SREG
andi r16,0x80
out SREG,r16
sbrc r1,7
sec
pop r16
pop @0 ;Multiplikant zurückholen
.endm

.macro muls_
push r16
push r17
push r18
clt
mov r1,@0
mov r0,@1
clr r17
sbrc r1,7
inc r17
sbrc r0,7
inc r17
sbrc r17,0
set
mov r16,r1
rcall _muls_
andi r17,0x82
sbrc r17,SREG_Z
rjmp PC+3
brtc PC+2
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_muls_: sub r1,r1 ; clear result High byte and carry
ldi r18,8 ; init loop counter
_m8s_1: brcc _m8s_2 ; if carry (previous bit) set
add r1,r16 ; add multiplicand to result High byte
_m8s_2: sbrc r0,0 ; if current bit set
sub r1,r16 ; subtract multiplicand from result High
asr r1 ; shift right result High byte
ror r0 ; shift right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne _m8s_1 ; if not done, loop more
ret

.macro mulsu_
push r16
push r17
push r18
mov r1,@0
mov r0,@1
mov r16,r1
clt
sbrc r16,7
set
sbrc r16,7
neg r16
rcall _mulsu_
andi r17,0x83
brtc PC+6
com r1
com r0
ldi r16,1
add r0,r16
adc r1,r18
sbrc r1,7
sbr r17,(1<<SREG_C)
out SREG,r17
pop r18
pop r17
pop r16
.endm

_mulsu_:clr r1 ;clear result High byte
ldi r18,8 ;init loop counter
lsr r0 ;rotate multiplier
m8su_1: brcc m8su_2 ; carry set
add r1,r16 ; add multiplicand to result High byte
m8su_2: ror r1 ; rotate right result High byte
ror r0 ; rotate right result L byte and multiplier
in r17,SREG
dec r18 ; decrement loop counter
brne m8su_1 ; if not done, loop more
ret
</syntaxhighlight>
}}

=== unsigned x unsigned ===

==== _mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

==== _mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul_ R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul_ R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul_ R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul_ R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul_ R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul_ R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul_ R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul_ R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul_ R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul_ R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul_ R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul_ R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul_ R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul_ R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===

==== _mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul_ R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul_ R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul_ R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===

==== _muls_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== _muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls_ R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul_ R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu_ R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu_ R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== _muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu_ R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls_ R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul_ R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu_ R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x24 -> 48 bit
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x24:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul_ R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu_ R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
adc R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu_ R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu_ R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu_ R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls_ R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== _muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul_ R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls_ R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu_ R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul_ R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu_ R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== _muls_32x24_56 ====

==== _muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul_ R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul_ R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul_ R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls_ R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu_ R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul_ R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul_ R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul_ R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu_ R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Hardware Version ==
=== unsigned x unsigned ===
==== mul_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x8_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x16_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mul_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit unsigned
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* Scrached Register: R10,R11,R12,R13,R14
;* 108 cycles + 4 (RET) = 112 Cycles
;*
mul32x32_64:
push R10
push R11
push R12
push R13
push R14
clr R14

; R9:R2 = R19:R16 * R23:R20

sub R14,R14 ; Null

mul R20,R16 ; AXL*BXL
movw R3:R2,R1:R0
mul R21,R17 ; AL*BL
movw R5:R4,R1:R0
mul R22,R18 ; AM*BM
movw R7:R6,R1:R0
mul R23,R19 ; AH*BH
movw R9:R8,R1:R0

mul R22,R19 ; AH*BM
movw R13:R12,R1:R0
mul R21,R18 ; AM*BL
movw R11:R10,R1:R0
mul R20,R17 ; AL*BXL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R23,R18 ; AM*BH
movw R13:R12,R1:R0
mul R22,R17 ; AL*BM
movw R11:R10,R1:R0
mul R21,R16 ; AXL*BL

add R3, R0
adc R4, R1
adc R5, R10
adc R6, R11
adc R7, R12
adc R8,R13
adc R9,R14

mul R21,R19 ; AH*BL
movw R11:R10,R1:R0
mul R20,R18 ; AM*BXL

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R23,R17 ; AL*BH
movw R11:R10,R1:R0
mul R22,R16 ; AXL*BM

add R4, R0
adc R5, R1
adc R6, R10
adc R7, R11
adc R8,R14
adc R9,R14

mul R20,R19 ; AH*BXL
movw R11:R10,R1:R0
mul R23,R16 ; AXL*BH

add R5, R0
adc R6, R1
adc R7, R14
adc R8,R14
adc R9,R14

add R5, R10
adc R6, R11
adc R7, R14
adc R8,R14
adc R9,R14
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

=== signed x unsigned ===
==== mulsu_16x8_24 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_16x16_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x8_32 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x16_40 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_24x24_48 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
mulsu_32x8:
push R10
clr R10
clr r4
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R23,R16 ; AH x BL
mov R5,R0 ; r0 -> E0
mov R6,R1 ; r1 -> E0
mul R21,R16 ; AL x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mul R22,R16 ; AM x BL
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== mulsu_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;*****************************************************************************
;* Mutiply 32x16 -> 48 bit
;*
;* signed x unsigned
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*******************************************************************************
mulsu_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mulsu R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R20 ; AXL x BH -> BH x AXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R21 ; AL x BH -> BH x AL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mul R17,R22 ; BH x AM
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== mulsu_32x24_56 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>
==== mulsu_32x32_64 ====
<syntaxhighlight lang="avrasm">

</syntaxhighlight>

=== signed x signed ===
==== muls_16x8_24 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;* FUNCTION muls16x8_24.inc
;* Mutiply 16x8 -> 24 bit (signed * signed)
;*
;* AH AL BL E2 E1 E0
;* R21:R20 x R16 -> R4:R3:R2
;*
;* Scrached Register: -
;* 11 cycles + 4 (RET) = 15 Cycles
;*
;******************************************************************************
muls_16x8:
push R10
sub R10,R10 ; NULL
sub R4,R4
mulsu R16,R20 ; BL*AL (s*u)
sbc R4,R10
movw R3:R2,R1:R0
muls R21,R16 ; AH*BL (s*s)
add R3,R0
adc R4,R1
pop R10
ret

</syntaxhighlight>
}}

==== muls_16x16_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;******************************************************************************
;*
;* FUNCTION
;* muls16x16_32
;* DECRIPTION
;* Signed multiply of two 16bits numbers with 32bits result.
;* USAGE E3:E2:E1:E0 = AH:AL * BH:BL
;* r5:r4:r3:r2 = r21:r20 * r17:r16
;* STATISTICS
;* Cycles : 19 + ret
;* Words : 15 + ret
;* Scrached Register usage: r6
;* NOTE
;* The routine is non-destructive to the operands.
;*
;******************************************************************************

muls_16x16:
push R6
clr R6
muls R21,R17 ; (signed)ah * (signed)bh
movw R5:R4,R1:R0
mul R20,R16 ; al * bl
movw R3:R2,R1:R0
mulsu R21, R16 ; (signed)ah * bl
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
mulsu R17, R20 ; (signed)bh * al
sbc R5, R6
add R3, R0
adc R4, R1
adc R5, R6
pop R6
ret
</syntaxhighlight>
}}

==== muls_24x8_32 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x8 -> 32 bit
;* AH AM AL BL E3 E2 E1 E0
;* R22:R21:R20 x R16 -> R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls24x8_32:
push R10
clr R10
mulsu R16,R20 ; AL x BL -> BL x AL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R16 ; AH x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x16_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 24x16 -> 64 bit
;* AH AM AL BH BL E4 E3 E2 E1 E0
;* R22:R21:R20 x R17:R16 -> R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_24x16:
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
muls R22,R17 ; AH x BH
mov R5,R0 ; r0 -> E3
mov R6,R1 ; r1 -> E4
clr R4 ;clr -> E2

mul R21,R16 ; AM x BL
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R20 ; AL x BH -> BH x AL
sbc R5,R10 ; signed DUMMY T3
sbc R6,R10 ; signed DUMMY T4
add R3,R0 ; r0 -> E1
adc R4,R1 ; r1 -> E2
adc R5,R10 ; T3 -> E3
adc R6,R10 ; T4 -> E4

mulsu R17,R21 ; AM x BH -> BH x AM
sbc R6,R10 ; signed DUMMY T4
add R4,R0 ; r0 -> E2
adc R5,R1 ; r1 -> E3
adc R6,R10 ; T4 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_24x24_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls_24x24_48.inc
;* Mutiply 24x16 -> 64 bit (signed * signed)
;*
;* AH AM AL BH BM BL E5 E4 E3 E2 E1 E0
;* R22:R21:R20 x R18:R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 59 cycles + 4 (RET) = 63 Cycles
;*
;***********************************************************************************
muls_24x24:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AM x BM
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R22,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R22,R17 ; AH x BM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R21,R16 ; AM x BL
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R21 ; AM x BH -> BH x AM
sbc R7,R10 ; signed DUMMY T2
movw R9:R8,R1:R0 ; r1:r0 -> T1:T0
mul R20,R17 ; AL x BM
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R8 ; T0 -> E3
adc R6,R9 ; T1 -> E4
adc R7,R10 ; T2 -> E5

mulsu R22,R16 ; AH x BL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5

mulsu R18,R20 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T2
sbc R7,R10 ; signed DUMMY T2
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T2 -> E4
adc R7,R10 ; T2 -> E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x8_40 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x8 -> 40 bit
;* AH AM AL AXL BL E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R16 -> R6:R5:R4:R3:R2
;*
;* 19 cycles + 4 (RET) = 23 Cycles
;*
muls_32x8:
push R10
clr R10
clr R6
clr r5
clr r4
mulsu R16,R20 ; BL x AXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mulsu R16,R21 ; BL x AL
sbc R5,R10 ; signed DUMMY T0
sbc R6,R10 ; signed DUMMY T0
add R3,R0 ; R0 -> E1
adc R4,R1 ; R1 -> E2
adc R5,R10 ; T0 -> E3
adc R6,R10 ; T0 -> E4
mulsu R16,R22 ; BL x AM
sbc R6,R10 ; signed DUMMY T0
add R4,R0 ; R0 -> E2
adc R5,R1 ; R1 -> E3
adc R6,R10 ; T0 -> E4
muls R16,R23 ; BL x AH
add R5,R0 ; R0 -> E3
adc R6,R1 ; R1 -> E4
pop R10
ret
</syntaxhighlight>
}}

==== muls_32x16_48 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x16 -> 48 bit
;* AH AM AL AXL BH BL E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R17:R16 -> R7:R6:R5:R4:R3:R2
;*
;* 56 cycles + 4 (RET) = 60 Cycles
;*
muls_32x16:
push R8
push R9
push R10
clr R10
mul R20,R16 ; AXL x BL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R22,R16 ; AM x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
muls R23,R17 ; AH x BH
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4

mulsu R23,R16 ; AH x BL
movw R9:R8,R1:R0 ; r1:r0 -> T4:T3
sbc R7,R10 ; signed DUMMY T5
mul R21,R16 ; AL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R8 ; T3 +c -> + E3
adc R6,R9 ; T4 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R20 ; AXL x BH -> BH x AXL
sbc R5,R10 ; signed DUMMY T5
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T5 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R21 ; AL x BH -> BH x AL
sbc R6,R10 ; signed DUMMY T5
sbc R7,R10 ; signed DUMMY T5
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T5 +c -> + E4
adc R7,R10 ; T5 +c -> + E5

mulsu R17,R22 ; BH x AM
sbc R7,R10 ; signed DUMMY T5
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R10 ; T5 +c -> + E5
pop R10
pop R9
pop R8
ret
</syntaxhighlight>
}}

==== muls_32x24_56 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***********************************************************************************
;*
;* FUNCTION muls32x24_56.inc
;* Mutiply 32x24 -> 56 bit (signed * signed)
;*
;* AH AM AL AXL BH BM BL E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R18:R17:R16 -> R8:R7:R6:R5:R4:R3:R2
;*
;* 82 cycles + 4 (RET) = 86 Cycles
;*
;***********************************************************************************
muls_32x24:
push R9
push R10
push R11
sub R9,R9
sub R6,R6 ; NULL

mul R20,R16 ; AXL*BL (u*u)
movw R3:R2,R1:R0
mul R22,R16 ; AM*BL (u*u)
movw R5:R4,R1:R0
muls R23,R18 ; AH*BH (s*s)
mov R7,R0
mov R8,R1

mul R21,R16 ; AL*BL (u*u)
movw R11:R10,R1:R0
mulsu R23,R16 ; AH*BL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R20,R17 ; AXL*BM (u*u)
movw R11:R10,R1:R0
mulsu R18,R21 ; BH*AL (s*u)
sbc R7,R9
sbc R8,R9
add R3,R10
adc R4,R11
adc R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mul R21,R17 ; AL*BM (u*u)
movw R11:R10,R1:R0
mulsu R23,R17 ; AH*BM (s*u)
sbc R8,R9
add R4,R10
adc R5,R11
adc R6,R0
adc R7,R1
adc R8,R9

mul R22,R17 ; AM*BM (u*u)
add R5,R0
adc R6,R1
adc R7,R9
adc R8,R9

mulsu R18,R20 ; BH*AXL (s*u)
sbc R6,R9
sbc R7,R9
sbc R8,R9
add R4,R0
adc R5,R1
adc R6,R9
adc R7,R9
adc R8,R9

mulsu R18,R22 ; BH*AM (s*u)
sbc R8,R9
add R6,R0
adc R7,R1
adc R8,R9

pop R11
pop R10
pop R9
ret

</syntaxhighlight>
}}

==== muls_32x32_64 ====
{{Scrollbox|20em|
<syntaxhighlight lang="avrasm">
;***************************************************
;* Mutiply 32x32 -> 64 bit
;* AH AM AL AXL BH BM BL BXL E7 E6 E5 E4 E3 E2 E1 E0
;* R23:R22:R21:R20 x R19:R18:R17:R16 -> R9:R8:R7:R6:R5:R4:R3:R2
;*
;* 108 cycles + 4 (RET) = 112 Cycles
;*
muls_32x32:
push R10
push R11
push r12
push r13
push r14
clr R14
mul R20,R16 ; AXL x BXL
movw R3:R2,R1:R0 ; r1:r0 -> E1:E0
mul R21,R17 ; AL x BL
movw R5:R4,R1:R0 ; r1:r0 -> E3:E2
mul R22,R18 ; AM x BM
movw R7:R6,R1:R0 ; r1:r0 -> E5:E4
muls R23,R19 ; AH x BH
movw R9:R8,R1:R0 ; r1:r0 -> E7:E6

mulsu R23,R18 ; AH x BM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R22,R17 ; AM x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R21,R16 ; AL x BXL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R22 ; AM x BH -> BH x AM
movw R13:R12,R1:R0 ; r1:r0 -> T5:T4
sbc R9,R14 ; signed DUMMY T6
mul R21,R18 ; AL x BM
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
mul R20,R17 ; AXL x BL
add R3,R0 ; r0 ----> + E1
adc R4,R1 ; r1 +c -> + E2
adc R5,R10 ; T2 +c -> + E3
adc R6,R11 ; T3 +c -> + E4
adc R7,R12 ; T4 +c -> + E5
adc R8,R13 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R17 ; AH x BL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R20,R18 ; AXL x BM
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R21 ; AL x BH -> BH x AL
movw R11:R10,R1:R0 ; r1:r0 -> T3:T2
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
mul R22,R16 ; AM x BXL
add R4,R0 ; r0 +c -> + E2
adc R5,R1 ; r1 +c -> + E3
adc R6,R10 ; T3 +c -> + E4
adc R7,R11 ; T4 +c -> + E5
adc R8,R14 ; T5 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R19,R20 ; AXL x BH -> BH x AXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7

mulsu R23,R16 ; AH x BXL
sbc R9,R14 ; signed DUMMY T6
sbc R8,R14 ; signed DUMMY T6
sbc R7,R14 ; signed DUMMY T6
add R5,R0 ; r0 +c -> + E3
adc R6,R1 ; r1 +c -> + E4
adc R7,R14 ; T6 +c -> + E5
adc R8,R14 ; T6 +c -> + E6
adc R9,R14 ; T6 +c -> + E7
pop R14
pop R13
pop R12
pop R11
pop R10
ret
</syntaxhighlight>
}}

== Download ==
*[[Datei:MULT ASM.zip|miniatur]]

== Diskkussion ==

Multiplikation in Assembler

2020-12-06T00:02:26Z

Avrsteffen: /* muls_16x8_24 */

Multiplikation in Assembler

2020-12-05T23:35:48Z

Avrsteffen: /* muls_24x24_48 */

AVR Softwarepool

2020-12-01T18:15:31Z

Avrsteffen: /* LCD und VFD */

Die interessantesten Softwareprojekte aus der Codesammlung...

(A) ... Projekt ist in '''Assembler''' 
(C) ... Projekt ist in '''C''' 
(C++) ... Projekt ist in '''C++''' 
(B) ... Projekt ist in '''Bascom''' 
(PC) ... Projekt ist nicht für einen µC, sondern für den PC

==1-Wire==
* (C) [http://www.mikrocontroller.net/topic/14792 DS1820, DS18B20 in C]
* (A) [http://www.mikrocontroller.net/topic/6505 Mehrere DS1820/DS18B20 auslesen]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Mehrere DS1820/DS18B20/DS18S20/DS1822 über einen Webserver auslesbar]
* (C) [https://www.mikrocontroller.net/topic/387139#4890827 Bibliothek für OneWire und DS18x20]

==Akkulader==
* (A) [http://www.mikrocontroller.net/topic/72627#594587 Bleiakku-Lader 12/24V]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]

==Betriebssysteme und Scheduler==
* (C) [http://www.mikrocontroller.net/topic/190388#1856376 Nano OS] von Tobias W. ([http://sourceforge.net/projects/nanoos/ Sourceforge])
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)] von Peter Dannegger
* (C++) [http://www.mikrocontroller.net/topic/96977#837989 Einfacher Scheduler und Timer in C++ für ATMega] von S. Seegel
* (C) [http://www.mikrocontroller.net/topic/74026#609246 GOS: einfacher preemptive multitasking scheduler] von Günter Greschenz
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
* (C) [http://www.mikrocontroller.net/topic/319580#new AvRtos] preemtiver real time multitasking scheduler von Harald B. ([http://sourceforge.net/projects/avrtos/ Sourceforge])
* (C) [https://bitbucket.org/dferreyra/avr-threads/wiki/Home avr-threads] Thread-Library für AVR

==Bootloader==
* (A,C,PC) [http://www.mikrocontroller.net/topic/12181#79866 AVR Bootloader]
* (A, PC) [http://www.mikrocontroller.net/topic/146638#1364260 AVR Bootloader für GCC-Toolchain]
* (A,PC) [http://www.mikrocontroller.net/topic/95839 AVR Bootloader mit Verschlüsselung]
* (A) [http://www.mikrocontroller.net/topic/72308#591159 ATtiny45 Bootloader]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader für ATMega16]
* (C) [http://www.mikrocontroller.net/topic/56818#439359 SD/MMC Card Bootloader (passt in 2kb bootsection)]
* (C) [http://www.mikrocontroller.net/topic/61170#480765 boofa - Bootloader für AVR über UART (AVR109)]
* (C) [http://www.mikrocontroller.net/topic/53130#413058 Bootloader ATmega168]
* (C) [http://www.mikrocontroller.net/topic/73196#600293 UART Bootloader ATtiny13 - ATmega644]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/150816#1414460 UART Bootloader AtMega644P @ 20MHz] (Eclipse Projekt)
* (C) [[AVR Bootloader in C - eine einfache Anleitung]]
* (C) [http://www.mikrocontroller.net/topic/200645#1971295 LAN-Bootloader für ATmega1284p]
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
Siehe auch: [[Bootloader]]

==DCC==

(Digital Command Control, Standard zur digitalen Steuerung von Modelleisenbahnen)

* (A) [http://www.mikrocontroller.net/topic/31397#241300 DCC Decoder]

==DCF77==

(Zeitsignaldienst für funkgesteuerte Uhren auf der Langwellen-Frequenz 77,5 kHz)

* (A) [http://www.mikrocontroller.net/topic/38914#287867 DCF77 AVR-Assemblerbaustein ]
* (A) [http://www.mikrocontroller.net/topic/6500#41738 DCF77-Uhr mit ATTINY12]
* (A) [http://www.mikrocontroller.net/topic/31385#241104 DCF Digital Empfangsmodul - Korrelation - (Assembler)ATmega8 ]
* (C) [http://pic-projekte.de/wordpress/?p=572 DCF77 PIC-Projekte.de]
* (C) [http://www.mikrocontroller.net/topic/25071#186286 DCF 77 ]
* (C) [http://www.mikrocontroller.net/topic/14788#101528 DCF-Uhr mit DotMatrix-Anzeige für avr-gcc]
* (C) [http://www.mikrocontroller.net/topic/12154#79501 PC DCF Timer ( PC Zeitschaltuhr)]
* (C) [http://www.mikrocontroller.net/topic/25116#187197 DCF 77 Uhr mit CodeVision ]
* (C) [http://www.mikrocontroller.net/topic/58769#456232 DCF77 Uhr in C mit ATtiny26]
* (C) [http://www.mikrocontroller.net/topic/48597#372164 DCF77 Uhr, zum X.ten Mal, jetzt mit SAF]
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 DCF77 mit beliebig gepoltem Eingangssignal innerhalb eines Webservers]
* (C) [http://www.mikrocontroller.net/topic/121049 DCF-Uhr, Sonnenstand, TWI-Port, Alarmfunktion für Atmega8]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/168807#1614129 DCF-Uhr mit LCD in C]

== DRAM ==
* (A,C) [http://www.mikrocontroller.net/topic/25053#186085 2MB DRAM an AVR] und Anwendung als [http://www.mikrocontroller.net/topic/25053#186089 Audiorekorder]
* (A,C) [https://www.mikrocontroller.net/topic/236862 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]

==Drehgeber==
* (C) [http://www.mikrocontroller.net/topic/6526#41978 Drehgeber auslesen]
* (C+A) [http://www.mikrocontroller.net/topic/302229#new 4-fach Auswertung für Dreh-/Inkrementalgeber, schnell]
* (C) [http://www.mikrocontroller.net/topic/328348#new Schrittmotor als Drehgeber mit Drehdynamik]
* (A) [https://www.mikrocontroller.net/topic/478343?goto=5925396#5922395]

==DTMF==
* (A) [http://www.mikrocontroller.net/topic/92444#792954 DTMF dekodieren]

==DMX==

* (C) [http://www.mikrocontroller.net/topic/92350#new 20 Kanal Relaissteuerung per DMX]
* (A) [http://www.mikrocontroller.net/topic/276885#new DMX512 zu RGB Led Controller use HSV Farbraum]
* (C) [http://www.mikrocontroller.net/topic/290366#3096821 20 Kanal PWM per DMX]

==Ethernet==
Siehe auch [[AVR Softwarepool#Netzwerk|Netzwerk]]

==Entwicklungssysteme==
* (PC) [http://www.mikrocontroller.net/topic/74198#611404 AVR Code Wizard]
* (A) [http://www.mikrocontroller.net/topic/30110#230503 Multitasking kernel für ATtinys in ASM]
* (A) [http://www.mikrocontroller.net/topic/65156#521012 BASIC-Computer mit ATmega32]
* (A) [http://www.mikrocontroller.net/topic/64129#511368 AVR TinyBASIC Anpassung für ATmega8]
* (A) [http://www.mikrocontroller.net/topic/59189#460273 Mini-Computer mit BASIC]
* (A) [http://www.mikrocontroller.net/topic/55807 Forth System für ATmegas in Assembler]
* (A) [http://www.mikrocontroller.net/topic/94193 Forth-Computer mit ATmega32 und Videoausgabe] von Christian Berger
* (C) [http://www.mikrocontroller.net/topic/62500#493931 Fixpoint-Arithmetik in "C"]
* (C++) [http://www.mikrocontroller.net/topic/143537 Fixpoint-Arithmetik in "C++"]
* (C) [http://www.mikrocontroller.net/topic/85256#717037 64 Bit float Emulator in C, IEEE754 kompatibel]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/94468#812992 Gleitkomma-Bibliothek für AVR]
* (A) [http://www.mikrocontroller.net/topic/177481?page=1 AVR CP/M System]
* (PC) [http://www.mikrocontroller.net/topic/187390 EMACS Konfiguration]
* (C) [https://www.mikrocontroller.net/topic/467307 Watchdog-ISR für ATmega328]

==FFT==

(Fast Fourier Transformation, "schnelle" Fouriertransformation)

* (A) [http://www.mikrocontroller.net/topic/25095#186536 FFT auf dem AVR]
* (A) [http://www.mikrocontroller.net/topic/25062#186225 128point FFT in ASM]
* (A) [http://www.mikrocontroller.net/topic/27001#203911 Schnelle FFT in Assembler]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]

==Funksteckdosen==
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 Ansteuerung von Funksteckdosen mit einem Webserver]

==GPS==

(Global Positioning System, satellitengestütztes System zur weltweiten Positions- und Zeitbestimmung)

* (A) [http://www.mikrocontroller.net/topic/48544#371717 GPS - MOUSE - MINI- NAVIGATOR (Assembler) ATmega8]
* (C) [http://www.mikrocontroller.net/topic/72507#593252 GPS an mega8,88 oder 168]

==IR==
* siehe auch [[AVR Softwarepool#RC5|RC5]]
* (C) [[IRMP]] - Infrared Multi Protocol Decoder:
**[[IRMP| Wiki Seite]]
**[http://www.mikrocontroller.net/topic/162119#1545798 Thread im Forum]

==Kryptographie==
* (A,C) [http://www.mikrocontroller.net/topic/73468 Verschiedene kryptographische Funktionen]

==LANC==

(Steuerprotokoll für Video- und Digitalfotokameras, auch als Control-L bekannt)

* (C) [http://www.mikrocontroller.net/topic/40463#302754 Sony LANC Auswertung mit AVR] (Atmega 128 @ 16 MHz)

==LEDs und LED-Anzeigen==
{{Scrollbox|20em|
* (C) [http://www.mikrocontroller.net/topic/76839#638278 Solarlicht Steuerung]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (A) [http://www.mikrocontroller.net/topic/73776#606472 LED-Touch-Panel] (ARM)
* (A) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/54561#421940 HSV RGB Led Dimmer, C Code & Video & Doku]
* (A) [http://www.mikrocontroller.net/topic/67567#543492 Mini RGB Lichteffektgenerator mit Menü für Pic16F84]
* (C) [http://www.mikrocontroller.net/topic/48464#370871 Ansteuerung einer RGB LED (PWM)]
* (A) [http://www.mikrocontroller.net/topic/87149#737282 3x7 Segment und 1 I/O-Pin (Assembler)]
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] (vier 7-Segmentanzeigen)
* (A) [http://www.mikrocontroller.net/topic/31388#241192 AVR-Lauflicht]
* (A) [http://www.mikrocontroller.net/topic/94746#815809 HSB->RGB Umrechnung rein in Assembler, auch für ATiny]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (A) [http://www.mikrocontroller.net/topic/110168 2x7-Segment an nur 3 Leitungen]
* (A) [[Ambilight in Hardware]]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]
* (B) [http://www.mikrocontroller.net/topic/182305 TLC5940 16-Kanal 12bit LED Treiber ansteuern und HighPower LEDs über MosFETs treiben]
* (PC) [http://www.mikrocontroller.net/topic/185730 7Segment Coder]
* (C) [http://www.mikrocontroller.net/topic/244768 RGB-Moodlight, ATMega8, Soft-PWM mit Gammakorrektur, IR-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/275426 serielles 4x7 Segment Display NSM4202]
* (C) [https://www.mikrocontroller.net/topic/415651#new SSD1306/1309 Library zum Darstellen von Text/Grafik auf OLED Displays]
* (A) [https://www.mikrocontroller.net/topic/506738#new SSD1306 text library für oled displays]
}}

==LCD und VFD==
{{Scrollbox|20em|
* (C) [http://bluematrixi.bl.funpic.de/index.php/elektronik-avr/lcd-display-nokia3310 Bibliothek für Nokia 3310 Lcd Ansteuerung in "C" - sehr gut]
*(C,A)[http://www.mikrocontroller.net/articles/Ansteuerung_Handy_Displays Ansteuerung_Handy_Displays]
* (PC) [http://www.mikrocontroller.net/topic/53137#413137 Programm zum Erstellen eigener Schriftarten (LCD)]
* (PC) [http://www.mikrocontroller.net/topic/54860#423255 LCD Schriftarten ( Fonts in veschiedenen Größen )]
* (C) [http://www.mikrocontroller.net/topic/31403 The Siemens S65 132x176, 65536 color display with AVR]
* (C) [http://www.mikrocontroller.net/topic/48501#371218 LCD Ansteuerung im 4bit-Modus]
* (C) [http://www.mikrocontroller.net/topic/48456#370782 LCD Library T6963c]
* (C) [http://www.mikrocontroller.net/topic/76399#633680 "Bessere" T6963c Library]
* (C) [http://www.mikrocontroller.net/topic/25099#186569 LCD Controller für 640x480 LCD mit mega8515]
* (C) [http://www.mikrocontroller.net/topic/38923#287939 LCD Controller KS0073 Support im 4-Bit Mode]
* (A) [http://www.mikrocontroller.net/topic/79609#664268 KS0066U oder Ähnliche --- LCD Treiber]
* (C) [http://www.mikrocontroller.net/topic/81793#683135 Pollin E0855-2 SED1530-Treiber]
* (C) [http://www.mikrocontroller.net/topic/90449#772843 LCD über nur einen IO-Pin ansteuern]
* (C) [http://www.mikrocontroller.net/topic/120475 VFD Library (Vacuum Fluorescent Display Library)]
* (C) [http://www.mikrocontroller.net/topic/98321#851423 Grafikfähiger LCD Controller für 320x240 LCD mit 4 Graustufen] (jetzt auch mit 8 Graustufen)
* (C) [http://www.mikrocontroller.net/topic/140369 Menüsystem für beliebige schwarz-weiß LCDs bis 4096x4096 Pixeln und grafischem Editor]
* (C) [http://www.mikrocontroller.net/topic/194149 Schnelle SED1520 Funktionsbibliothek mit Bildkonverter und Fontgenerator]
* (PC,C) [http://www.mikrocontroller.net/topic/234304 DOGXL Fontgenerator (SW+Graustufen)]
* (C,A) [http://www.mikrocontroller.net/topic/236862#2401250 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]
* (A) [http://www.mikrocontroller.net/topic/190078 LCD SHARP M078CKA mit LH155]
* (C) [http://www.mikrocontroller.net/topic/287978 EA DOGM162 Textdisplay an SPI]
* (A) [http://www.mikrocontroller.net/topic/305266 HD44780 Display 2x16 Xmega-Assemblerbaustein]
* (C) [http://www.mikrocontroller.net/topic/320791#3524261 Nokia N95 Display 320x240 Arduino Lib.]
* (C) [http://www.mikrocontroller.net/topic/318818#3456758 Library für ST7735 Display Controller mit GLCD Font Unterstützung]
* (C) [https://www.mikrocontroller.net/topic/415651#new SSD1306/1309 Library zum Darstellen von Text/Grafik auf OLED Displays]
* (A) [https://www.mikrocontroller.net/topic/506738#new SSD1306 text library für oled displays]
}}

==I2C==
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/83871#new I2C-Master realisiert in Software, ohne TWI für alle ATMEGAs]
* (A) [http://www.mikrocontroller.net/topic/38919#new RS232 <-> TWI / I2C Interface für ATMega8 (ASM) inkl. Windows Software]
* (C) [http://www.mikrocontroller.net/topic/67698#544930 USI TWI Master]
* (A) [http://www.mikrocontroller.net/topic/235733#2388116 Hardware TWI-MASTER Interrupt basierend für Mega AVR]
* (A) [http://www.mikrocontroller.net/topic/272621#new I2C/TWI Master-Interrupt Xmega-Assemblerbaustein]
* (C) [https://www.mikrocontroller.net/topic/378553 hot-plug fähige Library für DS1621 Temperatursensoren ]
* (A) [https://www.mikrocontroller.net/topic/506739#new TWI im polling für AVR 0-Series und AVR 1-Series]

==Messgeräte==
===Drehzahlmesser===
* (B) [http://www.mikrocontroller.net/topic/1518#8469 Drehzahlmesser 4 mal 7-Segment mit 90S2313]
* (C) [http://www.mikrocontroller.net/articles/Drehzahlmesser Drehzahlmesser mit 4 mal 7-Segment anzeigen mit Tiny2313, Wiki-Artikel]
* (C) [http://www.mikrocontroller.net/topic/231283 einfache Drehzahlmessung mit ATmega88]
* (C) [http://www.mikrocontroller.net/topic/232485 4-Kanal Drehzahlmessung mit ATmega88]

===Klopfsensormessgerät===
* (C) [http://www.mikrocontroller.net/articles/Klopfsensormessgeraet Messgerät für Klopfgeräusche an Verbrennungsmotoren auf Basis des TPIC8101]

===Entfernungsmesser===
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/130834 3D Umgebungserfassung mit einem auf zwei Servors montiertem Sharp Distanzsensor, Eigenbau]

===Frequenzmesser===
* (A) [http://www.mikrocontroller.net/topic/62610#495030 Frequenzmesser bis 2Mhz -- mit AVR ATmega8]
* (C) [http://www.mikrocontroller.net/topic/48582#372072 Frequenzmessung (Seite mit Quellcode nicht erreichbar)]
* (C) [http://www.mikrocontroller.net/topic/62517#494146 Input Capture Pin (ICP) auslesen ( Frequenz messen)]
* (C) [http://www.mikrocontroller.net/topic/25144#187587 Frequenzmessung und Impulszählung über den Parallelport-IR]
* (A) [http://www.mikrocontroller.net/topic/31394#241251 einfacher 5 MHz Frequenzzähler (Assembler) ATmega8]
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/173665#new sehr genauer Frequenzmesser Atmega8]
* (C) [http://www.mikrocontroller.net/topic/186801#new Reziproker Frequenzzähler+ Optimierte 64bit uint Routinen]
* (C+A) [http://www.mikrocontroller.net/topic/200279#new 6 Stellen von 1Hz bis 40MHz ATmega8]
* (C) [http://www.mikrocontroller.net/topic/241150#2458079 Reziproker Frequenzzähler, GPS-stabilisiert, ATmega162]
* (B) [http://www.mikrocontroller.net/topic/359552#new Reziproker Frequenzzähler mit BASCOM-AVR]

===Frequenzgenerator===
* (B) [http://www.mikrocontroller.net/topic/152966#1438488 Einstellbarer Frequenzgenerator für 0.12 Hz - 8 MHz mit Atmega 8 und Bascom ]

===Kompass===
* (A) [http://www.mikrocontroller.net/topic/100239#870281 KOMPASS KMZ10A KMZ10B ATmega8 Assembler]

===Messgeräte für elektronische Bauteile===
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (A) [http://www.mikrocontroller.net/topic/60797#477026 LC-METER / LC-Messgerät ATmega8 Assembler]
* (A) [http://www.mikrocontroller.net/topic/60591#474873 Widerstandstester]
* (A) [http://www.mikrocontroller.net/topic/56770#438957 Ladungsmessgerät]
* (A) [http://www.mikrocontroller.net/topic/31386#241139 Transistortester]
* (C) [http://www.mikrocontroller.net/topic/131804#1194273 Transistortester]

===Spannungsmesser===
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] - Voltmeter
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/31389 Wirkleistungsmessgerät] - "Ein einfaches Wirkleistungsmessgerät für 230V Verbraucher ohne Netztrennung mit 3 stelliger 7-Segment Anzeige für Verbraucher bis 500W." (+ ähnlicher Aufbau mit Silabs Controller)

===Thermometer===
* (A) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/53127#413006 Thermometer mit LED & LM35]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Viele DS18x20-Thermometer in einem Webserver]
* (C) [http://www.mikrocontroller.net/topic/354441#3953900 Auswertung Temperatursensor KTY81 (PT1000), Arduino Uno, 1-6 Kanäle]

===Oszilloskop===
* (B) [http://www.mikrocontroller.net/topic/53129#413011 Einfaches Oszilloskop - Bascom]
* (A) [http://www.mikrocontroller.net/topic/48586#372093 Oszi- & Logikanalyser mit LCD]
* (A) [http://www.mikrocontroller.net/topic/31376#240880 einfaches DIGITAL- Oszilloskop (800 Datenpunkte) Assembler]
* (A) [http://www.mikrocontroller.net/topic/56616#437772 Einfaches "Oszilloskop"]
* (C) [http://www.christoph-lauer.de/Homepage/Blog/Eintrage/2010/8/1_Embedded_C_based_Spectrumanalyzer.html ATXMega based Oscilloscope and Spectrumanalyzer]
* (A) [http://www.mikrocontroller.net/topic/228997#2308320 Selbstbau Digital Storage Oszilloskop]

===Beschleunigungssensor===
* (c++) [http://www.mikrocontroller.net/topic/268214 Einfache BMA020 Library, mit I2C]

==MIDI==

(Musical Instrument Digital Interface, Datenübertragungsstandard für Musikinstrumente)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (A) [http://www.mikrocontroller.net/topic/106512# Drum-Trigger mit MIDI-Ausgabe]

==MMC==

(Multimedia Card, digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/25056#186117 SourceCode MMC die Zweite]
* (C) [http://www.mikrocontroller.net/topic/48481#370950 MMC/SD-Karte mit FAT16 an AVR]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader füt ATMega16]
* (C) [http://www.mikrocontroller.net/topic/14800#102024 MMC/SD ansteuern mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/articles/FAT32 MMC/SD - FAT16/32 Bibliothek für AVR mit Wiki]

==Netzgeräte==
* [http://www.mikrocontroller.net/topic/60786#476904 Labornetzgerät]
* [[RADLAB-PS1]] [http://www.mikrocontroller.net/topic/124858#1138781 Netzteil um LM317 mit Strombegrenzung und Anzeige!]

==Netzwerk==
* (C) [http://www.mikrocontroller.net/topic/87517#new Kleiner ENC28J60 µWebserver von SimonK]
* (C) [http://www.mikrocontroller.net/topic/82127#new Ulrich Radigs ENC28J60 mit leicht lötbaren/beschaffbaren Bauteilen]
* (C) [http://www.mikrocontroller.net/topic/131825 Dirk Broßwick Webserver auf ENC28j60 Basis mit einem ATmega2561, es gibt auch einen Port auf das AVR-NET IO]

==Parser==
* (C) [http://www.mikrocontroller.net/topic/64763#517245 Zwei Parser für numerische Ausdrücke]
* (C) [http://www.mikrocontroller.net/topic/76842#638283 uShell - ein universeller Parser für uCs]

==RFID==

(Radio Frequency Identification, Verfahren zur funkbasierten Identifizierung und Lokalisierung von Gegenständen)

* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (C) [http://www.mikrocontroller.net/topic/228709 Soft-RFID ohne RFID-IC]

==RC - Fernsteuerungen/Servos==
* (C) [http://www.mikrocontroller.net/topic/48529#371582 RC Summen Signal erzeugen ]
* (C) [http://www.mikrocontroller.net/topic/192453 RC Summen Signal dekodieren ]

==RC5==

(verbreitetes Datenübertragungsprotokoll für Infrarot-Fernbedienungen)

* (A) [http://www.mikrocontroller.net/topic/14789#101536 RC5 Sender auf einem Attiny11L]
* (C) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/12216#80856 Fernbedien RC5 Empfänger]
* (C) [http://www.mikrocontroller.net/topic/59235#460765 RC5 Sender selber bauen ???]

==Ringpuffer==
* (A) [http://www.mikrocontroller.net/topic/66789#536189 Ringpuffer AVR]
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]

==SD==

(Secure Digital Memory Card; digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/topic/68257#550336 Datenrekorder auf SD-Karte mit mega88]

==Sonstiges==

* (C) [http://www.mikrocontroller.net/topic/111783#994358 Sonnenstandberechnung mit Atmega 8]
* (C) [http://www.mikrocontroller.net/articles/UAC_Mikrocontroller_ASCII_Console uAC Mikrocontroller ASCII Console]

==Spaßprojekte==
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/119876#1083044 Miniprojekt: Lagerfeuer-LED (ATtiny25)]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/167528#1601077 Toastbrote zählen]

==Spiele==
* (C) [http://www.mikrocontroller.net/topic/48505#371259 Tetris auf dem AtMega8]
* (C) [http://www.mikrocontroller.net/topic/187253# Atmega8 Schachuhr mit Max7219 ]

==Steuerungen==
* (C) [http://www.mikrocontroller.net/topic/123551 Aquarium Controller]
* () [http://www.mikrocontroller.net/topic/309045 Lüftersteuerung durch zwei SHT75, mega32, LCD und SD-Karte]
* () [http://www.mikrocontroller.net/topic/307375 Fensteröffner mit Scheibenwischermotor dht11 sht11]

==Taster / Schalter==
===mechanisch===
* (A) [http://www.mikrocontroller.net/topic/6492#41625 Tasten entprellen - Bulletproof] (siehe auch: [[Entprellung]])
* (C) [http://www.mikrocontroller.net/topic/48465#370877 Universelle Tastenabfrage]
* (C) [http://www.mikrocontroller.net/topic/6491#41624 Tasten-Matrix entprellen]
* (C) [http://www.mikrocontroller.net/topic/64731#517001 Tastenmatrix auslesen über nur 2 Leitungen]
* (C) [http://www.mikrocontroller.net/topic/64743#517105 Tasten Entprellen für N00bs]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (C) [http://www.mikrocontroller.net/topic/1515#8455 Entprellen von Tastern, autorepeat, vintage]

===kapazitiv===
* (C) [http://www.mikrocontroller.net/topic/38904 Sensor mit nur einer Kontaktfläche]
* (C) [http://www.mikrocontroller.net/topic/25045 Einfache Sensortaste]

==Tonerzeugung==
* (A) [http://www.mikrocontroller.net/topic/66945#537624 ATMEGA8 Soundgenerator/Synthesizer]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (C) [http://www.mikrocontroller.net/topic/134362 RTTTL Melodiegenerator mit ATTINY85]
* (B) [http://www.mikrocontroller.net/topic/232702#new RTTTL Melodiegenerator mit ATMEGA8]
* (A) [http://www.mikrocontroller.net/topic/25051 Melodie ausgeben mit AVR ATTiny12]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (B) [http://www.mikrocontroller.net/topic/137629#1259132 Melodieklingel BASCOM ATmega8]
* (A) [http://www.mikrocontroller.net/topic/191596 2Kanal Synthesizer ATtiny 2313, 85, ..]
* (A) [http://www.mikrocontroller.net/topic/232845 17 Kanal Avr Synthesizer]
* (C) [[AVR-Synthesizer]]

==TWI==
* (C) [http://www.mikrocontroller.net/topic/87597#742070 AVR TWI Master und Slave Funtionen in C]
* (A) [http://www.mikrocontroller.net/topic/31404#242081 TWI / I2C einf. MASTER SLAVE Beispiel(Assembler) ATmega8]

==USB==
* (C) [http://www.mikrocontroller.net/topic/75254#622120 USB Host Stack für Eingebettete Systeme (LGPL)]
* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/90791#776280 Relaiskarte für den USB Port]
* (C) [http://www.mikrocontroller.net/topic/130381#1179352 USB-Stick am Mikrocontroller VNC1L]
* (C) [http://www.mikrocontroller.net/topic/155241 PDIUSBD12 Treiber und micro USB-Device stack]
* (C) [http://www.mikrocontroller.net/topic/192453 HID-Joystick mit V-USB ]

==UART==
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/38928#287985 Software UART]
* (C) [http://www.mikrocontroller.net/topic/125651#1147436 Software UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/175946#1690682 uParse] - ein kompakter und vielseitiger Parser (Atmega32) für [[RS232]]
* (C) [http://www.mikrocontroller.net/topic/159753#1517744 Einfacher Interpreter für Komandozeilen/Befehlszeilen] (Atmega32) für [[RS232]]
* (C) [https://sourceforge.net/projects/yambsiavr/ Modbus Slave Library] für [[RS232]] und [[RS485]]

==Video==
* (A) [http://www.mikrocontroller.net/topic/53140#413249 AVR ASCII Video Terminal - 40 x 25 - BAS Signal]
* (A) [http://www.mikrocontroller.net/topic/53139#413225 TV VIDEO BILD BAS Frequenzzähler DVM Atmega8 Assembler]
* (A) [http://www.electronicspit.com/video/ Videosignal in Farbe aus dem ATMega32] (URL nicht mehr erreichbar)
* (A) [http://www.mikrocontroller.net/topic/25091#new VGA Testbildgenerator]
* (C) [http://www.mikrocontroller.net/topic/101429#882288 ATmega8 erzeugt Video in C!]

==Zeitgeber und Uhren==
* (A) [http://www.mikrocontroller.net/topic/12185#80055 Die genaue Sekunde / RTC]
* (A) [http://www.mikrocontroller.net/topic/74673#616226 LCD-Timer für Belichtungsgerät]
* (A) [http://www.mikrocontroller.net/topic/119859#1082804 DS1307 Assembler-Code]
* (C) [http://www.mikrocontroller.net/topic/31374#240878 AVR Library für RTC 12C887 in C]
* (C) [http://www.mikrocontroller.net/topic/25136#187534 RTC DS1302 in C]
* (C) [http://www.mikrocontroller.net/topic/25087#186454 RTC + Scheduler]
* (C) [http://www.mikrocontroller.net/topic/53131#413059 Jumbo-LED Uhr]
* (C) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25069 Sekunden in Zeit/Datum umwandeln (mit Sommerzeit/Schaltjahren)]
* (B) [http://www.mikrocontroller.net/topic/48560#371911 BASCOM Uhr mit Butterfly]
* (C) [http://www.mikrocontroller.net/topic/48450#370765 Countdown timer für UV Belichter]
* (C) [http://www.mikrocontroller.net/topic/98885 Countdown Timer mit ATtiny2313]
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Schaltuhr mit DCF77-Referenz in einem Webserver, Steuerung von Funksteckdosen]
* (C) [http://www.mikrocontroller.net/topic/100892#876549 Eieruhr mit ATtiny24V/ATtiny2313V]
* (B) [http://www.mikrocontroller.net/topic/151236 Zeitauslöser für Casio EX F1 mit Attiny2313]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/177688# NIXIE Uhr mit vielen Funktionen in C mit ATTiny2313]
* (C) [http://www.mikrocontroller.net/topic/233699 Stoppuhr – Geschwindigkeit – Pulsweite mit Atmega88]
* (C) [http://www.mikrocontroller.net/topic/275514 Timer bis 99:59 min - LED Display NSM4202, Drehgeber - At90S2313]
* (A) [http://www.mikrocontroller.net/topic/289724 Uhr/Kalender AVR-Assemblerbaustein]

== Siehe auch ==

* [[AVR-Codesammlung Übersicht]]

[[Kategorie:AVR]]
[[Kategorie:Forum]]
[[Kategorie:Listen]]

AVR Softwarepool

2020-12-01T18:14:20Z

Avrsteffen: /* LEDs und LED-Anzeigen */

Die interessantesten Softwareprojekte aus der Codesammlung...

(A) ... Projekt ist in '''Assembler''' 
(C) ... Projekt ist in '''C''' 
(C++) ... Projekt ist in '''C++''' 
(B) ... Projekt ist in '''Bascom''' 
(PC) ... Projekt ist nicht für einen µC, sondern für den PC

==1-Wire==
* (C) [http://www.mikrocontroller.net/topic/14792 DS1820, DS18B20 in C]
* (A) [http://www.mikrocontroller.net/topic/6505 Mehrere DS1820/DS18B20 auslesen]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Mehrere DS1820/DS18B20/DS18S20/DS1822 über einen Webserver auslesbar]
* (C) [https://www.mikrocontroller.net/topic/387139#4890827 Bibliothek für OneWire und DS18x20]

==Akkulader==
* (A) [http://www.mikrocontroller.net/topic/72627#594587 Bleiakku-Lader 12/24V]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]

==Betriebssysteme und Scheduler==
* (C) [http://www.mikrocontroller.net/topic/190388#1856376 Nano OS] von Tobias W. ([http://sourceforge.net/projects/nanoos/ Sourceforge])
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)] von Peter Dannegger
* (C++) [http://www.mikrocontroller.net/topic/96977#837989 Einfacher Scheduler und Timer in C++ für ATMega] von S. Seegel
* (C) [http://www.mikrocontroller.net/topic/74026#609246 GOS: einfacher preemptive multitasking scheduler] von Günter Greschenz
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
* (C) [http://www.mikrocontroller.net/topic/319580#new AvRtos] preemtiver real time multitasking scheduler von Harald B. ([http://sourceforge.net/projects/avrtos/ Sourceforge])
* (C) [https://bitbucket.org/dferreyra/avr-threads/wiki/Home avr-threads] Thread-Library für AVR

==Bootloader==
* (A,C,PC) [http://www.mikrocontroller.net/topic/12181#79866 AVR Bootloader]
* (A, PC) [http://www.mikrocontroller.net/topic/146638#1364260 AVR Bootloader für GCC-Toolchain]
* (A,PC) [http://www.mikrocontroller.net/topic/95839 AVR Bootloader mit Verschlüsselung]
* (A) [http://www.mikrocontroller.net/topic/72308#591159 ATtiny45 Bootloader]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader für ATMega16]
* (C) [http://www.mikrocontroller.net/topic/56818#439359 SD/MMC Card Bootloader (passt in 2kb bootsection)]
* (C) [http://www.mikrocontroller.net/topic/61170#480765 boofa - Bootloader für AVR über UART (AVR109)]
* (C) [http://www.mikrocontroller.net/topic/53130#413058 Bootloader ATmega168]
* (C) [http://www.mikrocontroller.net/topic/73196#600293 UART Bootloader ATtiny13 - ATmega644]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/150816#1414460 UART Bootloader AtMega644P @ 20MHz] (Eclipse Projekt)
* (C) [[AVR Bootloader in C - eine einfache Anleitung]]
* (C) [http://www.mikrocontroller.net/topic/200645#1971295 LAN-Bootloader für ATmega1284p]
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
Siehe auch: [[Bootloader]]

==DCC==

(Digital Command Control, Standard zur digitalen Steuerung von Modelleisenbahnen)

* (A) [http://www.mikrocontroller.net/topic/31397#241300 DCC Decoder]

==DCF77==

(Zeitsignaldienst für funkgesteuerte Uhren auf der Langwellen-Frequenz 77,5 kHz)

* (A) [http://www.mikrocontroller.net/topic/38914#287867 DCF77 AVR-Assemblerbaustein ]
* (A) [http://www.mikrocontroller.net/topic/6500#41738 DCF77-Uhr mit ATTINY12]
* (A) [http://www.mikrocontroller.net/topic/31385#241104 DCF Digital Empfangsmodul - Korrelation - (Assembler)ATmega8 ]
* (C) [http://pic-projekte.de/wordpress/?p=572 DCF77 PIC-Projekte.de]
* (C) [http://www.mikrocontroller.net/topic/25071#186286 DCF 77 ]
* (C) [http://www.mikrocontroller.net/topic/14788#101528 DCF-Uhr mit DotMatrix-Anzeige für avr-gcc]
* (C) [http://www.mikrocontroller.net/topic/12154#79501 PC DCF Timer ( PC Zeitschaltuhr)]
* (C) [http://www.mikrocontroller.net/topic/25116#187197 DCF 77 Uhr mit CodeVision ]
* (C) [http://www.mikrocontroller.net/topic/58769#456232 DCF77 Uhr in C mit ATtiny26]
* (C) [http://www.mikrocontroller.net/topic/48597#372164 DCF77 Uhr, zum X.ten Mal, jetzt mit SAF]
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 DCF77 mit beliebig gepoltem Eingangssignal innerhalb eines Webservers]
* (C) [http://www.mikrocontroller.net/topic/121049 DCF-Uhr, Sonnenstand, TWI-Port, Alarmfunktion für Atmega8]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/168807#1614129 DCF-Uhr mit LCD in C]

== DRAM ==
* (A,C) [http://www.mikrocontroller.net/topic/25053#186085 2MB DRAM an AVR] und Anwendung als [http://www.mikrocontroller.net/topic/25053#186089 Audiorekorder]
* (A,C) [https://www.mikrocontroller.net/topic/236862 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]

==Drehgeber==
* (C) [http://www.mikrocontroller.net/topic/6526#41978 Drehgeber auslesen]
* (C+A) [http://www.mikrocontroller.net/topic/302229#new 4-fach Auswertung für Dreh-/Inkrementalgeber, schnell]
* (C) [http://www.mikrocontroller.net/topic/328348#new Schrittmotor als Drehgeber mit Drehdynamik]
* (A) [https://www.mikrocontroller.net/topic/478343?goto=5925396#5922395]

==DTMF==
* (A) [http://www.mikrocontroller.net/topic/92444#792954 DTMF dekodieren]

==DMX==

* (C) [http://www.mikrocontroller.net/topic/92350#new 20 Kanal Relaissteuerung per DMX]
* (A) [http://www.mikrocontroller.net/topic/276885#new DMX512 zu RGB Led Controller use HSV Farbraum]
* (C) [http://www.mikrocontroller.net/topic/290366#3096821 20 Kanal PWM per DMX]

==Ethernet==
Siehe auch [[AVR Softwarepool#Netzwerk|Netzwerk]]

==Entwicklungssysteme==
* (PC) [http://www.mikrocontroller.net/topic/74198#611404 AVR Code Wizard]
* (A) [http://www.mikrocontroller.net/topic/30110#230503 Multitasking kernel für ATtinys in ASM]
* (A) [http://www.mikrocontroller.net/topic/65156#521012 BASIC-Computer mit ATmega32]
* (A) [http://www.mikrocontroller.net/topic/64129#511368 AVR TinyBASIC Anpassung für ATmega8]
* (A) [http://www.mikrocontroller.net/topic/59189#460273 Mini-Computer mit BASIC]
* (A) [http://www.mikrocontroller.net/topic/55807 Forth System für ATmegas in Assembler]
* (A) [http://www.mikrocontroller.net/topic/94193 Forth-Computer mit ATmega32 und Videoausgabe] von Christian Berger
* (C) [http://www.mikrocontroller.net/topic/62500#493931 Fixpoint-Arithmetik in "C"]
* (C++) [http://www.mikrocontroller.net/topic/143537 Fixpoint-Arithmetik in "C++"]
* (C) [http://www.mikrocontroller.net/topic/85256#717037 64 Bit float Emulator in C, IEEE754 kompatibel]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/94468#812992 Gleitkomma-Bibliothek für AVR]
* (A) [http://www.mikrocontroller.net/topic/177481?page=1 AVR CP/M System]
* (PC) [http://www.mikrocontroller.net/topic/187390 EMACS Konfiguration]
* (C) [https://www.mikrocontroller.net/topic/467307 Watchdog-ISR für ATmega328]

==FFT==

(Fast Fourier Transformation, "schnelle" Fouriertransformation)

* (A) [http://www.mikrocontroller.net/topic/25095#186536 FFT auf dem AVR]
* (A) [http://www.mikrocontroller.net/topic/25062#186225 128point FFT in ASM]
* (A) [http://www.mikrocontroller.net/topic/27001#203911 Schnelle FFT in Assembler]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]

==Funksteckdosen==
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 Ansteuerung von Funksteckdosen mit einem Webserver]

==GPS==

(Global Positioning System, satellitengestütztes System zur weltweiten Positions- und Zeitbestimmung)

* (A) [http://www.mikrocontroller.net/topic/48544#371717 GPS - MOUSE - MINI- NAVIGATOR (Assembler) ATmega8]
* (C) [http://www.mikrocontroller.net/topic/72507#593252 GPS an mega8,88 oder 168]

==IR==
* siehe auch [[AVR Softwarepool#RC5|RC5]]
* (C) [[IRMP]] - Infrared Multi Protocol Decoder:
**[[IRMP| Wiki Seite]]
**[http://www.mikrocontroller.net/topic/162119#1545798 Thread im Forum]

==Kryptographie==
* (A,C) [http://www.mikrocontroller.net/topic/73468 Verschiedene kryptographische Funktionen]

==LANC==

(Steuerprotokoll für Video- und Digitalfotokameras, auch als Control-L bekannt)

* (C) [http://www.mikrocontroller.net/topic/40463#302754 Sony LANC Auswertung mit AVR] (Atmega 128 @ 16 MHz)

==LEDs und LED-Anzeigen==
{{Scrollbox|20em|
* (C) [http://www.mikrocontroller.net/topic/76839#638278 Solarlicht Steuerung]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (A) [http://www.mikrocontroller.net/topic/73776#606472 LED-Touch-Panel] (ARM)
* (A) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/54561#421940 HSV RGB Led Dimmer, C Code & Video & Doku]
* (A) [http://www.mikrocontroller.net/topic/67567#543492 Mini RGB Lichteffektgenerator mit Menü für Pic16F84]
* (C) [http://www.mikrocontroller.net/topic/48464#370871 Ansteuerung einer RGB LED (PWM)]
* (A) [http://www.mikrocontroller.net/topic/87149#737282 3x7 Segment und 1 I/O-Pin (Assembler)]
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] (vier 7-Segmentanzeigen)
* (A) [http://www.mikrocontroller.net/topic/31388#241192 AVR-Lauflicht]
* (A) [http://www.mikrocontroller.net/topic/94746#815809 HSB->RGB Umrechnung rein in Assembler, auch für ATiny]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (A) [http://www.mikrocontroller.net/topic/110168 2x7-Segment an nur 3 Leitungen]
* (A) [[Ambilight in Hardware]]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]
* (B) [http://www.mikrocontroller.net/topic/182305 TLC5940 16-Kanal 12bit LED Treiber ansteuern und HighPower LEDs über MosFETs treiben]
* (PC) [http://www.mikrocontroller.net/topic/185730 7Segment Coder]
* (C) [http://www.mikrocontroller.net/topic/244768 RGB-Moodlight, ATMega8, Soft-PWM mit Gammakorrektur, IR-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/275426 serielles 4x7 Segment Display NSM4202]
* (C) [https://www.mikrocontroller.net/topic/415651#new SSD1306/1309 Library zum Darstellen von Text/Grafik auf OLED Displays]
* (A) [https://www.mikrocontroller.net/topic/506738#new SSD1306 text library für oled displays]
}}

==LCD und VFD==
* (C) [http://bluematrixi.bl.funpic.de/index.php/elektronik-avr/lcd-display-nokia3310 Bibliothek für Nokia 3310 Lcd Ansteuerung in "C" - sehr gut]
*(C,A)[http://www.mikrocontroller.net/articles/Ansteuerung_Handy_Displays Ansteuerung_Handy_Displays]
* (PC) [http://www.mikrocontroller.net/topic/53137#413137 Programm zum Erstellen eigener Schriftarten (LCD)]
* (PC) [http://www.mikrocontroller.net/topic/54860#423255 LCD Schriftarten ( Fonts in veschiedenen Größen )]
* (C) [http://www.mikrocontroller.net/topic/31403 The Siemens S65 132x176, 65536 color display with AVR]
* (C) [http://www.mikrocontroller.net/topic/48501#371218 LCD Ansteuerung im 4bit-Modus]
* (C) [http://www.mikrocontroller.net/topic/48456#370782 LCD Library T6963c]
* (C) [http://www.mikrocontroller.net/topic/76399#633680 "Bessere" T6963c Library]
* (C) [http://www.mikrocontroller.net/topic/25099#186569 LCD Controller für 640x480 LCD mit mega8515]
* (C) [http://www.mikrocontroller.net/topic/38923#287939 LCD Controller KS0073 Support im 4-Bit Mode]
* (A) [http://www.mikrocontroller.net/topic/79609#664268 KS0066U oder Ähnliche --- LCD Treiber]
* (C) [http://www.mikrocontroller.net/topic/81793#683135 Pollin E0855-2 SED1530-Treiber]
* (C) [http://www.mikrocontroller.net/topic/90449#772843 LCD über nur einen IO-Pin ansteuern]
* (C) [http://www.mikrocontroller.net/topic/120475 VFD Library (Vacuum Fluorescent Display Library)]
* (C) [http://www.mikrocontroller.net/topic/98321#851423 Grafikfähiger LCD Controller für 320x240 LCD mit 4 Graustufen] (jetzt auch mit 8 Graustufen)
* (C) [http://www.mikrocontroller.net/topic/140369 Menüsystem für beliebige schwarz-weiß LCDs bis 4096x4096 Pixeln und grafischem Editor]
* (C) [http://www.mikrocontroller.net/topic/194149 Schnelle SED1520 Funktionsbibliothek mit Bildkonverter und Fontgenerator]
* (PC,C) [http://www.mikrocontroller.net/topic/234304 DOGXL Fontgenerator (SW+Graustufen)]
* (C,A) [http://www.mikrocontroller.net/topic/236862#2401250 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]
* (A) [http://www.mikrocontroller.net/topic/190078 LCD SHARP M078CKA mit LH155]
* (C) [http://www.mikrocontroller.net/topic/287978 EA DOGM162 Textdisplay an SPI]
* (A) [http://www.mikrocontroller.net/topic/305266 HD44780 Display 2x16 Xmega-Assemblerbaustein]
* (C) [http://www.mikrocontroller.net/topic/320791#3524261 Nokia N95 Display 320x240 Arduino Lib.]
* (C) [http://www.mikrocontroller.net/topic/318818#3456758 Library für ST7735 Display Controller mit GLCD Font Unterstützung]
* (C) [https://www.mikrocontroller.net/topic/415651#new SSD1306/1309 Library zum Darstellen von Text/Grafik auf OLED Displays]
* (A) [https://www.mikrocontroller.net/topic/506738#new SSD1306 text library für oled displays]

==I2C==
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/83871#new I2C-Master realisiert in Software, ohne TWI für alle ATMEGAs]
* (A) [http://www.mikrocontroller.net/topic/38919#new RS232 <-> TWI / I2C Interface für ATMega8 (ASM) inkl. Windows Software]
* (C) [http://www.mikrocontroller.net/topic/67698#544930 USI TWI Master]
* (A) [http://www.mikrocontroller.net/topic/235733#2388116 Hardware TWI-MASTER Interrupt basierend für Mega AVR]
* (A) [http://www.mikrocontroller.net/topic/272621#new I2C/TWI Master-Interrupt Xmega-Assemblerbaustein]
* (C) [https://www.mikrocontroller.net/topic/378553 hot-plug fähige Library für DS1621 Temperatursensoren ]
* (A) [https://www.mikrocontroller.net/topic/506739#new TWI im polling für AVR 0-Series und AVR 1-Series]

==Messgeräte==
===Drehzahlmesser===
* (B) [http://www.mikrocontroller.net/topic/1518#8469 Drehzahlmesser 4 mal 7-Segment mit 90S2313]
* (C) [http://www.mikrocontroller.net/articles/Drehzahlmesser Drehzahlmesser mit 4 mal 7-Segment anzeigen mit Tiny2313, Wiki-Artikel]
* (C) [http://www.mikrocontroller.net/topic/231283 einfache Drehzahlmessung mit ATmega88]
* (C) [http://www.mikrocontroller.net/topic/232485 4-Kanal Drehzahlmessung mit ATmega88]

===Klopfsensormessgerät===
* (C) [http://www.mikrocontroller.net/articles/Klopfsensormessgeraet Messgerät für Klopfgeräusche an Verbrennungsmotoren auf Basis des TPIC8101]

===Entfernungsmesser===
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/130834 3D Umgebungserfassung mit einem auf zwei Servors montiertem Sharp Distanzsensor, Eigenbau]

===Frequenzmesser===
* (A) [http://www.mikrocontroller.net/topic/62610#495030 Frequenzmesser bis 2Mhz -- mit AVR ATmega8]
* (C) [http://www.mikrocontroller.net/topic/48582#372072 Frequenzmessung (Seite mit Quellcode nicht erreichbar)]
* (C) [http://www.mikrocontroller.net/topic/62517#494146 Input Capture Pin (ICP) auslesen ( Frequenz messen)]
* (C) [http://www.mikrocontroller.net/topic/25144#187587 Frequenzmessung und Impulszählung über den Parallelport-IR]
* (A) [http://www.mikrocontroller.net/topic/31394#241251 einfacher 5 MHz Frequenzzähler (Assembler) ATmega8]
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/173665#new sehr genauer Frequenzmesser Atmega8]
* (C) [http://www.mikrocontroller.net/topic/186801#new Reziproker Frequenzzähler+ Optimierte 64bit uint Routinen]
* (C+A) [http://www.mikrocontroller.net/topic/200279#new 6 Stellen von 1Hz bis 40MHz ATmega8]
* (C) [http://www.mikrocontroller.net/topic/241150#2458079 Reziproker Frequenzzähler, GPS-stabilisiert, ATmega162]
* (B) [http://www.mikrocontroller.net/topic/359552#new Reziproker Frequenzzähler mit BASCOM-AVR]

===Frequenzgenerator===
* (B) [http://www.mikrocontroller.net/topic/152966#1438488 Einstellbarer Frequenzgenerator für 0.12 Hz - 8 MHz mit Atmega 8 und Bascom ]

===Kompass===
* (A) [http://www.mikrocontroller.net/topic/100239#870281 KOMPASS KMZ10A KMZ10B ATmega8 Assembler]

===Messgeräte für elektronische Bauteile===
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (A) [http://www.mikrocontroller.net/topic/60797#477026 LC-METER / LC-Messgerät ATmega8 Assembler]
* (A) [http://www.mikrocontroller.net/topic/60591#474873 Widerstandstester]
* (A) [http://www.mikrocontroller.net/topic/56770#438957 Ladungsmessgerät]
* (A) [http://www.mikrocontroller.net/topic/31386#241139 Transistortester]
* (C) [http://www.mikrocontroller.net/topic/131804#1194273 Transistortester]

===Spannungsmesser===
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] - Voltmeter
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/31389 Wirkleistungsmessgerät] - "Ein einfaches Wirkleistungsmessgerät für 230V Verbraucher ohne Netztrennung mit 3 stelliger 7-Segment Anzeige für Verbraucher bis 500W." (+ ähnlicher Aufbau mit Silabs Controller)

===Thermometer===
* (A) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/53127#413006 Thermometer mit LED & LM35]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Viele DS18x20-Thermometer in einem Webserver]
* (C) [http://www.mikrocontroller.net/topic/354441#3953900 Auswertung Temperatursensor KTY81 (PT1000), Arduino Uno, 1-6 Kanäle]

===Oszilloskop===
* (B) [http://www.mikrocontroller.net/topic/53129#413011 Einfaches Oszilloskop - Bascom]
* (A) [http://www.mikrocontroller.net/topic/48586#372093 Oszi- & Logikanalyser mit LCD]
* (A) [http://www.mikrocontroller.net/topic/31376#240880 einfaches DIGITAL- Oszilloskop (800 Datenpunkte) Assembler]
* (A) [http://www.mikrocontroller.net/topic/56616#437772 Einfaches "Oszilloskop"]
* (C) [http://www.christoph-lauer.de/Homepage/Blog/Eintrage/2010/8/1_Embedded_C_based_Spectrumanalyzer.html ATXMega based Oscilloscope and Spectrumanalyzer]
* (A) [http://www.mikrocontroller.net/topic/228997#2308320 Selbstbau Digital Storage Oszilloskop]

===Beschleunigungssensor===
* (c++) [http://www.mikrocontroller.net/topic/268214 Einfache BMA020 Library, mit I2C]

==MIDI==

(Musical Instrument Digital Interface, Datenübertragungsstandard für Musikinstrumente)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (A) [http://www.mikrocontroller.net/topic/106512# Drum-Trigger mit MIDI-Ausgabe]

==MMC==

(Multimedia Card, digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/25056#186117 SourceCode MMC die Zweite]
* (C) [http://www.mikrocontroller.net/topic/48481#370950 MMC/SD-Karte mit FAT16 an AVR]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader füt ATMega16]
* (C) [http://www.mikrocontroller.net/topic/14800#102024 MMC/SD ansteuern mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/articles/FAT32 MMC/SD - FAT16/32 Bibliothek für AVR mit Wiki]

==Netzgeräte==
* [http://www.mikrocontroller.net/topic/60786#476904 Labornetzgerät]
* [[RADLAB-PS1]] [http://www.mikrocontroller.net/topic/124858#1138781 Netzteil um LM317 mit Strombegrenzung und Anzeige!]

==Netzwerk==
* (C) [http://www.mikrocontroller.net/topic/87517#new Kleiner ENC28J60 µWebserver von SimonK]
* (C) [http://www.mikrocontroller.net/topic/82127#new Ulrich Radigs ENC28J60 mit leicht lötbaren/beschaffbaren Bauteilen]
* (C) [http://www.mikrocontroller.net/topic/131825 Dirk Broßwick Webserver auf ENC28j60 Basis mit einem ATmega2561, es gibt auch einen Port auf das AVR-NET IO]

==Parser==
* (C) [http://www.mikrocontroller.net/topic/64763#517245 Zwei Parser für numerische Ausdrücke]
* (C) [http://www.mikrocontroller.net/topic/76842#638283 uShell - ein universeller Parser für uCs]

==RFID==

(Radio Frequency Identification, Verfahren zur funkbasierten Identifizierung und Lokalisierung von Gegenständen)

* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (C) [http://www.mikrocontroller.net/topic/228709 Soft-RFID ohne RFID-IC]

==RC - Fernsteuerungen/Servos==
* (C) [http://www.mikrocontroller.net/topic/48529#371582 RC Summen Signal erzeugen ]
* (C) [http://www.mikrocontroller.net/topic/192453 RC Summen Signal dekodieren ]

==RC5==

(verbreitetes Datenübertragungsprotokoll für Infrarot-Fernbedienungen)

* (A) [http://www.mikrocontroller.net/topic/14789#101536 RC5 Sender auf einem Attiny11L]
* (C) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/12216#80856 Fernbedien RC5 Empfänger]
* (C) [http://www.mikrocontroller.net/topic/59235#460765 RC5 Sender selber bauen ???]

==Ringpuffer==
* (A) [http://www.mikrocontroller.net/topic/66789#536189 Ringpuffer AVR]
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]

==SD==

(Secure Digital Memory Card; digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/topic/68257#550336 Datenrekorder auf SD-Karte mit mega88]

==Sonstiges==

* (C) [http://www.mikrocontroller.net/topic/111783#994358 Sonnenstandberechnung mit Atmega 8]
* (C) [http://www.mikrocontroller.net/articles/UAC_Mikrocontroller_ASCII_Console uAC Mikrocontroller ASCII Console]

==Spaßprojekte==
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/119876#1083044 Miniprojekt: Lagerfeuer-LED (ATtiny25)]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/167528#1601077 Toastbrote zählen]

==Spiele==
* (C) [http://www.mikrocontroller.net/topic/48505#371259 Tetris auf dem AtMega8]
* (C) [http://www.mikrocontroller.net/topic/187253# Atmega8 Schachuhr mit Max7219 ]

==Steuerungen==
* (C) [http://www.mikrocontroller.net/topic/123551 Aquarium Controller]
* () [http://www.mikrocontroller.net/topic/309045 Lüftersteuerung durch zwei SHT75, mega32, LCD und SD-Karte]
* () [http://www.mikrocontroller.net/topic/307375 Fensteröffner mit Scheibenwischermotor dht11 sht11]

==Taster / Schalter==
===mechanisch===
* (A) [http://www.mikrocontroller.net/topic/6492#41625 Tasten entprellen - Bulletproof] (siehe auch: [[Entprellung]])
* (C) [http://www.mikrocontroller.net/topic/48465#370877 Universelle Tastenabfrage]
* (C) [http://www.mikrocontroller.net/topic/6491#41624 Tasten-Matrix entprellen]
* (C) [http://www.mikrocontroller.net/topic/64731#517001 Tastenmatrix auslesen über nur 2 Leitungen]
* (C) [http://www.mikrocontroller.net/topic/64743#517105 Tasten Entprellen für N00bs]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (C) [http://www.mikrocontroller.net/topic/1515#8455 Entprellen von Tastern, autorepeat, vintage]

===kapazitiv===
* (C) [http://www.mikrocontroller.net/topic/38904 Sensor mit nur einer Kontaktfläche]
* (C) [http://www.mikrocontroller.net/topic/25045 Einfache Sensortaste]

==Tonerzeugung==
* (A) [http://www.mikrocontroller.net/topic/66945#537624 ATMEGA8 Soundgenerator/Synthesizer]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (C) [http://www.mikrocontroller.net/topic/134362 RTTTL Melodiegenerator mit ATTINY85]
* (B) [http://www.mikrocontroller.net/topic/232702#new RTTTL Melodiegenerator mit ATMEGA8]
* (A) [http://www.mikrocontroller.net/topic/25051 Melodie ausgeben mit AVR ATTiny12]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (B) [http://www.mikrocontroller.net/topic/137629#1259132 Melodieklingel BASCOM ATmega8]
* (A) [http://www.mikrocontroller.net/topic/191596 2Kanal Synthesizer ATtiny 2313, 85, ..]
* (A) [http://www.mikrocontroller.net/topic/232845 17 Kanal Avr Synthesizer]
* (C) [[AVR-Synthesizer]]

==TWI==
* (C) [http://www.mikrocontroller.net/topic/87597#742070 AVR TWI Master und Slave Funtionen in C]
* (A) [http://www.mikrocontroller.net/topic/31404#242081 TWI / I2C einf. MASTER SLAVE Beispiel(Assembler) ATmega8]

==USB==
* (C) [http://www.mikrocontroller.net/topic/75254#622120 USB Host Stack für Eingebettete Systeme (LGPL)]
* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/90791#776280 Relaiskarte für den USB Port]
* (C) [http://www.mikrocontroller.net/topic/130381#1179352 USB-Stick am Mikrocontroller VNC1L]
* (C) [http://www.mikrocontroller.net/topic/155241 PDIUSBD12 Treiber und micro USB-Device stack]
* (C) [http://www.mikrocontroller.net/topic/192453 HID-Joystick mit V-USB ]

==UART==
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/38928#287985 Software UART]
* (C) [http://www.mikrocontroller.net/topic/125651#1147436 Software UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/175946#1690682 uParse] - ein kompakter und vielseitiger Parser (Atmega32) für [[RS232]]
* (C) [http://www.mikrocontroller.net/topic/159753#1517744 Einfacher Interpreter für Komandozeilen/Befehlszeilen] (Atmega32) für [[RS232]]
* (C) [https://sourceforge.net/projects/yambsiavr/ Modbus Slave Library] für [[RS232]] und [[RS485]]

==Video==
* (A) [http://www.mikrocontroller.net/topic/53140#413249 AVR ASCII Video Terminal - 40 x 25 - BAS Signal]
* (A) [http://www.mikrocontroller.net/topic/53139#413225 TV VIDEO BILD BAS Frequenzzähler DVM Atmega8 Assembler]
* (A) [http://www.electronicspit.com/video/ Videosignal in Farbe aus dem ATMega32] (URL nicht mehr erreichbar)
* (A) [http://www.mikrocontroller.net/topic/25091#new VGA Testbildgenerator]
* (C) [http://www.mikrocontroller.net/topic/101429#882288 ATmega8 erzeugt Video in C!]

==Zeitgeber und Uhren==
* (A) [http://www.mikrocontroller.net/topic/12185#80055 Die genaue Sekunde / RTC]
* (A) [http://www.mikrocontroller.net/topic/74673#616226 LCD-Timer für Belichtungsgerät]
* (A) [http://www.mikrocontroller.net/topic/119859#1082804 DS1307 Assembler-Code]
* (C) [http://www.mikrocontroller.net/topic/31374#240878 AVR Library für RTC 12C887 in C]
* (C) [http://www.mikrocontroller.net/topic/25136#187534 RTC DS1302 in C]
* (C) [http://www.mikrocontroller.net/topic/25087#186454 RTC + Scheduler]
* (C) [http://www.mikrocontroller.net/topic/53131#413059 Jumbo-LED Uhr]
* (C) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25069 Sekunden in Zeit/Datum umwandeln (mit Sommerzeit/Schaltjahren)]
* (B) [http://www.mikrocontroller.net/topic/48560#371911 BASCOM Uhr mit Butterfly]
* (C) [http://www.mikrocontroller.net/topic/48450#370765 Countdown timer für UV Belichter]
* (C) [http://www.mikrocontroller.net/topic/98885 Countdown Timer mit ATtiny2313]
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Schaltuhr mit DCF77-Referenz in einem Webserver, Steuerung von Funksteckdosen]
* (C) [http://www.mikrocontroller.net/topic/100892#876549 Eieruhr mit ATtiny24V/ATtiny2313V]
* (B) [http://www.mikrocontroller.net/topic/151236 Zeitauslöser für Casio EX F1 mit Attiny2313]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/177688# NIXIE Uhr mit vielen Funktionen in C mit ATTiny2313]
* (C) [http://www.mikrocontroller.net/topic/233699 Stoppuhr – Geschwindigkeit – Pulsweite mit Atmega88]
* (C) [http://www.mikrocontroller.net/topic/275514 Timer bis 99:59 min - LED Display NSM4202, Drehgeber - At90S2313]
* (A) [http://www.mikrocontroller.net/topic/289724 Uhr/Kalender AVR-Assemblerbaustein]

== Siehe auch ==

* [[AVR-Codesammlung Übersicht]]

[[Kategorie:AVR]]
[[Kategorie:Forum]]
[[Kategorie:Listen]]

AVR Softwarepool

2020-12-01T18:11:24Z

Avrsteffen: /* LCD und VFD */

Die interessantesten Softwareprojekte aus der Codesammlung...

(A) ... Projekt ist in '''Assembler''' 
(C) ... Projekt ist in '''C''' 
(C++) ... Projekt ist in '''C++''' 
(B) ... Projekt ist in '''Bascom''' 
(PC) ... Projekt ist nicht für einen µC, sondern für den PC

==1-Wire==
* (C) [http://www.mikrocontroller.net/topic/14792 DS1820, DS18B20 in C]
* (A) [http://www.mikrocontroller.net/topic/6505 Mehrere DS1820/DS18B20 auslesen]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Mehrere DS1820/DS18B20/DS18S20/DS1822 über einen Webserver auslesbar]
* (C) [https://www.mikrocontroller.net/topic/387139#4890827 Bibliothek für OneWire und DS18x20]

==Akkulader==
* (A) [http://www.mikrocontroller.net/topic/72627#594587 Bleiakku-Lader 12/24V]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]

==Betriebssysteme und Scheduler==
* (C) [http://www.mikrocontroller.net/topic/190388#1856376 Nano OS] von Tobias W. ([http://sourceforge.net/projects/nanoos/ Sourceforge])
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)] von Peter Dannegger
* (C++) [http://www.mikrocontroller.net/topic/96977#837989 Einfacher Scheduler und Timer in C++ für ATMega] von S. Seegel
* (C) [http://www.mikrocontroller.net/topic/74026#609246 GOS: einfacher preemptive multitasking scheduler] von Günter Greschenz
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
* (C) [http://www.mikrocontroller.net/topic/319580#new AvRtos] preemtiver real time multitasking scheduler von Harald B. ([http://sourceforge.net/projects/avrtos/ Sourceforge])
* (C) [https://bitbucket.org/dferreyra/avr-threads/wiki/Home avr-threads] Thread-Library für AVR

==Bootloader==
* (A,C,PC) [http://www.mikrocontroller.net/topic/12181#79866 AVR Bootloader]
* (A, PC) [http://www.mikrocontroller.net/topic/146638#1364260 AVR Bootloader für GCC-Toolchain]
* (A,PC) [http://www.mikrocontroller.net/topic/95839 AVR Bootloader mit Verschlüsselung]
* (A) [http://www.mikrocontroller.net/topic/72308#591159 ATtiny45 Bootloader]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader für ATMega16]
* (C) [http://www.mikrocontroller.net/topic/56818#439359 SD/MMC Card Bootloader (passt in 2kb bootsection)]
* (C) [http://www.mikrocontroller.net/topic/61170#480765 boofa - Bootloader für AVR über UART (AVR109)]
* (C) [http://www.mikrocontroller.net/topic/53130#413058 Bootloader ATmega168]
* (C) [http://www.mikrocontroller.net/topic/73196#600293 UART Bootloader ATtiny13 - ATmega644]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/150816#1414460 UART Bootloader AtMega644P @ 20MHz] (Eclipse Projekt)
* (C) [[AVR Bootloader in C - eine einfache Anleitung]]
* (C) [http://www.mikrocontroller.net/topic/200645#1971295 LAN-Bootloader für ATmega1284p]
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
Siehe auch: [[Bootloader]]

==DCC==

(Digital Command Control, Standard zur digitalen Steuerung von Modelleisenbahnen)

* (A) [http://www.mikrocontroller.net/topic/31397#241300 DCC Decoder]

==DCF77==

(Zeitsignaldienst für funkgesteuerte Uhren auf der Langwellen-Frequenz 77,5 kHz)

* (A) [http://www.mikrocontroller.net/topic/38914#287867 DCF77 AVR-Assemblerbaustein ]
* (A) [http://www.mikrocontroller.net/topic/6500#41738 DCF77-Uhr mit ATTINY12]
* (A) [http://www.mikrocontroller.net/topic/31385#241104 DCF Digital Empfangsmodul - Korrelation - (Assembler)ATmega8 ]
* (C) [http://pic-projekte.de/wordpress/?p=572 DCF77 PIC-Projekte.de]
* (C) [http://www.mikrocontroller.net/topic/25071#186286 DCF 77 ]
* (C) [http://www.mikrocontroller.net/topic/14788#101528 DCF-Uhr mit DotMatrix-Anzeige für avr-gcc]
* (C) [http://www.mikrocontroller.net/topic/12154#79501 PC DCF Timer ( PC Zeitschaltuhr)]
* (C) [http://www.mikrocontroller.net/topic/25116#187197 DCF 77 Uhr mit CodeVision ]
* (C) [http://www.mikrocontroller.net/topic/58769#456232 DCF77 Uhr in C mit ATtiny26]
* (C) [http://www.mikrocontroller.net/topic/48597#372164 DCF77 Uhr, zum X.ten Mal, jetzt mit SAF]
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 DCF77 mit beliebig gepoltem Eingangssignal innerhalb eines Webservers]
* (C) [http://www.mikrocontroller.net/topic/121049 DCF-Uhr, Sonnenstand, TWI-Port, Alarmfunktion für Atmega8]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/168807#1614129 DCF-Uhr mit LCD in C]

== DRAM ==
* (A,C) [http://www.mikrocontroller.net/topic/25053#186085 2MB DRAM an AVR] und Anwendung als [http://www.mikrocontroller.net/topic/25053#186089 Audiorekorder]
* (A,C) [https://www.mikrocontroller.net/topic/236862 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]

==Drehgeber==
* (C) [http://www.mikrocontroller.net/topic/6526#41978 Drehgeber auslesen]
* (C+A) [http://www.mikrocontroller.net/topic/302229#new 4-fach Auswertung für Dreh-/Inkrementalgeber, schnell]
* (C) [http://www.mikrocontroller.net/topic/328348#new Schrittmotor als Drehgeber mit Drehdynamik]
* (A) [https://www.mikrocontroller.net/topic/478343?goto=5925396#5922395]

==DTMF==
* (A) [http://www.mikrocontroller.net/topic/92444#792954 DTMF dekodieren]

==DMX==

* (C) [http://www.mikrocontroller.net/topic/92350#new 20 Kanal Relaissteuerung per DMX]
* (A) [http://www.mikrocontroller.net/topic/276885#new DMX512 zu RGB Led Controller use HSV Farbraum]
* (C) [http://www.mikrocontroller.net/topic/290366#3096821 20 Kanal PWM per DMX]

==Ethernet==
Siehe auch [[AVR Softwarepool#Netzwerk|Netzwerk]]

==Entwicklungssysteme==
* (PC) [http://www.mikrocontroller.net/topic/74198#611404 AVR Code Wizard]
* (A) [http://www.mikrocontroller.net/topic/30110#230503 Multitasking kernel für ATtinys in ASM]
* (A) [http://www.mikrocontroller.net/topic/65156#521012 BASIC-Computer mit ATmega32]
* (A) [http://www.mikrocontroller.net/topic/64129#511368 AVR TinyBASIC Anpassung für ATmega8]
* (A) [http://www.mikrocontroller.net/topic/59189#460273 Mini-Computer mit BASIC]
* (A) [http://www.mikrocontroller.net/topic/55807 Forth System für ATmegas in Assembler]
* (A) [http://www.mikrocontroller.net/topic/94193 Forth-Computer mit ATmega32 und Videoausgabe] von Christian Berger
* (C) [http://www.mikrocontroller.net/topic/62500#493931 Fixpoint-Arithmetik in "C"]
* (C++) [http://www.mikrocontroller.net/topic/143537 Fixpoint-Arithmetik in "C++"]
* (C) [http://www.mikrocontroller.net/topic/85256#717037 64 Bit float Emulator in C, IEEE754 kompatibel]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/94468#812992 Gleitkomma-Bibliothek für AVR]
* (A) [http://www.mikrocontroller.net/topic/177481?page=1 AVR CP/M System]
* (PC) [http://www.mikrocontroller.net/topic/187390 EMACS Konfiguration]
* (C) [https://www.mikrocontroller.net/topic/467307 Watchdog-ISR für ATmega328]

==FFT==

(Fast Fourier Transformation, "schnelle" Fouriertransformation)

* (A) [http://www.mikrocontroller.net/topic/25095#186536 FFT auf dem AVR]
* (A) [http://www.mikrocontroller.net/topic/25062#186225 128point FFT in ASM]
* (A) [http://www.mikrocontroller.net/topic/27001#203911 Schnelle FFT in Assembler]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]

==Funksteckdosen==
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 Ansteuerung von Funksteckdosen mit einem Webserver]

==GPS==

(Global Positioning System, satellitengestütztes System zur weltweiten Positions- und Zeitbestimmung)

* (A) [http://www.mikrocontroller.net/topic/48544#371717 GPS - MOUSE - MINI- NAVIGATOR (Assembler) ATmega8]
* (C) [http://www.mikrocontroller.net/topic/72507#593252 GPS an mega8,88 oder 168]

==IR==
* siehe auch [[AVR Softwarepool#RC5|RC5]]
* (C) [[IRMP]] - Infrared Multi Protocol Decoder:
**[[IRMP| Wiki Seite]]
**[http://www.mikrocontroller.net/topic/162119#1545798 Thread im Forum]

==Kryptographie==
* (A,C) [http://www.mikrocontroller.net/topic/73468 Verschiedene kryptographische Funktionen]

==LANC==

(Steuerprotokoll für Video- und Digitalfotokameras, auch als Control-L bekannt)

* (C) [http://www.mikrocontroller.net/topic/40463#302754 Sony LANC Auswertung mit AVR] (Atmega 128 @ 16 MHz)

==LEDs und LED-Anzeigen==
* (C) [http://www.mikrocontroller.net/topic/76839#638278 Solarlicht Steuerung]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (A) [http://www.mikrocontroller.net/topic/73776#606472 LED-Touch-Panel] (ARM)
* (A) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/54561#421940 HSV RGB Led Dimmer, C Code & Video & Doku]
* (A) [http://www.mikrocontroller.net/topic/67567#543492 Mini RGB Lichteffektgenerator mit Menü für Pic16F84]
* (C) [http://www.mikrocontroller.net/topic/48464#370871 Ansteuerung einer RGB LED (PWM)]
* (A) [http://www.mikrocontroller.net/topic/87149#737282 3x7 Segment und 1 I/O-Pin (Assembler)]
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] (vier 7-Segmentanzeigen)
* (A) [http://www.mikrocontroller.net/topic/31388#241192 AVR-Lauflicht]
* (A) [http://www.mikrocontroller.net/topic/94746#815809 HSB->RGB Umrechnung rein in Assembler, auch für ATiny]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (A) [http://www.mikrocontroller.net/topic/110168 2x7-Segment an nur 3 Leitungen]
* (A) [[Ambilight in Hardware]]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]
* (B) [http://www.mikrocontroller.net/topic/182305 TLC5940 16-Kanal 12bit LED Treiber ansteuern und HighPower LEDs über MosFETs treiben]
* (PC) [http://www.mikrocontroller.net/topic/185730 7Segment Coder]
* (C) [http://www.mikrocontroller.net/topic/244768 RGB-Moodlight, ATMega8, Soft-PWM mit Gammakorrektur, IR-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/275426 serielles 4x7 Segment Display NSM4202]

==LCD und VFD==
* (C) [http://bluematrixi.bl.funpic.de/index.php/elektronik-avr/lcd-display-nokia3310 Bibliothek für Nokia 3310 Lcd Ansteuerung in "C" - sehr gut]
*(C,A)[http://www.mikrocontroller.net/articles/Ansteuerung_Handy_Displays Ansteuerung_Handy_Displays]
* (PC) [http://www.mikrocontroller.net/topic/53137#413137 Programm zum Erstellen eigener Schriftarten (LCD)]
* (PC) [http://www.mikrocontroller.net/topic/54860#423255 LCD Schriftarten ( Fonts in veschiedenen Größen )]
* (C) [http://www.mikrocontroller.net/topic/31403 The Siemens S65 132x176, 65536 color display with AVR]
* (C) [http://www.mikrocontroller.net/topic/48501#371218 LCD Ansteuerung im 4bit-Modus]
* (C) [http://www.mikrocontroller.net/topic/48456#370782 LCD Library T6963c]
* (C) [http://www.mikrocontroller.net/topic/76399#633680 "Bessere" T6963c Library]
* (C) [http://www.mikrocontroller.net/topic/25099#186569 LCD Controller für 640x480 LCD mit mega8515]
* (C) [http://www.mikrocontroller.net/topic/38923#287939 LCD Controller KS0073 Support im 4-Bit Mode]
* (A) [http://www.mikrocontroller.net/topic/79609#664268 KS0066U oder Ähnliche --- LCD Treiber]
* (C) [http://www.mikrocontroller.net/topic/81793#683135 Pollin E0855-2 SED1530-Treiber]
* (C) [http://www.mikrocontroller.net/topic/90449#772843 LCD über nur einen IO-Pin ansteuern]
* (C) [http://www.mikrocontroller.net/topic/120475 VFD Library (Vacuum Fluorescent Display Library)]
* (C) [http://www.mikrocontroller.net/topic/98321#851423 Grafikfähiger LCD Controller für 320x240 LCD mit 4 Graustufen] (jetzt auch mit 8 Graustufen)
* (C) [http://www.mikrocontroller.net/topic/140369 Menüsystem für beliebige schwarz-weiß LCDs bis 4096x4096 Pixeln und grafischem Editor]
* (C) [http://www.mikrocontroller.net/topic/194149 Schnelle SED1520 Funktionsbibliothek mit Bildkonverter und Fontgenerator]
* (PC,C) [http://www.mikrocontroller.net/topic/234304 DOGXL Fontgenerator (SW+Graustufen)]
* (C,A) [http://www.mikrocontroller.net/topic/236862#2401250 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]
* (A) [http://www.mikrocontroller.net/topic/190078 LCD SHARP M078CKA mit LH155]
* (C) [http://www.mikrocontroller.net/topic/287978 EA DOGM162 Textdisplay an SPI]
* (A) [http://www.mikrocontroller.net/topic/305266 HD44780 Display 2x16 Xmega-Assemblerbaustein]
* (C) [http://www.mikrocontroller.net/topic/320791#3524261 Nokia N95 Display 320x240 Arduino Lib.]
* (C) [http://www.mikrocontroller.net/topic/318818#3456758 Library für ST7735 Display Controller mit GLCD Font Unterstützung]
* (C) [https://www.mikrocontroller.net/topic/415651#new SSD1306/1309 Library zum Darstellen von Text/Grafik auf OLED Displays]
* (A) [https://www.mikrocontroller.net/topic/506738#new SSD1306 text library für oled displays]

==I2C==
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/83871#new I2C-Master realisiert in Software, ohne TWI für alle ATMEGAs]
* (A) [http://www.mikrocontroller.net/topic/38919#new RS232 <-> TWI / I2C Interface für ATMega8 (ASM) inkl. Windows Software]
* (C) [http://www.mikrocontroller.net/topic/67698#544930 USI TWI Master]
* (A) [http://www.mikrocontroller.net/topic/235733#2388116 Hardware TWI-MASTER Interrupt basierend für Mega AVR]
* (A) [http://www.mikrocontroller.net/topic/272621#new I2C/TWI Master-Interrupt Xmega-Assemblerbaustein]
* (C) [https://www.mikrocontroller.net/topic/378553 hot-plug fähige Library für DS1621 Temperatursensoren ]
* (A) [https://www.mikrocontroller.net/topic/506739#new TWI im polling für AVR 0-Series und AVR 1-Series]

==Messgeräte==
===Drehzahlmesser===
* (B) [http://www.mikrocontroller.net/topic/1518#8469 Drehzahlmesser 4 mal 7-Segment mit 90S2313]
* (C) [http://www.mikrocontroller.net/articles/Drehzahlmesser Drehzahlmesser mit 4 mal 7-Segment anzeigen mit Tiny2313, Wiki-Artikel]
* (C) [http://www.mikrocontroller.net/topic/231283 einfache Drehzahlmessung mit ATmega88]
* (C) [http://www.mikrocontroller.net/topic/232485 4-Kanal Drehzahlmessung mit ATmega88]

===Klopfsensormessgerät===
* (C) [http://www.mikrocontroller.net/articles/Klopfsensormessgeraet Messgerät für Klopfgeräusche an Verbrennungsmotoren auf Basis des TPIC8101]

===Entfernungsmesser===
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/130834 3D Umgebungserfassung mit einem auf zwei Servors montiertem Sharp Distanzsensor, Eigenbau]

===Frequenzmesser===
* (A) [http://www.mikrocontroller.net/topic/62610#495030 Frequenzmesser bis 2Mhz -- mit AVR ATmega8]
* (C) [http://www.mikrocontroller.net/topic/48582#372072 Frequenzmessung (Seite mit Quellcode nicht erreichbar)]
* (C) [http://www.mikrocontroller.net/topic/62517#494146 Input Capture Pin (ICP) auslesen ( Frequenz messen)]
* (C) [http://www.mikrocontroller.net/topic/25144#187587 Frequenzmessung und Impulszählung über den Parallelport-IR]
* (A) [http://www.mikrocontroller.net/topic/31394#241251 einfacher 5 MHz Frequenzzähler (Assembler) ATmega8]
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/173665#new sehr genauer Frequenzmesser Atmega8]
* (C) [http://www.mikrocontroller.net/topic/186801#new Reziproker Frequenzzähler+ Optimierte 64bit uint Routinen]
* (C+A) [http://www.mikrocontroller.net/topic/200279#new 6 Stellen von 1Hz bis 40MHz ATmega8]
* (C) [http://www.mikrocontroller.net/topic/241150#2458079 Reziproker Frequenzzähler, GPS-stabilisiert, ATmega162]
* (B) [http://www.mikrocontroller.net/topic/359552#new Reziproker Frequenzzähler mit BASCOM-AVR]

===Frequenzgenerator===
* (B) [http://www.mikrocontroller.net/topic/152966#1438488 Einstellbarer Frequenzgenerator für 0.12 Hz - 8 MHz mit Atmega 8 und Bascom ]

===Kompass===
* (A) [http://www.mikrocontroller.net/topic/100239#870281 KOMPASS KMZ10A KMZ10B ATmega8 Assembler]

===Messgeräte für elektronische Bauteile===
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (A) [http://www.mikrocontroller.net/topic/60797#477026 LC-METER / LC-Messgerät ATmega8 Assembler]
* (A) [http://www.mikrocontroller.net/topic/60591#474873 Widerstandstester]
* (A) [http://www.mikrocontroller.net/topic/56770#438957 Ladungsmessgerät]
* (A) [http://www.mikrocontroller.net/topic/31386#241139 Transistortester]
* (C) [http://www.mikrocontroller.net/topic/131804#1194273 Transistortester]

===Spannungsmesser===
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] - Voltmeter
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/31389 Wirkleistungsmessgerät] - "Ein einfaches Wirkleistungsmessgerät für 230V Verbraucher ohne Netztrennung mit 3 stelliger 7-Segment Anzeige für Verbraucher bis 500W." (+ ähnlicher Aufbau mit Silabs Controller)

===Thermometer===
* (A) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/53127#413006 Thermometer mit LED & LM35]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Viele DS18x20-Thermometer in einem Webserver]
* (C) [http://www.mikrocontroller.net/topic/354441#3953900 Auswertung Temperatursensor KTY81 (PT1000), Arduino Uno, 1-6 Kanäle]

===Oszilloskop===
* (B) [http://www.mikrocontroller.net/topic/53129#413011 Einfaches Oszilloskop - Bascom]
* (A) [http://www.mikrocontroller.net/topic/48586#372093 Oszi- & Logikanalyser mit LCD]
* (A) [http://www.mikrocontroller.net/topic/31376#240880 einfaches DIGITAL- Oszilloskop (800 Datenpunkte) Assembler]
* (A) [http://www.mikrocontroller.net/topic/56616#437772 Einfaches "Oszilloskop"]
* (C) [http://www.christoph-lauer.de/Homepage/Blog/Eintrage/2010/8/1_Embedded_C_based_Spectrumanalyzer.html ATXMega based Oscilloscope and Spectrumanalyzer]
* (A) [http://www.mikrocontroller.net/topic/228997#2308320 Selbstbau Digital Storage Oszilloskop]

===Beschleunigungssensor===
* (c++) [http://www.mikrocontroller.net/topic/268214 Einfache BMA020 Library, mit I2C]

==MIDI==

(Musical Instrument Digital Interface, Datenübertragungsstandard für Musikinstrumente)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (A) [http://www.mikrocontroller.net/topic/106512# Drum-Trigger mit MIDI-Ausgabe]

==MMC==

(Multimedia Card, digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/25056#186117 SourceCode MMC die Zweite]
* (C) [http://www.mikrocontroller.net/topic/48481#370950 MMC/SD-Karte mit FAT16 an AVR]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader füt ATMega16]
* (C) [http://www.mikrocontroller.net/topic/14800#102024 MMC/SD ansteuern mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/articles/FAT32 MMC/SD - FAT16/32 Bibliothek für AVR mit Wiki]

==Netzgeräte==
* [http://www.mikrocontroller.net/topic/60786#476904 Labornetzgerät]
* [[RADLAB-PS1]] [http://www.mikrocontroller.net/topic/124858#1138781 Netzteil um LM317 mit Strombegrenzung und Anzeige!]

==Netzwerk==
* (C) [http://www.mikrocontroller.net/topic/87517#new Kleiner ENC28J60 µWebserver von SimonK]
* (C) [http://www.mikrocontroller.net/topic/82127#new Ulrich Radigs ENC28J60 mit leicht lötbaren/beschaffbaren Bauteilen]
* (C) [http://www.mikrocontroller.net/topic/131825 Dirk Broßwick Webserver auf ENC28j60 Basis mit einem ATmega2561, es gibt auch einen Port auf das AVR-NET IO]

==Parser==
* (C) [http://www.mikrocontroller.net/topic/64763#517245 Zwei Parser für numerische Ausdrücke]
* (C) [http://www.mikrocontroller.net/topic/76842#638283 uShell - ein universeller Parser für uCs]

==RFID==

(Radio Frequency Identification, Verfahren zur funkbasierten Identifizierung und Lokalisierung von Gegenständen)

* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (C) [http://www.mikrocontroller.net/topic/228709 Soft-RFID ohne RFID-IC]

==RC - Fernsteuerungen/Servos==
* (C) [http://www.mikrocontroller.net/topic/48529#371582 RC Summen Signal erzeugen ]
* (C) [http://www.mikrocontroller.net/topic/192453 RC Summen Signal dekodieren ]

==RC5==

(verbreitetes Datenübertragungsprotokoll für Infrarot-Fernbedienungen)

* (A) [http://www.mikrocontroller.net/topic/14789#101536 RC5 Sender auf einem Attiny11L]
* (C) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/12216#80856 Fernbedien RC5 Empfänger]
* (C) [http://www.mikrocontroller.net/topic/59235#460765 RC5 Sender selber bauen ???]

==Ringpuffer==
* (A) [http://www.mikrocontroller.net/topic/66789#536189 Ringpuffer AVR]
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]

==SD==

(Secure Digital Memory Card; digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/topic/68257#550336 Datenrekorder auf SD-Karte mit mega88]

==Sonstiges==

* (C) [http://www.mikrocontroller.net/topic/111783#994358 Sonnenstandberechnung mit Atmega 8]
* (C) [http://www.mikrocontroller.net/articles/UAC_Mikrocontroller_ASCII_Console uAC Mikrocontroller ASCII Console]

==Spaßprojekte==
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/119876#1083044 Miniprojekt: Lagerfeuer-LED (ATtiny25)]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/167528#1601077 Toastbrote zählen]

==Spiele==
* (C) [http://www.mikrocontroller.net/topic/48505#371259 Tetris auf dem AtMega8]
* (C) [http://www.mikrocontroller.net/topic/187253# Atmega8 Schachuhr mit Max7219 ]

==Steuerungen==
* (C) [http://www.mikrocontroller.net/topic/123551 Aquarium Controller]
* () [http://www.mikrocontroller.net/topic/309045 Lüftersteuerung durch zwei SHT75, mega32, LCD und SD-Karte]
* () [http://www.mikrocontroller.net/topic/307375 Fensteröffner mit Scheibenwischermotor dht11 sht11]

==Taster / Schalter==
===mechanisch===
* (A) [http://www.mikrocontroller.net/topic/6492#41625 Tasten entprellen - Bulletproof] (siehe auch: [[Entprellung]])
* (C) [http://www.mikrocontroller.net/topic/48465#370877 Universelle Tastenabfrage]
* (C) [http://www.mikrocontroller.net/topic/6491#41624 Tasten-Matrix entprellen]
* (C) [http://www.mikrocontroller.net/topic/64731#517001 Tastenmatrix auslesen über nur 2 Leitungen]
* (C) [http://www.mikrocontroller.net/topic/64743#517105 Tasten Entprellen für N00bs]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (C) [http://www.mikrocontroller.net/topic/1515#8455 Entprellen von Tastern, autorepeat, vintage]

===kapazitiv===
* (C) [http://www.mikrocontroller.net/topic/38904 Sensor mit nur einer Kontaktfläche]
* (C) [http://www.mikrocontroller.net/topic/25045 Einfache Sensortaste]

==Tonerzeugung==
* (A) [http://www.mikrocontroller.net/topic/66945#537624 ATMEGA8 Soundgenerator/Synthesizer]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (C) [http://www.mikrocontroller.net/topic/134362 RTTTL Melodiegenerator mit ATTINY85]
* (B) [http://www.mikrocontroller.net/topic/232702#new RTTTL Melodiegenerator mit ATMEGA8]
* (A) [http://www.mikrocontroller.net/topic/25051 Melodie ausgeben mit AVR ATTiny12]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (B) [http://www.mikrocontroller.net/topic/137629#1259132 Melodieklingel BASCOM ATmega8]
* (A) [http://www.mikrocontroller.net/topic/191596 2Kanal Synthesizer ATtiny 2313, 85, ..]
* (A) [http://www.mikrocontroller.net/topic/232845 17 Kanal Avr Synthesizer]
* (C) [[AVR-Synthesizer]]

==TWI==
* (C) [http://www.mikrocontroller.net/topic/87597#742070 AVR TWI Master und Slave Funtionen in C]
* (A) [http://www.mikrocontroller.net/topic/31404#242081 TWI / I2C einf. MASTER SLAVE Beispiel(Assembler) ATmega8]

==USB==
* (C) [http://www.mikrocontroller.net/topic/75254#622120 USB Host Stack für Eingebettete Systeme (LGPL)]
* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/90791#776280 Relaiskarte für den USB Port]
* (C) [http://www.mikrocontroller.net/topic/130381#1179352 USB-Stick am Mikrocontroller VNC1L]
* (C) [http://www.mikrocontroller.net/topic/155241 PDIUSBD12 Treiber und micro USB-Device stack]
* (C) [http://www.mikrocontroller.net/topic/192453 HID-Joystick mit V-USB ]

==UART==
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/38928#287985 Software UART]
* (C) [http://www.mikrocontroller.net/topic/125651#1147436 Software UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/175946#1690682 uParse] - ein kompakter und vielseitiger Parser (Atmega32) für [[RS232]]
* (C) [http://www.mikrocontroller.net/topic/159753#1517744 Einfacher Interpreter für Komandozeilen/Befehlszeilen] (Atmega32) für [[RS232]]
* (C) [https://sourceforge.net/projects/yambsiavr/ Modbus Slave Library] für [[RS232]] und [[RS485]]

==Video==
* (A) [http://www.mikrocontroller.net/topic/53140#413249 AVR ASCII Video Terminal - 40 x 25 - BAS Signal]
* (A) [http://www.mikrocontroller.net/topic/53139#413225 TV VIDEO BILD BAS Frequenzzähler DVM Atmega8 Assembler]
* (A) [http://www.electronicspit.com/video/ Videosignal in Farbe aus dem ATMega32] (URL nicht mehr erreichbar)
* (A) [http://www.mikrocontroller.net/topic/25091#new VGA Testbildgenerator]
* (C) [http://www.mikrocontroller.net/topic/101429#882288 ATmega8 erzeugt Video in C!]

==Zeitgeber und Uhren==
* (A) [http://www.mikrocontroller.net/topic/12185#80055 Die genaue Sekunde / RTC]
* (A) [http://www.mikrocontroller.net/topic/74673#616226 LCD-Timer für Belichtungsgerät]
* (A) [http://www.mikrocontroller.net/topic/119859#1082804 DS1307 Assembler-Code]
* (C) [http://www.mikrocontroller.net/topic/31374#240878 AVR Library für RTC 12C887 in C]
* (C) [http://www.mikrocontroller.net/topic/25136#187534 RTC DS1302 in C]
* (C) [http://www.mikrocontroller.net/topic/25087#186454 RTC + Scheduler]
* (C) [http://www.mikrocontroller.net/topic/53131#413059 Jumbo-LED Uhr]
* (C) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25069 Sekunden in Zeit/Datum umwandeln (mit Sommerzeit/Schaltjahren)]
* (B) [http://www.mikrocontroller.net/topic/48560#371911 BASCOM Uhr mit Butterfly]
* (C) [http://www.mikrocontroller.net/topic/48450#370765 Countdown timer für UV Belichter]
* (C) [http://www.mikrocontroller.net/topic/98885 Countdown Timer mit ATtiny2313]
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Schaltuhr mit DCF77-Referenz in einem Webserver, Steuerung von Funksteckdosen]
* (C) [http://www.mikrocontroller.net/topic/100892#876549 Eieruhr mit ATtiny24V/ATtiny2313V]
* (B) [http://www.mikrocontroller.net/topic/151236 Zeitauslöser für Casio EX F1 mit Attiny2313]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/177688# NIXIE Uhr mit vielen Funktionen in C mit ATTiny2313]
* (C) [http://www.mikrocontroller.net/topic/233699 Stoppuhr – Geschwindigkeit – Pulsweite mit Atmega88]
* (C) [http://www.mikrocontroller.net/topic/275514 Timer bis 99:59 min - LED Display NSM4202, Drehgeber - At90S2313]
* (A) [http://www.mikrocontroller.net/topic/289724 Uhr/Kalender AVR-Assemblerbaustein]

== Siehe auch ==

* [[AVR-Codesammlung Übersicht]]

[[Kategorie:AVR]]
[[Kategorie:Forum]]
[[Kategorie:Listen]]

AVR Softwarepool

2020-12-01T18:03:35Z

Avrsteffen: /* I2C */

Die interessantesten Softwareprojekte aus der Codesammlung...

(A) ... Projekt ist in '''Assembler''' 
(C) ... Projekt ist in '''C''' 
(C++) ... Projekt ist in '''C++''' 
(B) ... Projekt ist in '''Bascom''' 
(PC) ... Projekt ist nicht für einen µC, sondern für den PC

==1-Wire==
* (C) [http://www.mikrocontroller.net/topic/14792 DS1820, DS18B20 in C]
* (A) [http://www.mikrocontroller.net/topic/6505 Mehrere DS1820/DS18B20 auslesen]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Mehrere DS1820/DS18B20/DS18S20/DS1822 über einen Webserver auslesbar]
* (C) [https://www.mikrocontroller.net/topic/387139#4890827 Bibliothek für OneWire und DS18x20]

==Akkulader==
* (A) [http://www.mikrocontroller.net/topic/72627#594587 Bleiakku-Lader 12/24V]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]

==Betriebssysteme und Scheduler==
* (C) [http://www.mikrocontroller.net/topic/190388#1856376 Nano OS] von Tobias W. ([http://sourceforge.net/projects/nanoos/ Sourceforge])
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)] von Peter Dannegger
* (C++) [http://www.mikrocontroller.net/topic/96977#837989 Einfacher Scheduler und Timer in C++ für ATMega] von S. Seegel
* (C) [http://www.mikrocontroller.net/topic/74026#609246 GOS: einfacher preemptive multitasking scheduler] von Günter Greschenz
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
* (C) [http://www.mikrocontroller.net/topic/319580#new AvRtos] preemtiver real time multitasking scheduler von Harald B. ([http://sourceforge.net/projects/avrtos/ Sourceforge])
* (C) [https://bitbucket.org/dferreyra/avr-threads/wiki/Home avr-threads] Thread-Library für AVR

==Bootloader==
* (A,C,PC) [http://www.mikrocontroller.net/topic/12181#79866 AVR Bootloader]
* (A, PC) [http://www.mikrocontroller.net/topic/146638#1364260 AVR Bootloader für GCC-Toolchain]
* (A,PC) [http://www.mikrocontroller.net/topic/95839 AVR Bootloader mit Verschlüsselung]
* (A) [http://www.mikrocontroller.net/topic/72308#591159 ATtiny45 Bootloader]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader für ATMega16]
* (C) [http://www.mikrocontroller.net/topic/56818#439359 SD/MMC Card Bootloader (passt in 2kb bootsection)]
* (C) [http://www.mikrocontroller.net/topic/61170#480765 boofa - Bootloader für AVR über UART (AVR109)]
* (C) [http://www.mikrocontroller.net/topic/53130#413058 Bootloader ATmega168]
* (C) [http://www.mikrocontroller.net/topic/73196#600293 UART Bootloader ATtiny13 - ATmega644]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/150816#1414460 UART Bootloader AtMega644P @ 20MHz] (Eclipse Projekt)
* (C) [[AVR Bootloader in C - eine einfache Anleitung]]
* (C) [http://www.mikrocontroller.net/topic/200645#1971295 LAN-Bootloader für ATmega1284p]
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
Siehe auch: [[Bootloader]]

==DCC==

(Digital Command Control, Standard zur digitalen Steuerung von Modelleisenbahnen)

* (A) [http://www.mikrocontroller.net/topic/31397#241300 DCC Decoder]

==DCF77==

(Zeitsignaldienst für funkgesteuerte Uhren auf der Langwellen-Frequenz 77,5 kHz)

* (A) [http://www.mikrocontroller.net/topic/38914#287867 DCF77 AVR-Assemblerbaustein ]
* (A) [http://www.mikrocontroller.net/topic/6500#41738 DCF77-Uhr mit ATTINY12]
* (A) [http://www.mikrocontroller.net/topic/31385#241104 DCF Digital Empfangsmodul - Korrelation - (Assembler)ATmega8 ]
* (C) [http://pic-projekte.de/wordpress/?p=572 DCF77 PIC-Projekte.de]
* (C) [http://www.mikrocontroller.net/topic/25071#186286 DCF 77 ]
* (C) [http://www.mikrocontroller.net/topic/14788#101528 DCF-Uhr mit DotMatrix-Anzeige für avr-gcc]
* (C) [http://www.mikrocontroller.net/topic/12154#79501 PC DCF Timer ( PC Zeitschaltuhr)]
* (C) [http://www.mikrocontroller.net/topic/25116#187197 DCF 77 Uhr mit CodeVision ]
* (C) [http://www.mikrocontroller.net/topic/58769#456232 DCF77 Uhr in C mit ATtiny26]
* (C) [http://www.mikrocontroller.net/topic/48597#372164 DCF77 Uhr, zum X.ten Mal, jetzt mit SAF]
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 DCF77 mit beliebig gepoltem Eingangssignal innerhalb eines Webservers]
* (C) [http://www.mikrocontroller.net/topic/121049 DCF-Uhr, Sonnenstand, TWI-Port, Alarmfunktion für Atmega8]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/168807#1614129 DCF-Uhr mit LCD in C]

== DRAM ==
* (A,C) [http://www.mikrocontroller.net/topic/25053#186085 2MB DRAM an AVR] und Anwendung als [http://www.mikrocontroller.net/topic/25053#186089 Audiorekorder]
* (A,C) [https://www.mikrocontroller.net/topic/236862 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]

==Drehgeber==
* (C) [http://www.mikrocontroller.net/topic/6526#41978 Drehgeber auslesen]
* (C+A) [http://www.mikrocontroller.net/topic/302229#new 4-fach Auswertung für Dreh-/Inkrementalgeber, schnell]
* (C) [http://www.mikrocontroller.net/topic/328348#new Schrittmotor als Drehgeber mit Drehdynamik]
* (A) [https://www.mikrocontroller.net/topic/478343?goto=5925396#5922395]

==DTMF==
* (A) [http://www.mikrocontroller.net/topic/92444#792954 DTMF dekodieren]

==DMX==

* (C) [http://www.mikrocontroller.net/topic/92350#new 20 Kanal Relaissteuerung per DMX]
* (A) [http://www.mikrocontroller.net/topic/276885#new DMX512 zu RGB Led Controller use HSV Farbraum]
* (C) [http://www.mikrocontroller.net/topic/290366#3096821 20 Kanal PWM per DMX]

==Ethernet==
Siehe auch [[AVR Softwarepool#Netzwerk|Netzwerk]]

==Entwicklungssysteme==
* (PC) [http://www.mikrocontroller.net/topic/74198#611404 AVR Code Wizard]
* (A) [http://www.mikrocontroller.net/topic/30110#230503 Multitasking kernel für ATtinys in ASM]
* (A) [http://www.mikrocontroller.net/topic/65156#521012 BASIC-Computer mit ATmega32]
* (A) [http://www.mikrocontroller.net/topic/64129#511368 AVR TinyBASIC Anpassung für ATmega8]
* (A) [http://www.mikrocontroller.net/topic/59189#460273 Mini-Computer mit BASIC]
* (A) [http://www.mikrocontroller.net/topic/55807 Forth System für ATmegas in Assembler]
* (A) [http://www.mikrocontroller.net/topic/94193 Forth-Computer mit ATmega32 und Videoausgabe] von Christian Berger
* (C) [http://www.mikrocontroller.net/topic/62500#493931 Fixpoint-Arithmetik in "C"]
* (C++) [http://www.mikrocontroller.net/topic/143537 Fixpoint-Arithmetik in "C++"]
* (C) [http://www.mikrocontroller.net/topic/85256#717037 64 Bit float Emulator in C, IEEE754 kompatibel]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/94468#812992 Gleitkomma-Bibliothek für AVR]
* (A) [http://www.mikrocontroller.net/topic/177481?page=1 AVR CP/M System]
* (PC) [http://www.mikrocontroller.net/topic/187390 EMACS Konfiguration]
* (C) [https://www.mikrocontroller.net/topic/467307 Watchdog-ISR für ATmega328]

==FFT==

(Fast Fourier Transformation, "schnelle" Fouriertransformation)

* (A) [http://www.mikrocontroller.net/topic/25095#186536 FFT auf dem AVR]
* (A) [http://www.mikrocontroller.net/topic/25062#186225 128point FFT in ASM]
* (A) [http://www.mikrocontroller.net/topic/27001#203911 Schnelle FFT in Assembler]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]

==Funksteckdosen==
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 Ansteuerung von Funksteckdosen mit einem Webserver]

==GPS==

(Global Positioning System, satellitengestütztes System zur weltweiten Positions- und Zeitbestimmung)

* (A) [http://www.mikrocontroller.net/topic/48544#371717 GPS - MOUSE - MINI- NAVIGATOR (Assembler) ATmega8]
* (C) [http://www.mikrocontroller.net/topic/72507#593252 GPS an mega8,88 oder 168]

==IR==
* siehe auch [[AVR Softwarepool#RC5|RC5]]
* (C) [[IRMP]] - Infrared Multi Protocol Decoder:
**[[IRMP| Wiki Seite]]
**[http://www.mikrocontroller.net/topic/162119#1545798 Thread im Forum]

==Kryptographie==
* (A,C) [http://www.mikrocontroller.net/topic/73468 Verschiedene kryptographische Funktionen]

==LANC==

(Steuerprotokoll für Video- und Digitalfotokameras, auch als Control-L bekannt)

* (C) [http://www.mikrocontroller.net/topic/40463#302754 Sony LANC Auswertung mit AVR] (Atmega 128 @ 16 MHz)

==LEDs und LED-Anzeigen==
* (C) [http://www.mikrocontroller.net/topic/76839#638278 Solarlicht Steuerung]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (A) [http://www.mikrocontroller.net/topic/73776#606472 LED-Touch-Panel] (ARM)
* (A) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/54561#421940 HSV RGB Led Dimmer, C Code & Video & Doku]
* (A) [http://www.mikrocontroller.net/topic/67567#543492 Mini RGB Lichteffektgenerator mit Menü für Pic16F84]
* (C) [http://www.mikrocontroller.net/topic/48464#370871 Ansteuerung einer RGB LED (PWM)]
* (A) [http://www.mikrocontroller.net/topic/87149#737282 3x7 Segment und 1 I/O-Pin (Assembler)]
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] (vier 7-Segmentanzeigen)
* (A) [http://www.mikrocontroller.net/topic/31388#241192 AVR-Lauflicht]
* (A) [http://www.mikrocontroller.net/topic/94746#815809 HSB->RGB Umrechnung rein in Assembler, auch für ATiny]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (A) [http://www.mikrocontroller.net/topic/110168 2x7-Segment an nur 3 Leitungen]
* (A) [[Ambilight in Hardware]]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]
* (B) [http://www.mikrocontroller.net/topic/182305 TLC5940 16-Kanal 12bit LED Treiber ansteuern und HighPower LEDs über MosFETs treiben]
* (PC) [http://www.mikrocontroller.net/topic/185730 7Segment Coder]
* (C) [http://www.mikrocontroller.net/topic/244768 RGB-Moodlight, ATMega8, Soft-PWM mit Gammakorrektur, IR-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/275426 serielles 4x7 Segment Display NSM4202]

==LCD und VFD==
* (C) [http://bluematrixi.bl.funpic.de/index.php/elektronik-avr/lcd-display-nokia3310 Bibliothek für Nokia 3310 Lcd Ansteuerung in "C" - sehr gut]
*(C,A)[http://www.mikrocontroller.net/articles/Ansteuerung_Handy_Displays Ansteuerung_Handy_Displays]
* (PC) [http://www.mikrocontroller.net/topic/53137#413137 Programm zum Erstellen eigener Schriftarten (LCD)]
* (PC) [http://www.mikrocontroller.net/topic/54860#423255 LCD Schriftarten ( Fonts in veschiedenen Größen )]
* (C) [http://www.mikrocontroller.net/topic/31403 The Siemens S65 132x176, 65536 color display with AVR]
* (C) [http://www.mikrocontroller.net/topic/48501#371218 LCD Ansteuerung im 4bit-Modus]
* (C) [http://www.mikrocontroller.net/topic/48456#370782 LCD Library T6963c]
* (C) [http://www.mikrocontroller.net/topic/76399#633680 "Bessere" T6963c Library]
* (C) [http://www.mikrocontroller.net/topic/25099#186569 LCD Controller für 640x480 LCD mit mega8515]
* (C) [http://www.mikrocontroller.net/topic/38923#287939 LCD Controller KS0073 Support im 4-Bit Mode]
* (A) [http://www.mikrocontroller.net/topic/79609#664268 KS0066U oder Ähnliche --- LCD Treiber]
* (C) [http://www.mikrocontroller.net/topic/81793#683135 Pollin E0855-2 SED1530-Treiber]
* (C) [http://www.mikrocontroller.net/topic/90449#772843 LCD über nur einen IO-Pin ansteuern]
* (C) [http://www.mikrocontroller.net/topic/120475 VFD Library (Vacuum Fluorescent Display Library)]
* (C) [http://www.mikrocontroller.net/topic/98321#851423 Grafikfähiger LCD Controller für 320x240 LCD mit 4 Graustufen] (jetzt auch mit 8 Graustufen)
* (C) [http://www.mikrocontroller.net/topic/140369 Menüsystem für beliebige schwarz-weiß LCDs bis 4096x4096 Pixeln und grafischem Editor]
* (C) [http://www.mikrocontroller.net/topic/194149 Schnelle SED1520 Funktionsbibliothek mit Bildkonverter und Fontgenerator]
* (PC,C) [http://www.mikrocontroller.net/topic/234304 DOGXL Fontgenerator (SW+Graustufen)]
* (C,A) [http://www.mikrocontroller.net/topic/236862#2401250 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]
* (A) [http://www.mikrocontroller.net/topic/190078 LCD SHARP M078CKA mit LH155]
* (C) [http://www.mikrocontroller.net/topic/287978 EA DOGM162 Textdisplay an SPI]
* (A) [http://www.mikrocontroller.net/topic/305266 HD44780 Display 2x16 Xmega-Assemblerbaustein]
* (C) [http://www.mikrocontroller.net/topic/320791#3524261 Nokia N95 Display 320x240 Arduino Lib.]
* (C) [http://www.mikrocontroller.net/topic/318818#3456758 Library für ST7735 Display Controller mit GLCD Font Unterstützung]

==I2C==
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/83871#new I2C-Master realisiert in Software, ohne TWI für alle ATMEGAs]
* (A) [http://www.mikrocontroller.net/topic/38919#new RS232 <-> TWI / I2C Interface für ATMega8 (ASM) inkl. Windows Software]
* (C) [http://www.mikrocontroller.net/topic/67698#544930 USI TWI Master]
* (A) [http://www.mikrocontroller.net/topic/235733#2388116 Hardware TWI-MASTER Interrupt basierend für Mega AVR]
* (A) [http://www.mikrocontroller.net/topic/272621#new I2C/TWI Master-Interrupt Xmega-Assemblerbaustein]
* (C) [https://www.mikrocontroller.net/topic/378553 hot-plug fähige Library für DS1621 Temperatursensoren ]
* (A) [https://www.mikrocontroller.net/topic/506739#new TWI im polling für AVR 0-Series und AVR 1-Series]

==Messgeräte==
===Drehzahlmesser===
* (B) [http://www.mikrocontroller.net/topic/1518#8469 Drehzahlmesser 4 mal 7-Segment mit 90S2313]
* (C) [http://www.mikrocontroller.net/articles/Drehzahlmesser Drehzahlmesser mit 4 mal 7-Segment anzeigen mit Tiny2313, Wiki-Artikel]
* (C) [http://www.mikrocontroller.net/topic/231283 einfache Drehzahlmessung mit ATmega88]
* (C) [http://www.mikrocontroller.net/topic/232485 4-Kanal Drehzahlmessung mit ATmega88]

===Klopfsensormessgerät===
* (C) [http://www.mikrocontroller.net/articles/Klopfsensormessgeraet Messgerät für Klopfgeräusche an Verbrennungsmotoren auf Basis des TPIC8101]

===Entfernungsmesser===
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/130834 3D Umgebungserfassung mit einem auf zwei Servors montiertem Sharp Distanzsensor, Eigenbau]

===Frequenzmesser===
* (A) [http://www.mikrocontroller.net/topic/62610#495030 Frequenzmesser bis 2Mhz -- mit AVR ATmega8]
* (C) [http://www.mikrocontroller.net/topic/48582#372072 Frequenzmessung (Seite mit Quellcode nicht erreichbar)]
* (C) [http://www.mikrocontroller.net/topic/62517#494146 Input Capture Pin (ICP) auslesen ( Frequenz messen)]
* (C) [http://www.mikrocontroller.net/topic/25144#187587 Frequenzmessung und Impulszählung über den Parallelport-IR]
* (A) [http://www.mikrocontroller.net/topic/31394#241251 einfacher 5 MHz Frequenzzähler (Assembler) ATmega8]
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/173665#new sehr genauer Frequenzmesser Atmega8]
* (C) [http://www.mikrocontroller.net/topic/186801#new Reziproker Frequenzzähler+ Optimierte 64bit uint Routinen]
* (C+A) [http://www.mikrocontroller.net/topic/200279#new 6 Stellen von 1Hz bis 40MHz ATmega8]
* (C) [http://www.mikrocontroller.net/topic/241150#2458079 Reziproker Frequenzzähler, GPS-stabilisiert, ATmega162]
* (B) [http://www.mikrocontroller.net/topic/359552#new Reziproker Frequenzzähler mit BASCOM-AVR]

===Frequenzgenerator===
* (B) [http://www.mikrocontroller.net/topic/152966#1438488 Einstellbarer Frequenzgenerator für 0.12 Hz - 8 MHz mit Atmega 8 und Bascom ]

===Kompass===
* (A) [http://www.mikrocontroller.net/topic/100239#870281 KOMPASS KMZ10A KMZ10B ATmega8 Assembler]

===Messgeräte für elektronische Bauteile===
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (A) [http://www.mikrocontroller.net/topic/60797#477026 LC-METER / LC-Messgerät ATmega8 Assembler]
* (A) [http://www.mikrocontroller.net/topic/60591#474873 Widerstandstester]
* (A) [http://www.mikrocontroller.net/topic/56770#438957 Ladungsmessgerät]
* (A) [http://www.mikrocontroller.net/topic/31386#241139 Transistortester]
* (C) [http://www.mikrocontroller.net/topic/131804#1194273 Transistortester]

===Spannungsmesser===
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] - Voltmeter
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/31389 Wirkleistungsmessgerät] - "Ein einfaches Wirkleistungsmessgerät für 230V Verbraucher ohne Netztrennung mit 3 stelliger 7-Segment Anzeige für Verbraucher bis 500W." (+ ähnlicher Aufbau mit Silabs Controller)

===Thermometer===
* (A) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/53127#413006 Thermometer mit LED & LM35]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Viele DS18x20-Thermometer in einem Webserver]
* (C) [http://www.mikrocontroller.net/topic/354441#3953900 Auswertung Temperatursensor KTY81 (PT1000), Arduino Uno, 1-6 Kanäle]

===Oszilloskop===
* (B) [http://www.mikrocontroller.net/topic/53129#413011 Einfaches Oszilloskop - Bascom]
* (A) [http://www.mikrocontroller.net/topic/48586#372093 Oszi- & Logikanalyser mit LCD]
* (A) [http://www.mikrocontroller.net/topic/31376#240880 einfaches DIGITAL- Oszilloskop (800 Datenpunkte) Assembler]
* (A) [http://www.mikrocontroller.net/topic/56616#437772 Einfaches "Oszilloskop"]
* (C) [http://www.christoph-lauer.de/Homepage/Blog/Eintrage/2010/8/1_Embedded_C_based_Spectrumanalyzer.html ATXMega based Oscilloscope and Spectrumanalyzer]
* (A) [http://www.mikrocontroller.net/topic/228997#2308320 Selbstbau Digital Storage Oszilloskop]

===Beschleunigungssensor===
* (c++) [http://www.mikrocontroller.net/topic/268214 Einfache BMA020 Library, mit I2C]

==MIDI==

(Musical Instrument Digital Interface, Datenübertragungsstandard für Musikinstrumente)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (A) [http://www.mikrocontroller.net/topic/106512# Drum-Trigger mit MIDI-Ausgabe]

==MMC==

(Multimedia Card, digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/25056#186117 SourceCode MMC die Zweite]
* (C) [http://www.mikrocontroller.net/topic/48481#370950 MMC/SD-Karte mit FAT16 an AVR]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader füt ATMega16]
* (C) [http://www.mikrocontroller.net/topic/14800#102024 MMC/SD ansteuern mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/articles/FAT32 MMC/SD - FAT16/32 Bibliothek für AVR mit Wiki]

==Netzgeräte==
* [http://www.mikrocontroller.net/topic/60786#476904 Labornetzgerät]
* [[RADLAB-PS1]] [http://www.mikrocontroller.net/topic/124858#1138781 Netzteil um LM317 mit Strombegrenzung und Anzeige!]

==Netzwerk==
* (C) [http://www.mikrocontroller.net/topic/87517#new Kleiner ENC28J60 µWebserver von SimonK]
* (C) [http://www.mikrocontroller.net/topic/82127#new Ulrich Radigs ENC28J60 mit leicht lötbaren/beschaffbaren Bauteilen]
* (C) [http://www.mikrocontroller.net/topic/131825 Dirk Broßwick Webserver auf ENC28j60 Basis mit einem ATmega2561, es gibt auch einen Port auf das AVR-NET IO]

==Parser==
* (C) [http://www.mikrocontroller.net/topic/64763#517245 Zwei Parser für numerische Ausdrücke]
* (C) [http://www.mikrocontroller.net/topic/76842#638283 uShell - ein universeller Parser für uCs]

==RFID==

(Radio Frequency Identification, Verfahren zur funkbasierten Identifizierung und Lokalisierung von Gegenständen)

* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (C) [http://www.mikrocontroller.net/topic/228709 Soft-RFID ohne RFID-IC]

==RC - Fernsteuerungen/Servos==
* (C) [http://www.mikrocontroller.net/topic/48529#371582 RC Summen Signal erzeugen ]
* (C) [http://www.mikrocontroller.net/topic/192453 RC Summen Signal dekodieren ]

==RC5==

(verbreitetes Datenübertragungsprotokoll für Infrarot-Fernbedienungen)

* (A) [http://www.mikrocontroller.net/topic/14789#101536 RC5 Sender auf einem Attiny11L]
* (C) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/12216#80856 Fernbedien RC5 Empfänger]
* (C) [http://www.mikrocontroller.net/topic/59235#460765 RC5 Sender selber bauen ???]

==Ringpuffer==
* (A) [http://www.mikrocontroller.net/topic/66789#536189 Ringpuffer AVR]
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]

==SD==

(Secure Digital Memory Card; digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/topic/68257#550336 Datenrekorder auf SD-Karte mit mega88]

==Sonstiges==

* (C) [http://www.mikrocontroller.net/topic/111783#994358 Sonnenstandberechnung mit Atmega 8]
* (C) [http://www.mikrocontroller.net/articles/UAC_Mikrocontroller_ASCII_Console uAC Mikrocontroller ASCII Console]

==Spaßprojekte==
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/119876#1083044 Miniprojekt: Lagerfeuer-LED (ATtiny25)]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/167528#1601077 Toastbrote zählen]

==Spiele==
* (C) [http://www.mikrocontroller.net/topic/48505#371259 Tetris auf dem AtMega8]
* (C) [http://www.mikrocontroller.net/topic/187253# Atmega8 Schachuhr mit Max7219 ]

==Steuerungen==
* (C) [http://www.mikrocontroller.net/topic/123551 Aquarium Controller]
* () [http://www.mikrocontroller.net/topic/309045 Lüftersteuerung durch zwei SHT75, mega32, LCD und SD-Karte]
* () [http://www.mikrocontroller.net/topic/307375 Fensteröffner mit Scheibenwischermotor dht11 sht11]

==Taster / Schalter==
===mechanisch===
* (A) [http://www.mikrocontroller.net/topic/6492#41625 Tasten entprellen - Bulletproof] (siehe auch: [[Entprellung]])
* (C) [http://www.mikrocontroller.net/topic/48465#370877 Universelle Tastenabfrage]
* (C) [http://www.mikrocontroller.net/topic/6491#41624 Tasten-Matrix entprellen]
* (C) [http://www.mikrocontroller.net/topic/64731#517001 Tastenmatrix auslesen über nur 2 Leitungen]
* (C) [http://www.mikrocontroller.net/topic/64743#517105 Tasten Entprellen für N00bs]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (C) [http://www.mikrocontroller.net/topic/1515#8455 Entprellen von Tastern, autorepeat, vintage]

===kapazitiv===
* (C) [http://www.mikrocontroller.net/topic/38904 Sensor mit nur einer Kontaktfläche]
* (C) [http://www.mikrocontroller.net/topic/25045 Einfache Sensortaste]

==Tonerzeugung==
* (A) [http://www.mikrocontroller.net/topic/66945#537624 ATMEGA8 Soundgenerator/Synthesizer]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (C) [http://www.mikrocontroller.net/topic/134362 RTTTL Melodiegenerator mit ATTINY85]
* (B) [http://www.mikrocontroller.net/topic/232702#new RTTTL Melodiegenerator mit ATMEGA8]
* (A) [http://www.mikrocontroller.net/topic/25051 Melodie ausgeben mit AVR ATTiny12]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (B) [http://www.mikrocontroller.net/topic/137629#1259132 Melodieklingel BASCOM ATmega8]
* (A) [http://www.mikrocontroller.net/topic/191596 2Kanal Synthesizer ATtiny 2313, 85, ..]
* (A) [http://www.mikrocontroller.net/topic/232845 17 Kanal Avr Synthesizer]
* (C) [[AVR-Synthesizer]]

==TWI==
* (C) [http://www.mikrocontroller.net/topic/87597#742070 AVR TWI Master und Slave Funtionen in C]
* (A) [http://www.mikrocontroller.net/topic/31404#242081 TWI / I2C einf. MASTER SLAVE Beispiel(Assembler) ATmega8]

==USB==
* (C) [http://www.mikrocontroller.net/topic/75254#622120 USB Host Stack für Eingebettete Systeme (LGPL)]
* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/90791#776280 Relaiskarte für den USB Port]
* (C) [http://www.mikrocontroller.net/topic/130381#1179352 USB-Stick am Mikrocontroller VNC1L]
* (C) [http://www.mikrocontroller.net/topic/155241 PDIUSBD12 Treiber und micro USB-Device stack]
* (C) [http://www.mikrocontroller.net/topic/192453 HID-Joystick mit V-USB ]

==UART==
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/38928#287985 Software UART]
* (C) [http://www.mikrocontroller.net/topic/125651#1147436 Software UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/175946#1690682 uParse] - ein kompakter und vielseitiger Parser (Atmega32) für [[RS232]]
* (C) [http://www.mikrocontroller.net/topic/159753#1517744 Einfacher Interpreter für Komandozeilen/Befehlszeilen] (Atmega32) für [[RS232]]
* (C) [https://sourceforge.net/projects/yambsiavr/ Modbus Slave Library] für [[RS232]] und [[RS485]]

==Video==
* (A) [http://www.mikrocontroller.net/topic/53140#413249 AVR ASCII Video Terminal - 40 x 25 - BAS Signal]
* (A) [http://www.mikrocontroller.net/topic/53139#413225 TV VIDEO BILD BAS Frequenzzähler DVM Atmega8 Assembler]
* (A) [http://www.electronicspit.com/video/ Videosignal in Farbe aus dem ATMega32] (URL nicht mehr erreichbar)
* (A) [http://www.mikrocontroller.net/topic/25091#new VGA Testbildgenerator]
* (C) [http://www.mikrocontroller.net/topic/101429#882288 ATmega8 erzeugt Video in C!]

==Zeitgeber und Uhren==
* (A) [http://www.mikrocontroller.net/topic/12185#80055 Die genaue Sekunde / RTC]
* (A) [http://www.mikrocontroller.net/topic/74673#616226 LCD-Timer für Belichtungsgerät]
* (A) [http://www.mikrocontroller.net/topic/119859#1082804 DS1307 Assembler-Code]
* (C) [http://www.mikrocontroller.net/topic/31374#240878 AVR Library für RTC 12C887 in C]
* (C) [http://www.mikrocontroller.net/topic/25136#187534 RTC DS1302 in C]
* (C) [http://www.mikrocontroller.net/topic/25087#186454 RTC + Scheduler]
* (C) [http://www.mikrocontroller.net/topic/53131#413059 Jumbo-LED Uhr]
* (C) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25069 Sekunden in Zeit/Datum umwandeln (mit Sommerzeit/Schaltjahren)]
* (B) [http://www.mikrocontroller.net/topic/48560#371911 BASCOM Uhr mit Butterfly]
* (C) [http://www.mikrocontroller.net/topic/48450#370765 Countdown timer für UV Belichter]
* (C) [http://www.mikrocontroller.net/topic/98885 Countdown Timer mit ATtiny2313]
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Schaltuhr mit DCF77-Referenz in einem Webserver, Steuerung von Funksteckdosen]
* (C) [http://www.mikrocontroller.net/topic/100892#876549 Eieruhr mit ATtiny24V/ATtiny2313V]
* (B) [http://www.mikrocontroller.net/topic/151236 Zeitauslöser für Casio EX F1 mit Attiny2313]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/177688# NIXIE Uhr mit vielen Funktionen in C mit ATTiny2313]
* (C) [http://www.mikrocontroller.net/topic/233699 Stoppuhr – Geschwindigkeit – Pulsweite mit Atmega88]
* (C) [http://www.mikrocontroller.net/topic/275514 Timer bis 99:59 min - LED Display NSM4202, Drehgeber - At90S2313]
* (A) [http://www.mikrocontroller.net/topic/289724 Uhr/Kalender AVR-Assemblerbaustein]

== Siehe auch ==

* [[AVR-Codesammlung Übersicht]]

[[Kategorie:AVR]]
[[Kategorie:Forum]]
[[Kategorie:Listen]]

AVR Softwarepool

2020-12-01T18:00:34Z

Avrsteffen: /* DRAM */

Die interessantesten Softwareprojekte aus der Codesammlung...

(A) ... Projekt ist in '''Assembler''' 
(C) ... Projekt ist in '''C''' 
(C++) ... Projekt ist in '''C++''' 
(B) ... Projekt ist in '''Bascom''' 
(PC) ... Projekt ist nicht für einen µC, sondern für den PC

==1-Wire==
* (C) [http://www.mikrocontroller.net/topic/14792 DS1820, DS18B20 in C]
* (A) [http://www.mikrocontroller.net/topic/6505 Mehrere DS1820/DS18B20 auslesen]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Mehrere DS1820/DS18B20/DS18S20/DS1822 über einen Webserver auslesbar]
* (C) [https://www.mikrocontroller.net/topic/387139#4890827 Bibliothek für OneWire und DS18x20]

==Akkulader==
* (A) [http://www.mikrocontroller.net/topic/72627#594587 Bleiakku-Lader 12/24V]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]

==Betriebssysteme und Scheduler==
* (C) [http://www.mikrocontroller.net/topic/190388#1856376 Nano OS] von Tobias W. ([http://sourceforge.net/projects/nanoos/ Sourceforge])
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)] von Peter Dannegger
* (C++) [http://www.mikrocontroller.net/topic/96977#837989 Einfacher Scheduler und Timer in C++ für ATMega] von S. Seegel
* (C) [http://www.mikrocontroller.net/topic/74026#609246 GOS: einfacher preemptive multitasking scheduler] von Günter Greschenz
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
* (C) [http://www.mikrocontroller.net/topic/319580#new AvRtos] preemtiver real time multitasking scheduler von Harald B. ([http://sourceforge.net/projects/avrtos/ Sourceforge])
* (C) [https://bitbucket.org/dferreyra/avr-threads/wiki/Home avr-threads] Thread-Library für AVR

==Bootloader==
* (A,C,PC) [http://www.mikrocontroller.net/topic/12181#79866 AVR Bootloader]
* (A, PC) [http://www.mikrocontroller.net/topic/146638#1364260 AVR Bootloader für GCC-Toolchain]
* (A,PC) [http://www.mikrocontroller.net/topic/95839 AVR Bootloader mit Verschlüsselung]
* (A) [http://www.mikrocontroller.net/topic/72308#591159 ATtiny45 Bootloader]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader für ATMega16]
* (C) [http://www.mikrocontroller.net/topic/56818#439359 SD/MMC Card Bootloader (passt in 2kb bootsection)]
* (C) [http://www.mikrocontroller.net/topic/61170#480765 boofa - Bootloader für AVR über UART (AVR109)]
* (C) [http://www.mikrocontroller.net/topic/53130#413058 Bootloader ATmega168]
* (C) [http://www.mikrocontroller.net/topic/73196#600293 UART Bootloader ATtiny13 - ATmega644]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/150816#1414460 UART Bootloader AtMega644P @ 20MHz] (Eclipse Projekt)
* (C) [[AVR Bootloader in C - eine einfache Anleitung]]
* (C) [http://www.mikrocontroller.net/topic/200645#1971295 LAN-Bootloader für ATmega1284p]
* (A) [http://www.mikrocontroller.net/articles/Monitorprogramm_Bamo128 Bamo128] Monitorprogramm und Bootloader
Siehe auch: [[Bootloader]]

==DCC==

(Digital Command Control, Standard zur digitalen Steuerung von Modelleisenbahnen)

* (A) [http://www.mikrocontroller.net/topic/31397#241300 DCC Decoder]

==DCF77==

(Zeitsignaldienst für funkgesteuerte Uhren auf der Langwellen-Frequenz 77,5 kHz)

* (A) [http://www.mikrocontroller.net/topic/38914#287867 DCF77 AVR-Assemblerbaustein ]
* (A) [http://www.mikrocontroller.net/topic/6500#41738 DCF77-Uhr mit ATTINY12]
* (A) [http://www.mikrocontroller.net/topic/31385#241104 DCF Digital Empfangsmodul - Korrelation - (Assembler)ATmega8 ]
* (C) [http://pic-projekte.de/wordpress/?p=572 DCF77 PIC-Projekte.de]
* (C) [http://www.mikrocontroller.net/topic/25071#186286 DCF 77 ]
* (C) [http://www.mikrocontroller.net/topic/14788#101528 DCF-Uhr mit DotMatrix-Anzeige für avr-gcc]
* (C) [http://www.mikrocontroller.net/topic/12154#79501 PC DCF Timer ( PC Zeitschaltuhr)]
* (C) [http://www.mikrocontroller.net/topic/25116#187197 DCF 77 Uhr mit CodeVision ]
* (C) [http://www.mikrocontroller.net/topic/58769#456232 DCF77 Uhr in C mit ATtiny26]
* (C) [http://www.mikrocontroller.net/topic/48597#372164 DCF77 Uhr, zum X.ten Mal, jetzt mit SAF]
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 DCF77 mit beliebig gepoltem Eingangssignal innerhalb eines Webservers]
* (C) [http://www.mikrocontroller.net/topic/121049 DCF-Uhr, Sonnenstand, TWI-Port, Alarmfunktion für Atmega8]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/168807#1614129 DCF-Uhr mit LCD in C]

== DRAM ==
* (A,C) [http://www.mikrocontroller.net/topic/25053#186085 2MB DRAM an AVR] und Anwendung als [http://www.mikrocontroller.net/topic/25053#186089 Audiorekorder]
* (A,C) [https://www.mikrocontroller.net/topic/236862 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]

==Drehgeber==
* (C) [http://www.mikrocontroller.net/topic/6526#41978 Drehgeber auslesen]
* (C+A) [http://www.mikrocontroller.net/topic/302229#new 4-fach Auswertung für Dreh-/Inkrementalgeber, schnell]
* (C) [http://www.mikrocontroller.net/topic/328348#new Schrittmotor als Drehgeber mit Drehdynamik]
* (A) [https://www.mikrocontroller.net/topic/478343?goto=5925396#5922395]

==DTMF==
* (A) [http://www.mikrocontroller.net/topic/92444#792954 DTMF dekodieren]

==DMX==

* (C) [http://www.mikrocontroller.net/topic/92350#new 20 Kanal Relaissteuerung per DMX]
* (A) [http://www.mikrocontroller.net/topic/276885#new DMX512 zu RGB Led Controller use HSV Farbraum]
* (C) [http://www.mikrocontroller.net/topic/290366#3096821 20 Kanal PWM per DMX]

==Ethernet==
Siehe auch [[AVR Softwarepool#Netzwerk|Netzwerk]]

==Entwicklungssysteme==
* (PC) [http://www.mikrocontroller.net/topic/74198#611404 AVR Code Wizard]
* (A) [http://www.mikrocontroller.net/topic/30110#230503 Multitasking kernel für ATtinys in ASM]
* (A) [http://www.mikrocontroller.net/topic/65156#521012 BASIC-Computer mit ATmega32]
* (A) [http://www.mikrocontroller.net/topic/64129#511368 AVR TinyBASIC Anpassung für ATmega8]
* (A) [http://www.mikrocontroller.net/topic/59189#460273 Mini-Computer mit BASIC]
* (A) [http://www.mikrocontroller.net/topic/55807 Forth System für ATmegas in Assembler]
* (A) [http://www.mikrocontroller.net/topic/94193 Forth-Computer mit ATmega32 und Videoausgabe] von Christian Berger
* (C) [http://www.mikrocontroller.net/topic/62500#493931 Fixpoint-Arithmetik in "C"]
* (C++) [http://www.mikrocontroller.net/topic/143537 Fixpoint-Arithmetik in "C++"]
* (C) [http://www.mikrocontroller.net/topic/85256#717037 64 Bit float Emulator in C, IEEE754 kompatibel]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/94468#812992 Gleitkomma-Bibliothek für AVR]
* (A) [http://www.mikrocontroller.net/topic/177481?page=1 AVR CP/M System]
* (PC) [http://www.mikrocontroller.net/topic/187390 EMACS Konfiguration]
* (C) [https://www.mikrocontroller.net/topic/467307 Watchdog-ISR für ATmega328]

==FFT==

(Fast Fourier Transformation, "schnelle" Fouriertransformation)

* (A) [http://www.mikrocontroller.net/topic/25095#186536 FFT auf dem AVR]
* (A) [http://www.mikrocontroller.net/topic/25062#186225 128point FFT in ASM]
* (A) [http://www.mikrocontroller.net/topic/27001#203911 Schnelle FFT in Assembler]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]

==Funksteckdosen==
* (C,A) [http://www.mikrocontroller.net/topic/31408#536372 Ansteuerung von Funksteckdosen mit einem Webserver]

==GPS==

(Global Positioning System, satellitengestütztes System zur weltweiten Positions- und Zeitbestimmung)

* (A) [http://www.mikrocontroller.net/topic/48544#371717 GPS - MOUSE - MINI- NAVIGATOR (Assembler) ATmega8]
* (C) [http://www.mikrocontroller.net/topic/72507#593252 GPS an mega8,88 oder 168]

==IR==
* siehe auch [[AVR Softwarepool#RC5|RC5]]
* (C) [[IRMP]] - Infrared Multi Protocol Decoder:
**[[IRMP| Wiki Seite]]
**[http://www.mikrocontroller.net/topic/162119#1545798 Thread im Forum]

==Kryptographie==
* (A,C) [http://www.mikrocontroller.net/topic/73468 Verschiedene kryptographische Funktionen]

==LANC==

(Steuerprotokoll für Video- und Digitalfotokameras, auch als Control-L bekannt)

* (C) [http://www.mikrocontroller.net/topic/40463#302754 Sony LANC Auswertung mit AVR] (Atmega 128 @ 16 MHz)

==LEDs und LED-Anzeigen==
* (C) [http://www.mikrocontroller.net/topic/76839#638278 Solarlicht Steuerung]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (A) [http://www.mikrocontroller.net/topic/73776#606472 LED-Touch-Panel] (ARM)
* (A) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/54561#421940 HSV RGB Led Dimmer, C Code & Video & Doku]
* (A) [http://www.mikrocontroller.net/topic/67567#543492 Mini RGB Lichteffektgenerator mit Menü für Pic16F84]
* (C) [http://www.mikrocontroller.net/topic/48464#370871 Ansteuerung einer RGB LED (PWM)]
* (A) [http://www.mikrocontroller.net/topic/87149#737282 3x7 Segment und 1 I/O-Pin (Assembler)]
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] (vier 7-Segmentanzeigen)
* (A) [http://www.mikrocontroller.net/topic/31388#241192 AVR-Lauflicht]
* (A) [http://www.mikrocontroller.net/topic/94746#815809 HSB->RGB Umrechnung rein in Assembler, auch für ATiny]
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (A) [http://www.mikrocontroller.net/topic/110168 2x7-Segment an nur 3 Leitungen]
* (A) [[Ambilight in Hardware]]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/131525#1191497 AVR-Lichtorgel per FFT MEGA8 32 644 ]
* (B) [http://www.mikrocontroller.net/topic/182305 TLC5940 16-Kanal 12bit LED Treiber ansteuern und HighPower LEDs über MosFETs treiben]
* (PC) [http://www.mikrocontroller.net/topic/185730 7Segment Coder]
* (C) [http://www.mikrocontroller.net/topic/244768 RGB-Moodlight, ATMega8, Soft-PWM mit Gammakorrektur, IR-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/275426 serielles 4x7 Segment Display NSM4202]

==LCD und VFD==
* (C) [http://bluematrixi.bl.funpic.de/index.php/elektronik-avr/lcd-display-nokia3310 Bibliothek für Nokia 3310 Lcd Ansteuerung in "C" - sehr gut]
*(C,A)[http://www.mikrocontroller.net/articles/Ansteuerung_Handy_Displays Ansteuerung_Handy_Displays]
* (PC) [http://www.mikrocontroller.net/topic/53137#413137 Programm zum Erstellen eigener Schriftarten (LCD)]
* (PC) [http://www.mikrocontroller.net/topic/54860#423255 LCD Schriftarten ( Fonts in veschiedenen Größen )]
* (C) [http://www.mikrocontroller.net/topic/31403 The Siemens S65 132x176, 65536 color display with AVR]
* (C) [http://www.mikrocontroller.net/topic/48501#371218 LCD Ansteuerung im 4bit-Modus]
* (C) [http://www.mikrocontroller.net/topic/48456#370782 LCD Library T6963c]
* (C) [http://www.mikrocontroller.net/topic/76399#633680 "Bessere" T6963c Library]
* (C) [http://www.mikrocontroller.net/topic/25099#186569 LCD Controller für 640x480 LCD mit mega8515]
* (C) [http://www.mikrocontroller.net/topic/38923#287939 LCD Controller KS0073 Support im 4-Bit Mode]
* (A) [http://www.mikrocontroller.net/topic/79609#664268 KS0066U oder Ähnliche --- LCD Treiber]
* (C) [http://www.mikrocontroller.net/topic/81793#683135 Pollin E0855-2 SED1530-Treiber]
* (C) [http://www.mikrocontroller.net/topic/90449#772843 LCD über nur einen IO-Pin ansteuern]
* (C) [http://www.mikrocontroller.net/topic/120475 VFD Library (Vacuum Fluorescent Display Library)]
* (C) [http://www.mikrocontroller.net/topic/98321#851423 Grafikfähiger LCD Controller für 320x240 LCD mit 4 Graustufen] (jetzt auch mit 8 Graustufen)
* (C) [http://www.mikrocontroller.net/topic/140369 Menüsystem für beliebige schwarz-weiß LCDs bis 4096x4096 Pixeln und grafischem Editor]
* (C) [http://www.mikrocontroller.net/topic/194149 Schnelle SED1520 Funktionsbibliothek mit Bildkonverter und Fontgenerator]
* (PC,C) [http://www.mikrocontroller.net/topic/234304 DOGXL Fontgenerator (SW+Graustufen)]
* (C,A) [http://www.mikrocontroller.net/topic/236862#2401250 Grafikfähiger LCD Controller für 320x240 LCD mit D-RAM]
* (A) [http://www.mikrocontroller.net/topic/190078 LCD SHARP M078CKA mit LH155]
* (C) [http://www.mikrocontroller.net/topic/287978 EA DOGM162 Textdisplay an SPI]
* (A) [http://www.mikrocontroller.net/topic/305266 HD44780 Display 2x16 Xmega-Assemblerbaustein]
* (C) [http://www.mikrocontroller.net/topic/320791#3524261 Nokia N95 Display 320x240 Arduino Lib.]
* (C) [http://www.mikrocontroller.net/topic/318818#3456758 Library für ST7735 Display Controller mit GLCD Font Unterstützung]

==I2C==
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/83871#new I2C-Master realisiert in Software, ohne TWI für alle ATMEGAs]
* (A) [http://www.mikrocontroller.net/topic/38919#new RS232 <-> TWI / I2C Interface für ATMega8 (ASM) inkl. Windows Software]
* (C) [http://www.mikrocontroller.net/topic/67698#544930 USI TWI Master]
* (A) [http://www.mikrocontroller.net/topic/235733#2388116 Hardware TWI-MASTER Interrupt basierend für Mega AVR]
* (A) [http://www.mikrocontroller.net/topic/272621#new I2C/TWI Master-Interrupt Xmega-Assemblerbaustein]
* (C) [https://www.mikrocontroller.net/topic/378553 hot-plug fähige Library für DS1621 Temperatursensoren ]

==Messgeräte==
===Drehzahlmesser===
* (B) [http://www.mikrocontroller.net/topic/1518#8469 Drehzahlmesser 4 mal 7-Segment mit 90S2313]
* (C) [http://www.mikrocontroller.net/articles/Drehzahlmesser Drehzahlmesser mit 4 mal 7-Segment anzeigen mit Tiny2313, Wiki-Artikel]
* (C) [http://www.mikrocontroller.net/topic/231283 einfache Drehzahlmessung mit ATmega88]
* (C) [http://www.mikrocontroller.net/topic/232485 4-Kanal Drehzahlmessung mit ATmega88]

===Klopfsensormessgerät===
* (C) [http://www.mikrocontroller.net/articles/Klopfsensormessgeraet Messgerät für Klopfgeräusche an Verbrennungsmotoren auf Basis des TPIC8101]

===Entfernungsmesser===
* (C) [http://www.mikrocontroller.net/topic/98923#857451 Ultraschall Entfernungsmesser mit I2C, Eigenbau]
* (C) [http://www.mikrocontroller.net/topic/130834 3D Umgebungserfassung mit einem auf zwei Servors montiertem Sharp Distanzsensor, Eigenbau]

===Frequenzmesser===
* (A) [http://www.mikrocontroller.net/topic/62610#495030 Frequenzmesser bis 2Mhz -- mit AVR ATmega8]
* (C) [http://www.mikrocontroller.net/topic/48582#372072 Frequenzmessung (Seite mit Quellcode nicht erreichbar)]
* (C) [http://www.mikrocontroller.net/topic/62517#494146 Input Capture Pin (ICP) auslesen ( Frequenz messen)]
* (C) [http://www.mikrocontroller.net/topic/25144#187587 Frequenzmessung und Impulszählung über den Parallelport-IR]
* (A) [http://www.mikrocontroller.net/topic/31394#241251 einfacher 5 MHz Frequenzzähler (Assembler) ATmega8]
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/173665#new sehr genauer Frequenzmesser Atmega8]
* (C) [http://www.mikrocontroller.net/topic/186801#new Reziproker Frequenzzähler+ Optimierte 64bit uint Routinen]
* (C+A) [http://www.mikrocontroller.net/topic/200279#new 6 Stellen von 1Hz bis 40MHz ATmega8]
* (C) [http://www.mikrocontroller.net/topic/241150#2458079 Reziproker Frequenzzähler, GPS-stabilisiert, ATmega162]
* (B) [http://www.mikrocontroller.net/topic/359552#new Reziproker Frequenzzähler mit BASCOM-AVR]

===Frequenzgenerator===
* (B) [http://www.mikrocontroller.net/topic/152966#1438488 Einstellbarer Frequenzgenerator für 0.12 Hz - 8 MHz mit Atmega 8 und Bascom ]

===Kompass===
* (A) [http://www.mikrocontroller.net/topic/100239#870281 KOMPASS KMZ10A KMZ10B ATmega8 Assembler]

===Messgeräte für elektronische Bauteile===
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (A) [http://www.mikrocontroller.net/topic/60797#477026 LC-METER / LC-Messgerät ATmega8 Assembler]
* (A) [http://www.mikrocontroller.net/topic/60591#474873 Widerstandstester]
* (A) [http://www.mikrocontroller.net/topic/56770#438957 Ladungsmessgerät]
* (A) [http://www.mikrocontroller.net/topic/31386#241139 Transistortester]
* (C) [http://www.mikrocontroller.net/topic/131804#1194273 Transistortester]

===Spannungsmesser===
* (C) [http://www.mikrocontroller.net/topic/31370#240843 ADC mit Multiplexanzeige] - Voltmeter
* (A+C) [http://www.mikrocontroller.net/topic/69021#558098 Multimeter]
* (C) [http://www.mikrocontroller.net/topic/31389 Wirkleistungsmessgerät] - "Ein einfaches Wirkleistungsmessgerät für 230V Verbraucher ohne Netztrennung mit 3 stelliger 7-Segment Anzeige für Verbraucher bis 500W." (+ ähnlicher Aufbau mit Silabs Controller)

===Thermometer===
* (A) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/53127#413006 Thermometer mit LED & LM35]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Viele DS18x20-Thermometer in einem Webserver]
* (C) [http://www.mikrocontroller.net/topic/354441#3953900 Auswertung Temperatursensor KTY81 (PT1000), Arduino Uno, 1-6 Kanäle]

===Oszilloskop===
* (B) [http://www.mikrocontroller.net/topic/53129#413011 Einfaches Oszilloskop - Bascom]
* (A) [http://www.mikrocontroller.net/topic/48586#372093 Oszi- & Logikanalyser mit LCD]
* (A) [http://www.mikrocontroller.net/topic/31376#240880 einfaches DIGITAL- Oszilloskop (800 Datenpunkte) Assembler]
* (A) [http://www.mikrocontroller.net/topic/56616#437772 Einfaches "Oszilloskop"]
* (C) [http://www.christoph-lauer.de/Homepage/Blog/Eintrage/2010/8/1_Embedded_C_based_Spectrumanalyzer.html ATXMega based Oscilloscope and Spectrumanalyzer]
* (A) [http://www.mikrocontroller.net/topic/228997#2308320 Selbstbau Digital Storage Oszilloskop]

===Beschleunigungssensor===
* (c++) [http://www.mikrocontroller.net/topic/268214 Einfache BMA020 Library, mit I2C]

==MIDI==

(Musical Instrument Digital Interface, Datenübertragungsstandard für Musikinstrumente)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (A) [http://www.mikrocontroller.net/topic/106512# Drum-Trigger mit MIDI-Ausgabe]

==MMC==

(Multimedia Card, digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/25056#186117 SourceCode MMC die Zweite]
* (C) [http://www.mikrocontroller.net/topic/48481#370950 MMC/SD-Karte mit FAT16 an AVR]
* (C) [http://www.mikrocontroller.net/topic/67047#538510 MMC/SD Bootloader füt ATMega16]
* (C) [http://www.mikrocontroller.net/topic/14800#102024 MMC/SD ansteuern mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/articles/FAT32 MMC/SD - FAT16/32 Bibliothek für AVR mit Wiki]

==Netzgeräte==
* [http://www.mikrocontroller.net/topic/60786#476904 Labornetzgerät]
* [[RADLAB-PS1]] [http://www.mikrocontroller.net/topic/124858#1138781 Netzteil um LM317 mit Strombegrenzung und Anzeige!]

==Netzwerk==
* (C) [http://www.mikrocontroller.net/topic/87517#new Kleiner ENC28J60 µWebserver von SimonK]
* (C) [http://www.mikrocontroller.net/topic/82127#new Ulrich Radigs ENC28J60 mit leicht lötbaren/beschaffbaren Bauteilen]
* (C) [http://www.mikrocontroller.net/topic/131825 Dirk Broßwick Webserver auf ENC28j60 Basis mit einem ATmega2561, es gibt auch einen Port auf das AVR-NET IO]

==Parser==
* (C) [http://www.mikrocontroller.net/topic/64763#517245 Zwei Parser für numerische Ausdrücke]
* (C) [http://www.mikrocontroller.net/topic/76842#638283 uShell - ein universeller Parser für uCs]

==RFID==

(Radio Frequency Identification, Verfahren zur funkbasierten Identifizierung und Lokalisierung von Gegenständen)

* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (C) [http://www.mikrocontroller.net/topic/228709 Soft-RFID ohne RFID-IC]

==RC - Fernsteuerungen/Servos==
* (C) [http://www.mikrocontroller.net/topic/48529#371582 RC Summen Signal erzeugen ]
* (C) [http://www.mikrocontroller.net/topic/192453 RC Summen Signal dekodieren ]

==RC5==

(verbreitetes Datenübertragungsprotokoll für Infrarot-Fernbedienungen)

* (A) [http://www.mikrocontroller.net/topic/14789#101536 RC5 Sender auf einem Attiny11L]
* (C) [http://www.mikrocontroller.net/topic/74013#609097 RGB-Moodlight auf ATTiny2313 mit RC5-Fernbedienung]
* (C) [http://www.mikrocontroller.net/topic/12216#80856 Fernbedien RC5 Empfänger]
* (C) [http://www.mikrocontroller.net/topic/59235#460765 RC5 Sender selber bauen ???]

==Ringpuffer==
* (A) [http://www.mikrocontroller.net/topic/66789#536189 Ringpuffer AVR]
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]

==SD==

(Secure Digital Memory Card; digitales Flash-Speichermedium)

* (C) [http://www.mikrocontroller.net/topic/48542#371695 Mr.MidiPlayer - Spielt alle MIDI-Dateien von einer SD-Karte] (siehe auch: [[Midi_Rekorder_mit_MMC/SD-Karte]])
* (C) [http://www.mikrocontroller.net/topic/25035#185861 MIDI-Rekorder mit SD/MMC und AVR]
* (C) [http://www.mikrocontroller.net/topic/68257#550336 Datenrekorder auf SD-Karte mit mega88]

==Sonstiges==

* (C) [http://www.mikrocontroller.net/topic/111783#994358 Sonnenstandberechnung mit Atmega 8]
* (C) [http://www.mikrocontroller.net/articles/UAC_Mikrocontroller_ASCII_Console uAC Mikrocontroller ASCII Console]

==Spaßprojekte==
* (C) [http://www.mikrocontroller.net/topic/99803#866081 Glühwürmchen in Rotkohlglas gefangen]
* (C) [http://www.mikrocontroller.net/topic/119876#1083044 Miniprojekt: Lagerfeuer-LED (ATtiny25)]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (C) [http://www.mikrocontroller.net/topic/167528#1601077 Toastbrote zählen]

==Spiele==
* (C) [http://www.mikrocontroller.net/topic/48505#371259 Tetris auf dem AtMega8]
* (C) [http://www.mikrocontroller.net/topic/187253# Atmega8 Schachuhr mit Max7219 ]

==Steuerungen==
* (C) [http://www.mikrocontroller.net/topic/123551 Aquarium Controller]
* () [http://www.mikrocontroller.net/topic/309045 Lüftersteuerung durch zwei SHT75, mega32, LCD und SD-Karte]
* () [http://www.mikrocontroller.net/topic/307375 Fensteröffner mit Scheibenwischermotor dht11 sht11]

==Taster / Schalter==
===mechanisch===
* (A) [http://www.mikrocontroller.net/topic/6492#41625 Tasten entprellen - Bulletproof] (siehe auch: [[Entprellung]])
* (C) [http://www.mikrocontroller.net/topic/48465#370877 Universelle Tastenabfrage]
* (C) [http://www.mikrocontroller.net/topic/6491#41624 Tasten-Matrix entprellen]
* (C) [http://www.mikrocontroller.net/topic/64731#517001 Tastenmatrix auslesen über nur 2 Leitungen]
* (C) [http://www.mikrocontroller.net/topic/64743#517105 Tasten Entprellen für N00bs]
* (C) [http://www.mikrocontroller.net/topic/77863#648213 Taster + LED am selben Draht (4*)]
* (C) [http://www.mikrocontroller.net/topic/1515#8455 Entprellen von Tastern, autorepeat, vintage]

===kapazitiv===
* (C) [http://www.mikrocontroller.net/topic/38904 Sensor mit nur einer Kontaktfläche]
* (C) [http://www.mikrocontroller.net/topic/25045 Einfache Sensortaste]

==Tonerzeugung==
* (A) [http://www.mikrocontroller.net/topic/66945#537624 ATMEGA8 Soundgenerator/Synthesizer]
* (C) [http://www.mikrocontroller.net/topic/120289#1087905 Klingel mit 100 Melodien - last minute Weihnachtsgeschenk]
* (C) [http://www.mikrocontroller.net/topic/134362 RTTTL Melodiegenerator mit ATTINY85]
* (B) [http://www.mikrocontroller.net/topic/232702#new RTTTL Melodiegenerator mit ATMEGA8]
* (A) [http://www.mikrocontroller.net/topic/25051 Melodie ausgeben mit AVR ATTiny12]
* (A) [http://www.mikrocontroller.net/topic/145156#1346531 µCke Microcontroller Mücke (Atmel Tiny13)]
* (B) [http://www.mikrocontroller.net/topic/137629#1259132 Melodieklingel BASCOM ATmega8]
* (A) [http://www.mikrocontroller.net/topic/191596 2Kanal Synthesizer ATtiny 2313, 85, ..]
* (A) [http://www.mikrocontroller.net/topic/232845 17 Kanal Avr Synthesizer]
* (C) [[AVR-Synthesizer]]

==TWI==
* (C) [http://www.mikrocontroller.net/topic/87597#742070 AVR TWI Master und Slave Funtionen in C]
* (A) [http://www.mikrocontroller.net/topic/31404#242081 TWI / I2C einf. MASTER SLAVE Beispiel(Assembler) ATmega8]

==USB==
* (C) [http://www.mikrocontroller.net/topic/75254#622120 USB Host Stack für Eingebettete Systeme (LGPL)]
* (C) [http://www.mikrocontroller.net/topic/68442#552128 USB RFID Tag Leser]
* (A,C) [http://www.mikrocontroller.net/topic/92979#797957 AVR ATmega8TestBoard]
* (C) [http://www.mikrocontroller.net/topic/90791#776280 Relaiskarte für den USB Port]
* (C) [http://www.mikrocontroller.net/topic/130381#1179352 USB-Stick am Mikrocontroller VNC1L]
* (C) [http://www.mikrocontroller.net/topic/155241 PDIUSBD12 Treiber und micro USB-Device stack]
* (C) [http://www.mikrocontroller.net/topic/192453 HID-Joystick mit V-USB ]

==UART==
* (C) [http://www.mikrocontroller.net/topic/101472#882716 AVR-GCC: UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/38928#287985 Software UART]
* (C) [http://www.mikrocontroller.net/topic/125651#1147436 Software UART mit FIFO]
* (C) [http://www.mikrocontroller.net/topic/175946#1690682 uParse] - ein kompakter und vielseitiger Parser (Atmega32) für [[RS232]]
* (C) [http://www.mikrocontroller.net/topic/159753#1517744 Einfacher Interpreter für Komandozeilen/Befehlszeilen] (Atmega32) für [[RS232]]
* (C) [https://sourceforge.net/projects/yambsiavr/ Modbus Slave Library] für [[RS232]] und [[RS485]]

==Video==
* (A) [http://www.mikrocontroller.net/topic/53140#413249 AVR ASCII Video Terminal - 40 x 25 - BAS Signal]
* (A) [http://www.mikrocontroller.net/topic/53139#413225 TV VIDEO BILD BAS Frequenzzähler DVM Atmega8 Assembler]
* (A) [http://www.electronicspit.com/video/ Videosignal in Farbe aus dem ATMega32] (URL nicht mehr erreichbar)
* (A) [http://www.mikrocontroller.net/topic/25091#new VGA Testbildgenerator]
* (C) [http://www.mikrocontroller.net/topic/101429#882288 ATmega8 erzeugt Video in C!]

==Zeitgeber und Uhren==
* (A) [http://www.mikrocontroller.net/topic/12185#80055 Die genaue Sekunde / RTC]
* (A) [http://www.mikrocontroller.net/topic/74673#616226 LCD-Timer für Belichtungsgerät]
* (A) [http://www.mikrocontroller.net/topic/119859#1082804 DS1307 Assembler-Code]
* (C) [http://www.mikrocontroller.net/topic/31374#240878 AVR Library für RTC 12C887 in C]
* (C) [http://www.mikrocontroller.net/topic/25136#187534 RTC DS1302 in C]
* (C) [http://www.mikrocontroller.net/topic/25087#186454 RTC + Scheduler]
* (C) [http://www.mikrocontroller.net/topic/53131#413059 Jumbo-LED Uhr]
* (C) [http://www.mikrocontroller.net/topic/6516#41903 Zeit + Temperatur auf LCD mit AVR]
* (C) [http://www.mikrocontroller.net/topic/25069 Sekunden in Zeit/Datum umwandeln (mit Sommerzeit/Schaltjahren)]
* (B) [http://www.mikrocontroller.net/topic/48560#371911 BASCOM Uhr mit Butterfly]
* (C) [http://www.mikrocontroller.net/topic/48450#370765 Countdown timer für UV Belichter]
* (C) [http://www.mikrocontroller.net/topic/98885 Countdown Timer mit ATtiny2313]
* (C) [http://www.mikrocontroller.net/topic/12176#79672 Wartezeiten effektiv (Scheduler)]
* (C) [http://www.mikrocontroller.net/topic/31408#536372 Schaltuhr mit DCF77-Referenz in einem Webserver, Steuerung von Funksteckdosen]
* (C) [http://www.mikrocontroller.net/topic/100892#876549 Eieruhr mit ATtiny24V/ATtiny2313V]
* (B) [http://www.mikrocontroller.net/topic/151236 Zeitauslöser für Casio EX F1 mit Attiny2313]
* (A) [http://www.mikrocontroller.net/topic/151260#1419218 DCF77 Uhr 7 Segment LED ATmega8 Assembler]
* (C) [http://www.mikrocontroller.net/topic/177688# NIXIE Uhr mit vielen Funktionen in C mit ATTiny2313]
* (C) [http://www.mikrocontroller.net/topic/233699 Stoppuhr – Geschwindigkeit – Pulsweite mit Atmega88]
* (C) [http://www.mikrocontroller.net/topic/275514 Timer bis 99:59 min - LED Display NSM4202, Drehgeber - At90S2313]
* (A) [http://www.mikrocontroller.net/topic/289724 Uhr/Kalender AVR-Assemblerbaustein]

== Siehe auch ==

* [[AVR-Codesammlung Übersicht]]

[[Kategorie:AVR]]
[[Kategorie:Forum]]
[[Kategorie:Listen]]

Luftdrucksensor

2020-12-01T17:43:34Z

Avrsteffen: /* BME680 */

Der Luftdruck auf der Erdoberfläche liegt bei etwa 1000 hPa (hektoPascal) = 1000 mBar. In technischen Anwendungen werden Drücke oft in kPa (kiloPascal) angegeben, das sind demzufolge 100 kPa.

=== MS5534 ===
Aktuell ist der MS5534C. Hergestellt von [http://www.intersema.ch/ Intersema]. Dort findet sich auch das [http://www.intersema.ch/products/guide/calibrated/ms5534c/ Datenblatt]

Der Sensor gibt seine Werte digital aus und enthält auch einen Temperatursensor für die nötige Temperaturkompensationsberechnung. Diese muss der Anwender selber machen, die Beschreibung dazu findet sich im Datenblatt.

Daten:
* Versorgungsspannung: 2,2 ... 3,6V
* Auflösung: 0.1 mbar
* Genauigkeit absolut bei 25°C: +-1,5 mbar
* Messfrequenz: ca. 28 Hz

Vorteile:
* Kalibriert

Nachteile:
* lichtempfindlich
* Eigenes Protokoll über 3 Adern, kein Bussystem
* Benötigt Oszillator mit 32768 kHz

Bezugsquellen:
* ELV 20,47€

Beispielcode:
* [http://www.mikrocontroller.net/topic/20869 C-Code für PIC]

=== MPX4115A ===
Analoger Drucksensor von Freescale (früher Motorola). Dort findet sich auch das [http://www.freescale.com/files/sensors/doc/data_sheet/MPX4115A.pdf Datenblatt].

Daten:
* Der Sensor gibt 45.9mV/kPa aus.
* Versorgungsspannung: 5V
* Genauigkeit (0-85°C): +-15 mbar

Vorteile:
* teilweise (0..90°C) temperaturkompensiert

Nachteile:
* geringe Genauigkeit im Vergleich zu den anderen Sensoren

Bezugsquellen:
* Reichelt 13,70 € (20.11.2012)

=== MPL3115A2 ===
Drucksensor von Freescale (früher Motorola) mit digitaler Datenausgabe über I2C. Dort findet sich auch das [http://www.freescale.com/files/sensors/doc/data_sheet/MPL3115A2.pdf Datenblatt].

Daten:
* Messbereich 500..1100 hPa
* Versorgungsspannung: 1.95 .. 3.6 V
* Genauigkeit (0-50°C): 4 hPa
* Auflösung: 1.5 Pa bzw. 0.3 m

Vorteile:
* Datenaufbereitung On-Chip, Ausgabe Druck, Höhe, Temperatur

Nachteile:
* t.b.d.

Bezugsquellen:
* DigiKey 2,31 €, RS-Components3,02 € (10.11.2013)

=== SCP1000 ===

Digitaler Absolutdruck-Sensor von VTI.

[http://www.vti.fi/en/support/obsolete_products/pressure_sensors/ Datenblatt]

Daten:
* Versorgung mit 2,4 bis 3,3 V
* Auflösung: 0,015 mbar
* Genauigkeit absolut (10 - 40°C): 1,5 mbar
* Messfrequenz (reduzierte Auflösung): max 9 Hz

Vorteile:
* SPI- oder I2C-Schnittstelle
* fertig kalibriert
* bis zu 17-bit Auflösung (entspricht 8cm)
* keine komplexen Kompensationsberechnungen beim Auslesen nötig

Nachteile:
* kleines SMD-Gehäuse (QFN-ähnlich), darf nicht mit Heißluft oder Lötkolben gelötet werden
* Beim Hersteller unter "Obsolete products" gelistet, aber noch gut verfügbar

Bezugsquellen:
* Aevum-Mechatronik (ca. 17 EUR)
* Breakout-Boards bei Sparkfun

=== BMP085 ===

Digitaler Absolutdrucksensor von Bosch Sensortec.

[http://www.bosch-sensortec.com/content/language1/downloads/BST-BMP085-DS000-05.pdf Datenblatt]

Daten:
* Versorgung mit 1,8 bis 3,6 V
* Auflösung: 0,01 mbar
* Genauigkeit absolut (0-65°C): max. Fehler +-2,5 mbar
* Messfrequenz (reduzierte Auflösung): max 220 Hz

Vorteile:
* I2C-Schnittstelle
* fertig kalibriert
* hohe Auflösung und Genauigkeit

Nachteile:
* aufwendige Kompensationsberechnungen nötig

Bezugsquellen:
* Digikey (ca. 8 EUR)
* [http://jeelabs.org/pp1 Breakout-Board von Jeelabs]
* Rutronik
* ACAL
* sparkfun
* Watterott

Beispielcode:
* [http://code.jeelabs.org/viewvc/svn/jeelabs/trunk/libraries/Ports/ Jeelabs Ports Library] C++ mit Floatingpoint (Toter Link)
* [https://github.com/jcw/jeelib Jeelabs PortsBMP085 Library] C++/Arduino Library (Port library interface to BMP085 sensors connected via I2C)

=== BMP180 ===
Der Nachfolger des BMP085 (siehe oben).

Dieser ist noch ein wenig kleiner, ansonsten laut Datenblatt identisch.

Das neue Datenblatt und Beispielcode kann hier [http://www.bosch-sensortec.com/de/homepage/products_3/environmental_sensors_1/bmp180_1/bmp180 (Herstellerseite)] gefunden werden.

Das Datenblatt des BMP180 erklärt auch den BMP085 etwas besser ;) (interne Register, Power-On-Reset ...)

Bezugsquelle (mit etwas Glück) :
ebay - internationale Suche
* BMP085 ab ca.3,5 $US (aktuell unter 3 Euro)
* BMP180 ab ca.6,0 $US (aktuell unter 5 Euro)
dort findet Ihr teilweise auch fertig aufgebaute Module (Chip auf Platine mit ein paar Bauteilen) z.B. als Modul für ARDUINO

PS : Für viele Anwendungen kann auf die Kompensation verzichtet werden (zB. nur Luftdruckanzeige) -> Druck (in Pascal) = UP*3

Februar 2016: Leider auch schon wieder abgekündigt, Nachfolger ist der sehr ähnliche BMP280.

=== BMP280 ===
Der Nachfolger des BMP180 (siehe oben).

Sehr ähnlich dem BMP180, leicht verbesserte Kennwerte
* Siehe auch: [https://www.mikrocontroller.net/articles/Temperatursensor#Bosch_Sensortec_BME280_.2F_BME680 Temperatursensor Bosch / Sensortec BME280 / BME680]

=== BME680 ===
Auch von Bosch, kann Luftfeuchtigkeit, Druck, Luftqualität

[https://www.bosch-sensortec.com/media/boschsensortec/downloads/datasheets/bst-bme680-ds001.pdf Datenblatt vom Hersteller]

* Betriebsspannung 1.71 bis 3.6 V
* Interface I²C, SPI

Kennwerte der Druckmessung
* RMS Noise 0.12 Pa (equiv. to 1.7 cm).
* Sensitivity Error ± 0.25 % (equiv. to 1 m at 400 m height change).
* Temperature coefficient offset ±1.3 Pa/K (equiv. to ±10.9 cm at 1°C temperature change),

150 Messungen/s bei niedrigster Auflösung, bis zu 16 fach oversampling
Ein Entwicklungsboard ist für ca 20€ zu bekommen.

* Siehe auch: [https://www.mikrocontroller.net/articles/Temperatursensor#Bosch_Sensortec_BME280_.2F_BME680 Temperatursensor Bosch / Sensortec BME280 / BME680]

=== LPS331 ===
Digitaler Absolutdrucksensor von STMicroelectronics
[http://www.st.com/web/en/resource/technical/document/datasheet/DM00036196.pdf (Datenblatt)]
* Betriebsspannung 1,8 bis 3.6 Volt
* Interface I²C, SPI

=== MS5611 ===
Digitaler Absolutdrucksensor von Measurement Specialties/MEAS
[http://www.amsys.info/sheets/amsys.en.ms5611_01ba03.pdf (Datenblatt)]
* Betriebsspannung 1,8 bis 3.6 Volt
* Interface I²C, SPI

[[Kategorie:Sensorik]]

Luftdrucksensor

2020-12-01T17:43:13Z

Avrsteffen: /* BMP280 */

Der Luftdruck auf der Erdoberfläche liegt bei etwa 1000 hPa (hektoPascal) = 1000 mBar. In technischen Anwendungen werden Drücke oft in kPa (kiloPascal) angegeben, das sind demzufolge 100 kPa.

=== MS5534 ===
Aktuell ist der MS5534C. Hergestellt von [http://www.intersema.ch/ Intersema]. Dort findet sich auch das [http://www.intersema.ch/products/guide/calibrated/ms5534c/ Datenblatt]

Der Sensor gibt seine Werte digital aus und enthält auch einen Temperatursensor für die nötige Temperaturkompensationsberechnung. Diese muss der Anwender selber machen, die Beschreibung dazu findet sich im Datenblatt.

Daten:
* Versorgungsspannung: 2,2 ... 3,6V
* Auflösung: 0.1 mbar
* Genauigkeit absolut bei 25°C: +-1,5 mbar
* Messfrequenz: ca. 28 Hz

Vorteile:
* Kalibriert

Nachteile:
* lichtempfindlich
* Eigenes Protokoll über 3 Adern, kein Bussystem
* Benötigt Oszillator mit 32768 kHz

Bezugsquellen:
* ELV 20,47€

Beispielcode:
* [http://www.mikrocontroller.net/topic/20869 C-Code für PIC]

=== MPX4115A ===
Analoger Drucksensor von Freescale (früher Motorola). Dort findet sich auch das [http://www.freescale.com/files/sensors/doc/data_sheet/MPX4115A.pdf Datenblatt].

Daten:
* Der Sensor gibt 45.9mV/kPa aus.
* Versorgungsspannung: 5V
* Genauigkeit (0-85°C): +-15 mbar

Vorteile:
* teilweise (0..90°C) temperaturkompensiert

Nachteile:
* geringe Genauigkeit im Vergleich zu den anderen Sensoren

Bezugsquellen:
* Reichelt 13,70 € (20.11.2012)

=== MPL3115A2 ===
Drucksensor von Freescale (früher Motorola) mit digitaler Datenausgabe über I2C. Dort findet sich auch das [http://www.freescale.com/files/sensors/doc/data_sheet/MPL3115A2.pdf Datenblatt].

Daten:
* Messbereich 500..1100 hPa
* Versorgungsspannung: 1.95 .. 3.6 V
* Genauigkeit (0-50°C): 4 hPa
* Auflösung: 1.5 Pa bzw. 0.3 m

Vorteile:
* Datenaufbereitung On-Chip, Ausgabe Druck, Höhe, Temperatur

Nachteile:
* t.b.d.

Bezugsquellen:
* DigiKey 2,31 €, RS-Components3,02 € (10.11.2013)

=== SCP1000 ===

Digitaler Absolutdruck-Sensor von VTI.

[http://www.vti.fi/en/support/obsolete_products/pressure_sensors/ Datenblatt]

Daten:
* Versorgung mit 2,4 bis 3,3 V
* Auflösung: 0,015 mbar
* Genauigkeit absolut (10 - 40°C): 1,5 mbar
* Messfrequenz (reduzierte Auflösung): max 9 Hz

Vorteile:
* SPI- oder I2C-Schnittstelle
* fertig kalibriert
* bis zu 17-bit Auflösung (entspricht 8cm)
* keine komplexen Kompensationsberechnungen beim Auslesen nötig

Nachteile:
* kleines SMD-Gehäuse (QFN-ähnlich), darf nicht mit Heißluft oder Lötkolben gelötet werden
* Beim Hersteller unter "Obsolete products" gelistet, aber noch gut verfügbar

Bezugsquellen:
* Aevum-Mechatronik (ca. 17 EUR)
* Breakout-Boards bei Sparkfun

=== BMP085 ===

Digitaler Absolutdrucksensor von Bosch Sensortec.

[http://www.bosch-sensortec.com/content/language1/downloads/BST-BMP085-DS000-05.pdf Datenblatt]

Daten:
* Versorgung mit 1,8 bis 3,6 V
* Auflösung: 0,01 mbar
* Genauigkeit absolut (0-65°C): max. Fehler +-2,5 mbar
* Messfrequenz (reduzierte Auflösung): max 220 Hz

Vorteile:
* I2C-Schnittstelle
* fertig kalibriert
* hohe Auflösung und Genauigkeit

Nachteile:
* aufwendige Kompensationsberechnungen nötig

Bezugsquellen:
* Digikey (ca. 8 EUR)
* [http://jeelabs.org/pp1 Breakout-Board von Jeelabs]
* Rutronik
* ACAL
* sparkfun
* Watterott

Beispielcode:
* [http://code.jeelabs.org/viewvc/svn/jeelabs/trunk/libraries/Ports/ Jeelabs Ports Library] C++ mit Floatingpoint (Toter Link)
* [https://github.com/jcw/jeelib Jeelabs PortsBMP085 Library] C++/Arduino Library (Port library interface to BMP085 sensors connected via I2C)

=== BMP180 ===
Der Nachfolger des BMP085 (siehe oben).

Dieser ist noch ein wenig kleiner, ansonsten laut Datenblatt identisch.

Das neue Datenblatt und Beispielcode kann hier [http://www.bosch-sensortec.com/de/homepage/products_3/environmental_sensors_1/bmp180_1/bmp180 (Herstellerseite)] gefunden werden.

Das Datenblatt des BMP180 erklärt auch den BMP085 etwas besser ;) (interne Register, Power-On-Reset ...)

Bezugsquelle (mit etwas Glück) :
ebay - internationale Suche
* BMP085 ab ca.3,5 $US (aktuell unter 3 Euro)
* BMP180 ab ca.6,0 $US (aktuell unter 5 Euro)
dort findet Ihr teilweise auch fertig aufgebaute Module (Chip auf Platine mit ein paar Bauteilen) z.B. als Modul für ARDUINO

PS : Für viele Anwendungen kann auf die Kompensation verzichtet werden (zB. nur Luftdruckanzeige) -> Druck (in Pascal) = UP*3

Februar 2016: Leider auch schon wieder abgekündigt, Nachfolger ist der sehr ähnliche BMP280.

=== BMP280 ===
Der Nachfolger des BMP180 (siehe oben).

Sehr ähnlich dem BMP180, leicht verbesserte Kennwerte
* Siehe auch: [https://www.mikrocontroller.net/articles/Temperatursensor#Bosch_Sensortec_BME280_.2F_BME680 Temperatursensor Bosch / Sensortec BME280 / BME680]

=== BME680 ===
Auch von Bosch, kann Luftfeuchtigkeit, Druck, Luftqualität

[https://www.bosch-sensortec.com/media/boschsensortec/downloads/datasheets/bst-bme680-ds001.pdf Datenblatt vom Hersteller]

* Betriebsspannung 1.71 bis 3.6 V
* Interface I²C, SPI

Kennwerte der Druckmessung
* RMS Noise 0.12 Pa (equiv. to 1.7 cm).
* Sensitivity Error ± 0.25 % (equiv. to 1 m at 400 m height change).
* Temperature coefficient offset ±1.3 Pa/K (equiv. to ±10.9 cm at 1°C temperature change),

150 Messungen/s bei niedrigster Auflösung, bis zu 16 fach oversampling
Ein Entwicklungsboard ist für ca 20€ zu bekommen.

=== LPS331 ===
Digitaler Absolutdrucksensor von STMicroelectronics
[http://www.st.com/web/en/resource/technical/document/datasheet/DM00036196.pdf (Datenblatt)]
* Betriebsspannung 1,8 bis 3.6 Volt
* Interface I²C, SPI

=== MS5611 ===
Digitaler Absolutdrucksensor von Measurement Specialties/MEAS
[http://www.amsys.info/sheets/amsys.en.ms5611_01ba03.pdf (Datenblatt)]
* Betriebsspannung 1,8 bis 3.6 Volt
* Interface I²C, SPI

[[Kategorie:Sensorik]]

Feuchtesensor

2020-12-01T17:39:38Z

Avrsteffen: /* Typen */

Feuchtigkeitssensoren bzw. Feuchtesensoren arbeiten meist nach dem Prinzip eines feuchtigkeitsabhängigen Kondensators. 

==Typen==
=== Bosch/Sensortec BME280, BME680 ===
I2C-Sensor Kombiniert für Temperatur, Luftfeuchtigkeit, Luftdruck (BME680 = BME280 + Luftgüte)
* Siehe auch: [https://www.mikrocontroller.net/articles/Temperatursensor#Bosch_Sensortec_BME280_.2F_BME680 Temperatursensor Bosch / Sensortec BME280 / BME680]

===Dallas/Maxim DS1923===
Eigentlich ein Temperatur-& Feuchtelogger, aber auch nur als Sensor verwendbar. 
Edelstahl-1wire-iButton mit Lithiumzelle 
Gibt es nicht mehr als Sample, kostet etwa 50 Euro bei www.spezial.de. 
Hygrochron Temperature/Humidity Logger iButton with 8KB Data-Log Memory 
http://www.maxim-ic.com/quick_view2.cfm/qv_pk/4379/t/al

===Philips H1 2322 691 90001===
vom Reichelt (Datenblatt dort downloaden): 
jetzt von vishay hergestellt: http://www.vishay.com/docs/29001/23226919.pdf 
Applikation von Valvo dazu:
http://docs.poulter.de/Elektronik/Sensoren/Luftfeuchtesensor%20VALVO.pdf (link down) 
https://web.archive.org/web/20060618143150/http://docs.poulter.de/Elektronik/Sensoren/Luftfeuchtesensor%20VALVO.pdf 
FEUCHTESENSOR Sensor für Feuchtigkeit € 10.00 
Feuchtesensor zur Messung und Regelung der relativen Luftfeuchte 
Kapazität: 122pF +/-15%
Empf.(Frel=43%): 0,4pF/%Frel 
Meßfrequenz: 1kHz...1MHz
Meßbereich: 10%...90% 
Top: 0°C...+85°C
Vmax: 15V 
Weitere Informationen zu diesem Artikel finden Sie in den Datenblättern

Auswerten z. B. mit einem Oszillator muss man selbst!

===ChipCap2 von Amphenol Advanced Sensors (früher GE Measurement & Control)===
Temperatur- und Luftfeuchtesensor 
Analogausgang oder Digitalausgang (I²C) 
Bei Analogausgang ist ein einfacher RC-Filter nötig (Pulsdichtemodulation) 
Beide Varianten verfügen über einen bzw. mehrere Alarmausgänge (Push-Pull, Open Collector) 
Messbereich: 
0% rH - 100% rH nicht kondensierend, -40 °C - 125 °C 
Genauigkeit: 
+-2% rH von 20% rH - 80 % rH, außerhalb +-4% rH 
+-0,3 °C von 20 °C - 40 °C 
Versorgungsspannung je nach Variante 3,3V oder 5V 
Gehäuse: SMD oder SIP (1,27 mm, ähnlich SHT71) 

Datenblätter: 
http://www.ge-mcs.com/download/moisture-humidity/920-558B-LR.pdf 
http://www.ge-mcs.com/download/moisture-humidity/920-628A-LR.pdf 
Anwendungsdatenblatt: 
http://www.ge-mcs.com/download/moisture-humidity/916-127B.pdf 

Preise (Stand 3/2014): ab 6,38 € (Mouser) 

===KM33 von Innovative Computer===
ab € 43,00 
Schuricht 115-245057 
vermutlich auch nur ein variabler Kondensator

===HIH-3610, HIH3610===
von Honeywell (sehr linear, aber über € 23,00) 
analoger Ausgang 0..4V 
Versionen:
* -001 RM 2,54 unkalibriert
* -002 RM 1,27 unkalibriert
* -003 RM 2,54 kalibriert
* -004 RM 1,27 kalibriert
Nachtrag: sind abgekündigt, Nachfolger: 
HIH-4000-00x, HIH-4010-00x, HIH-4021-00x, HIH-4030-00x und HIH-4031-00x 

Mittlerweile ist der HIH-5030/31 aktuell. (Stand: Sep. 2009)

http://catalog.sensing.honeywell.com/ss.asp?FAM=humiditymoisture 
Für den Sensor HIH-3605 gibt es eine Applikation, in der der Sensor an den 1-wire Bus von Dallas angeschlossen wird. Der Sensor läßt sich so mit einer verdrillten Leitung betreiben und auslesen. 
http://www.sensorsmag.com/sensors/humidity-moisture/a-1-wire-humidity-sensor-1080

===H25K5A===
von Sencera (<4€ bei CSD) 
Variabler Widerstand bei Wechselspannung. 
Bereich 0..+60°C, 20..90%RH. Achtung: auch Lagerung nur bis 90%RH 
Temperaturkompensierte Messung über Spannungsteiler mit handelsüblichem NTC.
 

===HS1101===
von Humirel (~14€ bei CSD) 
Variable Kapazität, 164..200pF. 
Temperaturbereich -40..+100°C. 
Temperaturkompensierter Oszillator mit CMOS-Timer 555 im Datasheet.

===HYT371===
von Hygrosens (~11€ bei Reichelt) 
Temperaturbereich -40..+100°C. 
Genauigkeit 3% rF, 0.4°C 
Interface I2C 
Meßprinzip kapazitiv 
Es gibt diverse weitere Sensoren, die Dokumentation ist allerdings bei allen sehr schlecht bzw. steht in separaten Dokumenten unter [http://www.hygrosens.com/produkte/sensorelemente/digitale-feuchtesensoren.html Doku]. 
Für Parallelbetrieb mehrerer Sensoren läßt sich die I2C Adresse im EEPROM ändern (Beitrag: [http://www.mikrocontroller.net/topic/222242#2234294 I2C Adresse ändern]).
sieht auch: HYT Serie von [http://www.hygrosens.com/produkte/sensorelemente/digitale-feuchtesensoren.html Hygrosens Instruments Web-Seiten]

===INSED===
* HIH3602A Feuchtigkeit und Temperatur (ab € 79,00) bei RS-Components
* HIH3602C Feuchtigkeit und Temperatur (ab € 82,00) bei RS-Components

Bezugsquellen: 
INSED GmbH + Co KG Sensoren für die Industrie Kronenstr 10 70794 Filderstadt 0711-9972758 Fax 9972762 
IBA GmbH Ingenieurbüro für Sensorik
Am Sandborn 14 63500 Seligenstadt 06182 95980 
Schuricht, RS-Components, Farnell 

===www.vaisala.be===
* 17204HM-humichip- mit Temp-Sensor KTY85-110 (special selection), analog 0..1V 
* 17205HM ohne Temp-Sensor analog 0..1V 

Datenblatt fand ich nicht auf deren Homepage, aber im Forum: 
http://www.mikrocontroller.net/forum/read-1-15717.html#48616 

Vermutlich verkaufen sie lieber fertige Module: 
http://www.vaisala.com/businessareas/instruments/products/humidity 
http://www.vaisala.com/businessareas/instruments/products/humidity/modules/oemmodules

===Sensirion===
Von [http://www.sensirion.com Sensirion] gibt es eine ganze Reihe kombinierter Feuchte- und Temperatursensoren mit digitaler Schnittstelle.
* Sensoren mit digitaler 2-Draht Schnittstelle (nicht kompatibel zu I2C): SHT10, SHT11, SHT15, SHT71, SHT75
* Sensoren mit I2C-Schnittstelle: SHT21, SHT25
* Eval-Kits: EK-H4 EK-H5 (für SHT1x, 2x, 7x)

Siehe hierzu auch:
* [http://pic-projekte.de/phpBB3/viewtopic.php?f=39&t=94 Assembler Ansteuerung]

===Silicon Labs===
Von [http://www.silabs.com Silicon Labs] gibt es einen kombinierten Feuchte- Temperatursensor mit I2C. Temperaturbereich -45 °C - 85 °C, Feuchte 0% bis 100%, [http://www.silabs.com/products/sensors/humidity-sensors/Pages/Si7005.aspx Si7005]
Bezugsquelle: SiLabs direkt bzw. über Mouser

===E+E Elektronik===

[http://www.epluse.com www.epluse.com]

Von E+E Elektronik gibt es einige Sensoren für verschiedene Anwendungsbereiche und Montagearten:

*HC1000 High End Feuchtesensor für hochpräzise Anwendung
*HC201 Sensor für Standardanwendungen

Erhältlich bei Distrelec HC1000 [https://www.distrelec.at/feuchtesensor/e-e-elektronik/hc1000-0-100/241104] und HC201 [https://www.distrelec.at/feuchtesensor/e-e-elektronik/hc201/245000]

*HCT01 kombinierter Feuchte- und Temperatursensor im SMD Gehäuse mit Schutzbeschichtung; Datenblatt [http://www.epluse.com/fileadmin/data/product/hct01/Datenblatt_HCT01.pdf]

Module

*Gut geschützes Modul EE04 [https://www.distrelec.at/feuchte-temperatur-messumformer/e-e-elektronik/ee04-ftb4a7-ha010305/245002]

*Kleiner Messumformer für Temperatur und Feuchte EE06 [https://www.distrelec.at/feuchte-temperatur-messumformer/e-e-elektronik/ee06-ft1a1/245284]

===Hoperf===
HH10D Humidity sensor
*C-F Wandler mit Kalibrierdaten im EEPROM [http://www.hoperf.com/sensor/app/HH10D.htm]

==Informationen==

* Applikationnote [http://www.sensirion.com/images/getFile?id=91 #91 (PDF)] und [http://www.sensirion.com/images/getFile?id=95 #95 (C-Quellcode)] des Herstellers
* [http://www.mikrocontroller.net/topic/48590#372123 C-Bibliothek] von Timo Dittmar im Forum
* [http://www.mikrocontroller.net/topic/145736 C-Bibliothek] in der Codesammlung
* Fertige Ansteuerung durch AVR ATMega in [http://www.ethersex.de/index.php/SHT Ethersex]

Bezugsquellen u.a.:
* http://www.driesen-kern.de/ und CSD (SHT11, 20€)
* [http://www.tme.eu/de/katalog/#id_category%3D100525%26cleanParameters%3D1%26path%3D%3B100124%3B100249%3B100525 TME]
* [http://www.csd-electronics.de/de/index.htm CSD] (Klick: ICs >> Sensoren >> Feuchtigkeit)

==Übersicht==

{| class="wikitable sortable" id="tabelleabc"
|+ '''tabellarische Übersicht 11/2013'''
|-
! Bauteil || Hersteller || Schnittstelle || Temperatur inkl.
|-
|DS1923 || Maxim || digital || ja
|-
|2381 691 90001 || Vishay || analog || nein
|-
|P14 || ISTAG || analog || nein
|-
|MK 33 || ISTAG || analog || nein
|-
|HYT-271 || ISTAG || I2C || ja
|-
|HYT-221 || ISTAG || I2C || ja
|-
|HYT-939 || ISTAG || I2C || ja
|-
|HIH-6000 series || Honeywell || I2C/SPI || ja
|-
|HIH-4000 series || Honeywell || analog || nein
|-
|HIH-1000 series || Honeywell || analog || nein
|-
|H25K5A || Sencera || analog || nein
|-
|818 || Sencera || analog || nein
|-
|H23K5A || Sencera || analog || nein
|-
|H12K5 || Sencera || analog || nein
|-
|HTS2030SMD || Measurement Specialties || analog || ja
|-
|HTU21D || Measurement Specialties || I2C || ja
|-
|HS1101LF || Measurement Specialties || analog || nein
|-
|KFS140-D || B+B Thermo-Technik || analog || nein
|-
|KFS33LC || B+B Thermo-Technik || analog || nein
|-
|SHT10 || Sensirion || digital || ja
|-
|SHT11 || Sensirion || digital || ja
|-
|SHT15 || Sensirion || digital || ja
|-
|SHT20 || Sensirion || I2C || ja
|-
|SHT21 || Sensirion || I2C || ja
|-
|SHT25 || Sensirion || I2C || ja
|-
|SHT71 || Sensirion || digital || ja
|-
|SHT75 || Sensirion || digital || ja
|-
|Si7005-B || Silicon Labs || digital || ja
|-
|HCT01 || E+E Elektronik || analog || nein
|-
|HC109 || E+E Elektronik || analog || nein
|-
|HC201 || E+E Elektronik || analog || nein
|-
|HC103M2 || E+E Elektronik || analog || nein
|-
|AM2321 || Aosong || I2C || ja
|-
|DHT11 || Aosong || I2C || ja
|-
|AM2305 || Aosong || I2C || ja
|-
|AM2301 || Aosong || I2C || ja
|}

[[Kategorie:Sensorik]]

Temperatursensor

2020-12-01T17:30:42Z

Avrsteffen: /* Bosch Sensortec BME280 / BME680 */

Will man mit einem [[Mikrocontroller]] Temperaturen messen, dann braucht man
* einen [[Sensor]], der die Temperatur z. B. in eine Spannung oder einen Strom umsetzt
* einen [[ADC | AD-Wandler]], der das Signal digitalisiert. Der kann auf dem Sensor oder dem Mikrocontroller integriert sein.

Temperatursensoren gibt es nun in allen möglichen Varianten. Vom temperaturabhängigen [[Widerstand]] bis zum fertig abgeglichenen All-in-one-Bauteil mit digitalem Ausgang. Wie bei allen Sensoren sollte man auch hier genau hinschauen und [[Auflösung und Genauigkeit]] unterscheiden.

== Analoge Temperatursensoren ==

=== PT100 ===

Unter einem PT100 versteht man einen Platinwiderstand, der bei 0°C einen Widerstand von 100Ω hat.
Platinwiderstände sind temperaturabhängige Widerstände mit hoher Wiederholgenauigkeit und Konstanz[http://de.wikipedia.org/wiki/Konstante]. Wegen der relativ geringen Widerstandsänderung von nur ca. 0,4Ω pro Grad ist etwas mehr Schaltungsaufwand erforderlich als bei anderen Sensoren. Genauere Formeln zur Temperaturbestimmung gibt es u.a. bei [http://de.wikipedia.org/wiki/Pt100 Wikipedia]. Ein Schaltplan findet sich bei der [http://www.heise.de/ct/artikel/Sensibelchen-289608.html c't].

Die Sensoren gibt es auch mit anderen Widerstandswerten, z. B. mit 1000Ω und heißen dann entsprechend PT1000.

Vorteil:
* genormt
* großer Meßbereich
* hohe Linearität
* hohe Wiederholgenauigkeit
* einfach austauschbar

Nachteil:
* brauchen aufwändigere Auswerteschaltung

Links:
* [http://de.wikibooks.org/wiki/Linearisierung_von_resistiven_Sensoren/_Pt100 Wikibooks: Linearisierung von resistiven Sensoren - PT100]
* [https://www.heise.de/ct/artikel/Sensibelchen-289608.html c't-Artikel: Mikrocontroller-Programmierung: Timer, Sensoren und Drehgeber (mit PT100 Schaltung)]
* [http://www.maxim-ic.com/app-notes/index.mvp/id/3450 Maxim AN3450 Positive Analog Feedback Compensates PT100 Transducer]
* [http://www.maxim-ic.com/app-notes/index.mvp/id/4875 Maxim AN4875 High-Accuracy Temperature Measurements Call for Platinum Resistance Temperature Detectors (PRTDs) and Precision Delta-Sigma ADCs]
* [http://ww1.microchip.com/downloads/en/AppNotes/01154a.pdf Microchip AN1154 Precision RTD Instrumentation for Temperature Sensing]
* [http://www.analog.com/static/imported-files/application_notes/AN709_0.pdf Analog Devices AN709 RTD Interfacing and Linearization Using an ADuC8xx MicroConverter]

=== NTC/PTC ===

NTC und PTC sind temperaturabhängige Widerstände.

* NTC (engl. '''N'''egative '''T'''emperature '''C'''oefficient, Heißleiter), hat bei hohen Temperaturen seinen niedrigsten Widerstand, z. B. Silizium
* PTC (engl. '''P'''ositive '''T'''emperature '''C'''oefficient, Kaltleiter), hat bei niedrigen Temperaturen seinen geringsten Widerstand, z. B. Glühlampe

Um den Widerstandswert zu messen schaltet man sie mit einem normalen Widerstand oder einer [[Konstantstromquelle]] in Reihe zu einem [[Spannungsteiler]] und misst den Spannungsabfall. Eine Beispielschaltung findet sich [http://www.mathar.com/msp_thermo1.html hier].

Vorteil:
* billig (z.B. [https://www.reichelt.de/index.html?ACTION=446&LA=446&SEARCH=kty81 KTY81-x] bei Reichelt 0,52-0,75 € 2018-01-03)

Nachteil:
* müssen für höhere Genauigkeiten abgeglichen werden
* brauchen A/D-Wandler
* sind nichtlinear

Beispiele:
* KTY10-5
* KTY13-6
* KTY81-121
* KTY81-122
* KTY81-210

Links:
* [http://www.sprut.de/electronic/temeratur/temp.htm Temperaturabhängige Stromquelle und NTC/PTC inclusive Linearisierung]
*[http://www.umnicom.de/Elektronik/Mikrokontroller/Atmel/AtFan/AtFan.html#2.2.2 Berechnung des Linearisierungswiderstandes für gewünschten Temperaturbereich] der fällt sonst immer vom Himmel
* [http://www.mikrocontroller.net/topic/208587#2065880 KTY 10-5 Formelprobleme]
* [http://www.mikrocontroller.net/topic/225563 Codesammlung: Beispiel mit 0,5°C Auflösung]
* [http://preis-ing.de/extras/alle-berechnungen-im-schnellzugriff/automatisches-erzeugen-einer-ntc-tabelle/ Automatisches Erzeugen von C-Code zur NTC Auswertung] Aus den NTC Parametern und den Anforderungen wird ein schneller und schlanker C-Code generiert.

=== LMx35 ===

Eine IC-Familie, die pro Kelvin Temperaturänderung ihre Ausgangsspannung um 10 mV ändert. Die ICs gibt es in verschiedenen Genauigkeiten und Temperaturbereichen mit den Bezeichnungen LM135(A), LM235(A) und LM335(A). Der günstigste ist der LM335 mit einem Temperaturbereich von −40 … +100°C.
In verschiedenen Bauformen erhältlich. Beispielschaltungen finden sich im [http://www.national.com/ds.cgi/LM/LM135.pdf Datenblatt] und [http://www.suessbrich.info/elek/elektherm1.html hier]

Vorteile:
* hat auch ohne Kalibrierung eine Genauigkeit von einem Grad (bei 25°C)
* relativ billig (LM335 bei Reichelt ab 0,76 €)

Nachteile:
* benötigt A/D-Wandler
* bei längerer Anschlussleitung störanfällig

Links:
* [http://www.schramm-software.de/tipps/temperaturmessung/analogsensoren.htm Test-Schaltungen und -Code zur Auswertung mit ADC (AVR-Assembler)]

=== LM334 ===

Ein IC ähnlich dem LM335 mit dem Unterschied, dass der durch das IC fließende Strom proportional von der Temperatur abhängt. Mit einer einfachen Schaltung aus nur zwei Widerständen kann man dann den Strom in einer Weise wandeln, dass pro Kelvin eine Spannungsänderung von 10mV ausgegeben wird. Da die Strom-Spannungswandlung auf der Platine (und damit nahe am AD-Wandler) stattfindet und die Übertragung des Messwerts durch einen Strom stattfindet, sind Störungen durch Netzbrummen etc. viel geringer als beim LM335

Vorteile:

* relativ billig ([http://www.reichelt.de/?ARTICLE=10468 Reichelt 0,54 €])

Nachteile:
* benötigt A/D-Wandler
* Bereich 0°C-70°C

Ähnliche ICs:
* AD592 (Ausgangsstrom 1µA pro Kelvin, absolute Temperatur) [http://www.reichelt.de/?ARTICLE=3825 Reichelt: 3,75 €], Conrad 174912 8,50 €

=== SMT160-30 ===

Ist ein Zwischending zwischen Digital und Analog. Sein Ausgangssignal ist ein digitales PWM-Signal, zu dessen Messung man am besten den Input-Capture-Eingang eines Mikrocontrollers verwendet. Man kann ihn also wie einen analogen Sensor nur indirekt auslesen, anstatt über einen AD-Wandler hier über einen Timer.

Vorteile:
* Digitales PWM-Signal ist unempfindlich gegen Störeinflüsse
* gibt es in SO8, TO18, TO92 und TO220, gut befestigbar, z.B am Kühlkörper
* linear
* kein Abgleich nötig

Nachteile (viele):
* benötigt Timer
* jittert extrem, genaue Messungen nur über Mittelung / Filterung möglich
* nicht nur das PWM-Verhältnis, sondern auch die Frequenz ist temp-abhängig (1-4kHz)
* teuer (Farnell 10,90€ +16%, Conrad 9,xx€ , www.hy-line.de ??).
* TO92 Gehäuse ist günstiger, dafür weniger genau

Links:
* http://www.hy-line.de/co/sensor-tec/hersteller/smartec/smt-160-30/index.html

=== Thermoelement ===

Ein Thermoelement besteht im einfachsten Fall aus zwei ungleichen Metallendrähten, die an einem Punkt miteinander verbunden sind und bei dem die Verbindungsstelle einer anderen Temperatur ausgesetzt ist als die offenen Enden der Drähte. An den offenen Enden der Drähten entsteht eine Spannung (Thermospannung). Dieser Effekt wurde 1821 von Thomas Seebeck entdeckt ([http://de.wikipedia.org/wiki/Seebeck-Effekt Seebeck-Effekt] bei Wikipedia). Eine weitere Anwendung ist der thermoelektrische Generator ("Thermogenerator").

* MCP3421 18bit ADC 15SPS, I2C, auch mit andere Auflösungen erhältlich, Thermoelement kann direkt angeschlossen werden! (Reichelt : 2,10€)

Vorteil:
* über einen sehr weiten Temperaturbereich einsetzbar

Nachteil:
* die sehr geringen Temperaturspannungen im Mikrovoltbereich benötigen eine sehr gute Auswertelektronik (guter Analogteil + AD-Wandler). (aber: beachte MCP3421)

* Misst nur Temperaturdifferenz

Links:

* [http://www.sensorwell.at/fileadmin/templates/images/data_sheets/temperatur_messtechnik.pdf Warum Thermoelemente Relativtemperaturen messen! oder Was ist eine Kaltstelle?] - Technische Information von www.sensorwell.at (PDF, ca. 600kB)

=== indirekte Messung über die Temperaturabhängigkeit der Schallgeschwindigkeit ===

Acoustic Thermometry Measures Temperature To 0.1 Degree
http://www.linear.com/solutions/1558
AN131 http://www.linear.com/docs/39793 (PDF momentan nicht verfügbar) -->
http://www.mikrocontroller.net/topic/307557#new

== Digitale Temperatursensoren ==

=== AM2301 / DHT21 ===

Low Cost One-Wire Sensoren

* Stromversorgung: DC 3.3 - 5.2 V
* Ausgangssignal: 1-Draht-Bus - digitales Signal (One wire)
* Sensorelement: Polymer Feuchtigkeits-Kondensator
* Messbereich:
* Luftfeuchtigkeit: 0 - 100 % relative Luftfeuchte
* Temperatur: -40 °C bis +80 °C
* Genauigkeit:
* + - 3 % (Luftfeuchtigkeit)
* + - 0.5 °C (Temperatur)
* Auflösung oder Empfindlichkeit:
* Feuchtigkeit 0,1 % RH
* Temperatur 0.1 °C

Relativ großer Sensor, gibt es auch kleiner als DHT11 / DHT22 mit Drahtanschlüssen.
DHT11 :
* Genauigkeit:
* + - 5 % (Luftfeuchtigkeit)
* + - 2 °C (Temperatur)

Kosten ca. 2,00 € (Ali) ... 8,00 € (deutsche eBay Versender)

=== DS1621 ===

Der DS1621 ist Temperatursensor und A/D-Wandler in einem. Er gibt seine Daten per [[I²C]]-[[Bus]] aus. Ein Schaltplan für einen elektronischen Thermometer mit diesem IC findet sich [http://www.myplace.nu/avr/thermo/ hier].

Eine Library für den AVR: https://sourceforge.net/projects/ds1621avr/

Vorteile:
* bereits kalibriert
* kein A/D-Wandler nötig
* da I²C ein Bus ist, kann man mehrere DS1621 und andere I²C-Bausteine zusammen anschließen und braucht dafür trotzdem nur zwei I/O-Ports.
* Messbereich -55°C to +125°C
* Genauigkeit +-0,5°C
* Auflösung besser 0,01°C, wenn man die beiden Zählerregister (Count-Remain und Count-per-C) auswertet

Nachteile:
* teuer (Segor 5,80€; RS 3,95€; Conrad 5,22€)
* obwohl die meisten Register [[Speicher#NVRAM | nichtflüchtig]] sind, kann man ihn nicht als Stand-Alone-Thermostat einsetzen, da er erst nach einem Start-Conversion-Befehl zu messen beginnt.

Nachfolger:
* DS1631, DS1631A (Auto-Start-> Stand-Alone-Thermostat), DS1731
* weitere Stand-Alone-Thermostaten: DS1821, DS1629

=== LM75 ===

Der LM75 ist so ähnlich wie der DS1621, allerdings nur in SMD erhältlich und nicht so genau. Er ist aber öfters mal auf PC-Mainboards zu finden, so dass man beim Schlachten eines solchen günstig an einen Temperatursensor kommen kann. Eine Beispiel Schaltplan mit einem ATmega8 findet man [http://www.ucblog.de/2010/09/mikrocontroller-thermometer-schaltplan/ hier]

Vorteile:
* bereits kalibriert
* kein A/D-Wandler nötig
* I²C-Bus Ausgang
* billiger als DS1621 (Reichelt 1,45 €; RS 3V: 3,75€; 5V: 2,72€)
* Auflösung +-0,5°C

Nachteile:
* nur im SMD-Gehäuse erhältlich
* relativ ungenau (+-2°C), kann man jedoch kalibrieren / kompensieren

Kompatible Typen:
* AD7415ART
* DS7505S+

=== LM76 ===

Der LM76 ähnlich dem LM75, bietet aber eine 8-fach höhere Auflösung und eine Genauigkeit von 0.5 bzw. 1°C.

Vorteile:
* höhere Auflösung
* höhere Genauigkeit

Nachteil:
* schwerer zu beschaffen

=== TMP175 / TMP75 ===

Ähnelt dem LM75 stark! Temperatursensor von Texas Instruments.

Links:

[https://github.com/ManuelSchneid3r/RaspberryPi/blob/master/sensors/src/tmp.c Linux Kommandozeilen Tool für den Zugriff]

=== DS18S20 / DS18B20 ===

Der DS18S20 (Nachfolger des DS1820) und DS18B20 sind scheinbar Temperatursensoren und A/D-Wandler in einem. Wenn man genauer hinschaut, stellt man fest, dass es sich um direktwandelnde Sensoren handelt. Die Temperatur wird ohne Umweg über eine analoge Zwischengröße (Spannung oder Strom) in ein digitales Signal überführt.

Die Datenkommunikation erfolgt über ein 1-Wire-Interface, wodurch man am [[Mikrocontroller]] mit nur einem einzigen I/O-Pin auskommen kann. Außerdem beherrschen sie die parasitäre Stromversorgung, d.h., man braucht für Daten und Stromversorgung zusammen nur zwei Leitungen.

Beim DS18B20 sind Auflösungen von 9, 10, 11 und 12 Bits konfigurierbar. Je kleiner die Auflösung, desto kürzer ist die Messzeit. Der DS18S20 hat eine feste Auflösung von 12 Bits, wobei die unteren 4 Bits aufwändiger auszuwerten sind als beim DS18B20. Der DS18S20 ist als Ersatz für den DS1820 gedacht. Der Hersteller empfiehlt den DS18B20 für Neuentwicklungen.

Fehlervermeidung
* An jeden Sensor einen 100 nF Keramikkondensator.
* Pull Up kleiner, statt 4k7 nur 2k2 oder 1k0.
* Noch einen Widerstand von 10 Ohm, oder 46 ... 100 Ohm in REIHE zum AVR-Ausgang schalten, damit die Flanken flacher werden und Reflektionen unterdrückt werden.
* Dünne Anschlussleitungen verwenden, damit wenig Wärme durch die Anschlussleitungen übertragen wird. z.B: 0.2mm Cu-Lack-Draht verwenden, zumindest für die letzten 5 cm.

Vorteile:
* bereits kalibriert
* Genauigkeit +-0,5°C
* 1-Wire-Ausgang

Nachteil:
* Reichelt: 1,60€ / CSD: 1,59€ / Conrad 5,08€

Links:
* [http://www.avr-projekte.de/ds18b20.htm Ein oder mehrere DS18B20 DS18S20 über Romcode einlesen. AVR-Assembler]
* [http://pic-projekte.de/wiki/index.php?title=Ansteuerung_eines_DS18S20 Ansteuern eines DS18S20 in C (PIC)]
* [http://pdfserv.maxim-ic.com/en/ds/DS18S20.pdf Datenblatt DS18S20]
* [http://pdfserv.maxim-ic.com/en/ds/DS18B20.pdf Datenblatt DS18B20]
* [http://www.maxim-ic.com/app-notes/index.mvp/id/4377 Vergleich DS18B20 <-> DS18S20]
* [http://www.mikrocontroller.net/topic/6505 Code zur Ansteuerung (ASM ATTiny12)]
* [http://www.mikrocontroller.net/topic/14792 Code zur Ansteuerung (AVR-GCC)]
* [https://www.mikrocontroller.net/topic/494918 Fehlervermeidung]
* [http://gandalf.arubi.uni-kl.de/avr_projects/tempsensor/ Code zur Ansteuerung mit CRC-Prüfung (AVR-GCC)]
* [http://www.schramm-software.de/tipps/temperaturmessung/digitalsensoren.htm Code zur Ansteuerung mit CRC-Prüfung (AVR-Assembler)]
* [http://chaokhun.kmitl.ac.th/~kswichit/avrthermo/avrthermo.html LED-Thermometer mit AT90S2313 (C)]
* [http://www.mikrocontroller.net/forum/read-4-248219.html Webserver zur Ansteuerung von bis zu 63 Bausteinen]
* [http://www.teslabs.com/openplayer/docs/docs/other/ds18b20_pre1.pdf PDF Anleitung zur Beschaltung und Programmierung (C)]
*[http://www.digitemp.com/building.shtml Anleitung Sensorfühleraufbau (DigiTemp)]
* [http://www.mikrocontroller.net/topic/14792 Forumsbeitrag]: Onewire + DS18x20 Ansteuerung in C
* [http://www.mikrocontroller.net/topic/232156 Forumsbeitrag]: Timing der parasitären Versorgung
* [https://www.mikrocontroller.net/topic/387139#4602608 Projekt]: Onewire + DS18x20 Bibliothek

=== DS1822 ===

Ähnlich wie DS18S20, aber weniger genau (+-2°) und in großen Stückzahlen billiger. Wegen der geringeren Verbreitung kommt der Preisvorteil aber bei Einzelstücken nicht beim Kunden an. So kostet er bei Reichelt mit 3,50€ mehr als der DS18S20.

=== DS1921 / DS1922 ===

Sind wie die DS1821 1-wire-Sensoren mit zusätzlicher Logging-Funktion.
Im iButton-Gehäuse befindet sich eine Lithium-Zelle, eine RTC, CMOS-RAM und der Temp-Sensor. Nach umfangreicher Progammierung startet der Button seine Mission (Aufzeichnung des Temperaturverlaufs).
Gibt es auch mit zusätzlicher Feuchtemessung (DS1923).

=== TSic ===

Die TSic Sensoren werden baugleich von 2 Herstellern angeboten:
* IST AG ([http://www.ist-ag.com/en/products-services/temperature-sensors Homepage])
* B+B Thermo-Technik ([https://shop.bb-sensors.com/Temperaturmesstechnik/Temperatursensoren/Digitaler-TSic-Temperatursensor-TO92.html Homepage])

Die TSic Sensoren ([https://shop.bb-sensors.com/out/media/Datasheet_Digital_Semiconductor_temperatur_sensor_TSIC.pdf Datenblatt]) geben ihre Temperaturmessdaten automatisch in einem festen Intervall aus. Daher muss der Host nur warten bis die nächsten Messdaten rausgeschickt werden. Die TSic Sensoren die es im freien Handel gibt, geben ihre Messdaten alle 100ms (10Hz) aus.
Zur Übertragung wird das [http://www.ist-ag.com/eh/ist-ag/resource.nsf/imgref/Download_ZACWireAppNotes.pdf/$FILE/ZACWireAppNotes.pdf ZACwire] Protokoll benutzt. Es handelt sich um eine einfach zwei Byte Übertragung per Manchester-Code. Diese zwei Byte repräsentieren den digital gewandelten Temperaturwert. Im Gegensatz zu Sensoren wie den DS18xxx von Dallas muss dieser Wert aber erst auf einen dezimalen Wert umgerechnet werden.
Die Sensoren kommen mit 3 Pins aus (VCC, GND, Dout).

Vorteile:
* Bereits kalibriert
* Verschiedene Genauigkeiten lieferbar
* Sehr einfaches Kommunikationsprotokoll
* Geringer Stromverbrauch
* Hochgenau: bis zu +/- 0.1°C (TSic 50x)

Nachteil:
* Recht teuer (Reichelt: 4,70€ für den TSic206)
* Nur ein Sensor an einem I/O nutzbar (Kein Bussystem)

Achtung!
Die TSic Sensoren gibt es auch als Version mit analog Ausgang. Bei der Typenbezeichnung gibt die 3. Stelle an ob es sich um die analog- oder Digitalversion handelt (1 = analog, 6 = digital).
Der TSic201 ist also analog, wärend der TSic206 ein digitaler ist.

Links:

* [http://www.mikrocontroller.net/topic/283615#3025721 ZACwire Protokoll im Logic Analyzer]
* [http://www.mikrocontroller.net/topic/159774?goto=3157908#3157908 C-Code, (ohne Interrupt und ohne Timer) Sensor wird eingeschaltet->gelesen->ausgeschaltet]
* [http://www.avr-projekte.de/zacwireasm.htm Zacwire Protokoll, AVR-Assembler]
* [http://www.loetstelle.net/projekte2/tsic306/tsic306.php GCC AtMega8 Interruptgesteuerte Statemachine für TSIC206/306]
* [http://www.mikrocontroller.net/topic/45573#347765 Ansatz zum Empfang der Daten]
* [http://www.mikrocontroller.net/topic/225554# Beispiel mit Strobe ohne Interrupt]
* [http://www.mikrocontroller.net/topic/82087 Diskussion mit Beispielcode (MSP430, AVR, PIC) blockierend]
* [http://www.mikrocontroller.net/topic/144424#1367539 C++ Interrupt]
* [http://www.mikrocontroller.net/topic/88847 noch mehr C, problematisch Interrupt]
* [http://www.mikrocontroller.net/topic/151791#1426974 C für ATmega8]
* [http://www.mikrocontroller.net/topic/159149#1510455 auch problematisch]
* [http://www.mikrocontroller.net/topic/188462#1837622 fertiger Code zum Einlesen des Zacwire-Protokolls für PIC in ASM]
* [http://www.roboternetz.de/phpBB2/zeigebeitrag.php?t=55103 RN: Bascom]
* [http://www.avr-projekte.de/tinyclock.htm TSIC206 Thermometer mit Uhr und Kalender. Komplette Bauanleitung mit ASM Quellcode für AT-Tiny2313]
* [http://www.andeanelectronic.com/?Supporte___Arduino_con_TSic306%2CTSic506_y_TSic716 TSIC Routinen für Arduino von Andean Electronic aus Peru - Quelltext Dokumentation in Englisch]

=== SHT3x ===

Von [http://www.sensirion.com Sensirion] die aktuellen Versionen (2020) der Temperatur/Feuchte Sensoren

Vorteile:
* I2C
* Tempertur: +-0.3°C (SHT30) - +-0.1°C (SHT35)
* Temperaturbereich von -40 – +90°C
* Feuchtigkeit mit einer Genauigkeit von +-3 (SHT30) - 1.5%RH (SHT35)

Nachteile:
* nur als SMD-Package, gibt aber diverse Breakout-Boards zum Beispiel bei Adafruit oder Tindie [https://www.tindie.com/products/closedcube/sht35-d-digital-humidity-temperature-sensor/]

=== SHT1x/SHT7x (End of Life) ===

Der SHT1x/SHT7x (SHT10, SHT11, SHT15, STH71, SHT75) sind kombinierte Temperatur- und Feuchtesensoren von [http://www.sensirion.com Sensirion]. Sie unterscheiden sich in Bauform und Genauigkeit.

Vorteile:
* digitale Schnittstelle mit einfacher [[I²C]]-''ähnlicher'' Ansteuerung
* keine Kalibrierung notwendig
* Beispielcode (C, MC51) auf der Sensirion-Seite verfügbar (relativ leicht portierbar)
* interne Heizelemente (Funktionsprüfung, "raue" Umgebung)
* Spannungsmonitor ("Battery fail")
* sehr hohe Genauigkeit

Nachteile:
* kann nicht am [[I²C]] Bus betrieben werden, theoretisch gleiche Clockleitung möglich, fixe Adresse
* relativ teuer (Farnell 18,60€)(SHT11 bei CSD 14€)

[http://www.sensirion.com/de/produkte/feuchte-und-temperatur/ Übersicht] der Temperatur- und Feuchtigkeitssensoren von Sensirion.

=== SHT21 (End of Life) ===

[http://www.sensirion.com Sensirion] bietet auch den SHT21 Feuchtigkeits- und Temperatursensor an, welcher wesentlich genauer ist.

Vorteile:
* I2C digital, PWM and SDM/analog Volt Ausgabe
* Maximal 5 Messungen/s @ 14bit
* Temperaturbereich von -40 – +125°C
* Feuchtigkeit mit einer Genauigkeit von +-2%RH
* Günstig (3-4€ Farnell/RS 2014)

Nachteile:
* nur als SMD-Package

Application Notes und Datenblätter findet man [http://www.sensirion.com/en/products/humidity-temperature/humidity-sensor-sht2x/ hier].

=== ADT7310 / ADT7xxx-Familie von AD ===

Der [http://www.analog.com/en/sensors/digital-temperature-sensors/adt7310/products/product.html ADT7310] von [http://www.analog.com/ Analog Devices] besitzt eine Auflösung von 16 Bit und eine Genauigkeit von ±0.5°C im Bereich von −40°C bis +105°C.

Vorteile:
* Ansteuerung per [[SPI]] ADT73xx oder [[I2C]] ADT74xx
* keine Kalibrierung notwendig
* hohe [[Auflösung und Genauigkeit]]: 16 Bit
** ADT7x02 2,00°
** ADT7x01 1,00°
** ADT7x10 0,40 / 0,50°
** ADT7x20 0,20 / 0,25°
* auch für automotive / als Die lieferbar
* programmierbarer [[Interrupt]]ausgang für Unter- und Übertemperatur
* relativ günstig (ca. 3-8€ bei Digi-Key, Stand 12/2011)

Nachteile:
* TBD

NB: ONsemi hat auch Temperatursensoren mit der Bezeichnung ADT7xxx, verwendet aber ein anderes Namensschema

=== TSYS01 / G-NICO-018 von Measurement Specialties Inc. ===
* sehr hohe [[Auflösung und Genauigkeit]]: 0,10° @ -5°C … +50°C 16/24 Bit
* Gehäuse 16-VQFN Exposed Pad
* SPI / I2C über Pin auswählbar
* Preis: 8,60 (4,40 @1k) bei Digikey
kleiner Nachteil: der Sensor liefert den ADC-Wert und die Kompensationskonstanten (5 Polynom-Koeffizienten), mit denen im µC die Temperatur berechnet werden muss.

=== SE95 ===

Der [http://www.nxp.com/documents/data_sheet/SE95.pdf SE95] von NXP hat 13 Bit Auflösung, Genauigkeit ±2°C im Messbereich von -55°C bis +125°C, I²C, Gehäuse SO8 und TSSOP8. Einzelstück-Preis bei Segor 1,50€ (2012/I)

=== Bosch Sensortec BMP085 / BMP180 ===
Die BMP085 (bzw. der verbesserte, aber Pin- und Software-komapatible Nachfolger BMP180) sind eigentlich Luftdrucksensoren, die jedoch auch einen Temperatursensor mitbringen. Der Anschluss erfolgt über I2C.

Vorteile:
* Wenig Stromverbrauch (5µA bei 1 Messung/s)
* Liefern Luftdruck gleich mit
* Absolute Genauigkeit (+-1°C typ. über kompletten Temperaturbereich). Relative Genauigkeit ist im Datenblatt nicht spezifiziert, gemessen gegen einen SHT11 ca. +-0.1°C.
* Auflösung: 0.1°C mit Herstellercode, mehr ist möglich (16Bit)
* Fertige Platinen für wenig Geld verfügbar (ca. 1,70€ inkl. Versand aus China)

Nachteile:
* Sehr aufwändige Linearisierung (Kalibrationskoeffizienten sind im Sensor gespeichert, müssen aber vom Host-µC verrechnet werden. Code ist im Datenblatt)
* Nur als SMD
* Bei Reichelt und Conrad nicht erhältlich.

Preis: Ebay 1,70€ (mit Platine, China), Aliexpress 1,10€ (nackter Chip, China, mind. 10 Stück sonst auch ca. 1,70€)

=== Bosch Sensortec BME280 / BME680 ===
* I2C-Sensor für Temperatur, Luftfeuchtigkeit, Luftdruck (BME680 = BME280 + Luftgüte)

Vorteile:
* Breakout-Board BME280 Aliexpress ~2,20€, BME680 Watterott 15,95€
* Bosch-eigene Bibliotheken für gängige Mikrocontroller, Android und RaspberryPi
* Arduino-Bibliotheken von Adafruit, Sparkfun und Watterott
* Minimaler Platzbedarf
* SMT ermöglicht doppelseite Platine mit BME280/BME680 auf Frontseite und restlicher Elektronik auf Rückseite

Nachteile
* Ball-Grid-Array Reflow, manuelles Löten nur mit Breakout-Board oder Vias möglich

Bibliotheken/Datenblätter/Herstellerinformation:
* BME280: https://www.bosch-sensortec.com/bst/products/all_products/bme280
* BME680: https://www.bosch-sensortec.com/bst/products/all_products/bme680

Projekte/Code
* [ASM] [https://www.mikrocontroller.net/topic/506743#6473604 BME280 mit OLED Display am ATmega808]
* [ASM] [https://www.mikrocontroller.net/topic/506743#6495985 BME280 mit OLED Display am ATtiny85]

Preis: BME280 / BME680 Reichelt 5,20€ / 9,45€, Conrad 8,33€ / xxx, Aliexpress ~2,50€ / ~15,-€

=== HDC1080 ===
Der HDC1080 von Texas Instruments kombiniert einen digitalen Luftfeuchtesensor mit Temperaturmessung. Der Anschluss erfolgt über IC2.

Merkmale:
* geringe Stromaufnahme (1,3 µA bei 1 Messung/s)
* gleichzeitige Luftfeuchtemessung möglich
* Spannungsversorgung: 2,7 bis 5,5 V
* Genauigkeit: +/-0,2 °C typ. (im Temperaturbereich zwischen 5 bis 60 °C)
* Auflösung Temperatur: 11/14 bit wählbar
* Maximale Dauer einer Messung: 6,5 ms
* eingebautes Heizelement (gegen Feuchtigkeitskondensation, per Konfigurationsregister einschaltbar)
* Herstellerseitig kalibriert
* einfache Umrechnung
* Gehäuse: SMD 6-Pin PWSON (3x3 mm)

Erhältich als Pmod (''PmodHygro'' von Digilentic) und in Breakoutboards zahlreicher anderer Hersteller.

== Preisübersicht ==

{| class="wikitable"
|+ '''Preisübersicht 11/2012'''
|-
! Bauteil || Segor || RS-Components || Conrad || Farnell || Reichelt || DigiKey
|-
| AD592 || 21,40 || 5,74 || 6,43 || 5,90 || 3,95 || 4,61
|-
| ADT7310 || - || - || - || 4,56 || - || 3,02
|-
| ADT7410 || - || 3,35 || - || 2,71 || - || 3,02
|-
| DS1621 || 7,60 || 5,29 || 5,08 || 5,65 || - || 4,54
|-
| DS1629 || 8,70 || 8,68 || - || 5,00 || 6,50 || 7,65
|-
| DS1631 || 8,00 || 2,91 || - || 3,11 || - || 3,94
|-
| DS1731 || - || - || - || 9,79 || - || 3,81
|-
| DS1821 || 5,90 || 5,27 || 6,27 || - || - || 5,05
|-
| DS18B20 || 2,50 || 3,06 || - || 3,26 || 3,20 || 3,93
|-
| DS1921 || - || 26,15 || - || - || - || 21,13
|-
| DS1922 || - || 62,00 || - || - || - || 43,11
|-
| DS1923 || - || 97,96 || - || - || - || 80,30
|-
| KTY81/121 || - || - || - || 0,79 || 0,59 || 0,85
|-
| LM75 || 1,50 || 0,68 || 3,64 || 0,81 || 1,45 || 0,82
|-
| LM76 || - || 2,83 || - || 3,02 || - || 2,39
|-
| LM135 || 10,10 || 10,28 || - || 8,95 || 7,95 || 10,26
|-
| LM235 || - || - || - || 1,80 || 1,40 || 1,26
|-
| LM334 || 0,90 || 0,72 || 1,67 || 1,01 || 0,49 || 0,74
|-
| LM335 || 1,30 || 0,56 || 1,92 || 0,55 || 0,71 || 0,80
|-
| PT100 || 3,80 || 3,99 || 4,00 || 9,79 || 4,27 || 0,68
|-
| SE95 || 1,50 || 0,63 || - || 1,45 || - || 1,00
|-
| SHT11 || 26,00 || 24,38 || 33,20 || 25,65 || - || 36,76
|-
| SHT15 || - || 27,69 || 36,30 || 28,72 || - || -
|-
| SHT21 || 29,50 || 18,10 || - || 21,16 || - || -
|-
| SHT71 || 25,40 || 29,06 || 36,89 || 30,88 || - || -
|-
| SHT75 || - || 33,77 || 42,48 || 35,52 || - || -
|-
| SMT160-30 || - || 9,28 || 8,14 || 12,38 || - || -
|-
| TMP75 || - || 0,80 || - || 0,85 || - || 1,37
|-
| TSic206 || - || - || 5,84 || - || 4,20 || -
|}

== Siehe auch ==

* [https://www.mikrocontroller.net/forum/mikrocontroller-elektronik?filter=temperatur* Beiträge im Forum]
* [[Feuchtesensor]]

[[Kategorie:Sensorik]]

Multiplikation in Assembler

2020-12-01T17:04:24Z

Avrsteffen: /* Wie funktioniert das ganze? */

Multiplikation in Assembler

2020-12-01T13:27:18Z

Avrsteffen: /* signed x signed */

Multiplikation in Assembler

2020-12-01T13:24:25Z

Avrsteffen: /* signed x unsigned */

Multiplikation in Assembler

2020-12-01T13:23:02Z

Avrsteffen: /* mul_32x32_64 */

Multiplikation in Assembler

2020-12-01T13:20:19Z

Avrsteffen: /* _muls_24x24_48 */

Multiplikation in Assembler

2020-12-01T13:19:30Z

Avrsteffen: /* signed x signed */

Multiplikation in Assembler

2020-12-01T13:16:41Z

Avrsteffen: /* signed x unsigned */

Multiplikation in Assembler

2020-12-01T13:15:30Z

Avrsteffen: /* _mulsu_32x8_40 */

Multiplikation in Assembler

2020-12-01T13:14:23Z

Avrsteffen: /* unsigned x unsigned */

Multiplikation in Assembler

2020-12-01T13:13:26Z

Avrsteffen: /* MACRO */