<procedure EnemyRobot
    Sprite.SetPosition (enemyrobot, robotx, roboty, false)
    Sprite.Show (enemyrobot)
    for n : 1 .. Enemy_robot
        Sprite.Animate (enemyrobot, Enemyrobot ((n div 1) mod Enemy_robot + 1), robotx, roboty, false)
        delay (50)
    end for
end EnemyRobot>

loop
   move_player()
   if enemy_in_range then
      player_attack (enemy)
   end if

   move_enemy()
   if player_in_range then
      enemy_attack (player)
   end if

   delay()  % this is the only delay you should have in your program
end loop

var AnimFrame := 0
var AnimFrameMax := 25
var ..your other vars here.. := whatever

proc EnemyRobots
    %ai stuff

    %movement stuff
    robotx := somevalue
    roboty := somevalue

    %maybe attack, do a 'lil dance
end EnemyRobots

proc Animation
    AnimFrame = (AnimFrame + 1) mod (AnimFrameMax + 1) % keeps it in [0, AnimFrame]
    DrawRobots
    DrawPlayer %write these \/
    DrawSomethingElse
    DrawSomeMoreStuff
end Animation

proc DrawRobots
    Sprite.BlahBlahblah(Blah) %your other sprite stuff excluding the animation
    Sprite.Animate(enemyrobot, Enemyrobot(AnimFrame), robotx, roboty, false)
end DrawRobots

%game loop
loop
    Player %this is your player stuff like movement etc
    EnemyRobots %this is your robot stuff like movement, ai, whatnot

    Animation
    Time.DelaySinceLast(20) %this delay will keep ALL animations at a good speed
end loop