I need help in this code !!!

[dungpt8782 0]

// duplicatenpc("NpcName", "DuplicateName", "DupHiddenName", "map", x, y, dir{, sprite{, xs, ys}});
BUILDIN(duplicatenpc)
{
	const char *npc_name = script_getstr(st, 2);
	const char *dup_name = script_getstr(st, 3);
	const char *dup_hidden_name = script_getstr(st, 4);
	const char *tmap = script_getstr(st, 5);
	int tx = script_getnum(st, 6);
	int ty = script_getnum(st, 7);
	int tdir = script_getnum(st, 8);
	int tclass_, txs = -1, tys = -1, sourceid, type, tmapid, i;
	struct npc_data *nd_source, *nd_target;
	char targetname[24] = "";

	if(script_hasdata(st, 10))
		txs = (script_getnum(st, 10) < -1) ? -1 : script_getnum(st, 10);
	if(script_hasdata(st, 11))
		tys = (script_getnum(st, 11) < -1) ? -1 : script_getnum(st, 10);

	if(txs == -1 && tys != -1)
		txs = 0;
	if(txs != - 1 && tys == -1)
		tys = 0;

	if(strlen(dup_name) + strlen(dup_hidden_name) > NAME_LENGTH)
	{
		ShowError("duplicatenpc: Name#HiddenName is to long (max %d chars). (%s)\n",NAME_LENGTH, npc_name);
		script_pushint(st, 0);
		return 0;
	}

	nd_source = npc->name2id(npc_name);

	if(script_hasdata(st, 9))
		tclass_ = (script_getnum(st, 9) < -1) ? -1 : script_getnum(st, 9);
	else
		tclass_ = nd_source->class_;

	if( nd_source == NULL)
	{
		ShowError("duplicatenpc: original npc not found for duplicate. (%s)\n", npc_name);
		script_pushint(st, 0);
		return 0;
	}
	
	sourceid = nd_source->bl.id;
	type = nd_source->subtype;

	tmapid = map->mapname2mapid(tmap);
	if(tmapid < 0)
	{
		ShowError("duplicatenpc: target map not found. (%s)\n", tmap);
		script_pushint(st, 0);
		return 0;
	}

//	nd_target = npc->create_npc(tmapid, tx, ty);
	
	strcat(targetname, dup_name);
	strncat(targetname, "#", 1);
	strncat(targetname, dup_hidden_name, strlen(dup_hidden_name));

	safestrncpy(nd_target->name, targetname , sizeof(nd_target->name));
	safestrncpy(nd_target->exname, targetname, sizeof(nd_target->exname));

	nd_target->class_ = tclass_;
	nd_target->speed = 200;
	nd_target->src_id = sourceid;
	nd_target->bl.type = BL_NPC;
	nd_target->subtype = (enum npc_subtype)type;
	switch(type)
	{
		case SCRIPT:
			nd_target->u.scr.xs = txs;
			nd_target->u.scr.ys = tys;
			nd_target->u.scr.script = nd_source->u.scr.script;
			nd_target->u.scr.label_list = nd_source->u.scr.label_list;
			nd_target->u.scr.label_list_num = nd_source->u.scr.label_list_num;
			nd_target->u.scr.shop = nd_source->u.scr.shop;
			nd_target->u.scr.trader = nd_source->u.scr.trader;
			break;

		case SHOP:
		case CASHSHOP:
			nd_target->u.shop.shop_item = nd_source->u.shop.shop_item;
			nd_target->u.shop.count = nd_source->u.shop.count;
			break;

		case WARP:
			if( !battle->bc->warp_point_debug )
				nd_target->class_ = WARP_CLASS;
			else
				nd_target->class_ = WARP_DEBUG_CLASS;
			nd_target->u.warp.xs = txs;
			nd_target->u.warp.ys = tys;
			nd_target->u.warp.mapindex = nd_source->u.warp.mapindex;
			nd_target->u.warp.x = nd_source->u.warp.x;
			nd_target->u.warp.y = nd_source->u.warp.y;
			break;
	}

	map->addnpc(tmapid, nd_target);
	//status->change_init(&nd_target->bl);
	//unit->dataset(&nd_target->bl);
	nd_target->ud = &npc->base_ud;
	nd_target->dir = tdir;
	npc->setcells(nd_target);
	map->addblock(&nd_target->bl);
	if(tclass_ >= 0)
	{
		status->set_viewdata(&nd_target->bl, nd_target->class_);
		if( map->list[tmapid].users )
			clif->spawn(&nd_target->bl);
	}
	strdb_put(npc->name_db, nd_target->exname, nd_target);

	if(type == SCRIPT)
	{
		for (i = 0; i < nd_target->u.scr.label_list_num; i++)
		{
			if (npc->event_export(nd_target, i)) {
				ShowWarning("duplicatenpc: duplicate event %s::%s.\n",
							 nd_target->exname, nd_target->u.scr.label_list[i].name);
			}
			npc->timerevent_export(nd_target, i);
		}
		nd_target->u.scr.timerid = INVALID_TIMER;
	}

	script_pushint(st, 1);
	return true;
}

[Protos 203]