alias market.check {
  var %f = Market.ini, %sn = 1, %s, %nn, %n
  while ($mid(sb,%sn,1)) {
    %s = $+($v1,time)
    %nn = 1
    while ($ini(%f,%s,%nn)) {
      %n = $v1
      if ($calc($ctime - $readini(%f,%s,%n)) >= 86400) {
        tokenize 32 $replacex(%s,s,sell,b,buy,time,ers) %s
        remini Market.ini %f $* %n
      }
      inc %nn
    }
    inc %sn
  }
}