/*******************************************************************
/*
/*	NANNO.CFG : Nanno-network 用コンフィグ･ファイル
/*
/*	TABSIZE = 4;
/*

nanno_dial {

/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
	DIAL     = "069-39-2022A";
/*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

	while ( _NAN_ID = "" )
	{	nanno_setup()
		if ( VAL ! 0 ) { return (-1) }
	}

	ID       = _NAN_ID;
	PASSWORD = _NAN_PASSWORD;

	term_puts("ATZ\r")
	term_switch( 5,"OK\r")
	if ( VAL < 0 ) { return (-1)}

#	/* 第２モデモ初期化コマンド
#	term_puts("AT%2400\r")
#	term_switch( 5,"OK\r")
#	if ( VAL < 0 ) { return (-1)}

	tel_call()
	if ( VAL < 0 ) { return (-1)}

	term_switch( 30, "HIT RETURN KEY>")
	if ( VAL < 0 ) { return (-1)}
	wait(1)
	term_puts("\r")


	term_switch( 30, "User ID=")
	if ( VAL < 0 ) { return (-1)}
	wait(1)
	term_puts("\(ID)\r")

	term_switch( 30, "Password=")
	if ( VAL < 0 ) { return (-1)}
	wait(1)
	term_puts("\(PASSWORD)\r")

	return	(0)
}

str_off {
	wind_size_set(x,y,32,32)
	wind_open()
	graph("palette",7,0,0,0)
}
str_on {
	graph("palette",7,176,176,192)
	wind_close()
	wind_init()
}

nanno_setup {
	ID       = _NAN_ID;
	PASSWORD = _NAN_PASSWORD;

	if ( ID = "" )
	{	ID = "GUEST";
		PASSWORD = "";
	}
	mosget("sw","x","y")
	menu_input("ID",9, x,y, C_CYAN, "Nanno-network のID を入力してください。:")
	if ( VAL < 0 ) {	return	(-1) }

	str_off()
	menu_input("PASSWORD",9, x,y, C_YELLOW, "Nanno-network のパスワードを入力してください。:" )
	RET = VAL;
	if ( RET < 0 ) { str_on();	return	(-1) }


	PASSWORD2 = "";
	menu_input("PASSWORD2",9, x,y, C_YELLOW, "もういちどパスワードを入力してください。" )
	RET = VAL;
	str_on()
	if ( RET < 0 ) {	return	(-1) }

	if ( PASSWORD ! PASSWORD2 )
	{	wind_open()
		graph("symbol",65,56, 8,16, OPAQUE,C_RED,C_HWHITE, 1,0,0,1, "パスワードが違っています！！")
		wait(5)
		wind_close()
		return	(-1)
	}

	if ( RET < 0 ) {	return	(-1) }
	strlen(PASSWORD)
	LEN = VAL;
	menu_yes_no(x,y,C_CYAN,"Nanno-network の ID : \(ID)\x0Aパスワードは \(LEN) 文字指定されています。\x0A\x0A           よろしいですか？")
	if ( VAL > 0 )
	{	_NAN_ID       = ID;
		_NAN_PASSWORD = PASSWORD;
		return	(0)
	}
	return	(-1)
}

/*********************************************************************
/*	行入力コマンド
/*	
/*	【入力】	TCMD	コマンド
/*
TERM_cmdline {
}

/*******************************************************************
/*	オートパイロット用 入力行チェックルーチン
/*******************************************************************
AUTO_line {
}