void USART2_IRQHandler()
{
  uint32_t isr = USART2->ISR;
  uint32_t rdr = *(volatile uint8_t *)&USART2->RDR;
   
  if(isr & (USART_ISR_ORE | USART_ISR_FE | USART_ISR_PE))
  {
    USART2->ICR = USART_ICR_ORECF | USART_ICR_FECF | USART_ICR_PECF;
    control_if_1.ProcessRCVError();
  }
  else
    control_if_1.ProcessByte(rdr);
}

void USART3_4_LPUART1_IRQHandler()
{
  uint32_t isr = USART3->ISR;
 
  if(isr & USART_ISR_RXNE_RXFNE)
  {
    uint32_t rdr = *(volatile uint8_t *)&USART3->RDR;
       
    if(isr & (USART_ISR_ORE | USART_ISR_FE | USART_ISR_PE))
    {
      USART3->ICR = USART_ICR_ORECF | USART_ICR_FECF | USART_ICR_PECF;
      control_if_2.ProcessRCVError();
    }
    else
      control_if_2.ProcessByte(rdr);
  }
  else
  {
    uint32_t isr_lp = LPUART1->ISR;
    uint32_t rdr = LPUART1->RDR;
    dug51.ProcessByte(rdr);
  }
}

static constexpr auto pioLcdPar8a = R"(
            .side_set 3 opt
            .out 8 left auto 32
            .in 8
            .define SetupTime 1     ; 1(200..300MHz)
            .define HoldTime  0     ; 0(200MHz), 1(300MHz)

            mov pindirs,~null

.wrap_target
loop:       out x,16            side 0b111  ; RD/WR/DC
            jmp x--, cmd_data   side 0b111  ; 0 - 16bit color, 1 - 8bit data, 2 - 8bit cmd
            out pins,8          side 0b101  [SetupTime]
            nop                 side 0b111  [HoldTime]
            out pins,8          side 0b101  [SetupTime]
.wrap

cmd_data:   jmp !x,if_data      side 0b111
            out pins,16         side 0b100  [SetupTime]
            jmp loop            side 0b110

if_data:    out pins,16         side 0b101  [SetupTime]
            jmp loop            side 0b111
)"_ss;

// JMP (cond) target
// cond: always, !x, x--, !y, y--, x != y, pin, !osre
// target: instruction address to jump to.
consteval bool processJmp()
{
    uint16_t instr = 0x0000;

    if (check("!")) // !x, !y, !osre
    {
        if      (check("x"))    instr |= 1 << 5;    // !x
        else if (check("y"))    instr |= 3 << 5;    // !y
        else if (check("osre")) instr |= 7 << 5;    // !osre
        else return Error("unexpected identifier ...");
        check(",");
    }
    else if (check("x"))
    {
        if (check("--"))
        {
            instr |= 2 << 5;    // x--
        }
        else if (check("!="))
        {
            if (check("y")) instr |= 5 << 5;    // x != y
            else return Error("expect 'x != y'");
        }
        else return Error("expect 'x--'");
        check(",");
    }
    else if (check("y"))
    {
        if (check("--")) instr |= 4 << 5;   // y--
        else return Error("expect 'y--'");
        check(",");
    }
    else if (check("pin"))
    {
        instr |= 6 << 5;    // pin
        check(",");
    }

    auto tok = getToken();
    if (tok.isText())
    {   // Label
        auto* label = findLabel(tok);
        if (label)
            instr |= label->addr;
        else
            jmpPatch.push({ tok.str, (int)code.size, line });
    }
    else if (tok.isNumber())
    {
        instr |= tok.value;
        if (tok.value > maxJmpValue)
        {
            maxJmpValue = tok.value;
            maxJmpLine  = line;
        }
    }
    else return Error("expect label or number.");

    return processSideDelay(instr);
}

// (side k) ([k])
consteval bool processSideDelay(uint16_t instr)
{
    bool hasSide = check("side");

    if (!sideSetOptional && sideSet && !hasSide) return Error("instruction requires 'side' to specify side set value.");
   
    if (hasSide)
    {
        int value = matchNumber(0, powf(2, sideSet) - 1, "side set value is out of range.");
        if (error) return false;
        instr |= value << (8 + 5 - sideSet - sideSetOptional) | (sideSetOptional << 12);
    }

    if (!check("["))
    {
        code.push(instr);
        return true;
    }

    int value = matchNumber(0, powf(2, 5 - sideSet - sideSetOptional) - 1, "instruction delay is out of range.");
    if (error) return false;
    code.push(instr | uint16_t(value << 8));

    if (!match("]", "expect ']'.")) return false;

    return true;
}