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