static const uint32_t LENGTHPOW = 7;
static const uint32_t LENGTH = 128;

static const uint32_t BITS = 8;
static const uint32_t GAIN = 20;
int8_t *array;

int ntrig;

char c[64];
int offset;
int pval;

int ptrig;
int32_t pvalLC;
int32_t LOGICCHANGE;

static int8_t _array[attr_poly][LENGTH] __attribute__((section(".sdram")));
array = &_array[parent->polyIndex][0];
{
  int i;
  for (i = 0; i < LENGTH; i++)
    array[i] = 0;
}

ntrig = 0;

strcpy(&c[0], "0:/Tab/Rnd/128I/NEW000.TAB");
offset = strlen("0:/Tab/Rnd/128I/NEW");
pval = 0;

ptrig = 0;
pvalLC = 0;

if (inlet_rp + param_pattrn != pval) {
  pval = inlet_rp + param_pattrn;
  int i = inlet_rp + param_pattrn;
  int i0 = i / 10;
  c[offset + 2] = '0' + i - 10 * i0;
  i = i0;
  i0 = i / 10;
  c[offset + 1] = '0' + i - 10 * i0;
  i = i0;
  i0 = i / 10;
  c[offset + 0] = '0' + i - 10 * i0;
}

if ((pvalLC != inlet_rp + param_pattrn) & (!ptrig)) {
  LOGICCHANGE = 1;
  pvalLC = inlet_rp + param_pattrn;
  ptrig = 1;
} else {
  ptrig = 0;
  LOGICCHANGE = 0;
}

if ((LOGICCHANGE > 0) && !ntrig) {
  char *filename = &c[0];
  ntrig = 1;
  FIL FileObject;
  FRESULT err;
  UINT bytes_read;
  codec_clearbuffer();
  err = f_open(&FileObject, filename, FA_READ | FA_OPEN_EXISTING);
  if (err != FR_OK) {
    report_fatfs_error(err, filename);
    return;
  }
  int rem_sz = sizeof(*array) * LENGTH;
  int offset = 0;
  while (rem_sz > 0) {
    if (rem_sz > sizeof(fbuff)) {
      err = f_read(&FileObject, fbuff, sizeof(fbuff), &bytes_read);
      if (bytes_read == 0)
        break;
      memcpy((char *)(&array[0]) + offset, (char *)fbuff, bytes_read);
      rem_sz -= bytes_read;
      offset += bytes_read;
    } else {
      err = f_read(&FileObject, fbuff, rem_sz, &bytes_read);
      memcpy((char *)(&array[0]) + offset, (char *)fbuff, bytes_read);
      rem_sz = 0;
    }
  }
  if (err != FR_OK) {
    report_fatfs_error(err, filename);
    return;
  };
  err = f_close(&FileObject);
  if (err != FR_OK) {
    report_fatfs_error(err, filename);
    return;
  };
} else if (!(LOGICCHANGE > 0))
  ntrig = 0;

int32_t DIVNEW = inlet_in / param_length;
int32_t LENGTH = inlet_in - DIVNEW * param_length;

if (param_on) {
  outlet_out = array[__USAT(LENGTH + param_offset, LENGTHPOW)] << GAIN;
} else {
  outlet_out = 0;
}