public ScreenBlack(id) { message_begin(MSG_ALL,get_user_msgid("ScreenFade"),{0,0,0},id) write_short(1<<15) write_short(1<<13) write_short(1<<12) write_byte( 0 ) write_byte( 0 ) write_byte( 0 ) write_byte( 255 ) message_end()}