added scripts

FindVertices.nb is a Mathematica script that will generate level text
files in the folder vertices. Ignore the rest