anchor.diff:  	var/content
   	var/list/possible_answers = list()
   	var/answered
  -	
  
positive.code: /obj/machinery/computer/communications/proc/get_cancel_shuttle_form()
  	var/form_id = "cancelshuttle"
  	var/dat = get_javascript_header(form_id)
  	dat += "<form name='cancelshuttle' id='[form_id]' action='?src=\ref[src]' method='get' style='display: inline'>"
  	dat += "<input type='hidden' name='src' value='\ref[src]'>"
  	dat += "<input type='hidden' name='operation' value='cancelshuttle2'>"
  
  	dat += "<BR>Are you sure you want to cancel the shuttle? \[ <a href='#' onclick='submit()'>Cancel</a> \]"
  
negative.code: 			else
  				dat += "Current login: None"
  			dat += "<BR><BR><B>General Functions</B>"
  			dat += "<BR>\[ <A HREF='?src=[REF(src)];operation=ai-messagelist'>Message List</A> \]"
  			if(SSshuttle.emergency.mode == SHUTTLE_IDLE)
  				dat += "<BR>\[ <A HREF='?src=[REF(src)];operation=ai-callshuttle'>Call Emergency Shuttle</A> \]"
  			dat += "<BR>\[ <A HREF='?src=[REF(src)];operation=ai-status'>Set Status Display</A> \]"
  			dat += "<BR><BR><B>Special Functions</B>"
  			dat += "<BR>\[ <A HREF='?src=[REF(src)];operation=ai-announce'>Make an Announcement</A> \]"
  			dat += "<BR>\[ <A HREF='?src=[REF(src)];operation=ai-changeseclevel'>Change Alert Level</A> \]"
  			dat += "<BR>\[ <A HREF='?src=[REF(src)];operation=ai-emergencyaccess'>Emergency Maintenance Access</A> \]"
  		if(STATE_CALLSHUTTLE)
  			dat += get_call_shuttle_form(1)
  		if(STATE_MESSAGELIST)
  			dat += "Messages:"
  			for(var/i in 1 to messages.len)
  				var/datum/comm_message/M = messages[i]
  				dat += "<BR><A HREF='?src=[REF(src)];operation=ai-viewmessage;message-num=[i]'>[M.title]</A>"
  		if(STATE_VIEWMESSAGE)
  			if (aicurrmsg)
  				dat += "<B>[aicurrmsg.title]</B><BR><BR>[aicurrmsg.content]"
  				if(!aicurrmsg.answered && aicurrmsg.possible_answers.len)
  					for(var/i in 1 to aicurrmsg.possible_answers.len)
  						var/answer = aicurrmsg.possible_answers[i]
  						dat += "<br>\[ <A HREF='?src=[REF(src)];operation=ai-respond;answer=[i]'>Answer : [answer]</A> \]"
  				else if(aicurrmsg.answered)
  					var/answered = aicurrmsg.possible_answers[aicurrmsg.answered]
  					dat += "<br> Archived Answer : [answered]"
  				dat += "<BR><BR>\[ <A HREF='?src=[REF(src)];operation=ai-delmessage'>Delete</A> \]"
  			else
  				aistate = STATE_MESSAGELIST
  				attack_hand(user)
  				return null
  		if(STATE_DELMESSAGE)
  			if(aicurrmsg)
  				dat += "Are you sure you want to delete this message? \[ <A HREF='?src=[REF(src)];operation=ai-delmessage2'>OK</A> | <A HREF='?src=[REF(src)];operation=ai-viewmessage'>Cancel</A> \]"
  			else
  				aistate = STATE_MESSAGELIST
  				attack_hand(user)
  				return
  
  		if(STATE_STATUSDISPLAY)
  			dat += "Set Status Displays<BR>"
  			dat += "\[ <A HREF='?src=[REF(src)];operation=setstat;statdisp=blank'>Clear</A> \]<BR>"
  			dat += "\[ <A HREF='?src=[REF(src)];operation=setstat;statdisp=shuttle'>Shuttle ETA</A> \]<BR>"
  			dat += "\[ <A HREF='?src=[REF(src)];operation=setstat;statdisp=message'>Message</A> \]"
  			dat += "<ul><li> Line 1: <A HREF='?src=[REF(src)];operation=setmsg1'>[ stat_msg1 ? stat_msg1 : "(none)"]</A>"
  			dat += "<li> Line 2: <A HREF='?src=[REF(src)];operation=setmsg2'>[ stat_msg2 ? stat_msg2 : "(none)"]</A></ul><br>"
  			dat += "\[ Alert: <A HREF='?src=[REF(src)];operation=setstat;statdisp=alert;alert=default'>None</A> |"
  			dat += " <A HREF='?src=[REF(src)];operation=setstat;statdisp=alert;alert=redalert'>Red Alert</A> |"
  			dat += " <A HREF='?src=[REF(src)];operation=setstat;statdisp=alert;alert=lockdown'>Lockdown</A> |"
  			dat += " <A HREF='?src=[REF(src)];operation=setstat;statdisp=alert;alert=biohazard'>Biohazard</A> \]<BR><HR>"
  
  		if(STATE_ALERT_LEVEL)
  			dat += "Current alert level: [get_security_level()]<BR>"
  			if(GLOB.security_level == SEC_LEVEL_DELTA)
  				dat += "<font color='red'><b>The self-destruct mechanism is active. Find a way to deactivate the mechanism to lower the alert level or evacuate.</b></font>"
  			else
  				dat += "<A HREF='?src=[REF(src)];operation=ai-securitylevel;newalertlevel=[SEC_LEVEL_BLUE]'>Blue</A><BR>"
  				dat += "<A HREF='?src=[REF(src)];operation=ai-securitylevel;newalertlevel=[SEC_LEVEL_GREEN]'>Green</A>"
  
  		if(STATE_TOGGLE_EMERGENCY)
  			if(GLOB.emergency_access == 1)
  				dat += "<b>Emergency Maintenance Access is currently <font color='red'>ENABLED</font></b>"
  				dat += "<BR>Restore maintenance access restrictions? <BR>\[ <A HREF='?src=[REF(src)];operation=ai-disableemergency'>OK</A> | <A HREF='?src=[REF(src)];operation=ai-viewmessage'>Cancel</A> \]"
  			else
  				dat += "<b>Emergency Maintenance Access is currently <font color='green'>DISABLED</font></b>"
  				dat += "<BR>Lift access restrictions on maintenance and external airlocks? <BR>\[ <A HREF='?src=[REF(src)];operation=ai-enableemergency'>OK</A> | <A HREF='?src=[REF(src)];operation=ai-viewmessage'>Cancel</A> \]"
  
  	dat += "<BR><BR>\[ [(aistate != STATE_DEFAULT) ? "<A HREF='?src=[REF(src)];operation=ai-main'>Main Menu</A> | " : ""]<A HREF='?src=[REF(user)];mach_close=communications'>Close</A> \]"
  	return dat
  
  /obj/machinery/computer/communications/proc/make_announcement(mob/living/user, is_silicon)
  