!7

p-exp {
  new L<PairS> out1;
  for (S line : tlft(userDir("Documents/give it away.txt"))) {
    continue if startsWith(line, "[");
    PairS p = splitAtFirstSpace(line);
    continue unless p != null;
    if (!regexpMatches("\\d:\\d\\d", p.a))
      continue with print("Weird: " + p);
    out1.add(p);
  }
  
  new LS out;
  for i over out1: {
    PairS p = out1.get(i);
    S nextTime = pairA(get(out1, i+1));
    int minute = parseInt(substring(p.a, 0, 1));
    int second = parseInt(substring(p.a, 2));
    
    second += 2;
    if (second >= 60) { second -= 60; ++minute; }
    S endTime = minute + ":" + formatInt(second, 2);
    if (nextTime != null && cmp(endTime, nextTime) > 0) endTime = nextTime;
    out.add("");
    out.add(str(i+1));
    out.add("00:0" + p.a + ",000 --> 00:0" + endTime + ",000");
    out.add(p.b);
  }
  printLines(out);
  saveTextFileVerbose(programDir("give it away.srt"), lines(out));
}