prontera,152,185,5	script	add	1_F_MARIA,{
	if ( !queueadd( $@q, getcharid(3) ) )
		dispbottom "success";
	else
		dispbottom "already join";
	end;
}
prontera,158,185,5	script	remove	1_F_MARIA,{
	if ( !queueremove( $@q, getcharid(3) ) )
		dispbottom "success";
	else
		dispbottom "not yet join";
	end;
}
prontera,155,185,5	script	check	1_F_MARIA,{
	if ( queuesize($@q) ) {
		.@it = queueiterator($@q);
		dispbottom "iterator ID ["+ .@it +"] has "+ queuesize($@q) +" players on it.";
		.@i = 1;
		dispbottom .@i +". "+ qiget(.@it);
		while ( qicheck(.@it) ) {
			.@i++;
			dispbottom .@i +". "+ qiget(.@it);
		}
		qiclear .@it;
	}
	else {
		dispbottom "no entry";
	}		
	end;
OnInit:
	$@q = queue();
	end;
}