my $v2 = sin($counter/2*3.14) * 128 + 128;

        $data2 .= pack("c", $v2);