void main()
{
object oPC = GetPCSpeaker();
location lLocation =  GetLocation(oPC);
// Remove some gold from the player
TakeGoldFromCreature(500, oPC, TRUE);
CreateObject(OBJECT_TYPE_CREATURE, "PackOx1", lLocation, FALSE);
}