[SEMI-MODULAR] Supply Pods subtype - teleporter (#380)

<!-- Write **BELOW** The Headers and **ABOVE** The comments else it may
not be viewable. -->
<!-- You can view Contributing.MD for a detailed description of the pull
request process. -->

## About The Pull Request

<!-- Describe The Pull Request. Please be sure every change is
documented or this can delay review and even discourage maintainers from
merging your PR! -->

Добавляет супплай под в виде телепорта для:
* Вызова снаряжения (муз. инструменты, снаряжение священника, заказ
повара, и тд)
* Экспресс доставки


https://github.com/user-attachments/assets/9cd5329c-5c9e-4c15-9c69-a88cbfbc82a9


## Changelog

<!-- If your PR modifies aspects of the game that can be concretely
observed by players or admins you should add a changelog. If your change
does NOT meet this description, remove this section. Be sure to properly
mark your PRs to prevent unnecessary GBP loss. You can read up on GBP
and it's effects on PRs in the tgstation guides for contributors. Please
note that maintainers freely reserve the right to remove and add tags
should they deem it appropriate. You can attempt to finagle the system
all you want, but it's best to shoot for clear communication right off
the bat. -->

:cl:
add: Заменена взрывная доставка инструментов и экспресс доставка на
телепорты
/:cl:

<!-- Both :cl:'s are required for the changelog to work! You can put
your name to the right of the first :cl: if you want to overwrite your
GitHub username as author ingame. -->
<!-- You can use multiple of the same prefix (they're only used for the
icon ingame) and delete the unneeded ones. Despite some of the tags,
changelogs should generally represent how a player might be affected by
the changes rather than a summary of the PR's contents. -->

code/__DEFINES/cargo.dm

@@ -12,6 +12,7 @@
 #define STYLE_INVISIBLE 12
 #define STYLE_GONDOLA 13
 #define STYLE_SEETHROUGH 14
+#define STYLE_TELEPORT 15 // BANDASTATION EDIT
 
 #define POD_SHAPE 1
 #define POD_BASE 2

code/game/machinery/computer/orders/order_computer/order_computer.dm

@@ -201,7 +201,7 @@ GLOBAL_LIST_EMPTY(order_console_products)
 					ordered_paths += item.item_path
 			podspawn(list(
 				"target" = get_turf(living_user),
-				"style" = STYLE_BLUESPACE,
+				"path" = /obj/structure/closet/supplypod/teleporter, // BANDASTATION EDIT - Original: "style" = STYLE_BLUESPACE,
 				"spawn" = ordered_paths,
 			))
 			grocery_list.Cut()

code/game/objects/items/choice_beacon.dm

@@ -64,7 +64,7 @@
 /obj/item/choice_beacon/proc/spawn_option(obj/choice_path, mob/living/user)
 	podspawn(list(
 		"target" = get_turf(src),
-		"style" = STYLE_BLUESPACE,
+		"path" = /obj/structure/closet/supplypod/teleporter, // BANDASTATION EDIT - Original: "style" = STYLE_BLUESPACE,
 		"spawn" = choice_path,
 	))
 

code/modules/cargo/supplypod.dm

@@ -717,7 +717,7 @@
 	pod.transform = matrix().Turn(rotation)
 	pod.layer = FLY_LAYER
 	SET_PLANE_EXPLICIT(pod, ABOVE_GAME_PLANE, src)
-	if (pod.style != STYLE_INVISIBLE)
+	if (pod.style != STYLE_INVISIBLE && pod.style != STYLE_TELEPORT) // BANDASTATION EDIT. Original: if (pod.style != STYLE_INVISIBLE)
 		animate(pod, pixel_z = -1 * abs(sin(rotation))*4, pixel_x = SUPPLYPOD_X_OFFSET + (sin(rotation) * 20), time = pod.delays[POD_FALLING], easing = LINEAR_EASING) //Make the pod fall! At an angle!
 	addtimer(CALLBACK(src, PROC_REF(endLaunch)), pod.delays[POD_FALLING], TIMER_CLIENT_TIME) //Go onto the last step after a very short falling animation
 

modular_bandastation/aesthetics/_aesthetics.dm

@@ -2,3 +2,7 @@
 	name = "Эстетика"
 	desc = "Обновление визуального ряда"
 	author = "larentoun, Aylong220"
+
+/datum/modpack/aesthetics/post_initialize()
+	. = ..()
+	GLOB.podstyles += list(list(POD_SHAPE_OTHER, FALSE, FALSE, FALSE, FALSE, RUBBLE_NONE, "Портал доставки", "Высокотехнологичный портал для межзвездной доставки. Обеспечивает мгновенный доступ к товарам из любой точки вселенной."))

modular_bandastation/aesthetics/_aesthetics.dme

@@ -44,6 +44,9 @@
 // Radio
 #include "radio/code/radio.dm"
 
+// Supply Pods
+#include "supply_pods/code/supply_pods.dm"
+
 // Walls
 #include "walls/code/walls.dm"
 

modular_bandastation/aesthetics/supply_pods/code/supply_pods.dm

@@ -0,0 +1,31 @@
+/obj/structure/closet/supplypod/teleporter
+	style = STYLE_TELEPORT
+	bluespace = TRUE
+	explosionSize = list(0,0,0,0)
+	fallingSound = null
+	landingSound = SFX_PORTAL_CREATED
+	openingSound = SFX_PORTAL_ENTER
+	leavingSound = SFX_PORTAL_CLOSE
+	pod_flags = FIRST_SOUNDS
+
+/obj/structure/closet/supplypod/teleporter/setStyle(chosenStyle)
+	. = ..()
+	icon = 'icons/obj/anomaly.dmi'
+	icon_state = "portal"
+
+/obj/effect/pod_landingzone/setupSmoke(rotation)
+	if(pod.style == STYLE_TELEPORT)
+		return
+	. = ..()
+
+/obj/effect/pod_landingzone/drawSmoke()
+	if(pod.style == STYLE_TELEPORT)
+		return
+	. = ..()
+
+/obj/effect/pod_landingzone/endLaunch()
+	if(pod.style == STYLE_TELEPORT)
+		pod.pixel_x = 0
+		pod.pixel_z = 0
+		pod.transform = matrix()
+	. = ..()