vT1L
via_reg(VIA1, vT1L) = CLK_INTL;
via_reg(VIA2, vT1L) = (profint - 1) & 0xff;
via_reg(VIA2, vT1L) = 0;
via_reg(VIA1, vT1L) = 0;
via2_reg(vT1L) = 0;