// spl key testprogram


var key=0;
var tux=0;

	tux = getRef(27);
	setAttribute(tux,"on","1");
	while(1)
	{
		key = getKey();
		if( key == 97) // a
		{
			setAttribute(tux,"on","1");
			debug "Tux on key=$key";
		}
		if( key == 115) // s
		{
			setAttribute(tux,"on","0");
			debug "Tux off key=$key";
		}

		freeze();
	}

