So, durch den ersten Tipp von PicNick bin ich zumindest bei der Segmentansteuerung sehr kompakt fertig.

Nun hängt es noch bei der Dezimalstellenauswahl. Ich möchte eine vierstellige Variabel stellenweise aufsplitten, versuche dafür den "Mid"-Befehl - aber (mal wieder) komme ich mit den Variablenarten nicht richtig klar.


Vereinfacht (und völlig erfolglos) versuche ich gerade :

Code:
x=3465 (anzuzeigende zahl)

do
    y=mid(x,3,1)     (rechte Ziffer, einer/5, soll selektiert werden)
    pin1=1              kathode einer ein
    zeige segmente

    y=mid(x,2,1)     (zehner/6 soll selektiert werden)
    pin2=1              kathode zehner ein
    zeige segmente

    y=mid(x,1,1)     (hunderter/4)
    pin3=1
    zeige segmente
 
    y=mid(x,0,1)     (tausender/3, linke linke Ziffer)
    pin4=1
    zeige segmente
loop