According to the [src.name], you are now in an unclaimed territory.
" if(AREA_SPECIAL) . += "This place is not noted on the [src.name].
" . += "Create or modify an existing area
" /obj/item/areaeditor/Topic(href, href_list) if(..()) return TRUE if(!usr.canUseTopic(src) || usr != loc) usr << browse(null, "window=blueprints") return TRUE if(href_list["create_area"]) if(in_use) return var/area/A = get_area(usr) if(A.area_flags & NOTELEPORT) to_chat(usr, "You cannot edit restricted areas.") return in_use = TRUE create_area(usr) in_use = FALSE updateUsrDialog() //Station blueprints!!! /obj/item/areaeditor/blueprints name = "station blueprints" desc = "Blueprints of the station. There is a \"Classified\" stamp and several coffee stains on it." icon = 'icons/obj/items_and_weapons.dmi' icon_state = "blueprints" fluffnotice = "Property of Nanotrasen. For heads of staff only. Store in high-secure storage." resistance_flags = INDESTRUCTIBLE | LAVA_PROOF | FIRE_PROOF | ACID_PROOF var/list/image/showing = list() var/client/viewing var/legend = FALSE //Viewing the wire legend /obj/item/areaeditor/blueprints/Destroy() clear_viewer() return ..() /obj/item/areaeditor/blueprints/attack_self(mob/user) . = ..() if(!legend) var/area/A = get_area(user) if(get_area_type() == AREA_STATION) . += "According to \the [src], you are now in \"[html_encode(A.name)]\".
" . += "" . += "" if(!viewing) . += "" else . += "" . += "" else if(legend == TRUE) . += "<< Back" . += view_wire_devices(user); else //legend is a wireset . += "<< Back" . += view_wire_set(user, legend) var/datum/browser/popup = new(user, "blueprints", "[src]", 700, 500) popup.set_content(.) popup.open() onclose(user, "blueprints") /obj/item/areaeditor/blueprints/Topic(href, href_list) if(..()) return if(href_list["edit_area"]) if(get_area_type()!=AREA_STATION) return if(in_use) return in_use = TRUE edit_area() in_use = FALSE if(href_list["exit_legend"]) legend = FALSE; if(href_list["view_legend"]) legend = TRUE; if(href_list["view_wireset"]) legend = href_list["view_wireset"]; if(href_list["view_blueprints"]) set_viewer(usr, "You flip the blueprints over to view the complex information diagram.") if(href_list["hide_blueprints"]) clear_viewer(usr,"You flip the blueprints over to view the simple information diagram.") if(href_list["refresh"]) clear_viewer(usr) set_viewer(usr) attack_self(usr) //this is not the proper way, but neither of the old update procs work! it's too ancient and I'm tired shush. /obj/item/areaeditor/blueprints/proc/get_images(turf/T, viewsize) . = list() for(var/turf/TT in range(viewsize, T)) if(TT.blueprint_data) . += TT.blueprint_data /obj/item/areaeditor/blueprints/proc/set_viewer(mob/user, message = "") if(user?.client) if(viewing) clear_viewer() viewing = user.client showing = get_images(get_turf(user), viewing.view) viewing.images |= showing if(message) to_chat(user, message) /obj/item/areaeditor/blueprints/proc/clear_viewer(mob/user, message = "") if(viewing) viewing.images -= showing viewing = null showing.Cut() if(message) to_chat(user, message) /obj/item/areaeditor/blueprints/dropped(mob/user) ..() clear_viewer() legend = FALSE /obj/item/areaeditor/proc/get_area_type(area/A) if (!A) A = get_area(usr) if(A.outdoors) return AREA_SPACE var/list/SPECIALS = list( /area/shuttle, /area/centcom, /area/asteroid, /area/tdome, /area/wizard_station, /area/hilbertshotel, /area/hilbertshotelstorage ) for (var/type in SPECIALS) if ( istype(A,type) ) return AREA_SPECIAL return AREA_STATION /obj/item/areaeditor/blueprints/proc/view_wire_devices(mob/user) var/message = "[GLOB.wire_name_directory[device]]:" for(var/Col in GLOB.wire_color_directory[device]) var/wire_name = GLOB.wire_color_directory[device][Col] if(!findtext(wire_name, WIRE_DUD_PREFIX)) //don't show duds message += "
[Col]: [wire_name]
" message += "" return message return "" /obj/item/areaeditor/proc/edit_area() var/area/A = get_area(usr) var/prevname = "[A.name]" var/str = stripped_input(usr,"New area name:", "Area Creation", "", MAX_NAME_LEN) if(!str || !length(str) || str==prevname) //cancel return if(length(str) > 50) to_chat(usr, "The given name is too long. The area's name is unchanged.") return rename_area(A, str) to_chat(usr, "You rename the '[prevname]' to '[str]'.") log_game("[key_name(usr)] has renamed [prevname] to [str]") A.update_areasize() interact() return TRUE //Blueprint Subtypes /obj/item/areaeditor/blueprints/cyborg name = "station schematics" desc = "A digital copy of the station blueprints stored in your memory." icon = 'icons/obj/items_and_weapons.dmi' icon_state = "blueprints" fluffnotice = "Intellectual Property of Nanotrasen. For use in engineering cyborgs only. Wipe from memory upon departure from the station." /proc/rename_area(a, new_name) var/area/A = get_area(a) var/prevname = "[A.name]" set_area_machinery_title(A, new_name, prevname) A.name = new_name if(A.firedoors) for(var/D in A.firedoors) var/obj/machinery/door/firedoor/FD = D FD.CalculateAffectingAreas() A.update_areasize() return TRUE /proc/set_area_machinery_title(area/A, title, oldtitle) if(!oldtitle) // or replacetext goes to infinite loop return for(var/obj/machinery/airalarm/M in A) M.name = replacetext(M.name,oldtitle,title) for(var/obj/machinery/power/apc/M in A) M.name = replacetext(M.name,oldtitle,title) for(var/obj/machinery/atmospherics/components/unary/vent_scrubber/M in A) M.name = replacetext(M.name,oldtitle,title) for(var/obj/machinery/atmospherics/components/unary/vent_pump/M in A) M.name = replacetext(M.name,oldtitle,title) for(var/obj/machinery/door/M in A) M.name = replacetext(M.name,oldtitle,title) //TODO: much much more. Unnamed airlocks, cameras, etc.