// fixed from http://herc.ws/board/topic/6040-script-cmd-makeitem2/ <-- Credit to Angelmelody
 
#include "common/hercules.h"
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "map/pc.h"
#include "common/HPMDataCheck.h"
 
HPExport struct hplugin_info pinfo = {
    "makeitem2", // Plugin name
    SERVER_TYPE_MAP,// Which server types this plugin works with?
    "0.1",          // Plugin version
    HPM_VERSION,    // HPM Version (don't change, macro is automatically updated)
};
 
 
BUILDIN(makeitem2) {
    int nameid,amount,m,x,y;
    const char *mapname;
    struct item_data* id ;
 
    if( script_isstringtype(st, 2) ) {
        const char *name = script_getstr(st, 2);
        if( (id = itemdb->search_name(name)) )
            nameid = id->nameid;
        else {
            ShowError("makeitem2: Nonexistant item %s requested.\n", name);
            return false;
        }       
    } else {
        nameid = script_getnum(st, 2);
        if( nameid <= 0 || !(id = itemdb->exists(nameid)) ) {
            ShowError("makeitem2: Nonexistant item %d requested.\n", nameid);
            return false;
        }
    }
 
    amount  = script_getnum(st,3);
    mapname = script_getstr(st,4);
    x       = script_getnum(st,5);
    y       = script_getnum(st,6);
 
    if(strcmp(mapname,"this")==0) {
        TBL_PC *sd;
        sd = script->rid2sd(st);
        if (!sd) return false; //Failed...
        m=sd->bl.m;
    } else
        m = map->mapname2mapid(mapname);
 
    if( m == -1 ) {
        ShowError("makeitem2: creating map on unexistent map '%s'!\n", mapname);
        return false;
    }
    if(nameid > 0) {
        struct item item_tmp;
        int get_count,i;
        memset(&item_tmp,0,sizeof(item_tmp));
        item_tmp.nameid = nameid;
        item_tmp.identify = script_getnum(st,7);
        item_tmp.refine = script_getnum(st,8);
        item_tmp.attribute = script_getnum(st,9);
        item_tmp.card[0] = script_getnum(st,10);
        item_tmp.card[1] = script_getnum(st,11);
        item_tmp.card[2] = script_getnum(st,12);
        item_tmp.card[3] = script_getnum(st,13);
 
        if(id->type==IT_WEAPON || id->type==IT_ARMOR) {
            if( item_tmp.refine > MAX_REFINE) item_tmp.refine = MAX_REFINE;
        } else if (id->type==IT_PETEGG) {
            item_tmp.identify = 1;
            item_tmp.refine = 0;
        } else {
            item_tmp.identify = 1;
            item_tmp.refine = item_tmp.attribute = 0;
        }
 
        //Check if it's stackable.
        if (!itemdb->isstackable(nameid))
            get_count = 1;
        else
            get_count = amount;
 
        for (i = 0; i < amount; i += get_count)
            map->addflooritem(NULL,&item_tmp,get_count,m,x,y,0,0,0,0);
 
    }
 
    return true;
 
}
 
 
HPExport void plugin_init (void) {
    addScriptCommand( "makeitem2", "visiiiiiiiii", makeitem2);
}