Untitled

alias addpre {
  var %section = $1
  var %release = $2
  var %pretime = $ctime
  var %group = $gettok(%release, -1, 45)
  
  if ($rowexists(%release) = 1) { halt }
  
  SQLiteDLL Open dupedb dupedb.db
  SQLiteDLL Query dupedb INSERT INTO dupedb (release, time, section, group) VALUES (' $+ %release $+ ', ' $+ %pretime $+ ', ' $+ %section $+ ', ' $+ %group $+ ')
  SQLiteDLL Close dupedb
}

alias rowexists {
  var %release = $1-
  var %query = SELECT * FROM dupedb WHERE release=' $+ %release $+ ' LIMIT 1
  SQLiteDLL Open dupedb dupedb.db
  SQLiteDLL Query dupedb %query
  var %rows = $gettok($SQLiteDLL(Rows, dupedb), -1, 32)
  SQLiteDLL Close dupedb
  if (%rows > 0) { return 1 }
  return 0
}

alias pt {
  var %release = $replace($1-,$chr(32),$chr(37))
  var %query = SELECT * FROM dupedb WHERE release LIKE ' $+ $chr(37) $+ %release $+ $chr(37) $+ ' ORDER BY id DESC
  SQLiteDLL Open dupedb dupedb.db
  SQLiteDLL Query dupedb %query
  var %rows = $SQLiteDLL(Rows, dupedb)
  if (%rows > 0) {
    var %rowdata = $SQLiteDLL(Fetch, dupedb, 1)
    var %rlstime = $gettok(%rowdata,3,9)
    var %preage = $calc($ctime - %rlstime)
    return %preage
  }
  SQLiteDLL Close dupedb
}