var = (a*) malloc(5 * sizeof(a));

var = new a[5];

/* в аs3 нет двухбайтовых переменных,
поэтому и здесь я упаковываю два short`a
в один int
*/
class q_head
{
public:
  void set_param(unsigned short a,unsigned short b)
  {
   param = a;
   param <<= 16;
   param |= b;  
  }
private:
  int param;  
};

class q_some_query
{
  q_some_query()
  {
   head.set_param(some_type,sizeof(some_buffer));
  }
  q_head head;
  char somebuffer[some_size];
};

/* Знаю, что отправлять классы-изврат,  
в С я мог бы отправить структуру, но в
as3 их нет */
q_some_query query;
send(socket,(char*)query,sizeof(query),0);

if(keyboard_check_pressed(key))
{
      sprite_index = sprite1;
      alarm[0] = time;         
}
if(keyboard_check_released(key))
{
      sprite_index = sprite0;
}

sprite_index = sprite3