u08 Wert in Prozent ausgeben

[PharaDOS]

Hallo

habe mal eine newbie frage:

Wie kann ich den u08 Wert in % ausgeben auf einem Button?

Wert("Heizung-6/1/3",$%$,FLOORHEATING,BadHeizungStatusID,StatusPageI D)


Macro:
:begin Wert(GruppenAdresse,Unit,Icon,ButtonID,PageID)
if (systemstart()==EIN) or (pbutton(ButtonID,PageID)==1) then {
read(GruppenAdresse);
}endif
if (change(GruppenAdresse)==EIN) or (systemstart()==EIN) or (pbutton(ButtonID,PageID)==1) then {
pdisplay(ButtonID,convert(GruppenAdresse,$$)+Unit, Icon,DISPLAY,GREEN,PageID)
}endif

:end

[DerRenovator]

Hallo Pawel,
bei mir übernimmt die Formatierung von Prozentausgaben dieses kleine eigene Makro:

:begin StringProzentVonU08(InZahl)
:info $Liefert eine ganzzahlige Textdarstellung in Prozent für den gegebenen Wert. Aus 128u08 wird z. B. "50%"$ \\
    :$Ein numerischer Wert (u08)$
:shortinfo $Prozent-Darstellung für Ganzzahl$
:return convert(convert(convert(InZahl,0f32)/2.55f32,0s16),$$) + $%$
:end

Die converts kannst du natürlich auch direkt in deine pdisplay-Zeile einbauen.
Eleganter geht das mit stringformat. Ob das resourcenschonender wäre, weiß ich nicht.

Gruß,
Jens,

[PharaDOS]

danke dir, klappt so.