-Chemical implants can now hold 50 units instead of 10.

-Made mutagen a catalyst instead of an ingredient. Fixes Issue 1100.
-Spellbook and Teleport Scroll doesn't show up for other players now.
-Added a syndicate intercom in the wizard's den.

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

code/game/objects/items/weapons/implants/implant.dm

@@ -114,7 +114,7 @@ will suffer from an increased appetite.</B><BR>
 <b>Function:</b> Contains a small capsule that can contain various chemicals. Upon receiving a specially encoded signal<BR>
 the implant releases the chemicals directly into the blood stream.<BR>
 <b>Special Features:</b>
-<i>Micro-Capsule</i>- Can be loaded with any sort of chemical agent via the common syringe and can hold 15 units.<BR>
+<i>Micro-Capsule</i>- Can be loaded with any sort of chemical agent via the common syringe and can hold 50 units.<BR>
 Can only be loaded while still in its original case.<BR>
 <b>Integrity:</b> Implant will last so long as the subject is alive. However, if the subject suffers from malnutrition,<BR>
 the implant may become unstable and either pre-maturely inject the subject or simply break."}
@@ -123,14 +123,14 @@ the implant may become unstable and either pre-maturely inject the subject or si
 
 	New()
 		..()
-		var/datum/reagents/R = new/datum/reagents(10)
+		var/datum/reagents/R = new/datum/reagents(50)
 		reagents = R
 		R.my_atom = src
 
 
 	trigger(emote, source as mob)
 		if(emote == "deathgasp")
-			src.activate(10)
+			src.activate(50)
 		return
 
 

code/game/objects/items/weapons/implants/implantcase.dm

@@ -37,7 +37,7 @@
 		else if(istype(I, /obj/item/weapon/reagent_containers/syringe))
 			if(!src.imp)	return
 			if(!src.imp.allow_reagents)	return
-			if(src.imp.reagents.total_volume >= 10)
+			if(src.imp.reagents.total_volume >= src.imp.reagents.maximum_volume)
 				user << "\red [src] is full."
 			else
 				spawn(5)

code/game/objects/items/weapons/scrolls.dm

@@ -30,16 +30,51 @@
 	var/mob/living/carbon/human/H = usr
 	if (!( istype(H, /mob/living/carbon/human)))
 		return 1
-	if ((usr.contents.Find(src) || (in_range(src, usr) && istype(src.loc, /turf))))
+	if ((usr == src.loc || (in_range(src, usr) && istype(src.loc, /turf))))
 		usr.set_machine(src)
 		if (href_list["spell_teleport"])
 			if (src.uses >= 1)
-				src.uses -= 1
-				usr.teleportscroll()
-		if (istype(src.loc, /mob))
-			attack_self(src.loc)
-		else
-			for(var/mob/M in viewers(1, src))
-				if (M.client)
-					src.attack_self(M)
-	return
+				teleportscroll(H)
+	attack_self(H)
+	return
+
+/obj/item/weapon/teleportation_scroll/proc/teleportscroll(var/mob/user)
+
+	var/A
+
+	A = input(user, "Area to jump to", "BOOYEA", A) in teleportlocs
+	var/area/thearea = teleportlocs[A]
+
+	if (user.stat || user.restrained())
+		return
+	if(!((user == loc || (in_range(src, user) && istype(src.loc, /turf)))))
+		return
+
+	var/datum/effect/effect/system/harmless_smoke_spread/smoke = new /datum/effect/effect/system/harmless_smoke_spread()
+	smoke.set_up(5, 0, user.loc)
+	smoke.attach(user)
+	smoke.start()
+	var/list/L = list()
+	for(var/turf/T in get_area_turfs(thearea.type))
+		if(!T.density)
+			var/clear = 1
+			for(var/obj/O in T)
+				if(O.density)
+					clear = 0
+					break
+			if(clear)
+				L+=T
+
+	if(!L.len)
+		user <<"The spell matrix was unable to locate a suitable teleport destination for an unknown reason. Sorry."
+		return
+
+	var/attempt = 0
+	var/success = 0
+	while(!success)
+		success = user.Move(pick(L))
+		if(attempt > 20) break	//Failsafe
+	if(!success)
+		user.loc = pick(L)
+	smoke.start()
+	src.uses -= 1