Usage:
		getmapxy(.@map$,.@x,.@y,0);
		duplicatenpc("ShopName","ShopName#"+getcharid(0),"",.@map$,.@x+rand(-3,3),.@y+rand(-3,3),1);
		
When Work is done with NPC
		duplicateremove("ShopName#"+getcharid(0));