WaitUntil (IP >= 1000)
if (IP >= 1000)
    BreakInfinity(false)
    Repeat (9, false)
        EnterIC(0, true)
    BreakInfinity(true)
    WaitUntil (IP >= 100)
    BreakInfinity(false)
    EnterIC(1, true)
    EnterIC(2, true)
    EnterIC(3, true)
    EnterIC(4, true)
    EnterIC(5, true)
    EnterIC(6, true)
    EnterIC(7, true)
    EnterIC(8, true)
    EnterIC(9, true)
    BreakInfinity(true)
    WaitForSeconds(10.0)
    WaitUntil (IP == 0.00 && Score == 0.00)
    Restart()
 

Infinite()
if (EP <= 1.00e150)
    Eternate()
    WaitForSeconds(0.5)
    Eternate()
    Restart()
else if (DP <= 100e400)
    Repeat (2, false)
        Dilate(true)
        WaitForSeconds(20.0)
        Dilate(false)
    WaitForSeconds(2.0)
else
Repeat (5, false)
    EnterEC(0, 0, true)
Repeat (1, false)
    DTU(CENTER, 0, 4)
    DTU(BOTTOM, 0, 4)
    DTU(BOTTOM, 1, 4)
    DTU(BOTTOM, 2, 4)
    DTU(BOTTOM, 3, 4)
    DTU(TOP, 0, 4)
    DTU(TOP, 1, 4)
    DTU(TOP, 2, 4)
    DTU(TOP, 3, 4)
    DTU(MIDDLE, 0, 4)
    DTU(MIDDLE, 1, 4)
    DTU(MIDDLE, 2, 4)
    DTU(MIDDLE, 3, 4)
WaitForSeconds(1.0)
Eternate()
Restart()
 

If you have three macro blocks more available

Infinite()
if (EP <= 1.00e150)
    Eternate()
    WaitForSeconds(0.5)
    Eternate()
    Restart()
else if (DP <= 10.0e699)
    Repeat (2, false)
        Dilate(true)
        WaitForSeconds(15.0)
        Dilate(false)
else
Repeat (5, false)
    EnterEC(0, 0, true)
Repeat (1, false)
    DTU(CENTER, 0, 4)
    DTU(BOTTOM, 0, 4)
    DTU(BOTTOM, 1, 4)
    DTU(BOTTOM, 2, 4)
    DTU(BOTTOM, 3, 4)
    DTU(TOP, 0, 4)
    DTU(TOP, 1, 4)
    DTU(TOP, 2, 4)
    DTU(TOP, 3, 4)
    DTU(MIDDLE, 0, 4)
    DTU(MIDDLE, 1, 4)
    DTU(MIDDLE, 2, 4)
    DTU(MIDDLE, 3, 4)
    Dilate(true)
    WaitForSeconds(10.0)
    Dilate(false)
WaitForSeconds(1.0)
Eternate()
Restart()