20 lines
		
	
	
		
			602 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			20 lines
		
	
	
		
			602 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
//::///////////////////////////////////////////////
 | 
						|
//:: FileName at_220
 | 
						|
//:://////////////////////////////////////////////
 | 
						|
//:://////////////////////////////////////////////
 | 
						|
//:: Created By: Script Wizard
 | 
						|
//:: Created On: 9/2/2005 12:48:18 AM
 | 
						|
//:://////////////////////////////////////////////
 | 
						|
void main()
 | 
						|
{
 | 
						|
 | 
						|
	// Remove some gold from the player
 | 
						|
	TakeGoldFromCreature(5000, GetPCSpeaker(), TRUE);
 | 
						|
 | 
						|
	// Remove items from the player's inventory
 | 
						|
	object oItemToTake;
 | 
						|
	oItemToTake = GetItemPossessedBy(GetPCSpeaker(), "LivingRock");
 | 
						|
	if(GetIsObjectValid(oItemToTake) != 0)
 | 
						|
		DestroyObject(oItemToTake);
 | 
						|
}
 |