Code:
                 LDS   r24 , {Gl_bit}

L_0x00F6:
	LDI	r25,0x01             '  1-er laden
	AND	r24,r24               '  gl_bit = 0 ?    
	BREQ	L_0x0104           '  dann fertig
	CLC                                  '  clear carry
L_0x00FE:
	ROL	r25                   ' rot left
	DEC	r24                   ' bit-nr  - 1
	BRNE	L_0x00FE          '  fertig ?
L_0x0104:
'-------------------------------------------------------------------------
                LDS         r23,  {gl_read }
                OR          r23, r24             ' bit setzen

'-------------------------------------------------------------------------
	COM	r24                  ' invertieren
                AND        r23, r24             ' bit löschen

'-------------------------------------------------------------------------
               STS         {  Gl_pix } , r23