mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2025-12-12 03:02:54 +00:00
72ff652ecd
Bit of work on blob, mainly cleanup of the blob gamemode files. git-svn-id: http://tgstation13.googlecode.com/svn/trunk@2764 316c924e-a436-60f5-8080-3fe189b3f50e
104 lines
3.7 KiB
Plaintext
104 lines
3.7 KiB
Plaintext
/datum/game_mode/blob/send_intercept(var/report = 1)
|
|
var/intercepttext = ""
|
|
var/interceptname = "Error"
|
|
switch(report)
|
|
if(1)
|
|
interceptname = "Biohazard Alert"
|
|
intercepttext += "<FONT size = 3><B>NanoTrasen Update</B>: Biohazard Alert.</FONT><HR>"
|
|
intercepttext += "Reports indicate the probable transfer of a biohazardous agent onto [station_name()] during the last crew deployment cycle.<BR>"
|
|
intercepttext += "Preliminary analysis of the organism classifies it as a level 5 biohazard. Its origin is unknown.<BR>"
|
|
intercepttext += "NanoTrasen has issued a directive 7-10 for [station_name()]. The station is to be considered quarantined.<BR>"
|
|
intercepttext += "Orders for all [station_name()] personnel follows:<BR>"
|
|
intercepttext += " 1. Do not leave the quarantine area.<BR>"
|
|
intercepttext += " 2. Locate any outbreaks of the organism on the station.<BR>"
|
|
intercepttext += " 3. If found, use any neccesary means to contain the organism.<BR>"
|
|
intercepttext += " 4. Avoid damage to the capital infrastructure of the station.<BR>"
|
|
intercepttext += "<BR>Note in the event of a quarantine breach or uncontrolled spread of the biohazard, the directive 7-10 may be upgraded to a directive 7-12.<BR>"
|
|
intercepttext += "Message ends."
|
|
if(2)
|
|
var/nukecode = "ERROR"
|
|
for(var/obj/machinery/nuclearbomb/bomb in world)
|
|
if(bomb && bomb.r_code)
|
|
if(bomb.z == 1)
|
|
nukecode = bomb.r_code
|
|
interceptname = "Directive 7-12"
|
|
intercepttext += "<FONT size = 3><B>NanoTrasen Update</B>: Biohazard Alert.</FONT><HR>"
|
|
intercepttext += "Directive 7-12 has been issued for [station_name()].<BR>"
|
|
intercepttext += "The biohazard has grown out of control and will soon reach critical mass.<BR>"
|
|
intercepttext += "Your orders are as follows:<BR>"
|
|
intercepttext += "1. Secure the Nuclear Authentication Disk.<BR>"
|
|
intercepttext += "2. Detonate the Nuke located in the Station's Vault.<BR>"
|
|
intercepttext += "Nuclear Authentication Code: [nukecode] <BR>"
|
|
intercepttext += "Message ends."
|
|
|
|
for(var/obj/machinery/computer/communications/comm in world)
|
|
comm.messagetitle.Add(interceptname)
|
|
comm.messagetext.Add(intercepttext)
|
|
if(!(comm.stat & (BROKEN | NOPOWER)) && comm.prints_intercept)
|
|
var/obj/item/weapon/paper/intercept = new /obj/item/weapon/paper( comm.loc )
|
|
intercept.name = "paper- [interceptname]"
|
|
intercept.info = intercepttext
|
|
return
|
|
|
|
|
|
|
|
/datum/station_state
|
|
var
|
|
floor = 0
|
|
wall = 0
|
|
r_wall = 0
|
|
window = 0
|
|
door = 0
|
|
grille = 0
|
|
mach = 0
|
|
|
|
|
|
proc/count()
|
|
for(var/turf/T in world)
|
|
if(T.z != 1)
|
|
continue
|
|
|
|
if(istype(T,/turf/simulated/floor))
|
|
if(!(T:burnt))
|
|
src.floor += 12
|
|
else
|
|
src.floor += 1
|
|
|
|
if(istype(T, /turf/simulated/wall))
|
|
if(T:intact)
|
|
src.wall += 2
|
|
else
|
|
src.wall += 1
|
|
|
|
if(istype(T, /turf/simulated/wall/r_wall))
|
|
if(T:intact)
|
|
src.r_wall += 2
|
|
else
|
|
src.r_wall += 1
|
|
|
|
for(var/obj/O in world)
|
|
if(O.z != 1)
|
|
continue
|
|
|
|
if(istype(O, /obj/structure/window))
|
|
src.window += 1
|
|
else if(istype(O, /obj/structure/grille) && (!O:destroyed))
|
|
src.grille += 1
|
|
else if(istype(O, /obj/machinery/door))
|
|
src.door += 1
|
|
else if(istype(O, /obj/machinery))
|
|
src.mach += 1
|
|
return
|
|
|
|
|
|
proc/score(var/datum/station_state/result)
|
|
if(!result) return 0
|
|
var/output = 0
|
|
output += (result.floor / max(floor,1))
|
|
output += (result.r_wall/ max(r_wall,1))
|
|
output += (result.wall / max(wall,1))
|
|
output += (result.window / max(window,1))
|
|
output += (result.door / max(door,1))
|
|
output += (result.grille / max(grille,1))
|
|
output += (result.mach / max(mach,1))
|
|
return (output/7) |