view runtime/tools/blink.c @ 7655:94f34dc2f254 v7.4.1127

commit https://github.com/vim/vim/commit/021b593e7ed6c7111cbf189744ad1e5d6c4a7d79 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jan 17 22:05:48 2016 +0100 patch 7.4.1127 Problem: Both old and new style tests for Perl. Solution: Merge the old tests with the new style tests.
author Christian Brabandt <cb@256bit.org>
date Sun, 17 Jan 2016 22:15:04 +0100
parents 3fc0f57ecb91
children 226ed297307f
line wrap: on
line source

/*
 * An extremely simple program to make the cursor blink in an xterm.
 * This is useful when the cursor is hard to spot in a highlighted file.
 * Start in the background: "blink&"  Stop by killing it.
 * Bram Moolenaar  980109  (based on an idea from John Lange).
 */

#include <stdio.h>

main()
{
	while (1)
	{
		printf("\e[?25h");
		fflush(stdout);
		usleep(400000);		/* on time */
		printf("\e[?25l");
		fflush(stdout);
		usleep(250000);		/* off time */
	}
}