anchor.diff:  	popup.open()
   	return
   
  -/obj/machinery/computer/telescience/proc/telefail()
  -	if(prob(55))
  -		for(var/mob/O in hearers(src, null))
  -			O.show_message("\red The telepad weakly fizzles.", 2)
  -		for(var/obj/machinery/telepad/E in world)
  -			var/L = get_turf(E)
  +/obj/machinery/computer/telescience/proc/telefail(var/level)
  +	var/teleturf = get_turf(telepad)
  +	switch(level)
  +		if(1)
  +			for(var/mob/O in hearers(telepad, null))
  +				O.show_message("\red The telepad weakly fizzles.", 2)
   			var/datum/effect/effect/system/spark_spread/s = new /datum/effect/effect/system/spark_spread
  -			s.set_up(5, 1, L)
  +			s.set_up(5, 1, teleturf)
   			s.start()
  -		return
  -	if(prob(20))
  -		// Irradiate everyone in telescience!
  -		for(var/obj/machinery/telepad/E in world)
  -			var/L = get_turf(E)
  -			for(var/mob/living/carbon/human/M in viewers(L, null))
  +		if(2)
  +			for(var/mob/living/carbon/human/M in viewers(telepad, null))
   				M.apply_effect((rand(50, 100)), IRRADIATE, 0)
   				M << "\red You feel irradiated."
  -		return
  -	if(prob(20))
  -		// So let's set the world on fire...
  -		for(var/obj/machinery/telepad/E in world)
  -			var/L = get_turf(E)
  -			for(var/turf/simulated/floor/target_tile in range(0,L))
  +		if(3)
  +			for(var/turf/simulated/floor/target_tile in range(0,telepad))
   				var/datum/gas_mixture/napalm = new
   				napalm.toxins = 25
   				napalm.temperature = 2000
   				target_tile.assume_air(napalm)
   				spawn (0) target_tile.hotspot_expose(700, 400)
  -		for(var/mob/O in hearers(src, null))
  -			O.show_message("\red The telepad sets on fire!", 2)
  -		return
  -	if(prob(5))
  -		// They did the mash! (They did the monster mash!) The monster mash! (It was a graveyard smash!)
  -		// copied from gold slime code because it's efficient
  -		for(var/obj/machinery/telepad/E in world)
  -			var/L = get_turf(E)
  +			for(var/mob/O in hearers(telepad, null))
  +				O.show_message("\red The telepad sets on fire!", 2)
  +		if(4)
   			var/blocked = list(/mob/living/simple_animal/hostile,
   				/mob/living/simple_animal/hostile/alien/queen/large,
   				/mob/living/simple_animal/hostile/pirate,
  
positive.code: 	var/x_co	// X coordinate
  	var/y_co	// Y coordinate
  	var/z_co	// Z coordinate
  
  /obj/machinery/computer/telescience/New()
  	teles_left = rand(8,12)
  	x_off = rand(-10,10)
  	y_off = rand(-10,10)
  
  /obj/machinery/computer/telescience/update_icon()
  	if(stat & BROKEN)
  
negative.code: 		z_co = text2num(z_co)
  		return
  	if(href_list["send"])
  		teleprep(0)
  		return
  	if(href_list["receive"])
  		teleprep(1)
  		return
  	if(href_list["recal"])
  		if(telepad == null)
  			for(var/obj/machinery/telepad/T in range(src,10))
  				if(T.tele_id == tele_id)
  					telepad = T
  		if(!telepad)	return
  		var/teleturf = get_turf(telepad)
  		teles_left = rand(8,12)
  		x_off = rand(-10,10)
  		y_off = rand(-10,10)
  		var/datum/effect/effect/system/spark_spread/s = new /datum/effect/effect/system/spark_spread
  		s.set_up(5, 1, teleturf)
  		s.start()
  		usr << "\blue Calibration successful."
  		return
  