From 3210012cf9a4e1331e2f82f1139c3aaf799a5cb0 Mon Sep 17 00:00:00 2001
From: caelaislinn <cael_aislinn@yahoo.com.au>
Date: Fri, 22 Jun 2012 14:31:15 +1000
Subject: [PATCH] slight artifact tweaks

Signed-off-by: caelaislinn <cael_aislinn@yahoo.com.au>
---
 code/modules/mining/mine_turfs.dm         | 9 +++++++--
 code/modules/research/artifact_archaeo.dm | 2 +-
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/code/modules/mining/mine_turfs.dm b/code/modules/mining/mine_turfs.dm
index c85f31498d..8ab74df293 100644
--- a/code/modules/mining/mine_turfs.dm
+++ b/code/modules/mining/mine_turfs.dm
@@ -256,6 +256,7 @@
 
 /turf/simulated/mineral/proc/gets_drilled(var/delicate = 0)
 	if ((src.mineralName != "") && (src.mineralAmt > 0) && (src.mineralAmt < 11))
+		var/destroyed = 0
 		var/i
 		for (i=0;i<mineralAmt;i++)
 			if (src.mineralName == "Uranium")
@@ -270,15 +271,19 @@
 				new /obj/item/weapon/ore/plasma(src)
 			if (src.mineralName == "Diamond")
 				new /obj/item/weapon/ore/diamond(src)
-			if (src.mineralName == "Archaeo" && (prob(10) || delicate) )
+			if (src.mineralName == "Archaeo")
 				//spawn strange rocks here
-				new /obj/item/weapon/ore/strangerock(src)
+				if(prob(10) || delicate)
+					new /obj/item/weapon/ore/strangerock(src)
+				else
+					destroyed = 1
 			if (src.mineralName == "Clown")
 				new /obj/item/weapon/ore/clown(src)
 	if (prob(src.artifactChance))
 		//spawn a rare, xeno-archaelogical artifact here
 		new /obj/machinery/artifact(src)
 	ReplaceWithFloor()
+	usr << "\red You accidentally destroy some of the rocks!"
 	return
 
 /*
diff --git a/code/modules/research/artifact_archaeo.dm b/code/modules/research/artifact_archaeo.dm
index b0c07225ed..5efe8b15a0 100644
--- a/code/modules/research/artifact_archaeo.dm
+++ b/code/modules/research/artifact_archaeo.dm
@@ -18,7 +18,7 @@
 			method = 0
 		else
 			method = 1
-		inside = pick(200;"", 50;"/obj/item/weapon/crystal", 25;"/obj/item/weapon/talkingcrystal", "/obj/item/weapon/fossil/base")
+		inside = pick(150;"", 50;"/obj/item/weapon/crystal", 25;"/obj/item/weapon/talkingcrystal", "/obj/item/weapon/fossil/base")
 
 /obj/item/weapon/ore/strangerock/attackby(obj/item/weapon/W as obj, mob/user as mob)
 	if(istype(W,/obj/item/weapon/weldingtool/))