Thread Aus 2 Bytes ein Integer (2 answers)
Opened by willi at 2010-03-02 22:51

willi
 2010-03-02 22:51
#133951 #133951
User since
2010-02-14
7 Artikel
BenutzerIn
[default_avatar]
Hallo ich habe von euch folgende Funktion die ein Integer auf 2 Bytes aufteilt:
Code (perl): (dl )
1
2
3
4
5
6
7
8

sub SplitIntIn2Byte {
        my $int = shift;

        $hi = $int >> 8;
        $lo = $int & 0b0000000011111111;

        return (chr($hi),chr($lo));
}



Jetzt bräuchte ich genau die umgekehrte Funktion also 2 Bytes in ein Integer
Folgendes habe ich schon:
Code (perl): (dl )
1
2
3
4
5
6
7
8

sub Add2ByteInInt {
        my $byte1 = shift;
        my $byte2 = shift;

#  Da fehlt das zusammenzählen

        return (chr($int));
}



Könntet ihr mir noch einmal helfen?

View full thread Aus 2 Bytes ein Integer