The modified Changeling mode should end properly now.

Tracking implants can now be used to message the holder.
Mini Readme update.
Explosive implants will explode when the host dies.  Might try and wrap these into nuke or as a new traitor item.
Added a play local sound proc.
Fixed most of the runtimes in the latest log.


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

code/game/objects/items/candle.dm

@@ -7,75 +7,79 @@
 	icon_state = "candle1"
 	item_state = "candle1"
 
-	var/wax = 100
-	var/lit = 0
-
-/obj/item/candle/update_icon()
-	var/i
-	if(wax>75)
-		i = 1
-	else if(wax>40)
-		i = 2
-	else i = 3
-	icon_state = "candle[i][lit ? "_lit" : ""]"
-
-/obj/item/candle/attackby(obj/item/weapon/W as obj, mob/user as mob)
-	..()
-	if(istype(W, /obj/item/weapon/weldingtool)  && W:welding)
-		light("\red [user] casually lights the [name] with [W], what a badass.")
-	else if(istype(W, /obj/item/weapon/zippo) && W:lit)
-		light()
-	else if(istype(W, /obj/item/weapon/match) && W:lit)
-		light()
-	else if(istype(W, /obj/item/candle) && W:lit)
-		light()
-
-
-
-/obj/item/candle/proc/light(var/flavor_text = "\red [usr] lights the [name].")
-	if(!lit)
-		lit = 1
-		//src.damtype = "fire"
-		for(var/mob/O in viewers(usr, null))
-			O.show_message(flavor_text, 1)
-		sd_SetLuminosity(CANDLE_LUM)
-		spawn()
-			src.process()
-
-/obj/item/candle/process()
-	if(!lit)
-		return
-	wax--
-	if(!wax)
-		new/obj/item/trash/candle(src.loc)
-		if(istype(src.loc, /mob))
-			src.dropped()
-		del(src)
-	update_icon()
-
-	if(istype(loc, /turf)) //start a fire if possible
-		var/turf/T = loc
-		T.hotspot_expose(700, 5)
-
-	spawn(60)
-		process()
-
-/obj/item/candle/attack_self(mob/user as mob)
-	if(lit)
+	var
+		wax = 100
 		lit = 0
+	proc
+		light(var/flavor_text = "\red [usr] lights the [name].")
+
+
+	update_icon()
+		var/i
+		if(wax>75)
+			i = 1
+		else if(wax>40)
+			i = 2
+		else i = 3
+		icon_state = "candle[i][lit ? "_lit" : ""]"
+
+
+	attackby(obj/item/weapon/W as obj, mob/user as mob)
+		..()
+		if(istype(W, /obj/item/weapon/weldingtool)  && W:welding)
+			light("\red [user] casually lights the [name] with [W], what a badass.")
+		else if(istype(W, /obj/item/weapon/zippo) && W:lit)
+			light()
+		else if(istype(W, /obj/item/weapon/match) && W:lit)
+			light()
+		else if(istype(W, /obj/item/candle) && W:lit)
+			light()
+
+
+	light(var/flavor_text = "\red [usr] lights the [name].")
+		if(!src.lit)
+			src.lit = 1
+			//src.damtype = "fire"
+			for(var/mob/O in viewers(usr, null))
+				O.show_message(flavor_text, 1)
+			sd_SetLuminosity(CANDLE_LUM)
+			processing_items.Add(src)
+
+
+	process()
+		if(!lit)
+			return
+		wax--
+		if(!wax)
+			new/obj/item/trash/candle(src.loc)
+			if(istype(src.loc, /mob))
+				src.dropped()
+			del(src)
 		update_icon()
-		sd_SetLuminosity(0)
-		user.sd_SetLuminosity(user.luminosity - CANDLE_LUM)
+		if(istype(loc, /turf)) //start a fire if possible
+			var/turf/T = loc
+			T.hotspot_expose(700, 5)
 
-/obj/item/candle/pickup(mob/user)
-	if(lit)
-		src.sd_SetLuminosity(0)
-		user.sd_SetLuminosity(user.luminosity + CANDLE_LUM)
 
-/obj/item/candle/dropped(mob/user)
-	if(lit)
-		user.sd_SetLuminosity(user.luminosity - CANDLE_LUM)
-		src.sd_SetLuminosity(CANDLE_LUM)
+	attack_self(mob/user as mob)
+		if(lit)
+			lit = 0
+			update_icon()
+			sd_SetLuminosity(0)
+			user.sd_SetLuminosity(user.luminosity - CANDLE_LUM)
+
+
+	pickup(mob/user)
+		if(lit)
+			src.sd_SetLuminosity(0)
+			user.sd_SetLuminosity(user.luminosity + CANDLE_LUM)
+
+
+	dropped(mob/user)
+		if(lit)
+			user.sd_SetLuminosity(user.luminosity - CANDLE_LUM)
+			src.sd_SetLuminosity(CANDLE_LUM)
+
 
 
 ///////////////

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

@@ -102,9 +102,17 @@ Implant Specifics:<BR>"}
 		return dat
 
 
+	trigger(emote, source as mob)
+		if(emote == "deathgasp")
+			src.activate("death")
+		return
+
+
 	activate(var/cause)
 		if((!cause) || (!src.imp_in))	return 0
-		//explode here
+		explosion(src, -1, 0, 1, 3, 0)//This might be a bit much, dono will have to see.
+		if(src.imp_in)
+			src.imp_in.gib()
 
 
 
@@ -139,6 +147,12 @@ the implant may become unstable and either pre-maturely inject the subject or si
 		R.my_atom = src
 
 
+	trigger(emote, source as mob)
+		if(emote == "deathgasp")
+			src.activate(10)
+		return
+
+
 	activate(var/cause)
 		if((!cause) || (!src.imp_in))	return 0
 		var/mob/living/carbon/R = src.imp_in

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

@@ -34,6 +34,7 @@
 			else
 				src.name = "Glass Case"
 		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)
 				user << "\red [src] is full."

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

@@ -37,6 +37,8 @@
 			src.icon_state = "implanter0"
 		return
 
+
+
 /obj/item/weapon/implanter/loyalty
 	name = "implanter-loyalty"
 
@@ -44,4 +46,15 @@
 		src.imp = new /obj/item/weapon/implant/loyalty( src )
 		..()
 		update()
+		return
+
+
+
+/obj/item/weapon/implanter/explosive
+	name = "implanter-explosive"
+
+	New()
+		src.imp = new /obj/item/weapon/implant/explosive( src )
+		..()
+		update()
 		return