$include(REG552.INC) ; Hauptrogramm MOV P1,0C0h ;Setzen von SCL (Clock) & SDA (Serial Data) auf High MOV S1CON,063h ;Initialisieren von S1CON (I²C SIO1 Control Register) Call S1STAwait ;Warten auf START fertig (08h in S1STA) ProgEnde: Call 8CB0h ;Monitorrücksprung ; Warten auf START fertig (08h in S1STA) S1STAwait: MOV A,S1STA ;S1STA auf den Akku laden CJNE A,08h,S1STAwait ;Den Akku mit 08h vergleichen und bei Ungleichheit wieder zum Schleifenstart springen RET END