Codes sources Pascal345 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Compilateur : Borland Pascal.

Ce programme (sous Windows) permet de récupérer des données sur une disquette défectueuse. Il peut combiner les portions valides des deux copies de la FAT pour reconstituer la séquence des secteurs d'un fichier ou d'un répertoire.

Sujets intéressants :
- Parcours d'une FAT 12 bits,
- Utilisation de fenêtres enfants et de dialogues non modaux,
- Dialogues Windows standard d'enregistrement de fichier, de choix de police de caractères et de choix de couleurs.

Compilateur : Borland Pascal.

Un émulateur de Commodore 64 sous MS-DOS.

Dessin et rotation d'un visage en 3D par lissage Gouraud.

Compilateur : Virtual Pascal.

Le programme DirTot affiche de manière récursive le nom de tous les fichiers contenus dans un dossier ainsi que dans ses sous-dossiers.

Ce source est un exemple tiré du tutoriel sur la programmation Win32 avec OWL.

Gestionnaire de procédures appellées à intervalles réguliers (procédures d'arrière-plan).

Fichiers requis :

• BGPH.PAS
  L'unité contenant toutes les déclarations des procédures/fonctions externes gérant la procédure d'arrière plan.
• BGPH.ASM
  Contient le code des procédures/fonctions utilisés par l'unité BGPH.PAS.
• BGPH.OBJ
  Résultat de la compilation du fichier BGPH.ASM utilisé par l'unité BGPH.PAS.

Exemple de code :

• BGPDEMO.PAS
  Simple démonstration des procédures et fonctions de géstion de procédures appelées à intervalles réguliers.

Développé à l'aide de :

< ... Voir la suite

Création d'une icône à partir d'une image au format PNG, avec Lazarus et BGRABitmap.

Durandal est un très simple programme d'échecs, avec une interface UCI, capable de jouer aux échecs traditionnels, aux échecs aléatoires de Fischer et aux échecs Capablanca.

Il joue quasi instantanément et n'est pas fort du tout, mais joue des coups relativement sensés.

Il a sa propre interface graphique intégrée, permettant de jouer aux échecs Capablanca. L'interface graphique est un projet Lazarus.

Une belle fractale. Possibilité de zoomer une partie, de changer la palette de couleur, etc.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Il s'agit d'une calculatrice effectuant des opérations sur des entiers longs sous forme de chaînes, utilisant l'unité PCalcFun.

Ref.: "Turbo Pascal for Windows - Techniques and Utilities" de Neil J. Rubenking, PC Magazine & ZD Press, 1992.

Programme pour générer des engrenages au format Dxf
largement inspiré du logiciel GenDxf existant et diponible avec ses sources en rapideQ (basic objet) à l'adresse : http://technoargia.free.fr/cms2/?Techno:CFAO:GenDxf

Code source en Free Pascal - Lazarus pour windows
Bibliothèque dxf incluse

L'objectif était : Permettre de fabriquer un engrenage droit par une imprimante 3D, ou de découper un engrenage avec une fraise 3 taillles

Simple jeu de morpion utilisant l'algorithme Minimax. Traduction en Pascal d'un programme de Bernard Helmstetter.

Programme qui affiche la date et le saint du jour.

Permet la recherche d'un chemin sur une grille pouvant contenir différents obstacles, plus ou moins franchissables.
Exploite un des algorithmes les plus puissants dans ce domaine : l'algorithme A* ("A star").
Compatible Dos et Windows.

Très puissant, le A* a néanmoins ses faiblesses : il consomme une quantite non négligeable de mémoire, et le calcul d'un itinéraire peut prendre du temps sur les cartes vastes.
L'unité n'a ete adaptée que pour fonctionner sur une carte découpée en cases carrées ; elle peut toutefois être modifiée pour l'étude de cases hexagonales.

Configuration minimale nécessaire :

• Processeur 8086/8088 ou supérieur
  Turbo Pascal 7.0+ ou Borland Pascal 7.0+
  Package objet d ... Voir la suite

Unité permettant d'accéder à la mémoire XMS :

• Gestion d'un tas XMS pour une utilisation plus aisée ;
• Ajout du type flux TXMSStream compatible avec tous les autres flux présents dans l'unité Objects ;
• Gestion avancée des erreurs pour éviter au maximum les plantages ;
• Support des langues française et anglaise pour les erreurs.

Le verrouillage des blocs XMS peut se révéler très aléatoire et doit de ce fait être surveillé de très près.
Il est impossible de verrouiller des blocs d'une taille supérieure à un mégaoctet. En effet, le verrouillage a pour but de ramener en mémoire basse un bloc de mémoire étendue, donc dans le premier mégaoctet. Il est donc évidemment impossible de placer un bloc ... Voir la suite

Collection de petits programmes utilisant l'unité WinGraph, testés avec Free Pascal 2.6.4.

Nombre de ces programmes ont été originellement écrits pour l'unité Graph de Turbo Pascal.

Variante russe du jeu de dames par Evgeniy Korniloff. Originellement écrit pour Turbo Pascal, adapté pour Free Pascal et l'unité ptcGraph.

Ensemble de programmes en Pascal qui accomplissent les opérations suivantes :

Lire un fichier SVG (l'image d'une fleur de lys), en extraire les données et fabriquer une unité en Pascal les contenant. Recréer des images au moyen de ces données (l'image de la fleur de lys, l'image des points seuls, l'image des point reliés par des droites). Superposer les images précédentes. En partant d'une des images précédentes, créer une image avec un effet de volume et d'ombre.

Les données sont les coordonnées des points pour tracer la fleur de lys.

Le sujet du défi 2009 était de réaliser un résolveur de grilles de Sudoku pouvant être compilé au minimum pour Windows et Linux.

Compilateur : Turbo Pascal.

Routines pour jouer de la musique sur le haut-parleur du PC, écrites par Foyal S. Carter.

Compilateur : Turbo Pascal.

Jeu du Serpent, jusqu'à 4 joueurs. Le but est d'esquiver les obstacles en blanc, la trace des autres joueurs ainsi que sa propre trace.