Man muss das Format nicht umwandeln. Die 7-malige Division durch 10 ist völlig unnötig.
Und wie sieht es aus, wen ich die Zeit ausgeben will, ich denke kaum, das ich da auf eine Umwandlung verzichten kann ?
Man muss das Format nicht umwandeln. Die 7-malige Division durch 10 ist völlig unnötig.
Mathias hat geschrieben:Und wie sieht es aus, wen ich die Zeit ausgeben will, ich denke kaum, das ich da auf eine Umwandlung verzichten kann ?
procedure ReadDS3231neu(addr: UInt16);
begin
TWIStart((addr shl 1) or TWI_Write);
TWIWrite(0);
TWIStop;
TWIStart((addr shl 1) or TWI_Read);
Date.second := TWIReadACK_Error and $7F;
....
end;
begin
....
ReadDS3231neu(I2CAddr);
UARTSendString('Sec: ');
UARTSendChar(char((Date.second shr 4) + 48));
UARTSendChar(char((Date.second and $0F) + 48));
Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste