Hab gerade mit Erschrecken festgestellt, daß
wohl nur die "große" CC1 interne Widerstände hat.
Bei der Unit-M muß man die wohl extern nachrüsten.
Nehme erst mal an, Du hast die Große.

Define zaeler Byte
Define led Port[1]
Define tast Port[9]
led = 0
Deact tast
#anfang
If tast = 1 then gosub warten
Goto anfang

#warten
led = 1
For zaeler = 0 to 60
Pause 50
Next zaeler
led = 0
Return


Ich bin mir nicht so sicher, ob in Zeile 7 (If tast...) 'ne 0 oder
'ne 1 stehen muß (vielleicht negative Logik). Mußte ausprobieren.
Pause 50 heißt: 50x20Millisek. = 1. Sekunde,
das ganze 60x macht eine Minute Licht an für Dein Puppenhaus.
Ich denke mal so pfundst's.