Codes sources Pascal339 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

KEMPELEN PROTO 56 : programme d'échecs expérimental

Ecrit entre le 15 Avril et le 22 juin 2015 auteur : Gérard Legat
Ce programme analyse seulement les coups racines selon 60 critères d'évaluation.;
Son niveau correspond à celui d'un débutant auquel on a donné quelques notions fondamentales de tactique et de stratégie.
Dans cette version Kempelen ne fait aucune analyse en profondeur.

Rotation et zoom sur une image de 256x256 pixels.

==== VALISOA MORPION 1.0 ====

L'objectif du jeu est d'aligner trois pions de même couleur sur la ligne horizontale ou verticale ou diagonale. Le premier joueur à avoir aligné
ses trois pions est le vainqueur.

Type : jeu de morpion
Développeur : Valisoa Jean Hervé
Version : 1.0
Date de sortie : 15/01/2018
Langage de programmation : Pascal
Compilateur : FreePascal 3.0.4
OS : Windows
Profondeur de calcul : 7 demi-coups
Algorithme utilisé : MinMax

Compilateur : Turbo Pascal.

Unité regroupant diverses fonctions de gestion de fichiers.

Compilateur : Turbo Pascal.

Ce programme en mode texte (sous MS-DOS) permet d'encoder et de jouer des parties d'échecs en notation internationale.

Sujets intéressants : dessin de caractères ASCII personnalisés pour représenter des pièces d'échecs en mode texte, utilisation de modes textes de plus de 80 colonnes et de plus de 50 lignes.

Ceci est un logiciel de dactylographie que j'ai créé pour que je puisse faire de " Fast and the furious " non pas avec des voitures mais avec des claviers.

FLRE (Fast Light Regular Expressions) est une bibliothèque pour l'utilisation des expressions régulières, écrite en Pascal. Ses atouts sont, outre son étonnante rapidité, le fait qu'elle soit compatible aussi bien avec Delphi (ancienne et nouvelle génération) qu'avec Free Pascal.

La bibliothèque tient dans deux unités, [b]FLRE.pas[/b] et [b]FLREUnicode.pas[/b]. Elle peut également être compilée en bibliothèque dynamique, auquel cas on peut s'en servir dans un programme écrit dans un autre langage que le Pascal.

FLRE supporte à la fois les styles Perl et POSIX.

Compilateur : Turbo Pascal.
Catégorie : Turbo Vision.

Cette application permet de lire, d'écrire ou de formater les secteurs d'une disquette. Elle sert d'illustration au tutoriel sur la programmation avancée Turbo Vision.

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.

Compilateur : Borland Pascal.

Une petite démo (entièrement orientée objet) d'un personnage 3D mettant en évidence le Z-buffering, l'effet Gouraud et autres techniques 3D.

Unbound Bible est un logiciel à code source ouvert pour la lecture de la Bible, développé avec Lazarus. Il permet de naviguer dans la Bible, d'ajouter des notes, de comparer plusieurs traductions.

Le logiciel est livré avec une bible anglaise et une bible russe, mais vous pouvez facilement télécharger et ajouter les éditions de votre choix.

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.

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

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

Exemple d'utilisation de la bibliothèque BGRABitmap. Animation représentant le mouvement d'un corps sur une trajectoire elliptique.

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.

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.

Programme qui affiche la date et le saint du jour.

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.

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.