anchor.diff:          parser.NewBlock 
           |> Event.scan scanBlocks (None, None, 0L) 
           |> ignore
  -        parser.StartPushBetween 0 10
  +        parser.StartPushBetween 0 50
   
       load()
   
  
positive.code:             { Hash = hash
                Timestamp = timestamp
                Height = height }
          let savedNeoBlock = saveNeoBlock neoBlock
          for trans in block.Transactions do
              neoTransOfTrans trans hash timestamp
          savedNeoBlock
   
      let scanBlocks (prevBlock, currBlock, i) (nextBlock: Block) =
          match prevBlock, currBlock with
  
negative.code:             .Match("(t:Transaction)")
              .Where(fun t -> t.TransactionHash = transactionHash)
              .CreateUnique("t-[:input]->i")
              .ExecuteWithoutResults()
  
      let neoInputOfInput transactionHash transTime (input: Input) =
          let inputHash = Conversion.littleEndianBytesToHexString input.InputHash
  