Pascal/Turbo Pascal - funcion de insertar un nuevo dato entre nodos

lo que necesito es insertar un nodo entre nodos esto es super urgente.
esto e s una operacion de una lista enlazada.
si pueden mandenme el codigo gracias

Simple o doblemente enlazada?

si tienes las dos me encantaria que me mandaras las dos funciones pero sino la que necesito es la simple.
gracias