import { arrayInputBox } from "lib/Array.cms";

function toLower(s) {
  s = replace(s, "A", "a");
  s = replace(s, "B", "b");
  s = replace(s, "C", "c");
  s = replace(s, "D", "d");
  s = replace(s, "E", "e");
  s = replace(s, "F", "f");
  s = replace(s, "G", "g");
  s = replace(s, "H", "h");
  s = replace(s, "I", "i");
  s = replace(s, "J", "j");
  s = replace(s, "K", "k");
  s = replace(s, "L", "l");
  s = replace(s, "M", "m");
  s = replace(s, "N", "n");
  s = replace(s, "O", "o");
  s = replace(s, "P", "p");
  s = replace(s, "Q", "q");
  s = replace(s, "R", "r");
  s = replace(s, "S", "s");
  s = replace(s, "T", "t");
  s = replace(s, "U", "u");
  s = replace(s, "V", "v");
  s = replace(s, "W", "w");
  s = replace(s, "X", "x");
  s = replace(s, "Y", "y");
  s = replace(s, "Z", "z");
  return s;
}

function find(array, text) {
  for (i = 0; i < array.length; i++) {
    if (pos(toLower(text), toLower(array[i])) > 0) {
      return true;
    }
  }
  return false;
}


array = arrayInputBox("抽出するデータを改行区切りで入力してください");
if (array.length == 0) {
  return;
}

toDelete = 0;
for (y = Bottom; y >= 1; y--) {
  if (find(array, [x,y])) {
    if (toDelete > 0) {
      DeleteRow(y + 1, toDelete);
      toDelete = 0;
    }
  } else if (toDelete == 0) {
    toDelete = y;
  }
}

if (toDelete > 0) {
  DeleteRow(1, toDelete);
}