viewing paste Sellshop 1.0.2 | C

Posted on the
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 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188
/*
=============================================
sellshop
Created by: Murilo - BiO'
================================================
v1.0.2 Fixed the Item Type filter
Opens a Sell shop with the desired item type to be sold
*/
#include "common/hercules.h"
 
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
 
#include "common/HPMi.h"
#include "common/mmo.h"
#include "common/socket.h"
#include "common/memmgr.h"
#include "common/nullpo.h"
#include "common/mapindex.h"
#include "common/strlib.h"
#include "common/utils.h"
#include "common/cbasetypes.h"
#include "common/timer.h"
#include "common/showmsg.h"
#include "common/conf.h"
#include "common/db.h"
#include "common/sql.h"
 
#include "map/atcommand.h"
#include "map/battle.h"
#include "map/clif.h"
#include "map/map.h"
#include "map/npc.h"
#include "map/skill.h"
#include "map/itemdb.h"
#include "map/script.h"
#include "map/pc.h"
 
#include "common/HPMDataCheck.h"
 
HPExport struct hplugin_info pinfo = {
    "sellshop",         // Plugin name
    SERVER_TYPE_MAP,    // Which server types this plugin works with?
    "1.0.2",                // Plugin version
    HPM_VERSION,        // HPM Version (don't change, macro is automatically updated)
};
 
void my_clif_selllist(struct map_session_data *sd, int fature, int type1, int type2, int type3, int type4, int type5, int type6, int type7, int type8, int type9, int type10, int type11)
{
    int fd,i,c=0,val;
 
    nullpo_retv(sd);
 
    fd = sd->fd;
    WFIFOHEAD(fd, MAX_INVENTORY * 10 + 4);
    WFIFOW(fd,0)=0xc7;
    for( i = 0; i < MAX_INVENTORY; i++ )
    {
        if( sd->status.inventory[i].nameid > 0 && sd->inventory_data[i] )
        {
            if((type1?(itemdb_type(sd->status.inventory[i].nameid) != IT_HEALING):1) && 
               (type2?(itemdb_type(sd->status.inventory[i].nameid) != IT_USABLE):1) &&
               (type3?(itemdb_type(sd->status.inventory[i].nameid) != IT_ETC):1) &&
               (type4?(itemdb_type(sd->status.inventory[i].nameid) != IT_WEAPON):1) &&
               (type5?(itemdb_type(sd->status.inventory[i].nameid) != IT_ARMOR):1) &&
               (type6?(itemdb_type(sd->status.inventory[i].nameid) != IT_CARD):1) &&
               (type7?(itemdb_type(sd->status.inventory[i].nameid) != IT_PETEGG):1) &&
               (type8?(itemdb_type(sd->status.inventory[i].nameid) != IT_PETARMOR):1) &&
               (type9?(itemdb_type(sd->status.inventory[i].nameid) != IT_AMMO):1) &&
               (type10?(itemdb_type(sd->status.inventory[i].nameid) != IT_DELAYCONSUME):1) &&
               (type11?(itemdb_type(sd->status.inventory[i].nameid) != IT_CASH):1))
                continue;
            
            if( !itemdb_cansell(&sd->status.inventory[i], pc_get_group_level(sd)) )
                continue;
 
            if( sd->status.inventory[i].expire_time )
                continue; // Cannot Sell Rental Items
 
            if( sd->status.inventory[i].bound && !pc_can_give_bound_items(sd))
                continue; // Don't allow sale of bound items
 
            val=sd->inventory_data[i]->value_sell;
            if( val < 0 )
                continue;
            WFIFOW(fd,4+c*10)=i+2;
            WFIFOL(fd,6+c*10)=val;
            WFIFOL(fd,10+c*10)= fature ? pc->modifysellvalue(sd,val) : val;
            c++;
        }
    }
    WFIFOW(fd,2)=c*10+4;
    WFIFOSET(fd,WFIFOW(fd,2));
}
 
int my_npc_buysellsel(struct map_session_data* sd, int id, int fature, int type1, int type2, int type3, int type4, int type5, int type6, int type7, int type8, int type9, int type10, int type11) {
    struct npc_data *nd;
 
    nullpo_retr(1, sd);
 
    if ((nd = npc->checknear(sd,map->id2bl(id))) == NULL)
        return 1;
 
    if ( nd->subtype != SHOP ) {
        ShowError("my_npc_buysellsel: no such shop npc %d (%s)\n",id,nd->exname);
 
        if (sd->npc_id == id)
            sd->npc_id = 0;
        return 1;
    }
 
    if (nd->option & OPTION_INVISIBLE) // can't buy if npc is not visible (hack?)
        return 1;
 
    if( nd->class_ < 0 && !sd->state.callshop ) {// not called through a script and is not a visible NPC so an invalid call
        return 1;
    }
    
    // reset the callshop state for future calls
    sd->state.callshop = 0;
    sd->npc_shopid = id;
 
    my_clif_selllist(sd, fature,type1,type2,type3,type4,type5,type6,type7,type8,type9,type10,type11);
 
    return 0;
}
 
/**
 * usage: sellshop <"shop_name">,<OverCharge>{,<Healing>,<Consumable>,<Etc>,<Weapon>,<Armor>,<Card>,<PetEgg>,<PetArmor>,<Ammo>,<DelayConsume>,<Cash>}
 **/
BUILDIN(sellshop)
{
    struct npc_data *nd;
    struct map_session_data *sd = script->rid2sd(st);
    const char *shopname;
    int fature;
    int type1 = 1;  //IT_HEALING
    int type2 = 1;  //IT_USABLE
    int type3 = 1;  //IT_ETC
    int type4 = 1;  //IT_WEAPON
    int type5 = 1;  //IT_ARMOR
    int type6 = 1;  //IT_CARD
    int type7 = 1;  //IT_PETEGG
    int type8 = 1;  //IT_PETARMOR
    int type9 = 1;  //IT_AMMO
    int type10 = 1; //IT_DELAYCONSUME
    int type11 = 1; //IT_CASH
 
    if (sd == NULL)
        return true;
    shopname = script_getstr(st, 2);
    
    nd = npc->name2id(shopname);
    if( !nd || nd->bl.type != BL_NPC || nd->subtype != SHOP )
    {
        ShowError("buildin_sellshop: Shop [%s] not found (or NPC is hasn't sell function)\n", shopname);
        script_pushint(st,0);
        return false;
    }
    
    fature = script_getnum(st,3); //0/1 -> on/off
    if( script_hasdata(st,4) ) type1 = script_getnum(st,4);
    if( script_hasdata(st,5) ) type2 = script_getnum(st,5);
    if( script_hasdata(st,6) ) type3 = script_getnum(st,6);
    if( script_hasdata(st,7) ) type4 = script_getnum(st,7);
    if( script_hasdata(st,8) ) type5 = script_getnum(st,8);
    if( script_hasdata(st,9) ) type6 = script_getnum(st,9);
    if( script_hasdata(st,10) ) type7 = script_getnum(st,10);
    if( script_hasdata(st,11) ) type8 = script_getnum(st,11);
    if( script_hasdata(st,12) ) type9 = script_getnum(st,12);
    if( script_hasdata(st,13) ) type10 = script_getnum(st,13);
    if( script_hasdata(st,14) ) type11 = script_getnum(st,14);
 
    // flag the user as using a valid script call for opening the shop (for floating NPCs)
    sd->state.callshop = 1;
    
    my_npc_buysellsel(sd,nd->bl.id,fature,type1,type2,type3,type4,type5,type6,type7,type8,type9,type10,type11);
 
    sd->npc_shopid = nd->bl.id;
    script_pushint(st,1);
    return true;
}
 
/* run when server starts */
HPExport void plugin_init (void) {
    addScriptCommand("sellshop","si???????????",sellshop);
}
Viewed 1283 times, submitted by Guest.