mirror of
https://github.com/Bubberstation/Bubberstation.git
synced 2026-01-01 12:31:32 +00:00
6f834fb418
## About The Pull Request - Added full support for RETA system - Categorized all configs for search purposes - Added channel check for most usages of get_announcement_system() calls ## Why It's Good For The Game ## Changelog 🆑 code: Little AAS code cleanup. Added full RETA support. Grouped configs for search purposes. /🆑
121 lines
5.6 KiB
Plaintext
121 lines
5.6 KiB
Plaintext
/**
|
|
* Request Emergency Temporary Access - Admin Verbs
|
|
*/
|
|
|
|
/// Admin command to manually trigger RETA access grant for admins
|
|
ADMIN_VERB(reta_manual_trigger, R_ADMIN, "RETA Door Access", "Manually trigger RETA access for testing", ADMIN_CATEGORY_EVENTS)
|
|
|
|
var/calling_dept = tgui_input_list(user, "RETA - Which department is CALLING for help?", "Calling Department", list("Security", "Engineering", "Medical", "Science", "Service", "Command", "Cargo", "Mining"))
|
|
if(!calling_dept)
|
|
return
|
|
|
|
var/list/available_depts = list("Security", "Engineering", "Medical", "Science", "Service", "Command", "Cargo", "Mining")
|
|
available_depts -= calling_dept
|
|
|
|
// Multi-select using repeated input_list calls
|
|
var/list/selected_depts = list()
|
|
var/list/remaining_depts = available_depts.Copy()
|
|
|
|
while(length(remaining_depts))
|
|
remaining_depts += "DONE - Finish selection"
|
|
var/choice = tgui_input_list(user, "RETA - Select departments to RESPOND to [calling_dept]\nCurrently selected: [english_list(selected_depts)]\n\nSelect another department or DONE:", "Responding Departments", remaining_depts)
|
|
|
|
if(!choice || choice == "DONE - Finish selection")
|
|
break
|
|
|
|
selected_depts += choice
|
|
remaining_depts -= choice
|
|
remaining_depts -= "DONE - Finish selection"
|
|
|
|
if(!length(selected_depts))
|
|
message_admins("No departments selected for RETA response.")
|
|
return
|
|
|
|
var/duration = tgui_input_number(user, "Duration in minutes:", "RETA Duration", 5, 60, 1)
|
|
if(!duration)
|
|
return
|
|
|
|
message_admins("[key_name_admin(user)] is manually triggering RETA: [calling_dept] called for help, [english_list(selected_depts)] will get access to [calling_dept] areas for [duration] minutes.")
|
|
log_game("ADMIN: [key_name(user)] is manually triggering RETA: [calling_dept] called for help, [english_list(selected_depts)] will get access to [calling_dept] areas for [duration] minutes.")
|
|
|
|
// Grant access to each responding department and collect results
|
|
var/successful_grants = 0
|
|
var/list/granted_depts = list()
|
|
var/total_eligible_cards = 0
|
|
|
|
for(var/responding_dept in selected_depts)
|
|
var/dept_eligible_cards = 0
|
|
var/list/job_trims = GLOB.reta_job_trims[responding_dept]
|
|
|
|
for(var/mob/living/carbon/human/human_player as anything in GLOB.human_list)
|
|
if(!human_player.client || human_player.stat == DEAD)
|
|
continue
|
|
|
|
var/obj/item/card/id/id_card = human_player.get_idcard(hand_first = FALSE)
|
|
if(!id_card || !id_card.trim)
|
|
continue
|
|
|
|
if(is_type_in_list(id_card.trim, job_trims))
|
|
dept_eligible_cards++
|
|
|
|
total_eligible_cards += dept_eligible_cards
|
|
message_admins("[responding_dept] department: [dept_eligible_cards] eligible cards from living players")
|
|
|
|
// Note: RETA grants access FROM calling_dept TO responding_dept personnel
|
|
// So if Medical calls Security, Security personnel get Medical access
|
|
if(reta_find_and_grant_access(responding_dept, calling_dept, duration MINUTES))
|
|
successful_grants++
|
|
granted_depts += responding_dept
|
|
|
|
// Report results
|
|
if(successful_grants > 0)
|
|
message_admins("RETA access granted successfully: [english_list(granted_depts)] personnel now have [calling_dept] access. Total eligible cards: [total_eligible_cards]")
|
|
|
|
// Send department announcement like the normal system
|
|
var/caller_info = "(Called by CENTCOM)"
|
|
|
|
// Send announcements to all successfully granted departments
|
|
for(var/dept in granted_depts)
|
|
switch(dept)
|
|
if("Security")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_SECURITY), "Security")
|
|
if("Engineering")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_ENGINEERING), "Engineering")
|
|
if("Medical")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_MEDICAL), "Medical")
|
|
if("Science")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_SCIENCE), "Science")
|
|
if("Service")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_SERVICE), "Service")
|
|
if("Command")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_COMMAND), "Command")
|
|
if("Cargo")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_SUPPLY), "Cargo")
|
|
if("Mining")
|
|
aas_config_announce(/datum/aas_config_entry/rc_emergency, list("LOCATION" = calling_dept, "CALLER" = caller_info), null, list(RADIO_CHANNEL_SUPPLY), "Mining")
|
|
|
|
// Send confirmation to the calling department about who has been given access
|
|
var/grantee = english_list(granted_depts)
|
|
var/list/target_channels = list()
|
|
switch(calling_dept)
|
|
if("Security")
|
|
target_channels += RADIO_CHANNEL_SECURITY
|
|
if("Engineering")
|
|
target_channels += RADIO_CHANNEL_ENGINEERING
|
|
if("Medical")
|
|
target_channels += RADIO_CHANNEL_MEDICAL
|
|
if("Science")
|
|
target_channels += RADIO_CHANNEL_SCIENCE
|
|
if("Service")
|
|
target_channels += RADIO_CHANNEL_SERVICE
|
|
if("Command")
|
|
target_channels += RADIO_CHANNEL_COMMAND
|
|
if("Cargo")
|
|
target_channels += RADIO_CHANNEL_SUPPLY
|
|
if("Mining")
|
|
target_channels += RADIO_CHANNEL_SUPPLY
|
|
|
|
aas_config_announce(/datum/aas_config_entry/rc_reta_announcement, list("GRANTEE" = grantee, "CALLER" = caller_info), null, target_channels)
|
|
else
|
|
message_admins("RETA access grant failed for all departments.")
|