Codes sources Pascal346 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.

Une unité bien pratique qui contient les fonctions

function StringToInt(s : string) : integer;
function IntToString(i : integer) : string;
procedure fenetre(X1 : integer; Y1 : integer; X2 : integer; Y2 : integer); (fenetre a double bordure)
procedure dec(i : integer; a : integer); decrementer
procedure centrer(s : string; y : integer); centre une chaine pour un y donné
procedure instcolorln(i :string;e : byte;b : byte); couleur sur une ligne e=nouvelle couleur et b = ancienne couleur
procedure instcolor(i :string;e : byte;b:byte); la même chose sans aller à la ligne
procedure pleinecran;
function on_click_button(x1,y1,x2,y2:integer):boolean; a faire marcher ^^
pr ... Voir la suite

Jeu d'échecs en Pascal d'Evgeniy Korniloff. Originellement écrit pour Turbo Pascal, adapté pour Free Pascal et l'unité ptcGraph.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme crée la liste de tous les nombres premiers de 1 à N.

Renommer les fichiers d'un répertoire par remplacement d'un préfixe.

Exemple d'utilisation des composants TShellTreeView et TFileListBox.

Conversion d'un projet Delphi de Bob Ferguson.

Compilateur : Turbo Pascal for Windows.

Catégorie : nombres complexes.
Le programme ZCircle montre un algorithme de recherche du zéro.
Ce document (en anglais) explique le programme dans tous ses détails.

Ref.: "BASIC Scientific Subroutines, Vol. II" de F.R. Ruckdeschel, BYTE/McGRAWW-HILL, 1981.

Unité permettant d'utiliser la bibliothèque SDL_bgi.

Compatible avec Delphi et avec Free Pascal.

Permet l'évaluation d'expression algébrique sous forme numérique et le tracé de la représentation graphique associée.

Support des fonctions standard, trigonométriques, hyperboliques, logiques ainsi que certaines fonctions utiles.
Possibilité d'ajouter ses propres constantes et fonctions afin de rendre l'unité polyvalente.
Support des caractères spéciaux dans les noms des fonctions et constantes (notamment û, ý, ã, ò, ó, ö, ì, ÿ, etc) !

L'unité n'accepte aucune omission. Ainsi, toutes les opérations doivent figurer dans l'expression, notamment les signes de multiplication.
L'évaluation étant numérique, il convient de porter une attention toute particulière aux ensembles de définition des fonctions et aux ... Voir la suite

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

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.

Gestion d'images au format PCX et création d'images BGI à partir d'images PCX.

Compilateur : Turbo Pascal.

Unité regroupant diverses fonctions de gestion de fichiers.

Compilateur : Turbo Pascal.

Unité implémentant l'objet TIniFile de Delphi permettant de gérer les fichiers ini.

Compilateur : Turbo Pascal.

Jeu inspiré du célèbre démineur de Windows, sous MS-DOS en mode graphique, avec programmation d'un timer et détournement des interruptions.

La compilation nécessite l'unité TXT.

Compilateur : Borland Pascal.

Un moteur 3D façon Wolfenstein ou Doom, version VESA.

Compilateur : Turbo Pascal for Windows.

Catégorie : nombres complexes.
Unité Complex2 : opérations élémentaires sur les nombres complexes.

Compilateur : Turbo Pascal for Windows.

Catégorie : nombres complexes.
Il s'agit d'un programme de démonstration utilisant l'unité Complex2.

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

Dessine une carte en 3D.

Unité permettant d'utiliser les fonctionnalités du timer du BIOS au moyen de l'objet TTimer ou bien de la fonction SetTimer.

Permet notamment de créer des gestionnaires en arrière-plan, avec une fréquence d'appel définissable par l'utilisateur.
Présence de la fonction Rdtsc pour effectuer des mesures de précision pour les calculs de durées.