void cDragItems::dropOnBanker( P_CLIENT client, P_ITEM pItem, P_CHAR pBanker )
{
P_CHAR pChar = client->player();
// No cheque ? >> Put into bank
if( ( pItem->id() != 0x14F0 ) && ( pItem->type() != 1000 ) )
{
P_ITEM bankBox = pChar->getBankBox();
if( bankBox )
bankBox->AddItem( pItem );
else
bounceItem( client, pItem );
pBanker->talk( QString( "The %1 is now in thy bank box" ).arg( pItem->getName() ) );
return;
}
// No Value ?!
if( !pItem->value )
{
pBanker->talk( "This cheque does not have any value!" );
bounceItem( client, pItem );
return;
}
pChar->giveGold( pItem->value, true );
pBanker->talk( QString( "%1 I have cashed thy cheque and deposited %2 gold." ).arg( pChar->name.c_str() ).arg( pItem->amount() ) );
pItem->ReduceAmount();
statwindow( client->socket(), pChar );
}
static bool ItemDroppedOnBanker(P_CLIENT ps, PKGx08 *pp, P_ITEM pi)
{
UOXSOCKET s=ps->GetSocket();
CHARACTER cc=ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LRV(cc,true);
int t=calcCharFromSer(pp->Tserial);
P_ITEM bankbox = pc_currchar->GetBankBox();
int amt = pi->amount;
int value = pi->value;
if (pi->id() == 0x14F0 && pi->type == 1000)
{
const P_ITEM pi_n = Items->SpawnItem(DEREF_P_CHAR(pc_currchar), DEREF_P_CHAR(pc_currchar),value,"#",1,0x0E,0xED,0,0,0,0);
if(pi_n == NULL) return false;
sprintf((char*)temp,"%s I have cashed your check and deposited %i gold.",pc_currchar->name, value);
npctalk(s,t,(char*)temp,0);
bankbox->AddItem(pi_n);
statwindow(s, DEREF_P_CHAR(pc_currchar));
return true;
}
else
{
if (pi->id() == 0x0EED)
{
sprintf((char*)temp,"%s you have deposited %i gold.",pc_currchar->name, amt);
npctalk(s,t,(char*)temp,0);
bankbox->AddItem(pi);
statwindow(s, DEREF_P_CHAR(pc_currchar));
return true;
}
else
{
sprintf((char*)temp,"Sorry %s i can only deposit gold",pc_currchar->name);
npctalk(s,t,(char*)temp,0);
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce5(s,pi);
return true;
}
}
return true;
}
}
void UpdateStatusWindow(NXWSOCKET socket, P_ITEM pi)
{
P_CHAR pc = MAKE_CHAR_REF( currchar[socket] );
VALIDATEPC( pc );
VALIDATEPI( pi );
P_ITEM pack = pc->getBackpack();
VALIDATEPI( pack );
if( pi->getContSerial() != pack->getSerial32() || pi->getContSerial() == pc->getSerial32() )
statwindow( pc, pc );
}
bool cCharStuff::cBankerAI::BankCheck(int c, P_CHAR pBanker, const string& comm)
{
P_CHAR pc_currchar = currchar[c];
int beginoffset ;
int endoffset ;
int value =0 ;
string value2;
if ((beginoffset=comm.find_first_of("0123456789")) != string::npos)
{
if ((endoffset=comm.find_first_not_of("0123456789",beginoffset))== string::npos)
endoffset = comm.length();
value2= comm.substr(beginoffset,endoffset-beginoffset) ;
value = str2num(value2) ;
}
int d = pc_currchar->CountBankGold();
{
int goldcount = value;
if (goldcount < 5000 || goldcount > 1000000)
{
sprintf(temp, "%s you can only get checks worth 5000gp to 1000000gp.", pc_currchar->name.c_str());
npctalk(c, pBanker, temp, 1);
return false;
}
if (d >= goldcount)
{
const P_ITEM pi = Items->SpawnItem(c, pc_currchar, 1, "bank check", 0, 0x14, 0xF0, 0, 0, 0); // bank check
if (pi != NULL)
pi->type = 1000;
pi->setId(0x14F0);
pi->color = 0x0099;
pi->priv |= 0x02;
pi->value = goldcount;
DeleBankItem(pc_currchar, 0x0EED, 0, goldcount);
P_ITEM bankbox = pc_currchar->GetBankBox();
bankbox->AddItem(pi);
statwindow(c, pc_currchar);
sprintf(temp, "%s your check has been placed in your bankbox, it is worth %i.", pc_currchar->name.c_str(), goldcount);
npctalk(c, pBanker, temp, 1);
return true;
}
else
sprintf(temp, "%s you have insufficent funds!", pc_currchar->name.c_str());
npctalk(c, pBanker, temp, 1);
return true;
}
}
void cDragItems::dropOnGround( P_CLIENT client, P_ITEM pItem, const Coord_cl &pos )
{
P_CHAR pChar = client->player();
// Check if the destination is in line of sight
if( !line_of_sight( client->socket(), pChar->pos, pos, TREES_BUSHES|WALLS_CHIMNEYS|DOORS|ROOFING_SLANTED|FLOORS_FLAT_ROOFING|LAVA_WATER ) )
{
client->sysMessage( "You cannot see the target." );
bounceItem( client, pItem );
return;
}
if( !pChar->canPickUp( pItem ) )
{
bounceItem( client, pItem );
return;
}
pItem->setContSerial( INVALID_SERIAL );
pItem->moveTo( pos );
pItem->setLayer( 0 );
RefreshItem( pItem ); // Send it to all clients in range
pChar->weight -= pItem->getWeight();
statwindow( client->socket(), pChar ); // Update our weight-stats
if( pItem->glow != INVALID_SERIAL )
{
pChar->removeHalo( pItem );
pChar->glowHalo( pItem );
}
// Multi handling (Hm i don't like that...)
if( pChar->multis > 0 )
{
P_ITEM pMulti = FindItemBySerial( pChar->multis );
if( pMulti != NULL )
{
pMulti = findmulti( pItem->pos );
if( pItem != NULL )
pItem->SetMultiSerial( pMulti->serial );
}
}
}
static bool ItemDroppedOnSelf(NXWCLIENT ps, PKGx08 *pp, P_ITEM pi)
{
if (ps == NULL) return false;
VALIDATEPIR(pi, false);
// NXWSOCKET s=ps->toInt();
// CHARACTER cc=ps->currCharIdx();
P_CHAR pc = ps->currChar(); // MAKE_CHAR_REF(cc);
VALIDATEPCR(pc, false);
Location charpos = pc->getPosition();
if (pi->getId() >= 0x4000 ) // crashfix , prevents putting multi-objects ni your backback
{
ps->sysmsg(TRANSLATE("Hey, putting houses in your pack crashes your back and client !"));
pi->MoveTo( charpos );
pi->Refresh();//AntiChrist
return true;
}
// if (pi->glow>0) // glowing items
// {
// pc->addHalo(pi);
// pc->glowHalo(pi);
// }
P_ITEM pack = pc->getBackpack();
if (pack==NULL) // if player has no pack, put it at its feet
{
pi->MoveTo( charpos );
pi->Refresh();
}
else
{
pack->AddItem(pi); // player has a pack, put it in there
weights::NewCalc(pc);//AntiChrist bugfixes
statwindow(pc,pc);
pc->playSFX( itemsfx(pi->getId()) );
}
return true;
}
static bool ItemDroppedOnSelf(P_CLIENT ps, PKGx08 *pp, P_ITEM pi)
{
UOXSOCKET s=ps->GetSocket();
CHARACTER cc=ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LRV(cc,true);
if (pi->id1>=0x40) // crashfix , prevents putting multi-objects ni your backback
{
sysmessage(s,"Hey, putting houses in your pack crashes your back and client !");
pi->MoveTo(pc_currchar->pos.x,pc_currchar->pos.y,pc_currchar->pos.z);
RefreshItem(pi);//AntiChrist
return true;
}
if (pi->glow>0) // glowing items
{
pc_currchar->addHalo(pi);
pc_currchar->glowHalo(pi);
}
P_ITEM pack = Packitem(pc_currchar); // LB ...
if (pack == NULL) // if player has no pack, put it at its feet
{
pi->MoveTo(pc_currchar->pos.x,pc_currchar->pos.y,pc_currchar->pos.z);
RefreshItem(pi);//AntiChrist
}
else
{
pack->AddItem(pi); // player has a pack, put it in there
Weight->NewCalc(DEREF_P_CHAR(pc_currchar));//AntiChrist bugfixes
statwindow(s,DEREF_P_CHAR(pc_currchar));
itemsfx(s, pi->id());
}
return true;
}
void UpdateStatusWindow(UOXSOCKET s, P_ITEM pi)
{
P_ITEM packnum = packitem(currchar[s]);
if (CheckWhereItem(packnum, pi, s))
statwindow(s,currchar[s]);
}
void pack_item(NXWCLIENT ps, PKGx08 *pp) // Item is put into container
{
if (ps == NULL) return;
char temp[TEMP_STR_SIZE]; //xan -> this overrides the global temp var
char temp2[TEMP_STR_SIZE]; //xan -> this overrides the global temp var
int serial/*, serhash*/;
tile_st tile;
// bool abort=false;
NXWSOCKET s=ps->toInt();
P_CHAR pc=ps->currChar();
VALIDATEPC(pc);
Location charpos= pc->getPosition();
P_ITEM pack;
P_ITEM pCont = pointers::findItemBySerial(pp->Tserial);
VALIDATEPI(pCont);
P_ITEM pItem = pointers::findItemBySerial(pp->Iserial);
VALIDATEPI(pItem);
if (pItem->getId() >= 0x4000)
{
// abort=true; // LB crashfix that prevents moving multi objcts in BP's
ps->sysmsg(TRANSLATE("Hey, putting houses in your pack crashes your back and client!"));
}
//ndEndy recurse only a time
P_ITEM contOutMost = pCont->getOutMostCont();
P_CHAR contOwner = ( !contOutMost->isInWorld() )? pointers::findCharBySerial( contOutMost->getContSerial() ) : NULL;
if( ISVALIDPC(contOwner) ) {
//if ((contOwner->npcaitype==NPCAI_PLAYERVENDOR) && (contOwner->npc) && (contOwner->getOwnerSerial32()!=pc->getSerial32()) )
if ( contOwner->getSerial32() != pc->getSerial32() && contOwner->getOwnerSerial32() != pc->getSerial32() && !pc->IsGM() ) { // Luxor
ps->sysmsg(TRANSLATE("This aint your backpack!"));
Sndbounce5(s);
if (ps->isDragging()) {
ps->resetDragging();
item_bounce3(pItem);
if (pCont->getId() >= 0x4000)
senditem(s, pCont);
}
return;
}
}
if (pCont->amxevents[EVENT_IONPUTITEM]!=NULL) {
g_bByPass = false;
pCont->amxevents[EVENT_IONPUTITEM]->Call( pCont->getSerial32(), pItem->getSerial32(), pc->getSerial32() );
if (g_bByPass)
{
item_bounce6(ps,pItem);
return;
}
}
/*
g_bByPass = false;
pCont->runAmxEvent( EVENT_IONPUTITEM, pCont->getSerial32(), pItem->getSerial32(), pc->getSerial32() );
if (g_bByPass)
{ //AntiChrist to preview item disappearing
item_bounce6(ps,pItem);
return;
}
*/
if (pCont->layer==0 && pCont->getId() == 0x1E5E &&
pCont->getContSerial()==pc->getSerial32())
{
// Trade window???
serial=calcserial(pCont->moreb1, pCont->moreb2, pCont->moreb3, pCont->moreb4);
if(serial==-1) return;
P_ITEM pi_z = pointers::findItemBySerial(serial);
if (ISVALIDPI(pi_z))
if ((pi_z->morez || pCont->morez))
{
pi_z->morez=0;
pCont->morez=0;
sendtradestatus( pi_z, pCont );
}
}
if(SrvParms->usespecialbank)//only if special bank is activated
{
if(pCont->morey==MOREY_GOLDONLYBANK && pCont->morex==MOREX_BANK && pCont->type==ITYPE_CONTAINER)
{
if ( pItem->getId() == ITEMID_GOLD )
{//if they're gold ok
pc->playSFX( goldsfx(2) );
} else
{//if they're not gold..bounce on ground
ps->sysmsg(TRANSLATE("You can only put golds in this bank box!"));
pItem->setContSerial(-1);
pItem->MoveTo( charpos );
pItem->Refresh();
pc->playSFX( itemsfx(pItem->getId()) );
return;
}
}
}
// Xanathars's Bank Limit Code
if (ServerScp::g_nBankLimit != 0) {
if( ISVALIDPI( contOutMost ) && contOutMost->morex==MOREX_BANK ) {
int n = contOutMost->CountItems( INVALID, INVALID, false);
n -= contOutMost->CountItems( ITEMID_GOLD, INVALID, false);
if( pItem->type == ITYPE_CONTAINER )
n += pItem->CountItems( INVALID, INVALID, false);
else
++n;
if( n > ServerScp::g_nBankLimit ) {
ps->sysmsg(TRANSLATE("You exceeded the number of maximimum items in bank of %d"), ServerScp::g_nBankLimit);
item_bounce6(ps,pItem);
return;
}
}
}
//ndEndy this not needed because when is dragging cont serial is INVALID
//testing UOP Blocking Tauriel 1-12-99
if (!pItem->isInWorld())
{
item_bounce6(ps,pItem);
return;
}
data::seekTile(pItem->getId(), tile);
if (( ( (pItem->magic==2) || ( (tile.weight==255) && (pItem->magic != 1 ) ) ) && !pc->canAllMove()) ||
( (pItem->magic==3|| pItem->magic==4) && !(pItem->getOwnerSerial32()==pc->getSerial32())))
{
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
item_bounce3(pItem);
if (pCont->getId() >= 0x4000)
senditem(s, pCont);
}
return;
}
// - Trash container
if( pCont->type==ITYPE_TRASH)
{
pItem->Delete();
ps->sysmsg(TRANSLATE("As you let go of the item it disappears."));
return;
}
// - Spell Book
if (pCont->type==ITYPE_SPELLBOOK)
{
if (!pItem->IsSpellScroll72())
{
ps->sysmsg(TRANSLATE("You can only place spell scrolls in a spellbook!"));
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
item_bounce3(pItem);
}
if (pCont->getId() >= 0x4000)
senditem(s, pCont);
return;
}
pack= pc->getBackpack();
if(ISVALIDPI(pack))
{
if ((!(pCont->getContSerial()==pc->getSerial32())) &&
(!(pCont->getContSerial()==pack->getSerial32())) && (!(pc->CanSnoop())))
{
ps->sysmsg(TRANSLATE("You cannot place spells in other peoples spellbooks."));
item_bounce6(ps,pItem);
return;
}
if( strncmp(pItem->getCurrentNameC(), "#", 1) )
pItem->getName(temp2);
else
strcpy(temp2,pItem->getCurrentNameC());
NxwItemWrapper sii;
sii.fillItemsInContainer( pCont, false );
for( sii.rewind(); !sii.isEmpty(); sii++ ) {
P_ITEM pi_ci=sii.getItem();
if (ISVALIDPI(pi_ci))
{
if( strncmp(pi_ci->getCurrentNameC(), "#", 1) )
pi_ci->getName(temp);
else
strcpy(temp,pi_ci->getCurrentNameC());
if(!(strcmp(temp,temp2)) || !(strcmp(temp,"All-Spell Scroll")))
{
ps->sysmsg(TRANSLATE("You already have that spell!"));
item_bounce6(ps,pItem);
return;
}
}
// Juliunus, to prevent ppl from wasting scrolls.
if (pItem->amount > 1)
{
ps->sysmsg(TRANSLATE("You can't put more than one scroll at a time in your book."));
item_bounce6(ps,pItem);
return;
}
}
}
pCont->AddItem( pItem );
ps->sendSpellBook(pCont);
return;
}
if (pCont->type == ITYPE_CONTAINER) {
if ( ISVALIDPC(contOwner) )
{
if ( (contOwner->npcaitype==NPCAI_PLAYERVENDOR) && (contOwner->npc) && (contOwner->getOwnerSerial32()==pc->getSerial32()) )
{
pc->fx1= DEREF_P_ITEM(pItem);
pc->fx2=17;
pc->sysmsg(TRANSLATE("Set a price for this item."));
}
}
short xx=pp->TxLoc;
short yy=pp->TyLoc;
pCont->AddItem(pItem,xx,yy);
pc->playSFX( itemsfx(pItem->getId()) );
statwindow(pc,pc);
}
// end of player run vendors
else
// - Unlocked item spawner or unlockable item spawner
if (pCont->type==ITYPE_UNLOCKED_CONTAINER || pCont->type==ITYPE_NODECAY_ITEM_SPAWNER || pCont->type==ITYPE_DECAYING_ITEM_SPAWNER)
{
pCont->AddItem(pItem, pp->TxLoc, pp->TyLoc); //Luxor
pc->playSFX( itemsfx(pItem->getId()) );
}
else // - Pileable
if (pCont->pileable && pItem->pileable)
{
if ( !pCont->PileItem( pItem ) )
{
item_bounce6(ps,pItem);
return;
}
}
else
{
if( pItem->getContSerial( true )==INVALID ) //current cont serial is invalid because is dragging
{
NxwSocketWrapper sw;
sw.fillOnline( pItem->getPosition() );
for( sw.rewind(); !sw.isEmpty(); sw++ )
SendDeleteObjectPkt(sw.getSocket(), pItem->getSerial32() );
mapRegions->remove(pItem);
}
pItem->setPosition( pp->TxLoc, pp->TyLoc, pp->TzLoc);
pItem->setContSerial( pCont->getContSerial() );
pItem->Refresh();
}
}
void cDragdrop::wear_item(P_CLIENT ps) // Item is dropped on paperdoll
{
int j, k;
tile_st tile;
int serial, serhash, ci, letsbounce=0; // AntiChrist (5) - new ITEMHAND system
UOXSOCKET s=ps->GetSocket();
int cc=ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LR(cc);
int cserial=calcserial(buffer[s][6],buffer[s][7],buffer[s][8],buffer[s][9]);
if(cserial==-1) return;
k=calcCharFromSer( cserial );
if( chars[k].dead ) //Exploit fix: Dead ppl can't equip anything.
return;
P_ITEM pi=FindItemBySerPtr(buffer[s]+1);
if (!pi) return;
pi->flags.isBeeingDragged=false;
// if (clientDimension[s]==3)
// {
Map->SeekTile(pi->id(), &tile);
// sprintf(temp, "Tiledata: name: %s flag1: %i flag2: %i flag3: %i flag4: %i layer: %i\n", tile.name, tile.flag1, tile.flag2, tile.flag3, tile.flag4, tile.layer);
// clConsole.send(temp);
if (tile.layer==0)
{
sysmessage(s,"You can't wear that");
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce4(s,pi);
UpdateStatusWindow(s,pi);
}
return;
}
// }
if (pi->id1>=0x40) return; // LB, client crashfix if multi-objects are moved to PD
if (k==DEREF_P_CHAR(pc_currchar) || pc_currchar->isGM())
{
if (k!=-1) //lb
if (k==DEREF_P_CHAR(pc_currchar) && pi->st>chars[k].st)
{
sysmessage(s,"You are not strong enough to use that.");
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce4(s,pi);
UpdateStatusWindow(s,pi);
}
return;
}
if (pc_currchar->id1==0x01 && pc_currchar->id2==0x90) // Ripper...so males cant wear female armor
if (pi->id1==0x1c && ( pi->id2==0x00 || pi->id2==0x02 || pi->id2==0x04 ||
pi->id2==0x06 || pi->id2==0x08 || pi->id2==0x0a || pi->id2==0x0c))
{
sysmessage(s,"You cant wear female armor!");
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce4(s,pi);
UpdateStatusWindow(s,pi);
}
return;
}
// if (clientDimension[s]==2) Map->SeekTile(pi->id(), &tile);
if ((((pi->magic==2)||((tile.weight==255)&&(pi->magic!=1)))&&((pc_currchar->priv2&1)==0)) ||
( (pi->magic==3|| pi->magic==4) && !pc_currchar->Owns(pi)))
{
item_bounce6(ps,pi);
return;
}
// - AntiChrist (4) - checks for new ITEMHAND system
// - now you can't equip 2 hnd weapons with 1hnd weapons nor shields!!
serial=pc_currchar->serial;
vector<SERIAL> vecContainer = contsp.getData(serial);
for (ci=0;ci<vecContainer.size();ci++)
{
P_ITEM pi2 = FindItemBySerial(vecContainer[ci]);
if (pi2 != NULL && pi2->contserial == serial)
{
if (pi2->itmhand==1 && pi->itmhand==1)
{
sysmessage(s,"You already have a weapon equipped!");
letsbounce=1;
}
else if (pi2->itmhand==2 && pi->itmhand==1)
{
sysmessage(s,"Your hands are both occupied!");
letsbounce=1;
}
else if (pi2->itmhand==1 && pi->itmhand==2)
{
sysmessage(s,"You cannot equip a two handed weapon with a weapon equipped!");
letsbounce=1;
}
else if (pi2->itmhand==2 && pi->itmhand==2)
{
sysmessage(s,"You cannot equip a two handed weapon with a two handed weapon equipped!");
letsbounce=1;
}
else if (pi2->itmhand==2 && pi->itmhand==3)
{
sysmessage(s,"You cannot equip a shield with a two handed weapon equipped!");
letsbounce=1;
}
else if (pi2->itmhand==3 && pi->itmhand==2)
{
sysmessage(s,"You cannot equip a two handed weapon with a shield equipped!");
letsbounce=1;
}
else if (pi2->layer == tile.layer)
{
sysmessage(s, "You already have an armor equipped!");
letsbounce = 1;
}
}
if(letsbounce)//Let's bounce the item
{
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce4(s,pi);
UpdateStatusWindow(s,pi);
itemsfx(s, pi->id()); // antichrist
}
return;
}
}
if (!(pc_currchar->isGM())) //Ripper..players cant equip items on other players or npc`s paperdolls.
{
if ((k != DEREF_P_CHAR(pc_currchar)) && (!chars[k].isNpc()))
{
sysmessage(s, "You cant put items on other players!");
item_bounce6(ps,pi);
return;
}
}
pi->SetContSerial(LongFromCharPtr(buffer[s]+6));
pi->layer=buffer[s][5];
// AntiChrist - now the STAT BONUS works -
pc_currchar->st = (pc_currchar->st + pi->st2);
pc_currchar->chgDex(pi->dx2);
pc_currchar->in = (pc_currchar->in + pi->in2);
if (pi->trigtype==2) // -Frazurbluu- Trigger Type 2 is my new trigger type *-
{
Trig->triggerwitem(s, pi, 1); // trigger is fired
}
// AntiChrist -- for poisoned items
if (showlayer) clConsole.send("Item equipped on layer %i.\n",pi->layer);
SndRemoveitem(pi->serial);
LongToCharPtr(pi->serial,wearitem+1);
ShortToCharPtr(pi->id(),wearitem+5);
wearitem[8]=pi->layer;
LongToCharPtr(pi->contserial,wearitem+9);
wearitem[13]=pi->color1;
wearitem[14]=pi->color2;
Xsend(s, wearitem, 15);
wornitems(s, k);//send update to current socket
// -Frazurbluu- Worn item triggers will need code here
// Trigger cod ewill also need the adjustments made for skill adding
// An apply/unapply type of variable must be added for skill gains
// Spell Item will have to be considered, like a necklace of reflection
for (j=0;j<now;j++)
{
if (perm[j] && inrange1p(k, currchar[j]) && (j!=s))//and to all inrange sockets (without re-sending to current socket)//AntiChrist
wornitems(j, k);
}
itemsfx(s, pi->id()); // Dupois - see itemsfx() for details // Added Oct 09, 1998
Weight->NewCalc(DEREF_P_CHAR(pc_currchar)); // Ison 2-20-99
statwindow(s,DEREF_P_CHAR(pc_currchar));
if (pi->glow>0)
{
pc_currchar->removeHalo(pi); // if gm equips on differnt player it needs to be deleted out of the hashteble
chars[k].addHalo(pi);
chars[k].glowHalo(pi);
}
}
}
void cDragdrop::get_item(P_CLIENT ps) // Client grabs an item
{
int npc=-1, amount, update = 0, serial;
UOXSOCKET s = ps->GetSocket();
int cc = ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LR(cc);
serial = calcserial(buffer[s][1], buffer[s][2], buffer[s][3], buffer[s][4]);
if (serial == INVALID_SERIAL || buffer[s][1] < 0x40)
return; // landscape or a character
P_ITEM pi = FindItemBySerial(serial);
if (pi == NULL)
return;
pc_currchar->disturbMed(s); // Meditation
// Zippy's stealing changes
P_ITEM px = pi;
if (!px->isInWorld()) // Find character owning item
{
unsigned long loopexit = 0;
do // Find character owning item
{
if (isCharSerial(px->contserial))
{
npc = calcCharFromSer(px->contserial);
}
else // its an item
{
if (px->isInWorld())
{
npc=-1;
break;
}
px = FindItemBySerial(px->contserial);
// ANTICHRIST -- SECURE TRADE FIX
if (px != NULL) // LB overwriting x is essential here, dont change it!!!
{
if (px->layer == 0 && px->id() == 0x1E5E)
{
// Trade window???
serial = calcserial(px->moreb1, px->moreb2, px->moreb3, px->moreb4);
if (serial == INVALID_SERIAL)
return;
P_ITEM pi_z = FindItemBySerial(serial);
if ( pi_z != NULL )
if ((pi_z->morez || px->morez))
{
pi_z->morez = 0;
px->morez = 0;
sendtradestatus(pi_z, px);
}
}
// Blackwinds Looting is crime implementation
// changed slightly by Ripper
if (px->corpse != 0 && !pc_currchar->Owns(px))
{
P_CHAR co = FindCharBySerial(px->ownserial);
if (px->more2 == 1 && Guilds->Compare(DEREF_P_CHAR(pc_currchar), DEREF_P_CHAR(co)) == 0)
{
pc_currchar->karma -= 5;
criminal(DEREF_P_CHAR(pc_currchar));
sysmessage(s, "You lost some karma!");
}
npc = 0;
} // Criminal stuff
if (px->corpse != 0)
npc = 0;
} // end if x!=-1
if (px == NULL)
npc = 0;
}
} while ((npc==-1) &&(++loopexit < MAXLOOPS));
}
if (npc>0) // 0=corpse, hence >0 ..
{
if (!(pc_currchar->isGM()) && npc != DEREF_P_CHAR(pc_currchar) && ! pc_currchar->Owns(&chars[npc]))
{// Own serial stuff by Zippy -^ Pack aniamls and vendors.
bounce[1] = 0;
Xsend(s, bounce, 2);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce3(pi);
pi->magic = 3;
}
return;
}
}
// End Zippy's change
// Boats->
if (px != NULL && npc!=-1)
{
if (px->multis>0)
imultisp.remove(px->multis, px->serial);
px->startDecay();
// End Boats Change
// AntiChrist -- for poisoned items
if (px->layer>0)
{
chars[npc].removeItemBonus(px); // remove BONUS STATS given by equipped special items
}
if ((px->trigon==1) && (px->layer != 0) && (px->layer != 15) && (px->layer < 19))// -Frazurbluu- Trigger Type 2 is my new trigger type *-
{
Trig->triggerwitem(s, pi, 1); // trigger is fired
}
}
if (pi != NULL)
{
if (pi->corpse != 1)
{
UpdateStatusWindow(s, pi);
if (!pc_currchar->canPickUp(pi))
{
bounce[1] = 0;
Xsend(s, bounce, 2);
if (ps->IsDragging()) // only restore item if it got draggged before !!!
{
ps->ResetDragging();
item_bounce4(s, pi);
}
}
else
{
// AntiChrist bugfix for the bad bouncing bug ( disappearing items when bouncing )
DRAGGED[s] = 1;
pi->oldx = pi->pos.x; // first let's save the position
pi->oldy = pi->pos.y;
pi->oldz = pi->pos.z;
pi->oldcontserial = pi->contserial; // then let's save the container
pi->oldlayer = pi->layer; // then the layer
pi->layer = 0;
if (!pi->isInWorld())
soundeffect(s, 0x00, 0x57);
if (pi->amount>1)
{
amount = (buffer[s][5] << 8) + buffer[s][6];
if (amount>pi->amount)
amount = pi->amount;
if (amount < pi->amount)
{
P_ITEM pi_c = Items->MemItemFree();
// pi_c->Init(0);
#pragma note("Replace by a copy constructor before finishing items[]")
memcpy(pi_c, pi, sizeof(cItem)); // Tauriel reduce code faster too
pi_c->SetSerial(cItemsManager::getItemsManager().getUnusedSerial());
pi_c->amount = pi->amount - amount;
pi_c->SetContSerial(pi_c->contserial);
pi_c->SetOwnSerial(pi_c->ownserial);
pi_c->SetSpawnSerial(pi_c->spawnserial);
statwindow(s,DEREF_P_CHAR(pc_currchar));
RefreshItem(pi_c);//AntiChrist
}
if (pi->id() == 0x0EED) // gold coin
{
P_ITEM packnum = packitem(currchar[s]);
if (packnum != NULL) // lb
if (pi->contserial == packnum->serial)
update = 1;
}
pi->amount = amount;
}
/* int amt = 0, wgt; bool tooheavy=false;
wgt = (int)Weight->LockeddownWeight(pi, &amt, 0);
if(pi->contserial>0)
{
if (( (pc_currchar->weight+wgt) > (pc_currchar->st*WEIGHT_PER_STR)+30)) // LB -> added: drop item if too heavy
{
float res=float( (pc_currchar->weight+wgt) - ((pc_currchar->st*WEIGHT_PER_STR)+30))*2;
int diff = pc_currchar->st;
diff -= (int)res;
if (diff<=0 && !pc_currchar->isGM() )
{
tooheavy=true;
bounce[1] = 0;
Xsend(s, bounce, 2);
if (ps->IsDragging()) // only restore item if it got dragged before !!!
{
ps->ResetDragging();
item_bounce4(s, pi);
}
sysmessage(s, "you can't pick this up, this is too heavy");
return;
}
}
}
if (!tooheavy) pc_currchar->weight+=wgt;
update = 1; */
// LB remark: drop item if too heavy is a good solution,
// but there's still a small bug remaining.
// added weight from items picked up, but not put to bp, pd, in other words hold in ones hand,
// is NOT subtracted when being dropped again to ground/other chars/other chars' bp's.
// but this bug doesnt show up becasue weight is re-calculated automatically all 10 secs.
// without adding weight of the item curently carrying in hand.
// a correct solutions need the weight of item in hand being stored
// , added to auto-re-calculation all x-secs code, and being subtracted if dropped.
// because it's now only happening for leight weight items, because heavy weight itms cant be picke up anymore
// I haven't corrected this yet.
// Tauriel remove item from world mapcells
mapRegions->Remove(pi); // remove this item from a map cell
pi->pos.x = 0;
pi->pos.y = 0;
pi->pos.z = 0;
pi->flags.isBeeingDragged=true;
pi->SetContSerial(-1);
}
}
} // end of if i!=-1
if (update) statwindow(s, DEREF_P_CHAR(pc_currchar));
}
void pack_item(P_CLIENT ps, PKGx08 *pp) // Item is put into container
{
int j, serial;
bool abort=false;
UOXSOCKET s=ps->GetSocket();
CHARACTER cc=ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LR(cc);
serial=pp->Tserial;
if(serial == INVALID_SERIAL) abort=true;
const P_ITEM pCont= FindItemBySerial( serial );
serial=pp->Iserial;
if(serial == INVALID_SERIAL) abort=true;
const P_ITEM pItem = FindItemBySerial( serial );
if (pCont == NULL)
{
RefreshItem(pCont);//AntiChrist
return;
}
if (pItem == NULL || pCont == NULL) return; //LB
pItem->flags.isBeeingDragged=false;
if (pItem->id1>=0x40)
{
abort=true; // LB crashfix that prevents moving multi objcts in BP's
sysmessage(s,"Hey, putting houses in your pack crashes your back and client!");
}
j=DEREF_P_CHAR(GetPackOwner(pCont));
if (j>-1)
if (chars[j].npcaitype==17 && chars[j].isNpc() && !pc_currchar->Owns(&chars[j]))
{
abort=true;
sysmessage(s, "This aint your vendor!");
}
if(abort)
{//AntiChrist to preview item disappearing
item_bounce6(ps,pItem);
return;
}
if (pCont->layer==0 && pCont->id() == 0x1E5E &&
pc_currchar->Wears(pCont))
{
// Trade window???
serial=calcserial(pCont->moreb1, pCont->moreb2, pCont->moreb3, pCont->moreb4);
if(serial == INVALID_SERIAL) return;
P_ITEM pi_z = FindItemBySerial( serial );
if (pi_z != NULL)
if ((pi_z->morez || pCont->morez))
{
pi_z->morez=0;
pCont->morez=0;
sendtradestatus(pi_z, pCont);
}
}
//
//AntiChrist - Special Bank Stuff
//
//if morey==123 - gold only bank
//
if(SrvParms->usespecialbank)//only if special bank is activated
{
if(pCont->morey==123 && pCont->morex==1 && pCont->type==1)
{
if ( pItem->id() == 0x0EED )
{//if they're gold ok
goldsfx(s, 2);
} else
{//if they're not gold..bounce on ground
sysmessage(s,"You can only put golds in this bank box!");
pItem->SetContSerial(-1);
pItem->MoveTo(pc_currchar->pos.x,pc_currchar->pos.y,pc_currchar->pos.z);
RefreshItem(pItem);//AntiChrist
itemsfx(s,pItem->id());
return;
}
}
}
//testing UOP Blocking Tauriel 1-12-99
if (!pItem->isInWorld())
{
item_bounce6(ps,pItem);
return;
}
if (!pc_currchar->canPickUp(pItem))
{
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce3(pItem);
if (pCont->id1>=0x40)
senditem(s, pCont);
}
return;
}
// - Trash container
if (pCont->type==87)
{
Items->DeleItem(pItem);
sysmessage(s, "As you let go of the item it disappears.");
return;
}
// - Spell Book
if (pCont->type==9)
{
if (!IsSpellScroll72(pItem->id()))
{
sysmessage(s, "You can only place spell scrolls in a spellbook!");
Sndbounce5(s);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce3(pItem);
}
if (pCont->id1>=0x40)
senditem(s, pCont);
return;
}
P_ITEM pBackpack = Packitem(pc_currchar);
if (pBackpack != NULL) // lb
{
if (!pc_currchar->Wears(pCont) &&
(!(pCont->contserial==pBackpack->serial)) && (!(pc_currchar->canSnoop())))
{
sysmessage(s, "You cannot place spells in other peoples spellbooks.");
item_bounce6(ps,pItem);
return;
}
if(pItem->name[0]=='#')
pItem->getName(temp2);
else
strcpy((char*)temp2,pItem->name);
vector<SERIAL> vecContainer = contsp.getData(pCont->serial);
for (unsigned int i = 0; i < vecContainer.size(); i++) // antichrist , bugfix for inscribing scrolls
{
P_ITEM pi = FindItemBySerial(vecContainer[i]);
if (pi != NULL)
{
if(pi->name[0]=='#')
pi->getName(temp);
else
strcpy((char*)temp, pi->name);
if(!(strcmp((char*)temp,(char*)temp2)) || !(strcmp((char*)temp,"All-Spell Scroll")))
{
sysmessage(s,"You already have that spell!");
item_bounce6(ps,pItem);
return;
}
}
}
}
}
// player run vendors
if (!(pCont->pileable && pItem->pileable && pCont->id()==pItem->id()
|| (pCont->type!=1 && pCont->type!=9)))
{
j=DEREF_P_CHAR(GetPackOwner(pCont));
if (j>-1) // bugkilling, LB, was j=!-1, arghh, C !!!
{
if (chars[j].npcaitype==17 && chars[j].isNpc() && pc_currchar->Owns(&chars[j]))
{
pc_currchar->inputitem = pItem->serial;
pc_currchar->inputmode = cChar::enPricing;
sysmessage(s, "Set a price for this item.");
}
}
short xx=pp->TxLoc;
short yy=pp->TyLoc;
pCont->AddItem(pItem,xx,yy);
itemsfx(s, pItem->id());// see itemsfx() for details - Dupois Added Oct 09, 1998
statwindow(s,DEREF_P_CHAR(pc_currchar));
}
// end of player run vendors
else
// - Unlocked item spawner or unlockable item spawner
if (pCont->type==63 || pCont->type==65 || pCont->type==66)
{
pItem->SetContSerial(pp->Tserial);
// lb bugfix
pItem->pos.x=pp->TxLoc;
pItem->pos.y=pp->TyLoc;
pItem->pos.z=pp->TzLoc;
SndRemoveitem(pItem->serial);
RefreshItem(pItem);//AntiChrist
itemsfx(s, pItem->id());
}
else // - Pileable
if (pCont->pileable && pItem->pileable && pCont->id()==pItem->id())
{
if ((pCont->amount+pItem->amount) > 65535)
{
pItem->amount -= (65535-pCont->amount);
Commands->DupeItem(s, pCont, pItem->amount);
pCont->amount = 65535;
Items->DeleItem(pItem);
}
else
{
pCont->amount=pCont->amount+pItem->amount;
itemsfx(s, pItem->id());
Items->DeleItem(pItem);
}
SndRemoveitem(pItem->serial);
RefreshItem(pCont);//AntiChrist
}
else
{
pItem->pos.x=pp->TxLoc;
pItem->pos.y=pp->TyLoc;
pItem->pos.z=pp->TzLoc;
// pItem->SetContSerial(-1);
pItem->SetContSerial(pp->Tserial);
// Tauriel add item to world mapcells
mapRegions->Add(pItem); //add this item to a map cell
SndRemoveitem(pItem->serial);
RefreshItem(pCont);//AntiChrist
}
// - Spell Book
if (pCont->type==9)
Magic->SpellBook(s, pCont); // LB, bugfix for showing(!) the wrong spell (clumsy) when a new spell is put into opened spellbook
if (pItem->glow>0) // LB's glowing items stuff
{
int p = DEREF_P_CHAR(GetPackOwner(pCont));
pc_currchar->removeHalo(pItem); // if gm put glowing object in another pack, handle glowsp correctly !
if (p!=-1)
{
chars[p].addHalo(pItem);
chars[p].glowHalo(pItem);
}
}
}
// New Class implementation
void cDragItems::grabItem( P_CLIENT client )
{
// Get our character
P_CHAR pChar = client->player();
if( pChar == NULL )
return;
// Fetch the grab information
SERIAL iSerial = LongFromCharPtr( &buffer[ client->socket() ][ 1 ] );
UI16 amount = ShortFromCharPtr( &buffer[ client->socket() ][ 5 ] );
P_ITEM pItem = FindItemBySerial( iSerial );
if( !pItem )
return;
// Are we already dragging an item ?
// Bounce it and reject the move
// (Logged out while dragging an item)
if( client->dragging() )
{
bounceItem( client, client->dragging() );
bounceItem( client, pItem, true );
return;
}
// Do we really want to let him break his meditation
// When he picks up an item ?
// Maybe a meditation check here ?!?
pChar->disturbMed( client->socket() ); // Meditation
P_CHAR itemOwner = GetPackOwner( pItem, 64 );
// Try to pick something out of another characters posessions
if( itemOwner && ( itemOwner != pChar ) && ( !pChar->Owns( itemOwner ) ) )
{
client->sysMessage( QString( "You have to steal the %1 out of %2's posessions." ).arg( pItem->getName() ).arg( itemOwner->name.c_str() ) );
bounceItem( client, pItem, true );
return;
}
// Check if the user can grab the item
if( !pChar->canPickUp( pItem ) )
{
client->sysMessage( "You cannot pick that up." );
bounceItem( client, pItem, true );
return;
}
// The user can't see the item
// Basically thats impossible as the client should deny moving the item
// if it's not in line of sight but to prevent exploits
if( !line_of_sight( client->socket(), pChar->pos, pItem->pos, TREES_BUSHES|WALLS_CHIMNEYS|DOORS|ROOFING_SLANTED|FLOORS_FLAT_ROOFING|LAVA_WATER ) )
{
client->sysMessage( "You can't see the item." );
bounceItem( client, pItem, true );
return;
}
P_ITEM outmostCont = GetOutmostCont( pItem, 64 );
// If it's a trade-window, reset the ack-status
if( outmostCont && ( outmostCont->contserial == pChar->serial ) && ( outmostCont->layer() == 0 ) && ( outmostCont->id() == 0x1E5E ) )
{
// Get the other sides tradewindow
P_ITEM tradeWindow = FindItemBySerial( calcserial( outmostCont->moreb1(), outmostCont->moreb2(), outmostCont->moreb3(), outmostCont->moreb4() ) );
// If one of the trade-windows has the ack-status reset it
if( tradeWindow && ( tradeWindow->morez || outmostCont->morez ) )
{
tradeWindow->morez = 0;
outmostCont->morez = 0;
sendtradestatus( tradeWindow, outmostCont );
}
}
// If the top-most container ( thats important ) is a corpse
// and looting is a crime, flag the character criminal.
if( outmostCont && outmostCont->corpse() )
{
// For each item we take out we loose carma
// if the corpse is innocent and not in our guild
bool sameGuild = ( GuildCompare( pChar, FindCharBySerial( outmostCont->ownserial ) ) != 0 );
if( ( outmostCont->more2 == 1 ) && !pChar->Owns( outmostCont ) && !sameGuild )
{
pChar->karma -= 5;
criminal( pChar );
client->sysMessage( "You lost some karma." );
}
}
// Check if the item is too heavy
//if( !pc_currchar->isGMorCounselor() )
//{
//} << Deactivated (DarkStorm)
// ==== Grabbing the Item is allowed here ====
// Remove eventual item-bonusses if we're unequipping something
if( pItem->layer() > 0 )
{
P_CHAR wearer = FindCharBySerial( pItem->contserial );
if( wearer )
wearer->removeItemBonus( pItem );
}
// Send the user a pickup sound if we're picking it up
// From a container/paperdoll
if( !pItem->isInWorld() )
soundeffect( client->socket(), 0x00, 0x57 );
// If we're picking up a specific amount of what we got
// Take that into account
if( pItem->amount() > 1 )
{
UI32 pickedAmount = min( amount, pItem->amount() );
// We only have to split if we're not taking it all
if( pickedAmount != pItem->amount() )
{
P_ITEM splitItem = new cItem( *pItem ); // Create a new item to pick that up
splitItem->SetSerial( cItemsManager::getInstance()->getUnusedSerial() );
splitItem->setAmount( pItem->amount() - pickedAmount );
splitItem->setContSerial( pItem->contserial );
splitItem->SetOwnSerial( pItem->ownserial );
splitItem->SetSpawnSerial( pItem->spawnserial );
// He needs to see the new item
RefreshItem( splitItem );
// If we're taking something out of a spawn-region it's spawning "flag" is removed isn't it?
pItem->SetSpawnSerial( INVALID_SERIAL );
pItem->setAmount( pickedAmount );
}
}
pItem->setContSerial( pChar->serial );
pItem->SetMultiSerial( INVALID_SERIAL );
pItem->setLayer( 0x1E );
// It's in the equipment of another character
if( itemOwner && ( itemOwner != pChar ) )
{
itemOwner->weight -= pItem->getWeight();
statwindow( calcSocketFromChar( itemOwner ), itemOwner );
}
// If the item is in the bank or any sell-container it's NOT counted as char-weight
bool inBank = ( outmostCont && ( outmostCont->contserial == pChar->serial ) && ( outmostCont->layer() >= 0x1A ) );
// Add the weight if:
// - Picked from ground
// - Picked out of another character
// - Picked out of our bank or any other non-visible container
if( ( itemOwner != pChar ) || !inBank )
{
pChar->weight += pItem->getWeight();
statwindow( client->socket(), pChar );
}
}
void dump_item(NXWCLIENT ps, PKGx08 *pp) // Item is dropped on ground or a character
{
if (ps == NULL) return;
tile_st tile;
NXWSOCKET s=ps->toInt();
P_CHAR pc=ps->currChar();
VALIDATEPC(pc);
P_ITEM pi=pointers::findItemBySerial(pp->Iserial);
if (!ISVALIDPI(pi))
{
LogError("client sent bad itemserial %d",pp->Iserial);
return;
}
if ( isCharSerial(pi->getContSerial()) && pi->getContSerial() != pc->getSerial32() ) {
P_CHAR pc_i = pointers::findCharBySerial(pi->getContSerial());
if (ISVALIDPC(pc_i))
pc_i->sysmsg("Warning, backpack disappearing bug located!");
if (ps->isDragging()) {
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
}
if (pi->magic == 2) { //Luxor -- not movable objects
if (ps->isDragging()) {
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->MoveTo( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
if(pi!=NULL)
{
weights::NewCalc(pc);
statwindow(pc,pc);
}
//Ripper...so order/chaos shields disappear when on ground.
if( pi->getId()==0x1BC3 || pi->getId()==0x1BC4 )
{
pc->playSFX( 0x01FE);
staticeffect(DEREF_P_CHAR(pc), 0x37, 0x2A, 0x09, 0x06);
pi->Delete();
return;
}
//test UOP blocking Tauriel 1-12-99
if (!pi->isInWorld())
{
item_bounce6(ps,pi);
return;
}
data::seekTile(pi->getId(), tile);
if (!pc->IsGM() && ((pi->magic==2 || (tile.weight==255 && pi->magic!=1))&&!pc->canAllMove()) ||
( (pi->magic==3 || pi->magic==4) && !(pi->getOwnerSerial32()==pc->getSerial32())))
{
item_bounce6(ps,pi);
return;
}
if (buffer[s][5]!=(unsigned char)'\xFF')
{
if (pi->amxevents[EVENT_IDROPINLAND]!=NULL)
{
g_bByPass = false;
pi->MoveTo(pp->TxLoc,pp->TyLoc,pp->TzLoc);
pi->amxevents[EVENT_IDROPINLAND]->Call( pi->getSerial32(), pc->getSerial32() );
if (g_bByPass) {
pi->Refresh();
return;
}
}
/*
//<Luxor>
g_bByPass = false;
pi->runAmxEvent( EVENT_IDROPINLAND, pi->getSerial32(), pc->getSerial32() );
if (g_bByPass) {
pi->Refresh();
return;
}
//</Luxor>
*/
NxwSocketWrapper sw;
sw.fillOnline( pi );
for( sw.rewind(); !sw.isEmpty(); sw++ )
{
SendDeleteObjectPkt( sw.getSocket(), pi->getSerial32() );
}
pi->MoveTo(pp->TxLoc,pp->TyLoc,pp->TzLoc);
pi->setContSerial(-1);
P_ITEM p_boat = Boats->GetBoat(pi->getPosition());
if(ISVALIDPI(p_boat))
{
pi->SetMultiSerial(p_boat->getSerial32());
}
pi->Refresh();
}
else
{
if ( !ItemDroppedOnChar(ps, pp, pi) ) {
//<Luxor>: Line of sight check
//This part avoids the circle of transparency walls bug
//-----
if ( !lineOfSight( pc->getPosition(), Loc( pp->TxLoc, pp->TyLoc, pp->TzLoc ) ) ) {
ps->sysmsg(TRANSLATE("You cannot place an item there!"));
Sndbounce5(s);
if (ps->isDragging()) {
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
//</Luxor>
//<Luxor> Items count check
if (!pc->IsGM()) {
NxwItemWrapper si;
si.fillItemsAtXY( pp->TxLoc, pp->TyLoc );
if (si.size() >= 2) { //Only 2 items permitted
ps->sysmsg(TRANSLATE("There is not enough space there!"));
Sndbounce5(s);
if (ps->isDragging()) {
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
if (ISVALIDPI(pc->getBackpack())) {
pi->setCont(pc->getBackpack());
pi->SetRandPosInCont(pc->getBackpack());
} else {
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
}
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
}
//</Luxor>
}
weights::NewCalc(pc); // Ison 2-20-99
statwindow(pc,pc);
pc->playSFX( itemsfx(pi->getId()) );
//Boats !
if (pc->getMultiSerial32() > 0) //How can they put an item in a multi if they aren't in one themselves Cut lag by not checking everytime something is put down
{
P_ITEM multi = pointers::findItemBySerial( pc->getMultiSerial32() );
if (ISVALIDPI(multi))
{
//setserial(DEREF_P_ITEM(pi),DEREF_P_ITEM(multi),7);
pi->SetMultiSerial(multi->getSerial32());
}
}
//End Boats
}
}
bool cAllTmpEff::Add(P_CHAR pc_source, P_CHAR pc_dest, int num, unsigned char more1, unsigned char more2, unsigned char more3, short dur)
{
unsigned int ic; // antichrist' changes
int color, color1, color2, socket; //used for incognito spell
int loopexit=0;
if ( pc_source == NULL || pc_dest == NULL )
return false;
if (teffectcount>=cmem*5)
return false;
cTmpEff *pTE;
for (ic=0; ic<teffectcount; ic++) // If there is already an effect of the same or similar kind, reverse it first (Duke)
{
pTE = &teffects[ic];
if (pTE->getDest() == pc_dest->serial)
{
if ((pTE->num==3 && num==3)||
(pTE->num==4 && num==4)||
(pTE->num==5 && num==5)||
(pTE->num==6 && num==6)||
(pTE->num==7 && num==7)||
(pTE->num==8 && num==8)||
(pTE->num==11&& num==11)||
(pTE->num==12&& num==12)||
(pTE->num==18&& num==18)|| //added Poly reverse - AntiChrist (9/99)
(pTE->num==21&& num==21)||
(pTE->num==19&& num==19)|| //added Incognito reverse - AntiChrist (12/99)
(pTE->num==18&& num==19)|| //reverse poly effect if we have to use incognito - AntiChrist (12/99)
(pTE->num==19&& num==18) ) //reverse incognito effect if we have to use poly - AntiChrist (12/99)
{
pTE->Reverse();
AllTmpEff->Remove(pTE);
}
}
}
pTE=new cTmpEff;
pTE->Init();
pTE->setSour(pc_source->serial);
pTE->setDest(pc_dest->serial);
pTE->num=num;
switch (num)
{
case 1:
pc_dest->priv2 |= 0x02;
pTE->setExpiretime_s(pc_source->skill[MAGERY]/100);
pTE->more1=0;
pTE->more2=0;
pTE->dispellable=1;
break;
case 2: // night sight
pc_dest->fixedlight=worldbrightlevel;
dolight(calcSocketFromChar((pc_dest)), worldbrightlevel);
Magic->afterParticles(6, pc_dest); // shows particles for UO:3D clients, like On OSI servers
if(dur > 0) // if a duration is given (potions), use that (Duke, 30.12.2000)
pTE->setExpiretime_s(dur);
else
pTE->setExpiretime_s(pc_source->skill[MAGERY]*10);
pTE->more1=0;
pTE->more2=0;
pTE->dispellable=1;
break;
case 3:
if (pc_dest->effDex()<more1)
more1=pc_dest->effDex();
pc_dest->chgDex(-1 * more1);
pc_dest->stm=min(pc_dest->stm, (int)pc_dest->effDex());
statwindow(calcSocketFromChar(pc_dest), pc_dest);
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=0;
pTE->dispellable=1;
break;
case 4:
if (pc_dest->in<more1)
more1=pc_dest->in;
pc_dest->in-=more1;
pc_dest->mn=min(pc_dest->mn, pc_dest->in);
statwindow(calcSocketFromChar(pc_dest), pc_dest);
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=0;
pTE->dispellable=1;
break;
case 5:
if (pc_dest->st<more1)
more1=pc_dest->st;
pc_dest->st-=more1;
pc_dest->hp=min(pc_dest->hp, pc_dest->st);
statwindow(calcSocketFromChar(pc_dest), pc_dest);
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=0;
pTE->dispellable=1;
break;
case 6:
if (pc_dest->effDex()+more1>250)
more1=250-pc_dest->effDex();
pc_dest->chgDex(more1);
statwindow(calcSocketFromChar(pc_dest), pc_dest);
if(dur > 0) // if a duration is given (potions), use that (Duke, 31.10.2000)
pTE->setExpiretime_s(dur);
else
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=0;
pTE->dispellable=1;
break;
case 7:
if (pc_dest->in+more1>255)
more1=pc_dest->in-255;
pc_dest->in+=more1;
statwindow(calcSocketFromChar(pc_dest), pc_dest);
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=0;
pTE->dispellable=1;
break;
case 8:
if (pc_dest->st+more1>255)
more1=pc_dest->st-255;
pc_dest->st+=more1;
statwindow(calcSocketFromChar(pc_dest), pc_dest);
if(dur > 0) // if a duration is given (potions), use that (Duke, 31.10.2000)
pTE->setExpiretime_s(dur);
else // else use caster's skill
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=0;
pTE->dispellable=1;
break;
case 9:
pTE->setExpiretime_s(more2);
pTE->more1=more1;
pTE->more2=more2;
break;
case 10:
pTE->setExpiretime_s(12);
pTE->more1=more1;
pTE->more2=more2;
break;
case 11: // Bless
if (pc_dest->st+more1>255)
more1=pc_dest->st-255;
if (pc_dest->effDex()+more2>250)
more2=250-pc_dest->effDex();
if (pc_dest->in+more3>255)
more3=pc_dest->in-255;
pc_dest->st+=more1;
pc_dest->chgDex(more2);
pc_dest->in+=more3;
statwindow(calcSocketFromChar(pc_dest), pc_dest);
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=more2;
pTE->more3=more3;
pTE->dispellable=1;
break;
case 12: // Curse
if (pc_dest->st<more1)
more1=pc_dest->st;
if (pc_dest->effDex()<more2)
more2=pc_dest->effDex();
if (pc_dest->in<more3)
more3=pc_dest->in;
pc_dest->st-=more1;
pc_dest->chgDex(-1 * more2);
pc_dest->in-=more3;
statwindow(calcSocketFromChar(pc_dest), pc_dest);
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->more1=more1;
pTE->more2=more2;
pTE->more3=more3;
pTE->dispellable=1;
break;
case 15: // Reactive armor
pTE->setExpiretime_s(pc_source->skill[MAGERY]/10);
pTE->dispellable=1;
break;
case 16: //Explosion potions Tauriel
pTE->setExpiretime_s(more2);
pTE->more1=more1; //item/potion
pTE->more2=more2; //seconds
pTE->more3=more3; //countdown#
break;
case 18: //Polymorph - AntiChrist 09/99
pTE->setExpiretime_s(polyduration);
int c1,b,k;
//Grey flag when polymorphed - AntiChrist (9/99)
pc_dest->crimflag=(polyduration*MY_CLOCKS_PER_SEC)+uiCurrentTime;
if(pc_dest->onhorse)
k = unmounthorse(calcSocketFromChar(pc_dest));
k=(more1<<8)+more2;
pc_dest->xid = pc_dest->id();//let's backup previous id
if (k>=0x000 && k<=0x3e1) // lord binary, body-values >0x3e crash the client
{
pc_dest->id1=k>>8; // allow only non crashing ones
pc_dest->id2=k%256;
c1 = pc_dest->skin; // transparency for monsters allowed, not for players,
// if polymorphing from monster to player we have to switch from transparent to semi-transparent
b=c1&0x4000;
if (b==16384 && (k >=0x0190 && k<=0x03e1))
{
if (c1!=0x8000)
{
pc_dest->skin = pc_dest->xskin = 0xF000;
}
}
}
pc_dest->polymorph=true;
break;
case 19://incognito spell - AntiChrist (10/99)//revised by AntiChrist - 9/12/99
{
pTE->setExpiretime_s(90);
//AntiChrist 11/11/99
//If char is already under polymorph effect, let's reverse the
//polymorph effect to avoid problems
if(pc_dest->polymorph)
{
pc_dest->setId(pc_dest->xid);
pc_dest->polymorph=false;
teleport(pc_dest);
}
int j;
//first: let's search for beard and hair serial
//(we could use alredy saved serials...but it's better
//to recalculate them)
pc_dest->hairserial=-1;
pc_dest->beardserial=-1;
P_ITEM pi;
unsigned int ci;
vector<SERIAL> vecContainer = contsp.getData(pc_dest->serial);
for ( ci = 0; ci < vecContainer.size(); ci++)
{
pi = FindItemBySerial(vecContainer[ci]);
if(pi->layer==0x10)//beard
pc_dest->beardserial=pi->serial;
if(pi->layer==0x0B)//hairs
pc_dest->hairserial=pi->serial;
}
// ------ SEX ------
pc_dest->xid = pc_dest->id();
pc_dest->id1=0x01;
//if we already have a beard..can't turn to female
if(pc_dest->beardserial>-1)
{ //if character has a beard...only male
pc_dest->id2='\x90';//male
} else
{ //if no beard let's randomly change
if((rand()%2)==0) pc_dest->id2='\x90';//male
else pc_dest->id2='\x91';//or female
}
// --- SKINCOLOR ---
pc_dest->xskin = pc_dest->skin;
color=rand()%6;
switch(color)
{
case 0:
pc_dest->skin = 0x83EA;
break;
case 1:
pc_dest->skin = 0x8405;
break;
case 2:
pc_dest->skin = 0x83EF;
break;
case 3:
pc_dest->skin = 0x83F5;
break;
case 4:
pc_dest->skin = 0x841C;
break;
case 5:
pc_dest->skin = 0x83FB;
break;
default:
break;
}
// ------ NAME -----
pc_dest->orgname = pc_dest->name;
if(pc_dest->id2==0x90)
setrandomname(pc_dest, "1");//get a name from male list
else
setrandomname(pc_dest, "2");//get a name from female list
//
//damn..this formula seems to include also some bad color...
//i'll test this later
//AntiChrist
//
//use unique color for hair&beard
//color=0x044E+(rand()%(0x04AD-0x044E));
//i had to track down some valid value
//for hair/beard colors, cause that
//formula contained some bad value =(
//but now it works perfectly :)
//AntiChrist-11/11/99
color=rand()%8;
switch(color)
{
case 0:
color=0x044e;
break;
case 1:
color=0x0455;
break;
case 2:
color=0x045e;
break;
case 3:
color=0x0466;
break;
case 4:
color=0x046a;
break;
case 5:
color=0x0476;
break;
case 6:
color=0x0473;
break;
case 7:
color=0x047c;
break;
default://it should not go here...but..who nows =P
color=0x044e;
}
color1=color>>8;
color2=color%256;
// ------ HAIR -----
if(pc_dest->hairserial>-1)//if hairs exist
{ //change hair style/color
P_ITEM pHair = FindItemBySerial(pc_dest->hairserial);
if(pHair)
{
//stores old hair values...
pHair->moreb1 = static_cast<unsigned char>(pHair->color>>8);
pHair->moreb2 = static_cast<unsigned char>(pHair->color%256);
pHair->moreb3=pHair->id1;
pHair->moreb4=pHair->id2;
//and change them with random ones
switch(rand()%10)
{
case 0:
pHair->id2='\x3B';
break;
case 1:
pHair->id2='\x3C';
break;
case 2:
pHair->id2='\x3D';
break;
case 3:
pHair->id2='\x44';
break;
case 4:
pHair->id2='\x45';
break;
case 5:
pHair->id2='\x46';
break;
case 6:
pHair->id2='\x47';
break;
case 7:
pHair->id2='\x48';
break;
case 8:
pHair->id2='\x49';
break;
case 9:
pHair->id2='\x4A';
break;
default:
pHair->id2='\x4A';
break;
}
//random color
pHair->color = color;
//let's check for invalid values
if ( pHair->color < 0x044E || pHair->color > 0x04AD )
{
pHair->color = 0x044E;
}
pHair->incognito = true;//AntiChrist
}//if j!=-1
}//if hairserial!=-1
// -------- BEARD --------
if(pc_dest->id2==0x90)// only if a man
if(pc_dest->beardserial>-1)//if beard exist
{ //change beard style/color
P_ITEM pBeard = FindItemBySerial(pc_dest->beardserial);
if(pBeard)
{
//clConsole.send("BEARD FOUND!!\n");
//stores old beard values
pBeard->moreb1 = static_cast<unsigned char>(pBeard->color>>8);
pBeard->moreb2 = static_cast<unsigned char>(pBeard->color%256);
pBeard->moreb3 = static_cast<unsigned char>(pBeard->id() >> 8);
pBeard->moreb4 = static_cast<unsigned char>(pBeard->id()%256);
//changes them with random ones
switch(rand()%7)
{
case 0:
pBeard->id2='\x3E';
break;
case 1:
pBeard->id2='\x3F';
break;
case 2:
pBeard->id2='\x40';
break;
case 3:
pBeard->id2='\x41';
break;
case 4:
pBeard->id2='\x4B';
break;
case 5:
pBeard->id2='\x4C';
break;
case 6:
pBeard->id2='\x4D';
break;
default:
pBeard->id2='\x4D';
break;
}
//random color
pBeard->color = color;
if ( pBeard->color < 0x044E || pBeard->color > 0x04AD )
{
pBeard->color = 0x044E;
}
pBeard->incognito=true;//AntiChrist
}//if j!=-1
}//if beardserial!=-1
void dump_item(P_CLIENT ps, PKGx08 *pp) // Item is dropped on ground or a character
{
// tile_st tile;
UOXSOCKET s=ps->GetSocket();
CHARACTER cc=ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LR(cc);
P_ITEM pi=FindItemBySerial(pp->Iserial);
if (!pi)
{
LogErrorVar("client sent bad itemserial %d",pp->Iserial);
return;
}
Weight->NewCalc(DEREF_P_CHAR(pc_currchar));
statwindow(s,DEREF_P_CHAR(pc_currchar));
pi->flags.isBeeingDragged=false;
//Ripper...so order/chaos shields disappear when on ground.
if( pi->id1 == 0x1B && ( pi->id2 == 0xC3 || pi->id2 == 0xC4 ) )
{
soundeffect2(DEREF_P_CHAR(pc_currchar), 0x01, 0xFE);
staticeffect(DEREF_P_CHAR(pc_currchar), 0x37, 0x2A, 0x09, 0x06);
Items->DeleItem( pi );
return;
}
//test UOP blocking Tauriel 1-12-99
if (!pi->isInWorld())
{
item_bounce6(ps,pi);
return;
}
if (!pc_currchar->canPickUp(pi))
{
item_bounce6(ps,pi);
return;
}
if (buffer[s][5]!=(unsigned char)'\xFF')
{
pi->MoveTo(pp->TxLoc,pp->TyLoc,pp->TzLoc);
pi->SetContSerial(-1);
if (pi->glow)
{
pc_currchar->removeHalo(pi);
pc_currchar->glowHalo(pi);
}
SndRemoveitem(pi->serial);
RefreshItem(pi);
}
else
{
ItemDroppedOnChar(ps, pp, pi);
Weight->NewCalc(DEREF_P_CHAR(pc_currchar)); // Ison 2-20-99
statwindow(s,DEREF_P_CHAR(pc_currchar));
itemsfx(s, pi->id()); // Dupois - see itemsfx() for details// Added Oct 09, 1998
//Boats !
if (pc_currchar->multis>0) //How can they put an item in a multi if they aren't in one themselves Cut lag by not checking everytime something is put down
{
P_ITEM pi_multi = FindItemBySerial( pc_currchar->multis );
if (pi_multi != NULL)
{
pi_multi = findmulti(pi->pos);
if (pi_multi != NULL)
pi->SetMultiSerial(pi_multi->serial);
}
}
//End Bots
}
}
/*!
\brief Get an item
\author Unknow, revamped by Endymion
\param client the client
*/
void get_item( NXWCLIENT client ) // Client grabs an item
{
if ( client == NULL)
return;
P_CHAR pc_currchar = client->currChar();
VALIDATEPC( pc_currchar );
NXWSOCKET s = client->toInt();
P_ITEM pi = pointers::findItemBySerPtr(buffer[s]+1);
VALIDATEPI(pi);
//Luxor: not-movable items
/*if (pi->magic == 2 || (isCharSerial(pi->getContSerial()) && pi->getContSerial() != pc_currchar->getSerial32()) ) {
if (isCharSerial(pi->getContSerial())) {
P_CHAR pc_i = pointers::findCharBySerial(pi->getContSerial());
if (ISVALIDPC(pc_i))
pc_i->sysmsg("Warning, backpack bug located!");
}
if (client->isDragging()) {
client->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}*/
pc_currchar->disturbMed(); // Meditation
tile_st item;
data::seekTile( pi->getId(), item );
// Check if item is equiped
if( pi->getContSerial() == pc_currchar->getSerial32() && pi->layer == item.quality )
{
if( pc_currchar->UnEquip( pi, 1 ) == 1 ) // bypass called
{
if( client->isDragging() )
{
UI08 cmd[1]= {0x29};
client->resetDragging();
Xsend(s, cmd, 1);
UpdateStatusWindow(s,pi);
//AoS/ Network->FlushBuffer(s);
}
return;
}
}
P_CHAR owner=NULL;
P_ITEM container=NULL;
if ( !pi->isInWorld() ) { // Find character owning item
if ( isCharSerial( pi->getContSerial()))
{
owner = pointers::findCharBySerial( pi->getContSerial());
}
else // its an item
{
//Endymion Bugfix:
//before check the container.. but if this cont is a subcont?
//so get the outmostcont and check it else:
//can loot without lose karma in subcont
//can steal in trade ecc
//not very good :P
container = pi->getOutMostCont();
if( isCharSerial( container->getContSerial() ) )
owner=pointers::findCharBySerial( container->getContSerial() );
}
if ( ISVALIDPC( owner ) && owner->getSerial32()!=pc_currchar->getSerial32() )
{
if ( !pc_currchar->IsGM() && owner->getOwnerSerial32() != pc_currchar->getSerial32() )
{// Own serial stuff by Zippy -^ Pack aniamls and vendors.
UI08 bounce[2]= { 0x27, 0x00 };
Xsend(s, bounce, 2);
//AoS/ Network->FlushBuffer(s);
if (client->isDragging())
{
client->resetDragging();
pi->setContSerial(pi->getContSerial(),true,false);
item_bounce3(pi);
UpdateStatusWindow(s,pi);
}
return;
}
}
}
if ( ISVALIDPI( container ) )
{
if ( container->layer == 0 && container->getId() == 0x1E5E)
{
// Trade window???
SERIAL serial = calcserial( pi->moreb1, pi->moreb2, pi->moreb3, pi->moreb4);
if ( serial == INVALID )
return;
P_ITEM piz = pointers::findItemBySerial(serial );
if ( ISVALIDPI( piz ) )
if ( piz->morez || container->morez )
{
piz->morez = 0;
container->morez = 0;
sendtradestatus( piz, container );
}
//<Luxor>
if (pi->amxevents[EVENT_ITAKEFROMCONTAINER]!=NULL)
{
g_bByPass = false;
pi->amxevents[EVENT_ITAKEFROMCONTAINER]->Call( pi->getSerial32(), pi->getContSerial(), pc_currchar->getSerial32() );
if (g_bByPass)
{
Sndbounce5(s);
if (client->isDragging())
{
client->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
}
//</Luxor>
/*
//<Luxor>
g_bByPass = false;
pi->runAmxEvent( EVENT_ITAKEFROMCONTAINER, pi->getSerial32(), pi->getContSerial(), s );
if (g_bByPass)
{
Sndbounce5(s);
if (client->isDragging())
{
client->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
//</Luxor>
*/
if ( container->corpse )
{
if ( container->getOwnerSerial32() != pc_currchar->getSerial32())
{ //Looter :P
pc_currchar->unHide();
bool bCanLoot = false;
if( pc_currchar->party!=INVALID ) {
P_CHAR dead = pointers::findCharBySerial( container->getOwnerSerial32() ) ;
if( ISVALIDPC( dead ) && dead->party==pc_currchar->party ) {
P_PARTY party = Partys.getParty( pc_currchar->party );
if( party!=NULL ) {
P_PARTY_MEMBER member = party->getMember( pc_currchar->getSerial32() );
if( member!=NULL )
bCanLoot = member->canLoot;
}
}
}
if ( !bCanLoot && container->more2==1 )
{
pc_currchar->IncreaseKarma(-5);
setCrimGrey(pc_currchar, ServerScp::g_nLootingWillCriminal);
pc_currchar->sysmsg( TRANSLATE("You are loosing karma!"));
}
}
} // corpse stuff
container->SetMultiSerial(INVALID);
//at end reset decay of container
container->setDecayTime();
} // end cont valid
}
if ( !pi->corpse )
{
UpdateStatusWindow(s, pi);
tile_st tile;
data::seekTile( pi->getId(), tile);
if (!pc_currchar->IsGM() && (( pi->magic == 2 || ((tile.weight == 255) && ( pi->magic != 1))) && !pc_currchar->canAllMove() ) ||
(( pi->magic == 3|| pi->magic == 4) && !pc_currchar->isOwnerOf( pi )))
{
UI08 bounce[2]={ 0x27, 0x00 };
Xsend(s, bounce, 2);
//AoS/ Network->FlushBuffer(s);
if (client->isDragging()) // only restore item if it got draggged before !!!
{
client->resetDragging();
item_bounce4(s, pi );
}
} // end of can't get
else
{
// AntiChrist bugfix for the bad bouncing bug ( disappearing items when bouncing )
client->setDragging();
pi->setOldPosition( pi->getPosition() ); // first let's save the position
pi->oldlayer = pi->layer; // then the layer
pi->layer = 0;
if (!pi->isInWorld())
pc_currchar->playSFX(0x0057);
if (pi->amount>1)
{
UI16 amount = ShortFromCharPtr(buffer[s] +5);
if (amount > pi->amount)
amount = pi->amount;
else if (amount < pi->amount)
{ //get not all but a part of item ( piled? ), but anyway make a new one item
P_ITEM pin =archive::item::New();
(*pin)=(*pi);
pin->amount = (UI16)( pi->amount - amount);
pin->setContSerial(pi->getContSerial()); //Luxor
pin->setPosition( pi->getPosition() );
/*if( !pin->isInWorld() && isItemSerial( pin->getContSerial() ) )
pin->SetRandPosInCont( (P_ITEM)pin->getContainer() );*/
if ( pin->getOwnerSerial32() != INVALID )
pin->setOwnerSerial32( pi->getOwnerSerial32() );
statwindow(pc_currchar,pc_currchar);
pin->Refresh();//AntiChrist
}
if ( pi->getId() == ITEMID_GOLD)
{
P_ITEM pack= pc_currchar->getBackpack();
if (ISVALIDPI(pack)) // lb
if ( pi->getContSerial() == pack->getSerial32())
statwindow(pc_currchar, pc_currchar);
}
pi->amount = amount;
} // end if corpse
#ifdef SPAR_I_LOCATION_MAP
pointers::delFromLocationMap( pi );
#else
mapRegions->remove( pi );
#endif
pi->setPosition( 0, 0, 0 );
pi->setContSerial( INVALID, false );
}
}
int amt = 0, wgt;
if ( container == NULL )
{
wgt = (int)weights::LockeddownWeight( pi, &amt);
pc_currchar->weight += wgt;
statwindow(pc_currchar, pc_currchar);
}
}
void get_item(P_CLIENT ps) // Client grabs an item
{
int x, npc=-1, c, amount, update = 0, serial;
// tile_st tile;
int z;// antichrist for trade fix
UOXSOCKET s = ps->GetSocket();
int cc = ps->GetCurrChar();
P_CHAR pc_currchar = MAKE_CHARREF_LR(cc);
serial = calcserial(buffer[s][1], buffer[s][2], buffer[s][3], buffer[s][4]);
if (serial == INVALID_SERIAL || buffer[s][1] < 0x40)
return; // landscape or a character
P_ITEM pi = FindItemBySerial(serial);
if (pi == NULL)
return;
pc_currchar->disturbMed(s); // Meditation
// Zippy's stealing changes
x = DEREF_P_ITEM(pi);
if (!items[x].isInWorld()) // Find character owning item
{
int loopexit = 0;
do // Find character owning item
{
if (isCharSerial(items[x].contserial))
{
npc = calcCharFromSer(items[x].contserial);
}
else // its an item
{
if (items[x].isInWorld())
{
npc=-1;
break;
}
x = calcItemFromSer(items[x].contserial);
// ANTICHRIST -- SECURE TRADE FIX
if (x!=-1) // LB overwriting x is essential here, dont change it!!!
{
if (items[x].layer == 0 && items[x].id() == 0x1E5E)
{
// Trade window???
serial = calcserial(items[x].moreb1, items[x].moreb2, items[x].moreb3, items[x].moreb4);
if (serial == INVALID_SERIAL)
return;
z = calcItemFromSer(serial);
if (z!=-1)
if ((items[z].morez || items[x].morez))
{
items[z].morez = 0;
items[x].morez = 0;
sendtradestatus(z, x);
}
}
// Blackwinds Looting is crime implementation
// changed slightly by Ripper
if (items[x].corpse != 0 && !pc_currchar->Owns(&items[x]))
{
P_CHAR co = FindCharBySerial(items[x].ownserial);
if (items[x].more2 == 1 && Guilds->Compare(cc, DEREF_P_CHAR(co)) == 0)
{
pc_currchar->karma -= 5;
criminal(cc);
sysmessage(s, "You lost some karma!");
}
npc = 0;
} // Criminal stuff
if (items[x].corpse != 0)
npc = 0;
} // end if x!=-1
if (x==-1)
npc = 0;
}
} while ((npc==-1) &&(++loopexit < MAXLOOPS));
}
if (npc>0) // 0=corpse, hence >0 ..
{
if (!(pc_currchar->isGM()) && npc != cc && ! pc_currchar->Owns(&chars[npc]))
{// Own serial stuff by Zippy -^ Pack aniamls and vendors.
bounce[1] = 0;
Xsend(s, bounce, 2);
if (ps->IsDragging())
{
ps->ResetDragging();
item_bounce3(pi);
pi->magic = 3;
}
return;
}
}
// End Zippy's change
// Boats->
if (x!=-1 && npc!=-1)
{
if (items[x].multis>0)
imultisp.remove(items[x].multis, items[x].serial);
items[x].startDecay();
// End Boats Change
// AntiChrist -- for poisoned items
if (items[x].layer>0)
{
chars[npc].removeItemBonus(&items[x]); // remove BONUS STATS given by equipped special items
}
if ((items[x].trigon==1) && (items[x].layer != 0) && (items[x].layer != 15) && (items[x].layer < 19))// -Frazurbluu- Trigger Type 2 is my new trigger type *-
{
triggerwitem(s, DEREF_P_ITEM(pi), 1); // trigger is fired
}
// AntiChrist -- for poisoned items
if (items[x].poisoned)
{
chars[npc].poison -= items[x].poisoned;
if (chars[npc].poison < 0)
chars[npc].poison = 0;
}
}
if (pi != NULL)
{
if (pi->corpse != 1)
{
UpdateStatusWindow(s, pi);
if (!pc_currchar->canPickUp(pi))
{
bounce[1] = 0;
Xsend(s, bounce, 2);
if (ps->IsDragging()) // only restore item if it got draggged before !!!
{
ps->ResetDragging();
item_bounce4(s, pi);
}
}
else
{
// AntiChrist bugfix for the bad bouncing bug ( disappearing items when bouncing )
DRAGGED[s] = 1;
pi->oldx = pi->pos.x; // first let's save the position
pi->oldy = pi->pos.y;
pi->oldz = pi->pos.z;
pi->oldcontserial = pi->contserial; // then let's save the container
pi->oldlayer = pi->layer; // then the layer
pi->layer = 0;
if (!pi->isInWorld())
soundeffect(s, 0x00, 0x57);
if (pi->amount>1)
{
amount = (buffer[s][5] << 8) + buffer[s][6];
if (amount>pi->amount)
amount = pi->amount;
if (amount < pi->amount)
{
c=Items->MemItemFree();
items[c].Init(0);
memcpy(&items[c], pi, sizeof(cItem)); // Tauriel reduce code faster too
items[c].SetSerial(itemcount2);
itemcount2++;
items[c].amount = pi->amount - amount;
// Tauriel sorry, there is no way to make this call the item creation stuff
// Why doing it twice?
// setptr(&itemsp[itemcount2%HASHMAX], c);
// itemcount2++; // important bugfix for items disappearing, lb
if (!items[c].isInWorld())
contsp.insert(items[c].contserial, items[c].serial);
if (items[c].ownserial!=-1)
setptr(&ownsp[items[c].ownserial%HASHMAX], c);
if (items[c].spawnserial!=-1)
setptr(&spawnsp[items[c].spawnserial%HASHMAX], c);
statwindow(s,cc);
RefreshItem(c);//AntiChrist
}
if (pi->id() == 0x0EED) // gold coin
{
int packnum = packitem(currchar[s]);
if (packnum!=-1) // lb
if (pi->contserial == items[packnum].serial)
update = 1;
}
pi->amount = amount;
}
// Tauriel remove item from world mapcells
mapRegions->Remove(pi); // remove this item from a map cell
pi->pos.x = 0;
pi->pos.y = 0;
pi->pos.z = 0;
pi->flags.isBeeingDragged=true;
pi->SetContSerial(-1);
if (pi != NULL) // Ripper...adds weight to the players cursor when carrying a item.
{
int amt = 0, wgt;
wgt = (int)Weight->LockeddownWeight(pi, &amt, 0);
pc_currchar->weight += wgt;
update = 1;
}
}
}
} // end of if i!=-1
if (update)
statwindow(s, DEREF_P_CHAR(pc_currchar));
}
void wear_item(NXWCLIENT ps) // Item is dropped on paperdoll
{
if ( ps == NULL )
return;
NXWSOCKET s = ps->toInt();
if (s < 0)
return;
P_CHAR pc=ps->currChar();
VALIDATEPC( pc );
P_CHAR pck = pointers::findCharBySerPtr(buffer[s]+6);
VALIDATEPC( pck );
if( pck->dead ) //Exploit fix: Dead ppl can't equip anything.
return;
P_ITEM pi=pointers::findItemBySerPtr(buffer[s]+1);
VALIDATEPI(pi);
bool resetDragging = false;
if( (pi->getId()>>8) >= 0x40) // LB, client crashfix if multi-objects are moved to PD
resetDragging = true;
tile_st tile;
int serial/*, letsbounce=0*/; // AntiChrist (5) - new ITEMHAND system
data::seekTile(pi->getId(), tile);
if( ( clientDimension[s]==3 ) && (tile.quality==0) )
{
ps->sysmsg(TRANSLATE("You can't wear that"));
resetDragging = true;
}
else {
P_ITEM outmost = pi->getOutMostCont();
P_CHAR vendor = pointers::findCharBySerial( outmost->getContSerial() );
if( ISVALIDPC( vendor ) && ( vendor->getOwnerSerial32() != pc->getSerial32() ) )
{
resetDragging = true;
}
}
if( resetDragging ) {
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
item_bounce4(s,pi);
UpdateStatusWindow(s,pi);
}
return;
}
if ( pck->getSerial32() == pc->getSerial32() || pc->IsGM() )
{
if ( !pc->IsGM() && pi->st > pck->getStrength() && !pi->isNewbie() ) // now you can equip anything if it's newbie
{
ps->sysmsg(TRANSLATE("You are not strong enough to use that."));
resetDragging = true;
}
else if ( !pc->IsGM() && !checkItemUsability(pc, pi, ITEM_USE_WEAR) )
{
resetDragging = true;
}
else if ( (pc->getId() == BODY_MALE) && ( pi->getId()==0x1c00 || pi->getId()==0x1c02 || pi->getId()==0x1c04 || pi->getId()==0x1c06 || pi->getId()==0x1c08 || pi->getId()==0x1c0a || pi->getId()==0x1c0c ) ) // Ripper...so males cant wear female armor
{
ps->sysmsg(TRANSLATE("You cant wear female armor!"));
resetDragging = true;
}
else if ((((pi->magic==2)||((tile.weight==255)&&(pi->magic!=1))) && !pc->canAllMove()) ||
( (pi->magic==3|| pi->magic==4) && !(pi->getOwnerSerial32()==pc->getSerial32())))
{
resetDragging = true;
}
if( resetDragging ) {
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
item_bounce4(s,pi);
UpdateStatusWindow(s,pi);
}
return;
}
// - AntiChrist (4) - checks for new ITEMHAND system
// - now you can't equip 2 hnd weapons with 1hnd weapons nor shields!!
serial= pck->getSerial32(); //xan -> k not cc :)
P_ITEM pj = NULL;
P_CHAR pc_currchar= pck;
// P_ITEM pack= pc_currchar->getBackpack();
//<Luxor>
P_ITEM pW = pc_currchar->getWeapon();
if (tile.quality == 1 || tile.quality == 2)
{ //weapons layers
if ( (pi->layer == LAYER_2HANDWEAPON && ISVALIDPI(pc_currchar->getShield())) )
{
ps->sysmsg(TRANSLATE("You cannot wear two weapons."));
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
if (ISVALIDPI(pW))
{
if (pi->itmhand != 3 && pi->lodamage != 0 && pi->itmhand == pW->itmhand)
{
ps->sysmsg(TRANSLATE("You cannot wear two weapons."));
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
}
}
//</Luxor>
int drop[2]= {-1, -1}; // list of items to drop
// there no reason for it to be larger
int curindex= 0;
NxwItemWrapper si;
si.fillItemWeared( pc_currchar, false, true, true );
for( si.rewind(); !si.isEmpty(); si++ )
{
// we CANNOT directly bounce the item, or the containersearch() function will not work
// so we store the item ID in letsbounce, and at the end we bounce the item
pj=si.getItem();
if(!ISVALIDPI(pj))
continue;
if ((tile.quality == 1) || (tile.quality == 2))// weapons
{
if (pi->itmhand == 2) // two handed weapons or shield
{
if (pj->itmhand == 2)
drop[curindex++]= DEREF_P_ITEM(pj);
if ( (pj->itmhand == 1) || (pj->itmhand == 3) )
drop[curindex++]= DEREF_P_ITEM(pj);
}
if (pi->itmhand == 3)
{
if ((pj->itmhand == 2) || pj->itmhand == 3)
drop[curindex++]= DEREF_P_ITEM(pj);
}
if ((pi->itmhand == 1) && ((pj->itmhand == 2) || (pj->itmhand == 1)))
drop[curindex++]= DEREF_P_ITEM(pj);
}
else // not a weapon
{
if (pj->layer == tile.quality)
drop[curindex++]= DEREF_P_ITEM(pj);
}
}
if (ServerScp::g_nUnequipOnReequip)
{
if (drop[0] > -1) // there is at least one item to drop
{
for (int i= 0; i< 2; i++)
{
if (drop[i] > -1)
{
P_ITEM p_drop=MAKE_ITEM_REF(drop[i]);
if(ISVALIDPI(p_drop))
pc_currchar->UnEquip( p_drop, 0);
}
}
}
pc->playSFX( itemsfx(pi->getId()) );
// pc_currchar->Equip(pi, 1); // Item is equipped twice ????
}
else
{
if (drop[0] == -1)
{
pc->playSFX( itemsfx(pi->getId()) );
// pc_currchar->Equip(pi, 1);// Item is equipped twice ????
}
else
{
ps->sysmsg("You cannot wear two weapons.");
Sndbounce5(s);
if (ps->isDragging())
{
ps->resetDragging();
UpdateStatusWindow(s,pi);
}
pi->setContSerial( pi->getContSerial(true) );
pi->setPosition( pi->getOldPosition() );
pi->layer = pi->oldlayer;
pi->Refresh();
return;
}
}
if (!(pc->IsGM())) //Ripper..players cant equip items on other players or npc`s paperdolls.
{
if ((pck->getSerial32() != pc->getSerial32())/*&&(chars[s].npc!=k)*/) //-> really don't understand this! :|, xan
{
ps->sysmsg(TRANSLATE("You can't put items on other people!"));
item_bounce6(ps,pi);
return;
}
}
NxwSocketWrapper sws;
sws.fillOnline( pi );
for( sws.rewind(); !sws.isEmpty(); sws++ )
SendDeleteObjectPkt( sws.getSocket(), pi->getSerial32() );
pi->layer=buffer[s][5];
pi->setContSerial(LongFromCharPtr(buffer[s] +6));
if (g_nShowLayers) InfoOut("Item equipped on layer %i.\n",pi->layer);
wearIt(s,pi);
NxwSocketWrapper sw;
sw.fillOnline( pck, false );
for( sw.rewind(); !sw.isEmpty(); sw++ )
{
NXWSOCKET j=sw.getSocket();
if( j!=INVALID )
wornitems(j, pck );
}
pc->playSFX( itemsfx(pi->getId()) );
weights::NewCalc(pc); // Ison 2-20-99
statwindow(pc_currchar,pc_currchar);
// if (pi->glow>0)
// {
// pc->removeHalo(pi); // if gm equips on differnt player it needs to be deleted out of the hashteble
// pck->addHalo(pi);
// pck->glowHalo(pi);
// }
if ( pck->Equip(pi, 1) == 2) // bypass called
{
P_ITEM pack = pck->getBackpack();
pc->playSFX( itemsfx(pi->getId()) );
pi->layer= 0;
pi->setContSerial( pack->getSerial32() );
sendbpitem(s, pi);
return;
}
}
}
void cTmpEff::Expire()
{
int k;
P_CHAR pc_s = FindCharBySerial(getDest());
if ( num != 9 // grinding
&& num != 10 // create potion
&& num != 13 // door close
&& num != 14 // training dummy
&& num != 17) // explosion
{
//Added by TANiS to fix errors, memory corruption and door auto-close 10-6-98
// Check to see if it's a dead char and delete the wrong effect, or if it's just
// a door auto-close effect and process it the right way.
if ( pc_s == NULL )
{
return; // just remove this effect
} //End of TANiS' change
}
switch(num)
{
case 1:
if (pc_s->priv2&0x02)
{
pc_s->priv2 &= 0xFD;
int sk=calcSocketFromChar((pc_s));
if (sk!=-1) sysmessage(sk, "You are no longer frozen.");
Magic->afterParticles(38, pc_s);
}
break;
case 2:
pc_s->fixedlight='\xFF';
dolight(calcSocketFromChar((pc_s)), worldbrightlevel);
break;
case 3:
pc_s->chgDex(more1);
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 4:
pc_s->in+=more1;
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 5:
pc_s->st+=more1;
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 6:
pc_s->chgDex(-1 * more1);
pc_s->stm=min(pc_s->stm, (int)pc_s->effDex());
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 7:
pc_s->in-=more1;
pc_s->mn=min(pc_s->mn, pc_s->in);
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 8:
pc_s->st-=more1;
pc_s->hp=min(pc_s->hp, pc_s->st);
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 9:
if (more1 == 0)
{
if (more2!=0)
{
sprintf((char*)temp, "*%s continues grinding.*", pc_s->name.c_str());
npcemoteall(pc_s, (char*)temp,1);
}
soundeffect2(pc_s, 0x0242);
}
break;
case 10:
{
pc_s = FindCharBySerial(getSour());
P_ITEM pMortar = FindItemBySerial(getDest());
if(pMortar != NULL) //AntiChrist - to prevent crashes
Skills->CreatePotion(pc_s, more1, more2, pMortar);
}
break;
case 11:
pc_s->st-=more1;
pc_s->hp=min(pc_s->hp, pc_s->st);
pc_s->chgDex(-1 * more2);
pc_s->stm=min(pc_s->stm, (int)pc_s->effDex());
pc_s->in-=more3;
pc_s->mn=min(pc_s->mn, pc_s->in);
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 12:
pc_s->st+=more1;
pc_s->chgDex(more2);
pc_s->in+=more3;
statwindow(calcSocketFromChar(pc_s), pc_s);
break;
case 13:
{
P_ITEM pDoor = FindItemBySerial(getDest());// door
if (pDoor)
{
if (pDoor->dooropen==0)
break;
pDoor->dooropen=0;
dooruse(calcSocketFromChar((pc_s)), pDoor);
}
break;
}
case 14: //- training dummies Tauriel check to see if item moved or not before searching for it
{
P_ITEM pTrainDummy = FindItemBySerial(getDest());
if (pTrainDummy)
{
if (pTrainDummy->id()==0x1071)
{
pTrainDummy->setId(0x1070);
pTrainDummy->gatetime=0;
RefreshItem(pTrainDummy);//AntiChrist
}
else if (pTrainDummy->id()==0x1075)
{
pTrainDummy->setId(0x1074);
pTrainDummy->gatetime=0;
RefreshItem(pTrainDummy);//AntiChrist
}
}
}
break;
case 15: //reactive armor
pc_s->ra=0;
break;
case 16: //Explosion potion messages Tauriel
sprintf((char*)temp, "%i", more3);
sysmessage(calcSocketFromChar((pc_s)), (char*)temp); // crashfix, LB
break;
case 17: //Explosion potion explosion Tauriel
pc_s = FindCharBySerial(getSour());
explodeitem(calcSocketFromChar((pc_s)), FindItemBySerial(getDest())); //explode this item
break;
case 18: //Polymorph spell by AntiChrist 9/99
if(pc_s->polymorph)//let's ensure it's under polymorph effect!
{
pc_s->setId(pc_s->xid);
pc_s->polymorph=false;
teleport(pc_s);
}
break;
case 19: //Incognito spell by AntiChrist 12/99
reverseIncognito(pc_s);
break;
case 20: // LSD potions, LB 5'th nov 1999
{
k=calcSocketFromChar((pc_s));
if (k==-1) return;
LSD[k]=0;
sysmessage(k,"LSD has worn off");
pc_s->stm=3; // stamina near 0
pc_s->mn=3;
pc_s->hp=pc_s->hp/7;
impowncreate(k, pc_s, 0);
all_items(k); // absolutely necassairy here !!!
AllCharsIterator it;
for (it.Begin(); !it.atEnd(); it++) // that hurts, but there's no other good way
{
P_CHAR pc = it.GetData();
if (chardist( pc_s, pc ) < 15 && ( online(pc) || pc->isNpc() ) )
updatechar(pc);
}
}
break;
case 21:
int toDrop;
toDrop = more1; //Effect->more1;
if( ( pc_s->baseskill[PARRYING] - toDrop ) < 0 )
pc_s->baseskill[PARRYING] = 0;
else
pc_s->baseskill[PARRYING] -= toDrop;
break;
case 33: // delayed hiding for gms after flamestrike effect
k=calcSocketFromChar((pc_s));
sysmessage(k,"You have hidden yourself well.");
pc_s->hidden=1;
updatechar(pc_s);
break;
case 34: // delayed unhide for gms
// Changed to be uniform with delayed hideing (Aldur)
k = calcSocketFromChar((pc_s));
sysmessage(k, "You are now visible.");
pc_s->hidden = 0;
updatechar(pc_s);
break;
case 35: //heals some pf - solarin
int iHp;
iHp=(int)more1;
pc_s->hp+=iHp;
updatestats(pc_s, 0);
if (!more2)
tempeffect(pc_s, pc_s, 35, more1+1, 1, more3, 0);
break;
default:
LogErrorVar("Fallout of switch (num = %i).", num);
break;
}
Items->CheckEquipment(pc_s); //AntiChrist - checks equipments for stats requirements
}
void cDragItems::equipItem( P_CLIENT client )
{
// Get the packet information
SERIAL itemId = LongFromCharPtr( &buffer[ client->socket() ][ 1 ] );
SERIAL playerId = LongFromCharPtr( &buffer[ client->socket() ][ 6 ] );
P_ITEM pItem = FindItemBySerial( itemId );
P_CHAR pWearer = FindCharBySerial( playerId );
if( !pItem || !pWearer )
return;
P_CHAR pChar = client->player();
// We're dead and can't do that
if( pChar->dead )
{
client->sysMessage( "You are dead and can't do that." );
bounceItem( client, pItem );
return;
}
// Our target is dead
if( ( pWearer != pChar ) && pWearer->dead )
{
client->sysMessage( "You can't equip dead players." );
bounceItem( client, pItem );
return;
}
// Get our tile-information
tile_st pTile;
Map->SeekTile( pItem->id(), &pTile );
// Is the item wearable ? ( layer == 0 | equip-flag not set )
// Multis are not wearable are they :o)
if( pTile.layer == 0 || !( pTile.flag3 & 0x40 ) || pItem->isMulti() )
{
client->sysMessage( "This item cannot be equipped." );
bounceItem( client, pItem );
return;
}
// Required Strength
if( pItem->st > pWearer->st )
{
if( pWearer == pChar )
client->sysMessage( "You cannot wear that item, you seem not strong enough" );
else
client->sysMessage( "This person can't wear that armor, it seems not strong enough" );
bounceItem( client, pItem );
return;
}
// Required Dexterity
if( pItem->dx > pWearer->effDex() )
{
if( pWearer == pChar )
client->sysMessage( "You cannot wear that item, you seem not agile enough" );
else
client->sysMessage( "This person can't wear that armor, it seems not agile enough" );
bounceItem( client, pItem );
return;
}
// Required Intelligence
if( pItem->in > pWearer->in )
{
if( pWearer == pChar )
client->sysMessage( "You cannot wear that item, you seem not smart enough" );
else
client->sysMessage( "This person can't wear that armor, it seems not smart enough" );
bounceItem( client, pItem );
return;
}
// Males can't wear female armor
if( ( pChar->id() == 0x0190 ) && ( pItem->id() >= 0x1C00 ) && ( pItem->id() <= 0x1C0D ) )
{
client->sysMessage( "You cannot wear female armor." );
bounceItem( client, pItem );
return;
}
// Needs a check (!)
// Checks for equipment on the same layer
// If there is any it tries to unequip it
// If that fails it cancels
UI08 layer = pItem->layer();
vector< SERIAL > equipment = contsp.getData( pWearer->serial );
for( UI32 i = 0; i < equipment.size(); i++ )
{
P_ITEM pEquip = FindItemBySerial( equipment[ i ] );
if( pEquip )
continue;
// We found an item which is on the same layer (!)
// Unequip it if we can
bool twoHanded = false;
if( pEquip->twohanded() && ( layer == 1 || layer == 2 ) )
twoHanded = true;
if( pItem->twohanded() && ( pEquip->layer() == 1 || pEquip->layer() == 2 ) )
twoHanded = true;
if( ( pEquip->layer() == layer ) || twoHanded )
{
if( pChar->canPickUp( pEquip ) ) // we're equipping so we do the check
pEquip->toBackpack( pWearer );
// If it's still on the char: cancel equipment
if( pEquip->contserial == pWearer->serial )
{
client->sysMessage( "You already have an item on that layer." );
bounceItem( client, pItem );
return;
}
}
}
// At this point we're certain that we can wear the item
pItem->setContSerial( playerId );
pItem->setLayer( pTile.layer ); // Don't trust the user input on this one
// Handle the weight if the item is leaving our "body"
if( pWearer != pChar )
{
pChar->weight -= pItem->getWeight();
pWearer->weight += pItem->getWeight();
// Update the status-windows
statwindow( client->socket(), pChar );
statwindow( calcSocketFromChar( pWearer ), pWearer );
}
if( pTile.layer == 0x19 )
pWearer->setOnHorse( true );
// Apply the bonuses
pWearer->st += pItem->st2;
pWearer->chgDex( pItem->dx2 );
pWearer->in += pItem->in2;
// Show debug information if requested
if( showlayer )
clConsole.send( QString( "Item (%1) equipped on layer %2" ).arg( pItem->name() ).arg( pItem->layer() ) );
// I don't think we need to remove the item
// as it's only visible to the current char
// And he looses contact anyway
// SndRemoveitem( pi->serial );
// Build our packets
cWornItems wearItem( pWearer->serial, pItem->serial, pItem->layer(), pItem->id(), pItem->color() );
cSoundEffect soundEffect( 0x57, pWearer->pos );
// Send to all sockets in range
// ONLY the new equipped item and the sound-effect
for( UOXSOCKET s = 0; s < now; s++ )
if( perm[s] && inrange1p( pWearer, currchar[s] ) )
{
soundEffect.send( s );
wearItem.send( s );
}
// Lord Binaries Glow stuff
if( pItem->glow != INVALID_SERIAL )
{
pChar->removeHalo( pItem );
pWearer->addHalo( pItem );
pWearer->glowHalo( pItem );
}
}
void cTrade::buyaction(int s)
{
char clearmsg[8];
int clear, i, j;
P_ITEM buyit[256];
int amount[512];
int layer[512];
int playergoldtotal;
int goldtotal;
int itemtotal;
int soldout;
int tmpvalue=0; // Fixed for adv trade system -- Magius(CHE) §
// CHARACTER cc=currchar[s];
P_CHAR pc_currchar = currchar[s];
P_ITEM pi_pack = Packitem(pc_currchar);
if (pi_pack == NULL)
return; //LB no player-pack - no buy action possible - and no crash too ;-)
P_CHAR npc = FindCharBySerial(calcserial(buffer[s][3], buffer[s][4], buffer[s][5], buffer[s][6]));
if (npc <= 0) return;
clear=0;
goldtotal=0;
soldout=0;
itemtotal=(((256*(buffer[s][1]))+buffer[s][2])-8)/7;
if (itemtotal>256) return; //LB
for(i = 0; i < itemtotal; i++)
{
layer[i]=buffer[s][8+(7*i)];
buyit[i] = FindItemBySerial(calcserial(buffer[s][8+(7*i)+1], buffer[s][8+(7*i)+2], buffer[s][8+(7*i)+3], buffer[s][8+(7*i)+4]));
amount[i]=(256*(buffer[s][8+(7*i)+5]))+buffer[s][8+(7*i)+6];
if (buyit[i] != NULL)
{
buyit[i]->rank=10;
// Fixed for adv trade system -- Magius(CHE) §
tmpvalue = buyit[i]->value;
tmpvalue = calcValue(buyit[i], tmpvalue);
if (SrvParams->trade_system()==1)
tmpvalue = calcGoodValue(pc_currchar, buyit[i], tmpvalue,0);
goldtotal += (amount[i]*tmpvalue);
// End Fix for adv trade system -- Magius(CHE) §
}
}
bool useBank;
useBank = (goldtotal >= SrvParams->checkBank() );
if( useBank )
playergoldtotal = GetBankCount( pc_currchar, 0x0EED );
else
playergoldtotal = pc_currchar->CountGold();
if ((playergoldtotal>=goldtotal)||(pc_currchar->isGM()))
{
for (i = 0; i < itemtotal; i++)
{
if (buyit[i] != NULL)
{
if (buyit[i]->amount < amount[i])
{
soldout = 1;
}
}
}
if (soldout)
{
npctalk(s, npc, "Alas, I no longer have all those goods in stock. Let me know if there is something else thou wouldst buy.",0);
clear = 1;
}
else
{
if (pc_currchar->isGM())
{
sprintf((char*)temp, "Here you are, %s. Someone as special as thee will receive my wares for free of course.", pc_currchar->name.c_str());
}
else
{
if(useBank)
{
sprintf((char*)temp, "Here you are, %s. %d gold coin%s will be deducted from your bank account. I thank thee for thy business.",
pc_currchar->name.c_str(), goldtotal, (goldtotal==1) ? "" : "s");
goldsfx(s, goldtotal);
}
else
{
sprintf((char*)temp, "Here you are, %s. That will be %d gold coin%s. I thank thee for thy business.",
pc_currchar->name.c_str(), goldtotal, (goldtotal==1) ? "" : "s");
goldsfx(s, goldtotal); // Dupois, SFX for gold movement. Added Oct 08, 1998
}
}
npctalkall(npc, (char*)temp, 0);
npcaction(npc, 0x20); // bow (Duke, 17.3.2001)
clear = 1;
if( !(pc_currchar->isGM() ) )
{
if( useBank )
DeleBankItem( pc_currchar, 0x0EED, 0, goldtotal );
else
delequan( pc_currchar, 0x0EED, goldtotal, NULL );
}
for (i=0;i<itemtotal;i++)
{
P_ITEM pi = buyit[i];
if (pi != NULL)
{
if (pi->amount>amount[i])
{
if (pi->pileable)
{
Commands->DupeItem(s, buyit[i], amount[i]);
}
else
{
for (j=0;j<amount[i];j++)
{
Commands->DupeItem(s, buyit[i], 1);
}
}
pi->amount-=amount[i];
pi->restock+=amount[i];
}
else
{
switch(layer[i])
{
case 0x1A:
if (pi->pileable)
{
Commands->DupeItem(s, buyit[i], amount[i]);
}
else
{
for (j=0;j<amount[i];j++)
{
Commands->DupeItem(s, buyit[i], 1);
}
}
pi->amount=pi->amount-amount[i];
pi->restock=pi->restock+amount[i];
break;
case 0x1B:
if (pi->pileable)
{
pi->SetContSerial(pi_pack->serial);
RefreshItem(buyit[i]);//AntiChrist
}
else
{
for (j=0;j<amount[i]-1;j++)
{
Commands->DupeItem(s, buyit[i], 1);
}
pi->SetContSerial(pi_pack->serial);
pi->amount = 1;
RefreshItem(buyit[i]);//AntiChrist
}
break;
default:
clConsole.send("ERROR: Fallout of switch statement without default. wolfpack.cpp, buyaction()\n"); //Morrolan
}
}
}
}
}
}
else
{
npctalkall(npc, "Alas, thou dost not possess sufficient gold for this purchase!",0);
}
if (clear)
{
clearmsg[0]=0x3B;
clearmsg[1]=0x00;
clearmsg[2]=0x08;
clearmsg[3]=buffer[s][3];
clearmsg[4]=buffer[s][4];
clearmsg[5]=buffer[s][5];
clearmsg[6]=buffer[s][6];
clearmsg[7]=0x00;
Xsend(s, clearmsg, 8);
}
Weight->NewCalc(pc_currchar); // Ison 2-20-99
statwindow(s, pc_currchar);
}
int cCombat::CalcDef(P_CHAR pc,int x) // Calculate total defense power
{
P_ITEM pj=NULL;
P_ITEM pShield = pc->getShield();
unsigned int total=pc->def;
if (x==0) // -Fraz- added parrying skill bonuses
{
if (pShield)
total+=(((pc->skill[PARRYING]*pShield->def)/200)+1); // Updated to OSI standars (Skyfire)
} //Displayed AR = ((Parrying Skill * Base AR of Shield) ? 200) + 1
if (pc->skill[PARRYING]==1000)
total+=5; // gm parry bonus.
if (ishuman(pc)) // Added by Magius(CHE)
{
unsigned int ci=0;
P_ITEM pi;
vector<SERIAL> vecContainer = contsp.getData(pc->serial);
for ( ci = 0; ci < vecContainer.size(); ci++)
{
pi = FindItemBySerial(vecContainer[ci]);
if (pi != NULL && pi->layer>1 && pi->layer<25)
{
//blackwinds new stuff
int armordef=0;
if (pi->def>0)
{
float armorhpperc=((float)pi->hp/((float)pi->maxhp/100));
armordef=(int)(((float)pi->def/100)*armorhpperc);
}
if (x==0)
total+=pi->def;
else
{
switch (pi->layer)
{
case 5:
case 13:
case 17:
case 20:
case 22:
if (x==1 && pi->def>total)
{
total=pi->def;
pj=pi;
}
break;
case 19:
if (x==2 && pi->def>total)
{
total=pi->def;
pj=pi;
}
break;
case 6:
if (x==3 && pi->def>total)
{
total=pi->def;
pj=pi;
}
break;
case 3:
case 4:
case 12:
case 23:
case 24:
if (x==4 && pi->def>total)
{
total=pi->def;
pj=pi;
}
break;
case 10:
if (x==5 && pi->def>total)
{
total=pi->def;
pj=pi;
}
break;
case 7:
if (x==6 && pi->def>total)
{
total=pi->def;
pj=pi;
}
break;
default:
break;
}
}
}
}
} else pj=NULL;
UOXSOCKET k=calcSocketFromChar(pc);
if (pj && k!=-1)
{
//AntiChrist - don't damage hairs, beard and backpack
//important! this sometimes cause backpack destroy!
//
if(pj->layer!=0x0B && pj->layer!=0x10 && pj->layer!=0x15) // bugfix lB,was 0x15, 0x15,0x15 !!
{
if((rand()%2)==0)
pj->hp--; //Take off a hit point
if(pj->hp<=0)
{
sysmessage(k, tr("Your %1 has been destroyed").arg(pj->getName().c_str()));
pc->removeItemBonus(pj); // remove BONUS STATS given by equipped special items
//-Frazurbluu- need to have tactics bonus removed also
if ((pj->trigon==1) && (pj->layer >0))// -Frazurbluu- Trigger Type 2 is my new trigger type *-
{
Trig->triggerwitem(k, pj, 1); // trigger is fired when item destroyed
}
Items->DeleItem(pj);
}
statwindow(k, currchar[k]);
}
}
if (total < 2) total = 2;
return total;
}
