0:
  10000[0] <- EntityMemory[0]
  10000[1] <- TimeToScaledTime(10000[0])
  10000[2] <- 10000[1] + 1
  Break(1, 10000[2])
  goto exit
