Pascal/Turbo Pascal - urgente codigo fuente de un cajero

agradesco a quien pueda ayudarme a conseguir el codigo fuente para realizar un cajero atomatico en turbo pascal

es urgente

muchas gracias

oye.....quieres q te lo haga todo..!!!tu no as adelantado nada.....ese se ve facil...pero si verdad as hecho algo mandamelo para yo terminartelo....y te lo mando!!! ya vas a ver como va a quedar!! y a proposito...para q lo quieres??...nos vemos man

Estoy haciendo un trabajo practico sobre sistema de compras y necesito un modelo o algun ejemplo de un sistema para poder guiarme
gracias