Area Changes and other fixes
added areas and ccoh, fixed some areas to work with crafting fixed some on death issues added server entry/ooc
This commit is contained in:
@@ -1,50 +0,0 @@
|
||||
/**********************************
|
||||
Script: Drop Items To Corpse
|
||||
Created By: Jaden Wagener
|
||||
Created On: 08/29/02
|
||||
**********************************/
|
||||
//Drops all player's equipment and half of gold onto the corpse.
|
||||
//Combination of Diablo I and II death styles.
|
||||
//Script should be placed in module's OnDeath slot
|
||||
void main()
|
||||
{
|
||||
//Set variables
|
||||
int xCount, xGold;
|
||||
object xPC, xCorpse, xItem;
|
||||
location xLoc;
|
||||
//Get player and find locations
|
||||
xPC = GetLastPlayerDying();
|
||||
xLoc = GetLocation(xPC);
|
||||
//Create corpse at player's feet
|
||||
xCorpse = CreateObject(OBJECT_TYPE_PLACEABLE,"corpse002",xLoc);
|
||||
//Drop equipment on corpse
|
||||
for (xCount = 1; xCount < 15; xCount++)
|
||||
{
|
||||
switch (xCount)
|
||||
{
|
||||
//case 1: xItem = GetItemInSlot(INVENTORY_SLOT_ARMS,xPC); break;
|
||||
//case 2: xItem = GetItemInSlot(INVENTORY_SLOT_ARROWS,xPC); break;
|
||||
//case 3: xItem = GetItemInSlot(INVENTORY_SLOT_BELT,xPC); break;
|
||||
//case 4: xItem = GetItemInSlot(INVENTORY_SLOT_BOLTS,xPC); break;
|
||||
//case 5: xItem = GetItemInSlot(INVENTORY_SLOT_BOOTS,xPC); break;
|
||||
//case 6: xItem = GetItemInSlot(INVENTORY_SLOT_BULLETS,xPC); break;
|
||||
//case 7: xItem = GetItemInSlot(INVENTORY_SLOT_CHEST,xPC); break;
|
||||
//case 8: xItem = GetItemInSlot(INVENTORY_SLOT_CLOAK,xPC); break;
|
||||
//case 9: xItem = GetItemInSlot(INVENTORY_SLOT_HEAD,xPC); break;
|
||||
//case 10: xItem = GetItemInSlot(INVENTORY_SLOT_LEFTHAND,xPC); break;
|
||||
//case 11: xItem = GetItemInSlot(INVENTORY_SLOT_LEFTRING,xPC); break;
|
||||
//case 12: xItem = GetItemInSlot(INVENTORY_SLOT_NECK,xPC); break;
|
||||
//case 13: xItem = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND,xPC); break;
|
||||
//case 14: xItem = GetItemInSlot(INVENTORY_SLOT_RIGHTRING,xPC); break;
|
||||
}
|
||||
if (GetIsObjectValid(xItem))
|
||||
{
|
||||
AssignCommand(xCorpse,ActionTakeItem(xItem,xPC));
|
||||
}
|
||||
}
|
||||
//Now drop half of player's gold.
|
||||
xGold = (GetGold(xPC)/2);
|
||||
AssignCommand(xItem,TakeGoldFromCreature(xGold,xPC,FALSE));
|
||||
//Now let's pop the death GUI
|
||||
DelayCommand(2.5, PopUpDeathGUIPanel(xPC,TRUE,TRUE));
|
||||
}
|
Reference in New Issue
Block a user