IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)

Codes sources Pascal333 ressources dans cette catégorie

Sources Pascal, tous compilateurs et toutes plateformes.

Codes sources Pascal

Liste des 333 ressources de cette catégorie

    Source de PhotoShop 1.0.1 en Pascal

    Téléchargé 8 fois-
    0
    0
    Les sources complètes en Pascal de PhotoShop 1.0.1

    Disponibles sur le Computer History Museum
    Licence : Gratuit pour usage non commercial - Publié le 16/02/2013 - Éditeur : Adobe +

    Logiciel de topographie spéléologique

    Téléchargé 7 fois-
    0
    0
    Un logiciel complet de topographie spéléologique réalisé avec Lazarus, l'environnement de développement multiplateforme de Free Pascal.
    Logiciel - Licence : Non renseignée - Publié le 24/04/2021 - Taille 2185974 - Éditeur : Jean-Pierre Cassou +

    Produire simplement un Beep, un Son ou un extrait musical

    Téléchargé 7 fois-
    0
    0
    Petit code sans prétention que j'avais fait pour tester un Beep différent de celui du système! Donc faire un son plus sympha. Sous lazarus, on ne dispose pas directement de l'instruction Windows.Beep(440, 100) valable en Delphi et qui permettait de régler la fréquence et la durée...

    Utilisation des formats Wav, MP3 et midi en fonction du type de son à produire ou extrait musical
    Utilisation des instructions PlaySound, mciSendString

    Code source - Licence : Non renseignée - Publié le 01/05/2024 - Auteur : Jlmat +

    Jeu de Triple Yahtzee

    Téléchargé 7 fois-
    2
    0
    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 !
    Licence : GPL - Publié le 18/09/2016 - Auteur : Alcatîz +

    Baby Chess

    Téléchargé 7 fois-
    1
    0
    Jeu d'échecs en Pascal d'Evgeniy Korniloff. Originellement écrit pour Turbo Pascal, adapté pour Free Pascal et l'unité ptcGraph.
    Logiciel - Licence : Non renseignée - Publié le 19/05/2023 - Auteur : Roland Chastain +

    Moteur 3D

    Téléchargé 7 fois-
    0
    0
    Compilateur : Borland Pascal.

    Un moteur 3D façon Wolfenstein ou Doom.
    Licence : Freeware - Publié le 15/11/2010 - Taille 44,1 Ko - Auteur : Paul TOTH +

    Utiliser l'API Win32 dans un programme Win16

    Téléchargé 7 fois-
    0
    0
    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.
    Licence : Freeware - Publié le 16/11/2010 - Taille 10,0 Ko - Auteur : Alcatîz +

    Demomaker : effet avec de l'eau

    Téléchargé 7 fois-
    0
    0
    Superbe effet avec de l'eau.
    Licence : Freeware - Publié le 28/02/2016 - Auteur : haypo +

    Snake avec la SDL et Lazarus

    Téléchargé 7 fois-
    0
    0
    Un jeu du Snake banal avec la SDL et compilé avec Lazarus sous Win XP.

    Points Positifs :
    • Gestion des événements, du son et de la SDL (pointeurs...) et algorithme du Snake;
    • Programme structuré (je m'étais lancé dans la POO au début mais sans succès);
    • Graphique pas mal :) fait sous Paint ^^ (c'est pas évident du 16x16 pixels sous Paint);
    • La SDL est portable donc, logiquement, le code est portable.
    Points à finir :
    • Quand vous perdez, obligation de quitter pour relancer le jeu;
    • Pas de gestion du score;
    • Pas de gestion d'erreurs (s'il y a un problème, le programme se plante en utilisant les messages classiques de Windows);
    • Pas de gestion du temps (au début, ... Voir la suite
    Licence : Non renseignée - Publié le 19/12/2014 - Taille 3,1 Mo - Auteur : EpiTouille +

    Conversion entre bases de 2 à 36

    Téléchargé 7 fois-
    0
    0
    Compilateur : Turbo Pascal for Windows.

    Catégorie : problèmes arithmétiques.
    Ce programme convertit un nombre d'une base A vers une base B, A et B étant compris entre 2 et 36.

    Ref.: "Mathématiques en Turbo-Pascal" de M. Ducamp et A. Reverchon, Eyrolles, Paris, 1988.
    Licence : Libre - Publié le 15/11/2011 - Éditeur : Jean-Pierre Moreau +

    Russian Checkers (Dames)

    Téléchargé 7 fois-
    1
    0
    Variante russe du jeu de dames par Evgeniy Korniloff. Originellement écrit pour Turbo Pascal, adapté pour Free Pascal et l'unité ptcGraph.
    Logiciel - Licence : Non renseignée - Publié le 19/05/2023 - Auteur : Roland Chastain +

    NumSums - Jeu de réflexion numérique sous Android [LAMW]

    Téléchargé 6 fois-
    2
    0
    NumSums est un petit jeu de réflexion réalisé avec le framework LAMW.

    Dans une grille (3 niveaux : 6x6, 7x7 ou 8x8), il faut trouver les nombres dont la somme donne les totaux des lignes et des colonnes. À l'aide du crayon, vous sélectionnez un nombre, tandis qu'avec la gomme vous l'effacez. Attention que vous ne pouvez faire qu'une seule erreur ! Pour basculer entre le mode "crayon" et le mode "gomme", il suffit de presser l'image dans la barre supérieure.
    Pour vous aider dans votre réflexion, à l'aide du point d'interrogation, vous pouvez marquer un nombre comme étant potentiellement à garder ou potentiellement à effacer.
    La grille en cours est automatiquement sauvegardée.

    Composants utilisés ... Voir la suite
    Code source - Licence : Creative Commons - Publié le 13/10/2024 - Auteur : Alcatîz +

    Test d'existence et copie de fichier

    Téléchargé 6 fois-
    0
    0
    Compilateur : Turbo Pascal.

    Unité regroupant diverses fonctions de gestion de fichiers.
    Licence : Freeware - Publié le 11/11/2010 - Taille 0,7 Ko - Auteur : denokan +

    Pseudo-Tableau sous Borland Pascal pour Windows

    Téléchargé 6 fois-
    0
    0
    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.
    Licence : Libre - Publié le 10/02/2019 - Auteur : l_autodidacte +

    ubgi

    Téléchargé 6 fois-
    0
    0
    Unité permettant d'utiliser la bibliothèque SDL_bgi.

    Compatible avec Delphi et avec Free Pascal.
    Logiciel - Licence : Non renseignée - Publié le 31/01/2023 - Éditeur : Ioulianos Kakoulidis +

    VALISOACHESS un jeu d'échecs ambitieux

    Téléchargé 6 fois-
    2
    0
    Bonjour tout le monde.
    En tant que joueur d'échecs (1654 ELO FIDE en Avril 2017) et amateur en programmation, j'ai eu l'idée de créer mon propre jeu d'échecs. Avant de me lancer, j'ai fait des recherches sur Internet et j'ai trouvé beaucoup d'exemples mais soit ils sont trop compliqués pour être compris soit leurs codes sont trop longs (> 2 000 lignes). Alors j'ai voulu avoir un exemple très simple juste pour débuter; un exemple qui montre juste comment déplacer les pièces et comment générer un coup sans se soucier du gain ou des tactiques gagnantes et cela avec le minimum de code possible.
    Je me suis décidé alors à créer moi-même ce que je cherchais : VALISOACHESS est alors né.

    Développeur : Valisoa Jean Hervé
    Déb ... Voir la suite
    Licence : BSD - Publié le 26/02/2019 - Auteur : inspirateur +

    Parcours récursif de répertoires

    Téléchargé 6 fois-
    2
    0
    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.
    Logiciel - Licence : Freeware - Publié le 16/11/2010 - Taille 12,0 Ko - Auteur : Alcatîz +

    Unité pour tp7

    Téléchargé 6 fois-
    1
    0
    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
    Licence : Non renseignée - Publié le 10/12/2010 - Taille 2 Ko - Auteur : EpiTouille +

    PASInfos - Projet du défi Pascal/Delphi 2016

    Téléchargé 6 fois-
    1
    0
    Qui n’a jamais eu à parcourir un répertoire où s’accumulaient les fichiers sources divers en regrettant de ne pas avoir un aperçu de leur contenu et un minimum de renseignements sur leurs attributs ? PASInfos est un petit utilitaire entièrement autonome et portable qui permet justement, par simple glisser/déposer, d’afficher le contenu de fichiers sources issus de différents langages de programmation, ainsi que des informations sur ces fichiers.

    S'il est particulièrement adapté aux paquets et projets Lazarus et Delphi, PASInfos accepte de nombreux formats pour l’affichage avec coloration syntaxique : fichiers Pascal, C, C++, Java, Javascript, Perl, HTML, XML, CSS, PHP, TeX, SQL, Python, Batch, Basic, INI, PO, texte brut e ... Voir la suite
    Licence : GPL - Publié le 12/04/2016 - Auteur : gvasseur58 +

    Liste de nombres premiers

    Téléchargé 6 fois-
    0
    0
    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.
    Licence : Libre - Publié le 04/12/2011 - Éditeur : Jean-Pierre Moreau +