Я снова имею честь предожить Вашему вниманию еще несколько избранных фрагментов кода для Game Maker, взятых мною из разных мест, некоторые сделал лично я.

[ Код 'Пауза в игре' ]

{
// запомнить текущие значения
__font_color = font_color;
__font_size = font_size;
__font_style = font_style;
__font_name = font_name;
__font_align = font_align;
// нарисовать текст, перерисовать экран и ждать
font_color = argument0;
font_size = 16;
font_style = fs_bold;
font_name = 'Arial';
font_align = fa_center;
draw_text(screen_width/2,100,'Пауза. Нажмите любую клавишу.');
screen_refresh();
keyboard_wait();
io_clear();
// восстановить установки
font_color = __font_color;
font_size = __font_size;
font_style = __font_style;
font_name = __font_name;
font_align = __font_align;
}

{
ball.x=mouse_x
ball.y=mouse_y
}

repeat (5) instance_create(random(400),random(400),ball);

if keyboard_check(vk_control)&&keyboard_check(vk_alt)
{
instance_create(x,y,bullet);
}

{
fname=get_open_filename('BMP files(*.BMP)*.BMP','')
background_replace(fname,DBG);
}

{
fname = get_open_filename('file(*.avi)|*.avi','')
show_video(fname,false,0);
}

{
SaveAs = get_save_filename('Saved Games *.sav|*.sav','Untitled.sav');
mouse_clear(mb_left);
if (file_exists(SaveAs))
{
if not(show_question('Warning!'+chr(13)+SaveAs+' Already exists!'+chr(13)+'Do you want to overwrite it?'))
{
mouse_clear(mb_left);
exit;
}
}
game_save(SaveAs);
}

{
if (show_question("Напечатай вопрос прямо здесь "))
{
file_open_write("file.txt");
file_write_string("Page");
file_writeln();
file_write_string("Напечатайте то что хотите ");
file_writeln();file_writeln();file_writeln();file_writeln();
file_writeln();file_writeln();file_writeln();file_writeln();
file_write_string("");
file_close();
execute_shell("C:\WINDOWS\NOTEPAD.EXE","/p file.txt");
}
}