Adds holoposter ads

code/game/machinery/holoposter.dm

@@ -0,0 +1,108 @@
+GLOBAL_LIST_EMPTY(holoposters)
+/obj/machinery/holoposter
+	name = "Holographic Poster"
+	desc = "A wall-mounted holographic projector displaying advertisements by all manner of factions. How much do they pay to advertise here?"
+	icon = 'icons/obj/holoposter_vr.dmi'
+	icon_state = "off"
+	anchored = 1
+	use_power = 1
+	idle_power_usage = 80
+	power_channel = ENVIRON
+	var/icon_forced = FALSE
+	var/examine_addon = "It appears to be powered off."
+	var/mytimer
+
+	var/list/postertypes = list(
+		"hephaestus" = list(LIGHT_COLOR_CYAN, "Hephaestus Aeronautics, a subsidiary of Hephaestus Industries. Known to make the best - if pricy - atmospheric to orbit shuttles and gliders for the consumer market."),
+		"aether" = list(LIGHT_COLOR_CYAN, "Aether Atmospherics, one of the lesser-known TSCs. They're ubiquitious in the Periphery - the very air you're breathing was probably sold and delivered by them."),
+		"moreau" = list(LIGHT_COLOR_ORANGE, "Children of Moreau. The hologram is a call to action by the local Moreau sect. 'Terraform, Prosper, and Be Sustainable, children!'"),
+		"cybersun" = list(LIGHT_COLOR_GREEN, "Cybersun Industries. A complex diagram without labels, showing the inner workings of a backup implant sold by Cybersun. 'The highest quality, for an affordable price!' says the tagline."),
+		"veymed" = list(LIGHT_COLOR_GREEN, "Vey-Med. This is an advertisement for a local clinic a few systems away. The tagline reads 'The mark of a truly civilized civilization is rewriting what evolution could not'."),
+		"grayson" = list(LIGHT_COLOR_ORANGE, "Grayson Manufactories Ltd. An advertisement for a sale from Grayson, including up to 50% off on lathe parts. Truly, a delight for DIY tinkerers out there."),
+		"ares" = list(LIGHT_COLOR_PINK, "Friends of Ares. Who managed to slip this poster into the rotation? A local charity set up by the Ares Confederation to help workers unionize or found their own colonies. 'Donate today!'"),
+		"moebius" = list(LIGHT_COLOR_PURPLE, "Moebius. One of the few companies worth merit beyond their local bubble staffed completely by synthetics. 'For synths, by synths.'")
+	)
+
+/obj/machinery/holoposter/Initialize()
+	. = ..()
+	set_rand_sprite()
+	GLOB.holoposters += src
+	mytimer = addtimer(CALLBACK(src, .proc/set_rand_sprite), 30 MINUTES + rand(0, 5 MINUTES), TIMER_STOPPABLE | TIMER_LOOP)
+
+/obj/machinery/holoposter/Destroy()
+	GLOB.holoposters -= src
+	return ..()
+
+/obj/machinery/holoposter/process()
+	return PROCESS_KILL
+
+/obj/machinery/holoposter/examine(mob/user, infix, suffix)
+	. = ..()
+	. += examine_addon
+
+/obj/machinery/holoposter/update_icon()
+	if(stat & NOPOWER)
+		icon_state = "off"
+		examine_addon = "It appears to be powered off."
+		set_light(0)
+		return
+	var/new_color = LIGHT_COLOR_HALOGEN
+	if(stat & BROKEN)
+		icon_state = "glitch"
+		examine_addon = "It appears to be malfunctioning."
+		new_color = "#6A6C71"
+	else
+		if((z in using_map.station_levels) && global.security_level) // 0 is fine, everything higher is alert levels
+			icon_state = "attention"
+			examine_addon = "It warns you to remain calm and contact your supervisor as soon as possible."
+			new_color =  "#AA7039"
+		else if(icon_state in postertypes)
+			var/list/settings = postertypes[icon_state]
+			new_color = settings[1]
+			examine_addon = settings[2]
+
+	set_light(l_range = 2, l_power = 2, l_color = new_color)
+
+/obj/machinery/holoposter/proc/set_rand_sprite()
+	if(icon_forced && mytimer)
+		deltimer(mytimer)
+		return
+	icon_state = pick(postertypes)
+	update_icon()
+
+/obj/machinery/holoposter/attackby(obj/item/W, mob/user)
+	src.add_fingerprint(user)
+	if(stat & (NOPOWER))
+		return
+	if (W.is_multitool())
+		playsound(user.loc, 'sound/items/penclick.ogg', 60, 1)
+		icon_state = input("Available Posters", "Holographic Poster") as null|anything in postertypes + "random"
+		if(!Adjacent(user))
+			return
+		if(icon_state == "random")
+			stat &= ~BROKEN
+			icon_forced = FALSE
+			if(!mytimer)
+				mytimer = addtimer(CALLBACK(src, .proc/set_rand_sprite), 30 MINUTES + rand(0, 5 MINUTES), TIMER_STOPPABLE | TIMER_LOOP)
+			set_rand_sprite()
+			return
+		icon_forced = TRUE
+		if(mytimer)
+			deltimer(mytimer)
+		stat &= ~BROKEN
+		update_icon()
+		return
+
+/obj/machinery/holoposter/attack_ai(mob/user as mob)
+	return attack_hand(user)
+
+/obj/machinery/holoposter/power_change()
+	var/wasUnpowered = stat & NOPOWER
+	..()
+	if(wasUnpowered != (stat & NOPOWER))
+		update_icon()
+
+/obj/machinery/holoposter/emp_act()
+	stat |= BROKEN
+	update_icon()
+

code/modules/security levels/security levels.dm

@@ -75,6 +75,11 @@
 		for(var/obj/machinery/status_display/FA in machines)
 			if(FA.z in using_map.contact_levels)
 				FA.on_alert_changed(newlevel)
+		//VOREStation Add
+		for(var/hp in GLOB.holoposters)
+			var/obj/machinery/holoposter/HP = hp
+			HP.update_icon()
+		//VOREStation Add End
 
 		if(level >= SEC_LEVEL_RED)
 			atc.reroute_traffic(yes = 1) // Tell them fuck off we're busy.

vorestation.dme

@@ -778,6 +778,7 @@
 #include "code\game\machinery\floorlayer.dm"
 #include "code\game\machinery\frame.dm"
 #include "code\game\machinery\hologram.dm"
+#include "code\game\machinery\holoposter.dm"
 #include "code\game\machinery\holosign.dm"
 #include "code\game\machinery\igniter.dm"
 #include "code\game\machinery\iv_drip.dm"