Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren INFO - FAQ - CC2-Forum - CCPro-Forum

Re: byte binär ausgeben Kategorie: Programmierung Basic (von Henrik, Homepage - 21.05.2005 18:32)

Als Antwort auf Re: byte binär ausgeben von Burt - 21.05.2005 17:58

Henrik nutzt:  CC1-M-Unit V1.2/2.0, Micro

> > danke, so gehts ...... > Du hast oben erwähnt das es mehrere Möglichkeiten gibt. > > Kennt jemand noch weitere? > > Danke, Burt Wie wäre es mit einem Blick in die Beispiele? Eine unter vielen Alternativen wäre die von DIE HARD in eben diesen beschriebene: FUNCTION SHOWBINARY() define MASK as byte LCD.POS 1,1 MASK=10000000b DO '-------- PORT BIT mit MASKEN BIT VERGLEICHEN ------ if (ACHTPORTS and MASK) =0 then LCD.PRINT "0" else LCD.PRINT "1" END IF'-------- MASKEN BIT VERSCHIEBEN ------------------- MASK=MASK shr 1 '-------- ALLE BITS ABGEFRAGT WENN MASKE NULL IST -- LOOP UNTIL MASK=0 END FUNCTION Die bereits gezeigte Methode ist allerdings, obwohl sie simpel aussieht, eine sehr effiziente und spart auch Variablen. Grüße Henrik Meine Homepage: http://www.henrik-reimers.de/control/

Antwort schreiben

Bisherige Antworten:

Re: byte binär ausgeben (von J. Christoph - 23.05.2005 15:29)