!7

concept TheList {
  new L<S> entries;
}

p {
  db();
  if (isMainProgram()) botSleep();
}

synchronized answer {
  if "* zur liste hinzufügen" {
    theList().entries.add($1);
    theList().change();
    ret "OK, hat Position " + l(theList().entries);
  }
  
  if "* an position * zur liste hinzufügen" {
    int i = parseInt($2)-1;
    theList().entries.add(i, $1);
    theList().change();
    ret "OK";
  }
  
  if "* aus der liste nehmen" {
    int i = theList().entries.indexOf($1);
    if (i < 0) ret "Nicht in Liste";
    else {
      theList().entries.remove(i);
      theList().change();
    }
    ret "OK, entfernt aus Position " + (i+1);
  }
  
  if "länge der liste"
    ret lstr(theList().entries);
    
  if "eintrag * der liste" {
    S entry = get(theList().entries, parseInt($1)-1);
    ret entry == null ? "Nix" : "Eintrag: " + quote(entry);
  }
}

static TheList theList() {
  ret uniq(TheList);
}