Aurora.3/code/modules/mob/living/bot/bot.dm

/mob/living/bot
	name = "Bot"
	accent = ACCENT_TTS
	health = 20
	maxHealth = 20
	icon = 'icons/mob/npc/aibots.dmi'
	layer = MOB_LAYER
	universal_speak = TRUE
	density = FALSE
	var/obj/item/card/id/botcard
	var/list/botcard_access = list()
	var/on = TRUE
	var/open = FALSE
	var/locked = TRUE
	var/emagged = FALSE
	var/light_strength = 3

	var/obj/access_scanner
	var/list/req_access = list()
	var/list/req_one_access = list()
	var/master_access = ACCESS_ROBOTICS

	var/last_emote = 0 // timer for emotes

	var/can_take_pai = TRUE
	var/obj/item/device/paicard/pAI
	var/old_name

/mob/living/bot/Initialize()
	. = ..()
	update_icon()
	add_language(LANGUAGE_TCB)
	default_language = GLOB.all_languages[LANGUAGE_TCB]

	botcard = new /obj/item/card/id(src)
	botcard.access = botcard_access.Copy()

	access_scanner = new /obj(src)
	access_scanner.req_access = req_access.Copy()
	access_scanner.req_one_access = req_one_access.Copy()

/mob/living/bot/Destroy()
	if(pAI)
		if(isturf(loc))
			drop_from_inventory(pAI, get_turf(src))
		else
			drop_from_inventory(pAI, loc)
		pAI = null
	QDEL_NULL(botcard)
	QDEL_NULL(access_scanner)
	return ..()

/mob/living/bot/examine(mob/user, distance, infix, suffix)
	. = ..()
	if(pAI)
		to_chat(user, FONT_SMALL(SPAN_NOTICE("It has a pAI piloting it.")))

/mob/living/bot/Life()
	..()
	if(health <= 0)
		death()
		return
	weakened = 0
	stunned = 0
	paralysis = 0

/mob/living/bot/movement_delay()
	return 3

/mob/living/bot/updatehealth()
	if(status_flags & GODMODE)
		health = maxHealth
		set_stat(CONSCIOUS)
	else
		health = maxHealth - getFireLoss() - getBruteLoss()

/mob/living/bot/death()
	explode()

/mob/living/bot/proc/has_master_access(var/obj/item/I)
	var/list/L = I.GetAccess()
	if(master_access in L)
		return TRUE
	else
		return FALSE

/mob/living/bot/proc/has_ui_access(mob/user)
	if(access_scanner.allowed(user))
		return TRUE
	if(!locked)
		return TRUE
	if(isAI(user))
		return TRUE
	return FALSE

/mob/living/bot/attackby(var/obj/item/O, var/mob/user)
	if(O.GetID())
		if((has_master_access(O) || access_scanner.allowed(user)) && !open && !emagged)
			locked = !locked
			to_chat(user, SPAN_NOTICE("You [locked ? "lock" : "unlock"] the controls."))
		else
			if(emagged)
				to_chat(user, SPAN_WARNING("As you swipe your ID, it reads: \"Interface error!\""))
			if(open)
				to_chat(user, SPAN_WARNING("You have to close the access panel before locking it."))
			else
				to_chat(user, SPAN_WARNING("As you swipe your ID, it reads: \"Access denied.\""))
		return
	else if(O.isscrewdriver())
		if(!locked)
			open = !open
			to_chat(user, SPAN_NOTICE("You [open ? "open" : "close"] the maintenance panel."))
		else
			to_chat(user, SPAN_WARNING("You need to unlock the controls first."))
		return
	else if(O.iswelder())
		if(health < maxHealth)
			if(open)
				health = min(maxHealth, health + 10)
				user.visible_message(SPAN_NOTICE("\The [user] repairs [src]."), SPAN_NOTICE("You repair [src]."))
			else
				to_chat(user, SPAN_WARNING("You are unable to repair [src] with the maintenance panel closed."))
		else
			to_chat(user, SPAN_WARNING("[src] does not need a repair."))
		return
	else if(O.iscrowbar())
		if(!pAI)
			to_chat(user, SPAN_WARNING("\The [src] does not have a pAI installed!"))
			return
		if(!old_name)
			old_name = initial(name)
		name = old_name
		user.put_in_hands(pAI)
		user.visible_message(SPAN_NOTICE("\The [user] pries \the [pAI.pai] out of \the [src]."), SPAN_NOTICE("You pry \the [pAI.pai] out of \the [src]."))
		pAI = null
	else if(istype(O, /obj/item/device/paicard))
		if(!can_take_pai)
			to_chat(user, SPAN_WARNING("\The [src] cannot take a pAI!"))
			return
		if(pAI)
			to_chat(user, SPAN_WARNING("\The [src] already has a pAI installed!"))
			return
		var/obj/item/device/paicard/P = O
		P.pai.open_up(FALSE)
		P.pai.close_up()
		user.drop_from_inventory(P, src)
		pAI = P
		user.visible_message(SPAN_NOTICE("\The [user] places \the [pAI.pai] into \the [src]."), SPAN_NOTICE("You place \the [O] into \the [src]."))
		old_name = src.name
		name = pAI.pai.name
	else
		..()

/mob/living/bot/attack_ai(mob/user)
	if(within_jamming_range(src, FALSE))
		to_chat(user, SPAN_WARNING("Something in the area of \the [src] is blocking the remote signal!"))
		return FALSE
	if(pAI)
		to_chat(user, SPAN_WARNING("\The [src] contains a pAI and cannot be remotely controlled."))
		return
	return attack_hand(user)

/mob/living/bot/say(var/message, var/datum/language/speaking = null, var/verb="says", var/alt_name="", var/ghost_hearing = GHOSTS_ALL_HEAR, var/whisper = FALSE)
	..(message, null, "beeps")

/mob/living/bot/Collide(atom/A)
	if(on && botcard && istype(A, /obj/machinery/door))
		var/obj/machinery/door/D = A
		if(!istype(D, /obj/machinery/door/firedoor) && !istype(D, /obj/machinery/door/blast) && D.check_access(botcard))
			D.open()
	else
		. = ..()

/mob/living/bot/cleanbot/think()
	if(pAI) // no AI if we have a pAI installed
		return
	..()

/mob/living/bot/emag_act()
	return FALSE

/mob/living/bot/emp_act(severity)
	. = ..()

	switch(severity)
		if(EMP_HEAVY)
			death()
		else
			turn_off()

/mob/living/bot/proc/turn_on()
	if(stat)
		return FALSE
	on = TRUE
	set_light(light_strength)
	update_icon()
	return TRUE

/mob/living/bot/proc/turn_off()
	on = FALSE
	set_light(0)
	update_icon()

/mob/living/bot/proc/explode()
	qdel(src)

/mob/living/bot/get_bullet_impact_effect_type(var/def_zone)
	return BULLET_IMPACT_METAL