Zahl umformen für 7-Segment-Anzeige

Mein Display besteht aus vier 7-Segment-Anzeigen, die über
SOftware-Multiplexing angesteuert werden.

Ich habe jetzt das Problem, das ich eine Zahl (z.B. 1024) auf dem
Display ausgeben möchte. Mir fehlt jetzt die Umformungsroutine, damit
die richtige Ziffer an der richtigen Position erscheint.

Wie sieht so etwas aus?
Das ganze sollte über Offset passieren, da ich eine Tabelle für die
richtige Ziffernanzeige angelegt habe, also

Ziffer4 --> 1
Ziffer3 --> 0
Ziffer2 --> 2
Ziffer1 --> 4

Ich benutze zurzeit BASCOM-AVR.

Hier ein kurzer Codeschnipsel:

7seg4 = Lookup(digit1 , Digits)
7seg3 = Lookup(digit2 , Digits)
7seg2 = Lookup(digit3 , Digits)
7seg1 = Lookup(digit4 , Digits)

Digits:
Data &H81 , &HB7 , &HC2 , &H92 , &HB4 , &H98 , &H88 , &HB3 , &H80 ,
&H90
'       0     1      2      3      4      5      6      7      8
9    ohne punkt