// ������ϐ��̃e�X�g
prontera.gat,164,188,1	script	������e�X�g	112,{
	set @str$, "������P";
	mes "������ϐ��F" + @str$ ;
	mes "�m�F�F" + @str$ + " ...OK?";
	next;
	mes "��r�`eqOK�F" + (@str$=="������P");
	mes "��r�`eqNG�F" + (@str$=="������");
	mes "��r�`neOK�F" + (@str$!="00000");
	mes "��r�`neNG�F" + (@str$!="������P");
	mes "��r�`gtOK�F" + ("aab">"aaa");
	mes "��r�`ltNG�F" + ("aab"<"aaa");
	next;
	input @str2$;
	mes "���̓f�[�^�� " + @str2$ + " �ł��B";
	close;
}