#
#	半角カタカナチェック
#	
{
	len = length( $0 );
	i = 1;

	while ( i <= len ) {

		if ( isascii( substr( $0, i, 1 ) ) ) {
			i++;
			continue;
		}
		else {
			if ( ishankana( substr( $0, i, 1 ) ) ) {
				print $0;
				break;
			}
			else {
				i = i + 2;
			}
		}
	}
}


function isascii( string )
{
	if ( string <= "~" ) {
		return 1;
	}

	return 0;
}

function ishankana( string )
{
	if ( ( string >= "｡" ) && ( string <= "ﾟ" ) ) {
		return 1;
	}

	return 0;
}