Codes sources Pascal346 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Bonjour

Je vous propose un petit casse-tête amusant datant des années 90, sous forme d'un jeu électronique et transcrit plusieurs fois sous forme d'un programme de jeu. Il s'agit d'éteindre des ampoules en respectant quelques règles.

Les sources sont complets, les dépendances se limitent aux composants standards de la LCL, l'exécutable inclus est un binaire pour Linux 64 bits (Debian). La migration vers une autre plate forme supportant Lazarus ne devrait pas poser de problème.

Je l'ai développé pour le loisir et aussi pour mettre à disposition un exemple d'implémentation d'un jeu simple.

Les forms archivés sont des forms dont les noms sont stockés dans
un Mémo après l'ouverture de chacun d'eux.

Ainsi en utilisant un bouton UpDown on pourra afficher facilement
les forms dont les nom existent déjà dans ce mémo.

Simple application permettant de visionner rapidement les fichiers texte contenus dans un dossier.

Jeu du serpent multiplateforme basé sur l'unité ptcGraph et sur la bibliothèque BASS.

Introduction à la bibliothèque Cairo.

Dessiner un cœur avec 4 courbes de Bézier.

https://www.dil.univ-mrs.fr/~regis/CM-CAIRO/

Petit jeu de tir aux poulets basé sur la bibliothèque SplashKit. Adaptation d'un projet en C++.

Rassam-paint est un simple logiciel de dessin pour Linux, basé sur la bibliothèque Cairo.

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.

Ski Jump International est un jeu de saut à ski, initialement développé pour le système d'exploitation DOS, puis porté vers Linux et Windows au moyen de la bibliothèque SDL2.

Booot est un très fort moteur d'échecs écrit en Pascal par Alex Morozov.

Booot peut être compilé ou avec Delphi ou avec Free Pascal. À partir de la version 7.1, Booot est compatible avec Linux.

Compilateur : Turbo Pascal.

Pendule qui affiche l'heure courante en binaire, en mode graphique.

APP28.PAS est une unité pour les applications développées sous Turbo Vision. Cette unité permet d'obtenir, en plus des modes habituels, un écran de 28 lignes.

Jouez à Quatre-en-ligne ou "Puissance 4" contre l'ordinateur.

Librarie dynamique qui utilise les expressions régulières pour vérifier le format d'une chaîne FEN (1). On peut aussi utiliser directement l'unité Functions (voir TestFunctions.dpr).

Compilation testée : Delphi 7, FreePascal 2.6.4.

L'unité utilisée pour les expressions régulières est disponible à l'adresse suivante :

http://regexpstudio.com/Downloads/regexpr.zip

Toutefois, en ce qui concerne FreePascal, je me suis aperçu après coup que le programme se compilait et fonctionnait aussi bien avec l'unité homonyme (RegExpr.pas) livrée avec le compilateur.

(1) Forsyth-Edwards Notation.

Défi Pascal 2014 - SSFirework

Description

SSFirework est un économiseur d'écran créé par Epitouille dans le cadre du défi pascal 2015. L'économiseur reproduit l'effet de feux d'artifices (firework) en utilisant un moteur de particules très léger.
Il utilise OpenGL et SDL pour le contexte et gère lui-même les évènements ce qui le rend autonome et multi-plateforme.
Le projet comporte 2 unités ainsi que le fichier source principal :

• UWindow.pas : unité permettant de gérer la fenêtre et ses interactions ;
• UFirework.pas : unité contenant la classe Firework et permettant de gérer un feu d'artifice ;
• main.pas : fichier source principal qui appelle la logique du jeu.

Con ... Voir la suite

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.

Petit logiciel de redimensionnement d'images en masse développé sous Lazarus.

Essai d'une fonction permettant de déterminer si une application Windows donnée est un programme d'échecs supportant le protocole UCI et, le cas échéant, de connaître le nom du moteur et celui de son auteur.

Nettoyer dossier projet

Si vous voulez nettoyer le dossier d'un projet, vous pouvez supprimer les fichiers suivants:
.a, .bak, .compiled, .lps, .o, .or, .ppu, .rst

Le dossier lib peut être supprimé sans crainte puisqu'il contient des fichiers binaires compilés.
Le dossier backup peut être suuprimer si vous ne tenez pas à la sauvegarde.

Cette petite application offre la possibilité d'être intégrée dans l'IDE.

Dans le menu "outils" de lazarus allez dans "Configurer les outils externes" et "Ajouter".

Remplissez ainsi les champs de la fenêtre:

Champ Titre: Nettoyer dossier projet (ou autre)
Champ Nom du programme (sous windows): C:\lazarus\fpc\3.2.0\bin\x86_64 ... Voir la suite

Clone de Pac-Man, écrit pour Turbo Pascal par George M. Tzoumas, porté vers l'unité ptcGraph de Free Pascal