Adds a round ending sequence to Ratvar's spawn

Along with its sounds + making the Neovgre cannon sound better. Audio courtesy of Dzahlus.

code/modules/antagonists/clockcult/clock_structures/ratvar_the_clockwork_justicar.dm

@@ -29,7 +29,9 @@
 	sound_to_playing_players('sound/effects/ratvar_reveal.ogg')
 	var/mutable_appearance/alert_overlay = mutable_appearance('icons/effects/clockwork_effects.dmi', "ratvar_alert")
 	notify_ghosts("The Justiciar's light calls to you! Reach out to Ratvar in [get_area_name(src)] to be granted a shell to spread his glory!", null, source = src, alert_overlay = alert_overlay)
-	INVOKE_ASYNC(SSshuttle.emergency, /obj/docking_port/mobile/emergency.proc/request, null, 10, null, FALSE, 0)
+	sleep(600)
+	INVOKE_ASYNC(src, .proc/purge_the_heresy)
+
 
 /obj/structure/destructible/clockwork/massive/ratvar/Destroy()
 	GLOB.ratvar_awakens--
@@ -150,3 +152,31 @@
 			sound_to_playing_players('sound/machines/clockcult/ratvar_scream.ogg', 80)
 			narsie.clashing = FALSE
 			qdel(src)
+
+
+/obj/structure/destructible/clockwork/massive/ratvar/proc/purge_the_heresy()
+	sleep(50)
+	priority_announce("We just picked up a massive energy reding down there, [GLOB.station_name], it looks as if a neutron star has just formed on top of the station. we're treating this as an accausal event and will begin running predictions on this situation, please hold.","Central Command Higher Dimensional Affairs", 'sound/misc/airraid.ogg')
+	sleep(500)
+	priority_announce("A gravitational anomaly has been detected coming from the newly formed star in your sector. It ap*@^rs th#t ^&te-BZZZT","Central Command Higher Dimensional Affairs", 'sound/magic/clockwork/ratvar_announce.ogg')
+	sleep(85)
+	send_to_playing_players("<span class='heavy_brass'><font size=5>\"COME, ALL THOSE FAITHFUL! WITNESS THE RAYS OF JUSTICE CAST UPON THE HERETICS!</font></span>")
+	sleep(50)
+	set_security_level("delta")
+	SSshuttle.registerHostileEnvironment(src)
+	SSshuttle.lockdown = TRUE
+	sleep(300)
+	sound_to_playing_players(volume = 70, sound('sound/magic/clockwork/ark_activation_sequence.ogg')) //if this isn't lessened in volume it peaks for some reason
+	addtimer(CALLBACK(GLOBAL_PROC, /proc/clockcult_ending_helper), 300)
+
+/proc/clockcult_ending_helper()
+	for(var/mob/M in GLOB.mob_list)
+		if(M.client)
+			SEND_SOUND(M, sound('sound/magic/clockwork/ratvar_attack.ogg'))
+			SEND_SOUND(M, sound('sound/magic/clockwork/ratvarfire.ogg'))
+		if(!is_servant_of_ratvar(M) && isliving(M))
+			var/mob/living/L = M
+			L.fire_stacks = INFINITY
+			L.IgniteMob()
+		sleep(50)
+	SSticker.force_ending = 1