anchor.diff:  	var/transfer_blood = 0
   	var/mob/living/carbon/human/bloody_hands_mob
   
  -
  -
   proc/blood_incompatible(donor,receiver)
   	if(!donor || !receiver) return 0
   	var
  
positive.code: 
  /mob
  
  	var/bloody_hands = 0
  
negative.code: 		receiver_antigen = copytext(receiver,1,lentext(receiver))
  		donor_rh = (findtext(donor,"+")>0)
  		receiver_rh = (findtext(receiver,"+")>0)
  	if(donor_rh && !receiver_rh) return 1
  	switch(receiver_antigen)
  		if("A")
  			if(donor_antigen != "A" && donor_antigen != "O") return 1
  