La Página de DriverOp

Turbo Pascal Icon Turbo Pascal

Estos son algunos programas en código fuente de mi autoría hechos en Turbo Pascal 7.0. La solución para el bug "Error 200: Division by Zero" está aquí también.

Aviso importante

Te recomiendo que NO uses Turbo Pascal para programar en Pascal y en su lugar uses Free Pascal.

La razón de esto es que Turbo Pascal es un compilador obsoleto. Fue quizá el mejor compilador de Pascal de su época pero eso fue hace 20 años atrás.

Mientras que Free Pascal está al día y puedes programar cosas modernas en un entorno moderno. Si quieres hacer programas para Windows, entonces usar Lazarus que es un IDE para Free Pascal con el que puedes hacer programas visuales y conducidos por eventos.

Diego Romero -

Contenido.

Códigos Fuentes.

Descripción Descarga
Turbo Pascal Icon Barra de Menues. Este programa es un ejemplo de cómo hacer una barra de menues desde donde se puedan lanzar más opciones, el mismo es configurable desde un archivo de texto, permite hasta 12 opciones por menú pero como incluyo el código fuente no será problema adaptarlo a cualquier necesidad. menupas.zip (13 Kb)
Turbo Pascal Icon Impresión de Gráficos. Un ejemplo de cómo imprimir gráficos sencillos desde un programa Pascal a una impresora Epson, la impresión se hace a solo 8 bits en blanco y negro, ni siquiera en tono de grises, sorry :), me he basado en lo que dice la documentación que está en el manual de las impresoras Epson. impgrph.zip (2 Kb)
Turbo Pascal Icon Un visor simple de archivos BMP. El archivo para descargar incluye un BMP de muestra, la resolución maxima es 800x600 a 256 colores, espero que le sea útil. No he encontrado ejemplos de cómo hacer esto por ningún lado es por eso que he decidido donar este código. verbmp.zip (10 Kb)
Turbo Pascal Icon Protector de pantalla, muestra una cinta que llena la pantalla cada 10 segundos y cambia de color, desde el código fuente se puede cambiar la resolución de la pantalla, es necesario tener el archivo SVGA256.BGI (que está en verbmp.zip) en el mismo directorio de ejecución del programa. nada.zip (7 Kb)
Turbo Pascal Icon Extrae datos de la BIOS, tal como el número de serie, la fecha de fabricación, el fabricante y el tipo, muy útil para implementar una protección contra copias. Para BIOS Award únicamente.
He perdido este archivo, si alguien lo tiene por favor me avisa!
Lo encontré! ()
bios.zip (601 Bytes)
Turbo Pascal Icon Tres programas para: pasar de notación decimal a hexadecimal, de hexadecimal a decimal y de decimal a binario. convert.zip (1,1 Kb)
Turbo Pascal Icon Programa que pasa un número de notación arabiga (vamos, el que usamos todos los dias :)) a notación romana, desafortunadamente solo funciona en el período 0 a 3999. romanos.zip (0,4 Kb)
Turbo Pascal Icon ¿Has visto qué bien quedan esas barras de avance que muestran el estado de una copia de un archivo?, te has preguntado cómo hacer un programa que copie cualquier archivo de un lugar a otro? Aquí está el código..., no muy elegante pero funciona. cp.zip (2,8 Kb)
Turbo Pascal Icon El Riden, un juego matamarcianos en modo texto hecho con programación orientada a objetos, noten qué corto que es, solo 445 lineas de codigo ... y podrian ser menos. riden.zip (2,4 Kb)
Turbo Pascal Icon Esto suele ser muy solicitado. Métodos de Ordenación, en este programa están ejemplos de los métodos de ordenación mas comunmente estudiados (Burbuja, Quick Sort, Shell, Hashing, etc...), puestos en un solo programa y de forma que se puedan apreciar las diferencias de rendimiento entre ellos. ordena.zip(2,2 Kb)
Turbo Pascal Icon Esto también suele ser muy pedido. Programa que extrae (y con alguna modificación escribe) el número de serie del disco, la etiqueta y el sistema de archivo usado en el mismo. serial.zip (864 bytes)
Turbo Pascal Icon Juego del solitario español, con baraja francesa, este programa me fué pedido por alguien y me pareció un interesante desafío.
Turbo Pascal Icon Evaluador de Expresiones. Debido a la gran cantidad de demandas por este tipo de programas he decidido publicar mi versión. Lamentablemente este programa lo he hecho hace ya muchos años y he perdido el archivo de ayuda que le acompaña pero sigue siendo totalemente funcional. Lee el archivo "leeme.txt" para más detalles de cómo se usa. exp.zip(3,6 Kb)
Turbo Pascal Icon Muestra la hora siempre visible en la esquina superior derecha de la pantalla. Útil por ejemplo para el programa de menues. poner_h.zip (497 bytes)
Turbo Pascal Icon Implementación del método de ordenación Quick Sort sobre un archivo de datos. idxarch.zip (994 bytes)
Turbo Pascal Icon Implementación de lista dinámica simplemente enlazada insertando en orden cada nuevo elemento de la lista. listasim.zip (735 bytes)
Turbo Pascal Icon Implementación de lista dinámica doblemente enlazada insertando en orden cada nuevo elemento de la lista. listadob.zip (1,1 KB.)
Turbo Pascal Icon Implementación de una sencilla base de datos con indexación externa. La idea es tener un archivo de datos ordenado mediante un archivo de índice externo usando el método QuickSort visto más arriba. index.zip (1,5 Kb)
Turbo Pascal Icon Programa que calcula la diferencia entre dos fechas, es decir dadas dos fechas devuelve la cantidad de días entre ellas. Tiene en cuenta el cambio entre el calendario juliano y el gregoriano. diffecha.zip (557 bytes)

Borland Turbo Pascal 7.0

Baja el compilador mas conocido de Pascal para DOS!. Borland ha liberado su compilador Turbo Pascal 7.0 como abandonware. La ayuda en castellano se descarga por separado, está más abajo en esta misma página. Los dos archivos se corresponden con las copias exactas de los dos disquettes de instalación originales de Turbo Pascal 7.0, por lo tanto no tienen el parche aplicado, el cual deberás descargar y aplicar.

Primer Archivo (1,3 Mb)Primer Archivo (1,3 Mb) Segundo Archivo (900 Kb)Segundo Archivo (900 Kb)

Parche para el bug "Error 200: Division by Zero".

Ocurre cuando se usa la unidad CRT en procesadores de mas de 166 MHZ, lee cuidadosamente las instrucciones y haz una copia de respaldo antes de aplicarlo, no vaya a ser peor el remedio que la enfermedad :).

Actualización!: aparentemente el problema volvió a aparecer en procesadores de mas de 1,2 GHZ de velocidad aún con este parche instalado pero personalmente no lo he corroborado. Si es tu caso envíame un correo

En un Pentium IV 2,2 Ghz con motherboard ASUS y 256 Mb de RAM DDR, tanto Turbo Pascal como los programas compilados con el parche que ofrezco en esta página, no me han dado ningún problema. Tampoco ejecutando bajo Windows XP.

Parche (30 Kb)Parche (30 Kb)

Instrucciones para aplicar el parche

Tutorial Turbo Pascal en Español (Castellano).

Hay muy buenos tutoriales en español (castellano) en la red, para acceder a ellos haz click en el link de mas abajo, es una busqueda en Google que, al momento de hacerla me trajo 2630 resultados asi que disfrutalo.

Buscar "Tutorial Pascal" en Google.

Tutorial sobre manejo de archivos con tipo en Turbo Pascal.

El amigo Roberto Garcia tiene un buen tutorial de todo lo referente a manipulación de archivos usando Turbo Pascal (o Pascal en general). Vale la pena leerlo.

http://mx.geocities.com/antrahxg/pascal/pmf/archivos.html

La ayuda de Turbo Pascal en Español (Castellano).

La ayuda (help) en castellano para Turbo Pascal 7.0 esta es una traducción no oficial. No soy responsable por ella y no puedo dar garantía de exactitud pero peor es nada :). Lee el archivo TXT que está en el ZIP para saber cómo instalar la ayuda. Descarga el siguiente archivo:

Ayuda Turbo Pascal (534 Kb.)Ayuda Turbo Pascal (534 Kb.)

Solución al error de instalación de Turbo Pascal en Windows 2000.

Un forista de La Web Del Programador ha propuesto esta solución: descargar archivo bwcc.dll (Borland Windows Custom Control Library ver. 1.03, 42 Kb) y copiarlo en C:\WINNT\SYSTEM

Turbo Pascal en Windows XP.

Antes que nada: no existe una versión de Turbo Pascal para Windows XP.

Ya que he visto que preguntan mucho acerca de cómo hacer funcionar el IDE de Turbo Pascal en Windows XP quiero informarles que éste no necesita de nada en particular bajo este sistema operativo. Para dejarlo más claro, Turbo Pascal no presenta ningún problema o incompatibilidad o inconveniente o error ejecutando en una máquina con Windows XP, en ninguna de sus versiones. La gran mayoría de problemas que puedes encontrar se deben a:

  • No estás ejecutándolo con los permisos adecuados. Debes ser el administrador.
  • La resolución de pantalla no es la adecuada. En vez de ejecutarlo a pantalla completa, ejecútalo en ventana; yo lo uso con fuente 10 x 18 en ventana maximizada con resolución de pantalla 800 x 600.
  • Si notas que el IDE responde lento a las pulsaciones de teclado borra el archivo "turbo.pif" que está en el directorio "bin" de Turbo Pascal.
  • En caso de problemas, sospecha primero de Windows XP antes que de Turbo Pascal.
  • Si aún tienes problemas, escríbeme un correo explicándomelo detalladamente y trataré de ayudarte.

Sobre el "famoso" WINCRT.TPU y dónde encontrarlo.

La unidad WINCRT.TPU no pertence a Turbo Pascal 7.0 sino a Turbo Pascal for Windows 1.5. pero NO es un archivo separado, está incluido en el TPW.TPL que es una biblioteca de bibliotecas, ese archivo contiene "wincrt", "wintypes", "winproc" y "windos".

Sin embargo, en la instalación de TPW 1.5 en el directorio DOC está el código fuente de la biblioteca "wincrt" que puedes compilar por separado.

Por Diego Romero,