PLAYANIMATION STOP

IFKEYDOWN 3
PLAYANIMATION pos2
ENDIF

create:
enum resources {iron = 0, gold = 0, wood = 0}

resources = [0, 0, 0];

enum resourcesKeys {iron = 0, gold = 1, wood = 2};

resources[resourcesKeys.iron]++;

draw_text(10, 10, resources[resourcesKeys.iron]);

draw_sprite(icoIron, -1, 5, 10);
draw_sprite(icoGold, -1, 15, 10);

var frames_count = <количество>;
resourcesIco = sprite_add(<fname>, frames_count, 0, 0, 0, 0);

draw_sprite(resourcesIco, resourcesKeys.iron, 5, 10);
draw_sprite(resourcesIco, resourcesKeys.gold, 15, 10);

  resourcesDrawCount = 0;

  for (var i = 0; i < 3; i++) {
   if (resources[i] > 0) {
    draw_text(10 + resourcesDrawCount * 10, 10, resources[i]); // количество.
    draw_sprite(resourcesIco, i, 5 + resourcesDrawCount * 10, 10); // спрайт с иконкой.
    resourcesDrawCount++;
   }
  }

globalvar drawList;

drawList = array_create(100, 0);

#define cursor_in_sprite(sprite)
result = false;

if ("drawn" == array_get(drawList, sprite)[0])
if ((mouse_x >= array_get(drawList, sprite)[1])  &&
    (mouse_y >= array_get(drawList, sprite)[2])  &&
    (mouse_x <= array_get(drawList, sprite)[3])  &&
    (mouse_y <= array_get(drawList, sprite)[4])) {
result = true;
}

return result;

#define my_draw_sprite(sprite, subimg, x, y, xscale, yscale, rot, colour, alpha)
array_set(drawList, sprite, ["drawn", x, y, x + sprite_get_width(sprite) * xscale, y + sprite_get_height(sprite) * yscale]);
return draw_sprite_ext(sprite, subimg, x, y, xscale, yscale, rot, colour, alpha);

if cursor_in_sprite(CrGoldIgnot)
draw_text(72, 72, "No, your cursor scares me!");

drawList = array_create(100, 0);

  [StartButton-Left Down]
  function activation() {
   if (rrandom == 1) {
    LeftTop.image_blend = c_blue;
    alarm[1] = room_speed * 3;
    audio_play_sound(_1, 1, false);
   }

   if (rrandom == 2) {
    RightTop.image_blend = c_fuchsia;
    alarm[2] = room_speed * 3;
    audio_play_sound(_2, 1, false);
   }

   if (rrandom == 3) {
    LeftDown.image_blend = c_yellow;
    alarm[3] = room_speed * 3;
    audio_play_sound(_3, 1, false);
   }

   if (rrandom == 4) {
    RightDown.image_blend = c_lime;
    alarm[4] = room_speed * 3;
    audio_play_sound(_4, 1, false);
   }
  }

  function randomInteger() {
   rrandom=irandom_range(1, 4);

   array_push(computerArray, rrandom);
   activation();
  }

  function startGame() {
   rrandom = 0;
   rround = 4;
   stepRandom = 0;
   computerArray = [];
   playerArray = [];
   isAlarm = false;

   LeftTop.image_blend = c_navy;
   RightTop.image_blend = c_purple;
   LeftDown.image_blend = c_olive;
   RightDown.image_blend = c_green;

   alarm[0] = room_speed * 5;
  }

  startGame();

  //////////////////////////////////

  [alarm0]
   stepRandom++;
   randomInteger();
   if (stepRandom < rround) {
    alarm[0] = room_speed * 5;
   }

procedure key(key: Byte; x,y: Integer); cdecl;
var
   mode: Integer;
begin
     WriteLn('Key = ', key);

globalvar epsilon, frames, frame_step;

epsilon = math_get_epsilon();

var frames_count = 12;
frames = sprite_add(<fname>, frames_count, 0, 0, 0, 0);
sprite_index = frames;

frame_step = 1 / 30;
image_speed = frame_step;

#define step
if ((image_index > image_number - frame_step - epsilon) && (image_speed == frame_step)) {
image_speed = -frame_step;
} else if ((image_index < frame_step - epsilon) && (image_speed == -frame_step)) {
image_speed = frame_step;
}

#define draw
draw_sprite(frames, image_index, 8, 8);