Mobius Evalon

	Carrier
		density = 1
		opacity = 0
		icon_state = "carrier"
		var/used = 0
		verb
			Drop()
				set src in usr
				src.loc = usr.loc
				step(src,usr.dir)
				usr.holding = 0

			Get()
				set src in oview(1)
				if (usr.icon == 'mobs.dmi')
					src.loc = usr
				else
					if(usr.holding == 0)
						src.loc = usr
						usr.holding = 1

			Put_Inside(var/mob/M in oview(1))
				set src in oview(1)
				if(usr.icon == 'mobs.dmi')
					if(M.icon == 'dogs.dmi')
						if(src.used == 0)
							src.contents += M
							src.used = 1
							src.name = "Carrier - Used"

			Take_Out()
				set src in oview(1)
				var/carrier[0]
				for(var/mob/M)
					if(M in src.contents) carrier += M

				var/mob/m = locate(/mob) in carrier
				if(src.icon == 'mobs.dmi')
					if(m.icon == 'dogs.dmi')
						if(src.used == 1)
							m.loc = src.loc
							m.y -= 1
							src.used = 0
							src.name = "Carrier"

			Put_Inside_New(var/mob/M in oview(1))
				set src in oview(1)
				if(usr.icon == 'mobs.dmi' && M.icon == 'dogs.dmi')
					var/mob/dog = locate(/mob) in src.contents
					if(!dog)
						M.loc = src
						src.name = "Carrier - Used"
			Take_Out_New()
				set src in oview(1)
				if(usr.icon == 'mobs.dmi' && M.icon == 'dogs.dmi')
					var/mob/dog = locate(/mob) in src.contents
					if(dog)
						M.loc = src.loc
						src.name = "Carrier"