Pascal/Turbo Pascal - implementacion AVL

buena, tengo qe hacer un TP, digamos qe necesito implementar un arbol AVL apra mantner ordenado los datos de los registros. como se hace esto? con qe units?

ninguna unidad que yo conozca, lo tendrias que programar a pie,
esto es a traves de la insercion compararias los datos del arbol, e insertarias el dato en un nodo nuevo si es mayor o menor , segun sea el caso .