Codes sources Pascal345 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Compilateur : Borland Pascal.

Une petite démo de test sur la 3D, le Z-buffering et l'effet Gouraud.

Compilateur : Borland Pascal.

Un programme permettant de créer des cartes en utilisant l'effet Plasma et les fractales de Mandelbrot.

Compilateur : Borland Pascal.

Une unité permettant à un programme Windows 16 bits d'appeler des fonctions de l'API Windows 32 bits grâce à la technique du thunking générique.

Voir à ce sujet ce tutoriel sur le thunking générique.

Compilateur : Borland Pascal.

Deux utilitaires complémentaires permettant de sauvegarder et restaurer les données de la CMOS. La lecture et l'écriture se font par accès direct aux ports. Reconnaissance des CMOS récentes jusqu'à 256 octets.

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.

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

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

Compatible avec Delphi et avec Free Pascal.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Résolution d'équation diophantienne ax+by = c (a,b,c,x,y étant des nombres entiers).

Ref.: "Mathématiques en Turbo-Pascal" de M. Ducamp et A. Reverchon, Eyrolles, Paris, 1988.

L'équation ax + by = c, où les coefficients a, b, et c, sont trois entiers relatifs et où les inconnues x et y sont entiers relatifs, est une des équations diophantiennes les plus simples à résoudre. Sa résolution s'appuie sur l'algorithme d'Euclide, le théorème de Bachet-Bézout et le théorème de Gauss. Dans l'ensemble des entiers relatifs, une telle équation possède, ou bien aucune solution, ou bien une infinité de solutions. Lorsque les coefficients et ... Voir la suite

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme teste si un nombre entier est premier ou pas.

Ref.: "Mathématiques par l'informatique individuelle" de H. Lehning et D. Jakubowicz, Masson, Paris, 1982.

Compilateur : Turbo Pascal for Windows.

Catégorie : problèmes arithmétiques.
Ce programme construit un triangle de Pascal.

Ref.: "Exercices en Turbo Pascal" de Claude Delannoy, Eyrolles, 1997.

Compilateur : Turbo Pascal for Windows.

Catégorie : nombres complexes.
Programme de démonstration de comptage de racines complexes.

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

Compilateur : MIDlet Pascal

J'ai developpé avec MIDlet Pascal le jeu des Tours de Hanoï, une première version avec 4 disques totalement jouable sur téléphones portables.

Pour ceux qui veulent tester le jeu directement sur leur téléphone, vous pouvez télécharger directement les fichiers JAD et JAR.

Cette unité offre une interface souris à l'unité Vbe2 :

• Support des curseurs Windows 2, 16, 256 et 16 millions de couleurs, statiques (format CUR ou ICO) ou bien animés (format ANI), sans aucun effet de scintillement ;
• Permet d'utiliser la souris pour se déplacer sur une page logique dont la surface est supérieure à celle de l'écran (mode Tracking).

Note : il est possible de changer le curseur par défaut. Pour ce faire, il faut utiliser l'utilitaire BINOBJ, comme ceci :

BINOBJ <NouveauCurseur> VBE2MOUS.OBJ DefaultCursor

Seul <NouveauCurseur> est à modifier en fonction du nom de fichier d ... 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.

Compilateur : Virtual Pascal.

Le code source suivant utilise la fonction SHFileOperation de la bibliothèque Shell32.dll. La fonction n'étant pas déclarée par défaut dans l'unité Windows de Virtual Pascal, il faut la déclarer comme external, avec la convention d'appel StdCall.

Dans la structure de type LPSHFILEOPSTRUCT utilisée, il faut utiliser l'option FO_DELETE comme paramètre wFunc et FOF_ALLOWUNDO comme flag.

Simple Pong avec l'unité ptcGraph et la bibliothèque BASS.

Un superbe effet de tunnel (la texture est crée automatiquement : c'est un effet de plasma).

Cute Albuma est une version améliorée de la manipulation des images faite avec les composants
du paquet 'Graphics 32'.
L'ajout d'un Timer et d'un trackBar permet de contrôler la vitesse de la diffusion automatique des images.
L'ajout d'un CheckBox permet à son tour de choisir entre le mode automatique et le mode manuel.

Introduction à la bibliothèque Cairo.

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

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

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