Codes sources Pascal345 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Un essai de créer un soi-disant tableau et d'y mettre des données sous BPW(TPW).
Les descriptions et notes sont placées dans le code source sous forme de commentaires.

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

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.

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.

Calendrier perpétuel par Frédéric Hardy.

Programme qui affiche le calendrier de l'année courante (y compris les fêtes catholiques mobiles), et éventuellement des années précédentes ou suivantes.

Le programme permet également de créer et d'éditer pour chaque année un fichier personnel des événements importants.

Le programme, originellement publié en 1993, dans le magazine Réponse Micro, a été retouché pour être compatible avec l'unité ptcGraph.

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.

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

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.

Il s'agit d'un jeu de Triple Yahtzee à plusieurs joueurs sur un même poste.

Le projet n'utilise que des composants ultra-classiques, à l'exception du composant Iphtml dont le paquetage Turbopower_Ipro est fourni avec le code source. Il a été réécrit en "tout objet" en mettant en application les notions détaillées dans les excellents tutoriels de Gilles Vasseur sur la POO (dont vous trouvez les liens ci-dessous).

Bon amusement !

Lecteur de musique en ligne de commande basé sur SDL_mixer.

Bonjour.
Vous trouverez deux composants dans l'unité ThColorspal :

TThPalette : palette de couleurs sous forme de grille.

• ajout et suppression de couleurs
• ordonnancement des couleurs par drag and drop
• sauvegarde et chargement des palettes créées

TThColorCreator : création de nouvelles nuances, composant contenant une barre de plage de couleurs, une barre de luminosité, 3 barres RGB

Testé sous Win7, Win8, Linux mint

Les deux composants peuvent être utilisés conjointement pour se confectionner un dialogue de couleurs personnalisé.
Le zip contient un programme demo (rien à installer, les composants sont créés dynamiquement) ainsi qu'un programme "p ... Voir la suite

ThColorDialog s'utilise aussi facilement qu'un TColorDialog classique.

Avantages :
chargement et sauvegarde de palettes créées.
ordonnancement des couleurs par drag and drop
ajout et suppression de couleurs

Petite démo (rien à installer)

Remarque : ce composant a été ajouté dans l'unité ThColorsPal dont la première version a déjà été déposée.

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.

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

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.

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

Compilateur : Borland Pascal.

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

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.

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