Stuff

alias market.check {
  var %fn = 1, %f, %nn, %n
  while ($gettok(Sell.ini Buy.ini,%fn,32)) {
    %f = $+($v1,.ini)
    %nn = 1
    while ($ini(%f,time,%nn)) {
      %n = $v1
      if ($calc($ctime - $readini(%f,time,%n)) >= 86400) {
        tokenize 32 $gettok(%f,1,46) time
        remini %f $* %n
      }
      inc %nn
    }
    inc %fn
  }
}