Pascal/Turbo Pascal - COMO REGRESO UN VALOR PARA UN PROGRAMA DE MSDOS

TENGO UN PROGRAMA QUE DEBE EFECTUAR UNA FUNCION SI LA HACE BIEN REGRESA UN VALOR DE CERO SI NO LA HACE REGRESA UN UNO, YO LAS MANDABA A PANTALLA, PERO AHORA DEBO ENVIAR EL DATO A UN ARCHIVO BATCH QUE DEB RECIBIR UN VALOR NUMERICO 1 O 0 SI LOS MANDO A PANTALLA NO LOS AGARRA ESTE PROGRAMA
COMO LE HAGO?, ES COMO SI EL PROGRAMA FUERA UNA FUNCION QUE RETORNA UN VALOR, NO SE COMO HACERLO
GRACIAS

Usando el procedimiento Halt() que como parámetro es el valor ERRORLEVEL de DOS, lo que hace Halt() es terminar la ejecución del programa y regresar el valor a DOS, en tu caso cuando el programa termine bién le pones Halt(0) caso contrario Halt(1).