anchor.diff:  				if((locate(/obj/mecha ) in ATMM)) return 0
   				if((locate(/obj/structure/closet/body_bag) in ATMM)) return 0
   	return 1
  -
  +*/
   /proc/sell_crates()
   	var/shuttleat = supply_shuttle_at_station ? SUPPLY_STATION_AREATYPE : SUPPLY_DOCK_AREATYPE
   
  
positive.code: 		supply_shuttle_shoppinglist = new/list()
  
  		sell_crates()
  		send_supply_shuttle()
  
  	else if (href_list["sendtostation"])
  		if(supply_shuttle_at_station || supply_shuttle_moving) return
  
  		if (!supply_can_move())
  			usr << "\red The supply shuttle can not transport station employees or homing beacons."
  			return
  
  		post_signal("supply")
  
negative.code: 		if(!supply_shuttle_at_station || supply_shuttle_moving) return
  
  		if (!supply_can_move())
  			usr << "\red The supply shuttle can not transport station employees, exosuits, classified nuclear codes or homing beacons."
  			return
  
  		src.temp = "Shuttle sent.<BR><BR><A href='?src=\ref[src];mainmenu=1'>OK</A>"
  