Integer als Binärcode ausgeben

Servernexus

Level-1
Beiträge
260
Reaktionspunkte
2
Zuviel Werbung?
-> Hier kostenlos registrieren
Servus,
wie kann ich am einfachsten einen Integer mit Werten bis maximal 64 als Binärcode ausgeben?
Diesen muß ich an einen Fanuc weiter geben. Habe in der Hilfe nichts gefunden, sorry
Danke
 
Vieleicht sucht er einen Baustein der das Umsetzt , weil der Fanuc alles als Bit in der Smybolik haben will, und weiterhin meist das Int auf ein byte beim Fanuc geht.

L #Wert
T Fanuc.DBBX

Wenns über Hardware geht z.B. damit.
Code:
FUNCTION "FC_INT_TO_8DO" : VOID
TITLE =FC Integer > 8DO BitCode
AUTHOR : ---
VERSION : 0.1


VAR_INPUT
  iWert : INT ;    //Integer 0..127
END_VAR
VAR_OUTPUT
  o_Bit1 : BOOL ;    
  o_Bit2 : BOOL ;    
  o_Bit4 : BOOL ;    
  o_Bit8 : BOOL ;    
  o_Bit16 : BOOL ;    
  o_Bit32 : BOOL ;    
  o_Bit64 : BOOL ;    
  o_Bit128 : BOOL ;    
END_VAR
BEGIN
NETWORK
TITLE =

      U(    ; 
      L     255; 
      L     #iWert; 
      >=I   ; 
      )     ; 
      U(    ; 
      L     0; 
      L     #iWert; 
      <=I   ; 
      )     ; 
      SPB   n1; 
      L     0; 
n1:   T     LW     0; 
      U     L      1.0; 
      =     #o_Bit1; 
      U     L      1.1; 
      =     #o_Bit2; 
      U     L      1.2; 
      =     #o_Bit4; 
      U     L      1.3; 
      =     #o_Bit8; 
      U     L      1.4; 
      =     #o_Bit16; 
      U     L      1.5; 
      =     #o_Bit32; 
      U     L      1.6; 
      =     #o_Bit64; 
      U     L      1.7; 
      =     #o_Bit128; 

END_FUNCTION
 
Moin,

für den Fall, dass er ihn doch einfach in BCD wandeln will, sollte übrigens auch in der Hilfe zu finden sein:

Code:
L #Integer
ITB
T #BCD_Wert

In FUP heißt das dann "I_BCD". Einfach in die Leerbox tippen. Aber schon richtig.... mehr input wär mal gut.
 
Zurück
Oben