anchor.diff:  			for(var/atom/movable/A as mob|obj in src)
   				A.loc = loc
   				ex_act(severity)
  -				//Foreach goto(35)
  -			//SN src = null
   			del(src)
   			return
   		if(2.0)
  
positive.code: 	if(blocknumber < (length(input)/blocksize))
  		return copytext(input,blocksize*blocknumber+1,length(input)+1)
  
  /*
  /proc/getblockstring(input,block,subblock,blocksize,src,ui) // src is probably used here just for urls; ui is 1 when requesting for the unique identifier screen, 0 for structural enzymes screen
  	. = "<div class='getblockstring'><div class='blockString'>"
  	var/subpos = 1 // keeps track of the current sub block
  	var/blockpos = 1 // keeps track of the current block
  
  	for(var/i = 1, i <= length(input), i++) // loop through each letter
  		if(subpos == subblock && blockpos == block) // if the current block/subblock is selected, mark it
  			. += "<span class='linkOn'>[copytext(input, i, i+1)]</span>"
  		else
  			. += "<a href='?src=\ref[src];[ui ? "ui" : "se"]menuset=[num2text(blockpos)];uimenusubset=[num2text(subpos)]'>[copytext(input, i, i+1)]</a>"
  
  		if(subpos >= blocksize) // add a line break for every block
  			. += "</div><div class='blockString'>"
  			subpos = 0
  			blockpos++
  		subpos++
  
  	. += "</div></div>"
  	return .
  */
  
  
  /proc/getblock(input, blocknumber, blocksize=DNA_BLOCK_SIZE)
  	return copytext(input, blocksize*(blocknumber-1)+1, (blocksize*blocknumber)+1)
  
  /proc/getblockbuffer(input,blocknumber,blocksize)
  	var/result[blocksize]
  	var/start = (blocksize*blocknumber)-blocksize
  	for(var/i=1, i<=blocksize, i++)
  		result[i] = copytext(input, start+i, start+i+1)
  	return result
  
  /proc/setblock(istring, blocknumber, replacement, blocksize=DNA_BLOCK_SIZE)
  	if(!istring || !blocknumber || !replacement || !blocksize)	return 0
  	return getleftblocks(istring, blocknumber, blocksize) + replacement + getrightblocks(istring, blocknumber, blocksize)
  
negative.code: 	usr.loc = src
  	occupant = usr
  	icon_state = "scanner_1"
  
  	add_fingerprint(usr)
  	return
  
  