Duckberg Update:

- Uranium coins can now be produced from the mint. You can also produce more then 10 coins at a time.
- Two new more advanced versions of the PACMAN type portable generator: SUPERPACMAN (runs off of uranium coins, produces ~10,000 power base; requires Materials 5 and power tech 4) and MRSPACMAN (runs off of diamond coins, produces ~20,000 power base; requires materials 6 and power tech 5). Construction nearly identical to the basic PACMAN generator.
- Fixed some R&D bugs. Always forgetting something. Copy/paste is the devil.
- Tweaked nuclear gun slightly. I need to make a better R&D readme one of these days...
- Tier 3 stock parts added. These often require rare mateirals (such as from mining) and aren't 100% reliable. However, they do allow some machines to become quite powerful...

Note: Since I forgot it in the last update: To use the generators, you have to wrench them into place over a wire connected to the powergrid you want to pump power 

into.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@1116 316c924e-a436-60f5-8080-3fe189b3f50e

code/WorkInProgress/mining.dm

@@ -1989,7 +1989,7 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 	var/amt_diamond = 0
 	var/amt_iron = 0
 	var/amt_plasma = 0
-	//var/amt_uranium = 0
+	var/amt_uranium = 0
 	var/amt_clown = 0
 	var/newCoins = 0   //how many coins the machine made in it's last load
 	var/processing = 0
@@ -2028,9 +2028,9 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 			if (istype(O,/obj/item/stack/sheet/plasma))
 				amt_plasma += 100 * O.amount
 				del(O)
-			/*if (istype(O,/obj/item/weapon/ore/uranium))
-				amt_uranium += 100
-				del(O)*/
+			if (istype(O,/obj/item/stack/sheet/uranium))
+				amt_uranium += 100 * O.amount
+				del(O)
 			if (istype(O,/obj/item/stack/sheet/metal))
 				amt_iron += 100 * O.amount
 				del(O)
@@ -2075,11 +2075,11 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 		dat += text("chosen")
 	else
 		dat += text("<A href='?src=\ref[src];choose=plasma'>Choose</A>")
-	/*dat += text("<br><font color='#008800'><b>uranium inserterd: </b>[amt_uranium]</font> ")
+	dat += text("<br><font color='#008800'><b>uranium inserterd: </b>[amt_uranium]</font> ")
 	if (chosen == "uranium")
 		dat += text("chosen")
 	else
-		dat += text("<A href='?src=\ref[src];choose=uranium'>Choose</A>")*/
+		dat += text("<A href='?src=\ref[src];choose=uranium'>Choose</A>")
 	if(amt_clown > 0)
 		dat += text("<br><font color='#AAAA00'><b>Bananium inserterd: </b>[amt_clown]</font> ")
 		if (chosen == "clown")
@@ -2088,13 +2088,13 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 			dat += text("<A href='?src=\ref[src];choose=clown'>Choose</A>")
 
 	dat += text("<br><br>Will produce [coinsToProduce] [chosen] coins if enough materials are available.<br>")
-	dat += text("The dial which controls the number of conins to produce seems to be stuck. A technician has already been dispatched to fix this.")
-	/*dat += text("<A href='?src=\ref[src];chooseAmt=[-10]'>-10</A> ")
-	dat += text("<A href='?src=\ref[src];chooseAmt=[-5]'>-5</A> ")
-	dat += text("<A href='?src=\ref[src];chooseAmt=[-1]'>-1</A> ")
-	dat += text("<A href='?src=\ref[src];chooseAmt=[1]'>+1</A> ")
-	dat += text("<A href='?src=\ref[src];chooseAmt=[5]'>+5</A> ")
-	dat += text("<A href='?src=\ref[src];chooseAmt=[10]'>+10</A> ")*/
+	//dat += text("The dial which controls the number of conins to produce seems to be stuck. A technician has already been dispatched to fix this.")
+	dat += text("<A href='?src=\ref[src];chooseAmt=-10'>-10</A> ")
+	dat += text("<A href='?src=\ref[src];chooseAmt=-5'>-5</A> ")
+	dat += text("<A href='?src=\ref[src];chooseAmt=-1'>-1</A> ")
+	dat += text("<A href='?src=\ref[src];chooseAmt=1'>+1</A> ")
+	dat += text("<A href='?src=\ref[src];chooseAmt=5'>+5</A> ")
+	dat += text("<A href='?src=\ref[src];chooseAmt=10'>+10</A> ")
 
 	dat += text("<br><br>In total this machine produced <font color='green'><b>[newCoins]</b></font> coins.")
 	dat += text("<br><A href='?src=\ref[src];makeCoins=[1]'>Make coins</A>")
@@ -2103,16 +2103,17 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 /obj/machinery/mineral/mint/Topic(href, href_list)
 	if(..())
 		return
+	usr.machine = src
+	src.add_fingerprint(usr)
 	if(processing==1)
 		usr << "\blue The machine is processing."
 		return
-	usr.machine = src
-	src.add_fingerprint(usr)
 	if(href_list["choose"])
 		chosen = href_list["choose"]
-	if(href_list["chooseamt"])
-		coinsToProduce += href_list["chooseamt"]
+	if(href_list["chooseAmt"])
+		coinsToProduce = between(0, coinsToProduce + text2num(href_list["chooseAmt"]), 1000)
 	if(href_list["makeCoins"])
+		var/temp_coins = coinsToProduce
 		if (src.output)
 			processing = 1;
 			var/obj/item/weapon/moneybag/M
@@ -2177,7 +2178,7 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 						newCoins++
 						src.updateUsrDialog()
 						sleep(5);
-				/*if("uranium")
+				if("uranium")
 					while(amt_uranium > 0 && coinsToProduce > 0)
 						if (locate(/obj/item/weapon/moneybag,output.loc))
 							M = locate(/obj/item/weapon/moneybag,output.loc)
@@ -2188,7 +2189,7 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 						coinsToProduce--
 						newCoins++
 						src.updateUsrDialog()
-						sleep(5)*/
+						sleep(5)
 				if("clown")
 					while(amt_clown > 0 && coinsToProduce > 0)
 						if (locate(/obj/item/weapon/moneybag,output.loc))
@@ -2202,7 +2203,7 @@ var/list/datum/material_recipe/MATERIAL_RECIPES = list(
 						src.updateUsrDialog()
 						sleep(5);
 			processing = 0;
-	coinsToProduce = 10;
+			coinsToProduce = temp_coins
 	src.updateUsrDialog()
 	return