viewing paste Unknown #5856 | C

Posted on the | Last edited on
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150
int checkweight_sub(TBL_PC *sd,int nbargs,int32 *eitemid, int32 *eamount)
{
        struct item_data* id = NULL;
        uint16 nameid,amount,amount2=0,slots,weight=0,i;
 
        slots = pc_inventoryblank(sd); //nb of empty slot
 
        for(i=0; i<nbargs; i++) {
                if(!eitemid[i]) continue;
                id = itemdb_exists(eitemid[i]);
                if( id == NULL ) {
                        ShowError("checkweight_sub: Invalid item '%d'.\n", eitemid[i]);
                        return 0;
                }
                nameid = id->nameid;
 
                amount = eamount[i];
                if( amount < 1 ) {
                        ShowError("checkweight_sub: Invalid amount '%d'.\n", eamount[i]);
                        return 0;
                }
 
                weight += (id->weight)*amount; //total weight for all chk
                if( weight + sd->weight > sd->max_weight ) // too heavy
                        return 0;
 
                switch( pc_checkadditem(sd, nameid, amount) ) {
                        case CHKADDITEM_EXIST: // item is already in inventory, but there is still space for the requested amount
                                break;
                        case CHKADDITEM_NEW:
                                if( itemdb_isstackable(nameid) )
                                        amount2++; // stackable
                                else
                                        amount2 += amount; // non-stackable
                                if( slots < amount2)
                                        return 0;
                                break;
                        case CHKADDITEM_OVERAMOUNT:
                                return 0;
                }
        }
        return 1;
}
 
/*==========================================
 * Check if item with this amount can fit in inventory
 * Checking : weight, stack amount >32k, slots amount >(MAX_INVENTORY)
 * Return
 *      0 : fail
 *      1 : success (npc side only)
 *------------------------------------------*/
BUILDIN_FUNC(checkweight){
        struct map_session_data* sd;
        struct script_data* data;
        struct item_data* id = NULL;
        int32 nameid[128], amount[128];
        uint16 nbargs,i,j=0;
 
        if( ( sd = script_rid2sd(st) ) == NULL )
                return 0;
 
        nbargs = script_lastdata(st)+1;
        if(nbargs%2) {
                ShowError("buildin_checkweight: Invalid nb of args should be a multiple of 2.\n");
                script_pushint(st,0);
                return 1;
        }
 
        for(i=2; i<nbargs; i=i+2) {
                data = script_getdata(st,i);
                get_val(st, data);  // convert into value in case of a variable
                if( data_isstring(data) ) // item name
                        id = itemdb_searchname(conv_str(st, data));
                else // item id
                        id = itemdb_exists(conv_num(st, data));
                if( id == NULL ) {
                        ShowError("buildin_checkweight: Invalid item '%s'.\n", script_getstr(st,i));  // returns string, regardless of what it was
                        script_pushint(st,0);
                        return 1;
                }
                nameid[j] = id->nameid;
                amount[j] = script_getnum(st,i+1);
                j++;
        }
 
        script_pushint(st,checkweight_sub(sd,(nbargs-2)/2,nameid,amount));
        return 0;
}
 
BUILDIN_FUNC(checkweight2){
        //variable sub checkweight
        int32 nameid[128], amount[128];
        uint16 i;
 
        //variable for array parsing
        struct script_data* data_it;
        struct script_data* data_nb;
        const char* name_it;
        const char* name_nb;
        int32 id_it, id_nb;
        int32 idx_it, idx_nb;
        int nb_it, nb_nb; //array size
 
        TBL_PC *sd = script_rid2sd(st);
        nullpo_retr(1,sd);
 
        data_it = script_getdata(st, 2);
        data_nb = script_getdata(st, 3);
 
        if( !data_isreference(data_it) || !data_isreference(data_nb)) {
                ShowError("script:checkweight2: parameter not a variable\n");
                script_pushint(st,0);
                return 1;// not a variable
        }
 
        id_it = reference_getid(data_it);
        id_nb = reference_getid(data_nb);
        idx_it = reference_getindex(data_it);
        idx_nb = reference_getindex(data_nb);
        name_it = reference_getname(data_it);
        name_nb = reference_getname(data_nb);
 
        if( not_array_variable(*name_it) || not_array_variable(*name_nb)) {
                ShowError("script:checkweight2: illegal scope\n");
                script_pushint(st,0);
                return 1;// not supported
        }
        if(is_string_variable(name_it) || is_string_variable(name_nb)) {
                ShowError("script:checkweight2: illegal type, need int\n");
                script_pushint(st,0);
                return 1;// not supported
        }
        nb_it = getarraysize(st, id_it, idx_it, 0, reference_getref(data_it));
        nb_nb = getarraysize(st, id_nb, idx_nb, 0, reference_getref(data_nb));
        if(nb_it != nb_nb) {
                ShowError("script:checkweight2: Size mistmatch: nb_it=%d, nb_nb=%d\n",nb_it,nb_nb);
                script_pushint(st,0);
                return 1;
        }
 
        for(i=0; i<nb_it; i++) {
                nameid[i] = (int32)__64BPRTSIZE(get_val2(st,reference_uid(id_it,idx_it+i),reference_getref(data_it)));
                script_removetop(st, -1, 0);
                amount[i] = (int32)__64BPRTSIZE(get_val2(st,reference_uid(id_nb,idx_nb+i),reference_getref(data_nb)));
                script_removetop(st, -1, 0);
        } //end loop DO NOT break it prematurly we need to depop all stack
 
        script_pushint(st,checkweight_sub(sd,nb_it,nameid,amount)); //push result of sub to script
        return 0;
}
Viewed 588 times, submitted by lighta.