Also, du hast
Code:
7-Segment    PORTC     ?     a, b, c, d, e, f, g   DP
Kathoden      PORTB     ?     0001 0010 0100 100



Dim Zahl As Word                                            ' dein timer 0-9999

DIM strg AS STRING * 5                ' timer als ASCII-String
DIM ziffern(4) AS BYTE AT strg OVERLAY   ' zum multiplexen
DIM dez_p AS BYTE                      ' dezimalpunkt on/off
DIM tmp AS BYTE
      strg = "9999"
DO
      PORTB = &HFE
      tmp = ziffern(1)
      tmp = tmp AND &H0F
      PORTC = lookup( tmp , Tabelle)

      PORTB = &HFD
      tmp = ziffern(2)
      tmp = tmp AND &H0F
      tmp = lookup( tmp , Tabelle)
      PORTC = tmp OR  dez_p

      PORTB = &HFB
      tmp = ziffern(3)
      tmp = tmp AND &H0F
      tmp = lookup( tmp , Tabelle)
      PORTC = tmp OR  dez_p

      PORTB = &HF7
      tmp = ziffern(4)
      tmp = tmp AND &H0F
      PORTC = lookup( tmp , Tabelle)


LOOP

END

Timer_isr:
    if Zahl > 0 then
           zahl = zahl - 1
           strg = str(zahl)
    end if
    dez_p = dez_p XOR &H04    ' dezimalpunkt an/aus
   return


Tabelle:
 DATA   &H79
 DATA  &H24
 DATA  &H30
 DATA  &H19
 DATA  &H12
 DATA  &H2
 DATA  &H78
 DATA  &H0
 DATA  &H10
 DATA  &H40
Das mit dem Timer richtig zählen kannst du ja.
ich zähl da nur runter

Ich hab angenommen, die hast sowas vor wie HH:MM



EDIT: Ich hab da was ausbessern müssen