Stuff

latit {
  if ($5) {
    var %F.lat = $1
    var %F.hem = $2
    var %F.hr = $3
    var %G.lat = $4
    var %G.hem = $5
    if (%F.hem == %G.hem) {
      var %hemdif = $false
      var %dif = $calc(%F.lat - %G.lat)
      echo 4 -a Hem. iguais: %F.lat - %G.lat = %dif
    }
    else {
      var %hemdif = $true
      var %dif = $calc(%F.lat + %G.lat)
      echo 4 -a Hem. diferentes: %F.lat + %G.lat = %dif
    }
    echo 4 -a Diferença = %dif / 15 = $calc(%dif / 15)
    var %dif = $calc(%dif / 15)

    if (%hemdif) {
      if (%F.hem == L) {
        var %res = $calc(%dif - %F.hr)
        echo 4 -a L -> O = %dif - %F.hr = %res
      }
      else {
        var %res = $calc(%dif + %F.hr)
        echo 4 -a O -> L = %dif + %F.hr = %res
      }
    }
    else {
      if (%F.hem == L) {
        if (%G.lat < %F.lat) {
          var %res = $calc(%dif - %F.hr)
          echo 4 -a L -> O = %dif - %F.hr = %res
        }
        else {
          var %res = $calc(%dif + %F.hr)
          echo 4 -a O -> L = %dif + %F.hr = %res
        }
      }
      else {
        if (%G.lat > %F.lat) {
          var %res = $calc(%dif - %F.hr)
          echo 4 -a L -> O = %dif - %F.hr = %res
        }
        else {
          var %res = $calc(%dif + %F.hr)
          echo 4 -a O -> L = %dif + %F.hr = %res
        }
      }

    }
  }
}