// src/map/script.c


BUILDIN_FUNC(setmemo){

	TBL_PC *sd=script_rid2sd(st);
	const char *mapname;
	int index,x,y,i;
	short map;
	
	if( sd ){
		index = script_getnum( st,2 );
		
		if( index < MAX_MEMOPOINTS ){
			mapname	= script_getstr( st,3 );
			map = mapindex_name2id( mapname );
			if( map ){
				x = script_getnum( st,4 );
				y = script_getnum( st,5 );
				
				sd->status.memo_point[index].map = map;
				sd->status.memo_point[index].x = x;
				sd->status.memo_point[index].y = y;
				
			}
		}
	}
	
	return 0;
}



	BUILDIN_DEF(setmemo,"isii"),
	
	
	
// npc script...

prontera,155,171,5	script	Sample#setmemo	757,{
.@i = select("Memo 1:Memo 2:Memo 3") - 1;
mes "Input Map Info :";
mes "Mapname x y";
do{
	input .@mapinfo$;
	sscanf( .@mapinfo$,"%s %d %d",.@mapname$,.@x,.@y );
}while( !checkcell( .@mapname$,.@x,.@y,cell_chkpass ) );
setmemo( .@i,.@mapname$,.@x,.@y );
mes "Done";
close;
}