B4A Library IrdaManager

Sub BtnShoot_Click
        'IrdaHelper1.Transmit(IrdaHelper1.GetTransmitData2("32898,16,240,16,240"))         'freq, nb pulses before lollipop
        IrdaHelper1.Transmit(IrdaHelper1.GetTransmitData2("32898,352,7330,352,7330"))     'freq, µs for lollipop
End Sub
Sub BtnShoot2s_Click
            IrdaHelper1.Transmit(IrdaHelper1.GetTransmitData2("32898,352,5360,352,5360"))  
End Sub

#If JAVA
import android.os.Build;

/*
 * preforms some calculations on the codesets we have in order To make them work with certain models of phone.
 *
 * HTC devices need formula 1
 * Samsungs want formula 2
 *
 * Samsung Pre-4.4.3 want nothing, so just Return the input data
 *
 */
private static int[] string2Dec(int[] irData, int frequency) {
  int formula = shouldEquationRun();

  //Should we run any computations on the irData?
  if (formula != 0) {
  for (int i = 0; i < irData.length; i++) {
  if (formula == 1) {
  irData[i] = irData[i] * (1000000/frequency);//the brackets should avoid an arithmetic overflow
  } else if (formula == 2) {
  irData[i] = (int) Math.ceil(irData[i] * 26.27272727272727); //this is the samsung formula as per http://developer.samsung.com/android/technical-docs/Workaround-to-solve-issues-with-the-ConsumerIrManager-in-Android-version-lower-than-4-4-3-KitKat
  }
  }
  }
  return irData;
}

private static int shouldEquationRun() {
  //Some notes on what Build.X will Return
  //System.out.println(Build.MODEL); //One M8
  //System.out.println(Build.MANUFACTURER); //htc
  //System.out.println(Build.VERSION.SDK_INT); //19

  //Samsung's way of finding out if their OS is too new to work without a formula:
  //int lastIdx = Build.VERSION.RELEASE.lastIndexOf(".");
  //System.out.println(Build.VERSION.RELEASE.substring(lastIdx+1)); //4

  //handle HTC
  if (Build.MANUFACTURER.equalsIgnoreCase("HTC")) {
  return 1;
  }
  //handle Lollipop (Android 5.0.1 == SDK 21) / beyond
  if (Build.VERSION.SDK_INT >= 21) {
  return 1;
  }
  //handle Samsung PRE-Android 5
  if (Build.MANUFACTURER.equalsIgnoreCase("SAMSUNG")) {
  if (Build.VERSION.SDK_INT >= 19) {
  int lastIdx = Build.VERSION.RELEASE.lastIndexOf(".");
  int VERSION_MR = Integer.valueOf(Build.VERSION.RELEASE.substring(lastIdx + 1));
  if (VERSION_MR < 3) {
  // Before version of Android 4.4.2
  //Note: NO formula here, Not even the other one
  return 0;
  } else {
  // Later version of Android 4.4.3
  //run the special samsung formula here
  return 2;
  }
  }
  }
  //If something Else...
  return 0;
}
#End If

Sub string2Dec(irData() As Int, freq As Int) As Int()
   Dim formula As Int = shouldEquationRun
   
   If formula <> 0 Then
     For i = 0 To irData.Length - 1
       If formula = 1 Then
         irData(i) = irData(i) * (1000000/freq)
       Else
         irData(i) = Ceil(irData(i) * 26.27272727272727)
       End If
     Next
   End If
   
   Return irData
End Sub

Sub shouldEquationRun() As Int
   Dim ph As Phone
   
   If ph.Manufacturer.ToUpperCase = "HTC" Then
     Return  1
   End If
   
   If ph.SdkVersion >= 21 Then
     Return 1
   End If
   
   Return 0
End Sub