-	script	Sample	-1,{
OnInit:
	bindatcmd "flag",strnpcinfo(3)+"::OnAtCommand";
	setarray .flag_list,48,49,50,51;
	.flag_list_size = getarraysize( .flag_list );
	end;

OnAtCommand:
	.@num = atoi( .@atcmd_parameters$[0] ) - 1;
	if( .@num >= 0 && .@num <= .flag_list_size ){
		emotion .flag_list[ .@num ];
	}
	end;
}