-	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 ){
		unitemote getcharid(3),.flag_list[ .@num ];
	}else{
		dispbottom "Only no. 1 ~ "+.flag_list_size;
	}
	end;
}