hud = instance_create(x,y-16,obj_hud); //Создаем худ
hud.target = id; //Для дальнейшего обращения к своему родителю (таргету, объекту)

if collision_rectangle(id.x-31.99,id.y-31.99,id.x+31.99,id.y+31.99,global.currenttile,0,1)
{  
hud.visible = 1;
}
else
{
hud.visible=0;
}

if (place_meeting(x+1,y,other)) or (place_meeting(x-1,y,other)) room_restart(); //Столкнулись с левой или правой стенкой

if !(place_free(x,y+1)) image_angle = 0; //Стоим на земле
else image_angle+=1; //Нет? - тогда вращаем
if (image_angle>=360) image_angle = 0; //Просто так)

gravity_direction = 270; //Гравитация направляется вниз
if !(place_free(x,y+1)) {gravity = 0; image_angle = 0;} //Стоим на земле
else gravity = 1; //Нет? - тогда падаем
if (gravity>0) image_angle += 1; //Если падаем, то вращаем
if (image_angle>=360) image_angle = 0; //Опять просто так)
if (keyboard_check(vk_up)) vspeed = -16; //Прыгаем

move_contact_solid(direction,abs(vspeed)); //Двигаем объект по директории его движения на модуль вертикальной скорости, пока он не столкнется с твердым объектом или пройдет заданное количество пикселей для движения. Так же можно использовать функцию move_contact_all(с осторожностью), если объект столкновения не твердый.
vspeed = 0; //Столкновение прошло, останавливаем объект.

repeat(argument1)
{
     if(place_meeting(x+cos(argument0),y+sin(argument0),argument2)) break;
     x-=cos(argument0);
     y-=sin(argument0);
}

//Примечание: 39dll в виде библиотеки .dll (не gex)
//Инициализация библиотеки
dllinit(0,1,0);
//Получаем порт
port = get_integer("Введите порт:",12564);
//Прослушиваем порт
servertcp = tcplisten(port,10,1);
//Если порт занят или произошла ошибка
if !(servertcp)
     closesocket(servertcp);
     show_message("Error");
     game_end();
     exit;
}

var socket;
//Создаем соединение
socket = tcpaccept(servertcp,true);
//Если не сообщений, то выходим
if (socket <=0) exit;
setsync(clientsocket,0);
//Принимаем сообщения
receivemessage(clientsocket);
step = 0; //Допуск
type = readbyte();
name = readstring();
pass = readstring();
//Регистрация
if type = 0
{
if !(file_exists("players\"+name+".ini"))
{
ini_open("players\"+name+".ini");
ini_write_string("Data","password",pass)  
ini_close();
clearbuffer();
writebyte(1);
writebyte(1);
sendmessage(socket);
step = 1;
}
else
{
clearbuffer();
writebyte(1);
writebyte(0);
sendmessage(socket);
exit;
}
}
//Логин
if type = 1
{
if (file_exists("players\"+name+".ini"))
{
ini_open("players\"+name+".ini");
password = ini_read_string("Data","password","");
ini_close();
if (pass = password)
{
clearbuffer();
writebyte(1);
writebyte(3);
sendmessage(socket);
step = 1;
}
else
{
clearbuffer();
writebyte(1);
writebyte(4);
sendmessage(socket);
exit;
}
}
else
{
clearbuffer();
writebyte(1);
writebyte(2);
sendmessage(socket);
exit;
}
}
if (step)
{
//Здесь уже стандартное создание игрока в сети, добавление его в список игроков и т.п.
}

//Инициализируем библиотеку
dllinit(0,1,0);
global.serverip = get_string("IP сервера:","127.0.0.1");
global.serverport = get_integer("Порт сервера:",12564);
type = get_integer("Регистрация(0) или Логин(1):",0);
name = get_string("Введите ваше имя:","Test");
password = get_string("Введите пароль:","1111");
//Соединяемся
global.clienttcp = tcpconnect(global.serverip,global.serverport,1);
//Если не удалось
if (!tcpconnected(global.clienttcp))
{
//...закрываем сокет, и уходим из игры.
closesocket(global.clienttcp);
show_message("Error");
game_end();
exit;
}
else
{
//Если подключение удалось
setnagle(global.clienttcp,1);
//Потом отправляем свои данные...
clearbuffer();
writebyte(type);
writestring(name,false);
writestring(password,false);
sendmessage(global.clienttcp);
}

//Переменные
var messagesize, messageid;
while(1)
{
//Принимаем сообщения
messagesize = receivemessage(global.clienttcp);
//Если их нет
if (messagesize <= 0) break;
//Иначе, получаем айди сообщения
messageid = readbyte();
//Сортируем
switch(messageid)
{
case 1:
answer = readbyte();
//Имя занято
if (answer = 0)
{
show_message("Имя занято");
game_restart();
exit;
}
//Регистрация прошла успешно
if (answer = 1)
{
show_message("Вы зарегистрированы");
}
//Пользователь не существует
if (answer = 2)
{
show_message("Пользователь не существует");
game_restart();
exit;
}
//Вход произведен
if (answer = 3)
{
show_message("Приветствуем вас!");
}
//Пароль введен неверно
if (answer = 4)
{
show_message("Пароль не верен!!!");
game_restart();
exit;
}
break;
}

//Если нужно, чтобы при уменьшении FPS число или переменная (допустим image_speed) увеличилась, то:
image_speed = скорость при нормальном фпс*room_speed/fps;
//Если наоборот нужно уменьшить переменную или скорость движения и т.п... (или, например, alarm), то:
alarm[0] = значение при нормальном фпс/30*fpp;

with(object)
{
if (number = 12) number = 1;
}

virtual_key_add(x, y, w, h, keycode);
virtual_key_delete(index);
virtual_key_show(index);
virtual_key_hide(index);

global.Left = virtual_key_add(32, 32, 64, 64, vk_left);  
virtual_key_delete(global.Left);
  if global.Debug           //Данный код проверяет значение переменной "global.Debug" и если она правдива, то виртуальный код проиндексированный в
     {                           //переменной "global.Left" будет отрисовываться на экране,
     virtual_key_show(global.Left);
     }
  else                         //А если ложь - то будет спрятано.
     {
     virtual_key_hide(global.Left);
     }

draw_sprite_ext(sprite_index,0,x,y,image_xscale-(hand_a/250*image_xscale),1,angle*image_xscale,c_white,1);
draw_sprite_ext(head,image_index,x+(hand_a*0.1)*image_xscale,y+round(hand_a*0.1)-5-max(0,sin(pi/180*angle))*5,image_xscale-(hand_a/300*image_xscale),1,angle*image_xscale,c_white,1);
draw_sprite_ext(spr_head_blood,image_index,x+(hand_a*0.1)*image_xscale,y+round(hand_a*0.1)-5-max(0,sin(pi/180*angle))*5,image_xscale-(hand_a/300*image_xscale),1,angle*image_xscale,c_white,1);
draw_sprite_ext(spr_player_arm_die,6,x+(hand_a*0.1)*image_xscale,y+round(hand_a*0.2)-2-max(0,sin(pi/180*angle))*5,image_xscale,1,(angle+hand_a)*image_xscale,c_white,1);