Files
Bubberstation/code/modules/buildmode/submodes/fill.dm
SkyratBot 7d1d0e1fad [MIRROR] Refactors most spans into span procs (#6315)
* Refactors most spans into span procs

* AA

* a

* AAAAAAAAAAAAAAAAAAAAAA

* Update species.dm

Co-authored-by: Watermelon914 <37270891+Watermelon914@users.noreply.github.com>
Co-authored-by: Gandalf <jzo123@hotmail.com>
2021-06-16 00:24:49 +01:00

75 lines
3.0 KiB
Plaintext

#define FILL_WARNING_MIN 150
/datum/buildmode_mode/fill
key = "fill"
use_corner_selection = TRUE
var/atom/objholder = null
/datum/buildmode_mode/fill/show_help(client/c)
to_chat(c, span_notice("***********************************************************"))
to_chat(c, span_notice("Left Mouse Button on turf/obj/mob = Select corner"))
to_chat(c, span_notice("Left Mouse Button + Alt on turf/obj/mob = Delete region"))
to_chat(c, span_notice("Right Mouse Button on buildmode button = Select object type"))
to_chat(c, span_notice("***********************************************************"))
/datum/buildmode_mode/fill/change_settings(client/c)
var/target_path = input(c, "Enter typepath:" ,"Typepath","/obj/structure/closet")
objholder = text2path(target_path)
if(!ispath(objholder))
objholder = pick_closest_path(target_path)
if(!objholder)
tgui_alert(usr,"No path has been selected.")
return
else if(ispath(objholder, /area))
objholder = null
tgui_alert(usr,"Area paths are not supported for this mode, use the area edit mode instead.")
return
deselect_region()
/datum/buildmode_mode/fill/handle_click(client/c, params, obj/object)
if(isnull(objholder))
to_chat(c, span_warning("Select an object type first."))
deselect_region()
return
..()
/datum/buildmode_mode/fill/handle_selected_area(client/c, params)
var/list/modifiers = params2list(params)
if(LAZYACCESS(modifiers, LEFT_CLICK)) //rectangular
if(LAZYACCESS(modifiers, ALT_CLICK))
var/list/deletion_area = block(get_turf(cornerA),get_turf(cornerB))
for(var/beep in deletion_area)
var/turf/T = beep
for(var/atom/movable/AM in T)
qdel(AM)
// extreme haircut
T.ScrapeAway(INFINITY, CHANGETURF_DEFER_CHANGE)
for(var/beep in deletion_area)
var/turf/T = beep
T.AfterChange()
log_admin("Build Mode: [key_name(c)] deleted turfs from [AREACOORD(cornerA)] through [AREACOORD(cornerB)]")
// if there's an analogous proc for this on tg lmk
// empty_region(block(get_turf(cornerA),get_turf(cornerB)))
else
var/selection_size = abs(cornerA.x - cornerB.x) * abs(cornerA.y - cornerB.y)
if(selection_size > FILL_WARNING_MIN) // Confirm fill if the number of tiles in the selection is greater than FILL_WARNING_MIN
var/choice = tgui_alert(usr,"Your selected area is [selection_size] tiles! Continue?", "Large Fill Confirmation", list("Yes", "No"))
if(choice != "Yes")
return
for(var/turf/T in block(get_turf(cornerA),get_turf(cornerB)))
if(ispath(objholder,/turf))
T = T.ChangeTurf(objholder)
T.setDir(BM.build_dir)
else if(ispath(objholder, /obj/effect/turf_decal))
T.AddElement(/datum/element/decal, initial(objholder.icon), initial(objholder.icon_state), BM.build_dir, null, null, initial(objholder.alpha), initial(objholder.color), null, FALSE, null)
else
var/obj/A = new objholder(T)
A.setDir(BM.build_dir)
log_admin("Build Mode: [key_name(c)] with path [objholder], filled the region from [AREACOORD(cornerA)] through [AREACOORD(cornerB)]")
#undef FILL_WARNING_MIN