Initiation à la programmation en Basic : nouveau compilateur FreeBASIC

Le Basic (acronyme pour Beginner’s All-purpose Symbolic Instruction Code) est un langage à la fois puissant et simple à maîtriser. Le Basic a été le langage par excellence des débuts de la micro-informatique dans les années 80. Il était enseigné dès le collège au même titre que le LOGO (favorisés par le plan IPT, lancé en 1985).

FBIDE Emprunt v1.1

Il existe plusieurs variantes du langage BASIC et au moins autant d’environnements de développement intégré (EDI ou IDE en anglais).

FreeBASIC est l’une de ces variantes. FreeBASIC nécessite un environnement de développement et un compilateur. Un environnement de développement est un éditeur de code source (fichier texte) doté de différents outils d’aide au développement. Un compilateur convertit le code source en un programme exécutable indépendamment de l’IDE.

Une nouvelle version du compilateur est disponible.

Pour l’installer :

  • Télécharger (téléchargement ci-après ou sur le site de l’éditeur) et dézipper le compilateur FreeBASIC dans le dossier C:\FreeBASIC ;

FREEBASIC Accueil

Sélectionner la version la plus récente (ici v1.10.0 du 15 mai 2023) :

FREEBASIC Page téléchargement

Puis dézipper le fichier téléchargé dans le dossier C:\FreeBASIC.

FBIDE Téléchargement

Pendant l’installation de l’EDI :

  • Cliquer sur Next ;
  • Sélectionner I accept the agreement suivi de Next ;
  • Saisir le chemin d’accès au dossier FreeBASIC : C:\FreeBASIC puis Next ;
  • Sélectionner Install only FBIde puis cliquer sur le bouton Next ;
  • Puis Next deux fois et enfin Install.

Lancer l’EDI FreeBASIC (icône sur le bureau ou lien dans le menu Windows) et paramétrer l’affichage en Français.

FBIDE Français.PNG

Manuel d’utilisation (en anglais) de FreeBASIC : https://www.freebasic.net/wiki/DocToc

L’utilisateur n’a plus qu’à laisser libre cours à son imagination pour développer des outils qui automatisent son quotidien…

Exemple de code source d’un programme de calcul d’échéancier d’emprunt en FreeBASIC (fichier téléchargeable ci-après sous le nom calcul emprunt v1.1.bas) :

'Calcul d'un échéancier d'emprunt v1.1 (2012)
'Ecrit en basic sous FreeBASIC
'Par Benoît RIVIERE, https://www.auditsi.eu/?cat=1207

#include "string.bi"

'---Déclaration des variables
'------Paramètres emprunt
Dim capital As Double
Dim duree As Integer
Dim taux As Double
Dim mens As Double
'------Variables diverses
Dim i As Integer
'------Variables emprunt mensualité
Dim capitalrestant As Double
Dim interet As Double
Dim capitalremb as double
'------Variables emprunt année
Dim interetperiode As Double
Dim capitalperiode As Double

'---Saisie des paramètres de l'emprunt
Cls
Color 11
Print "Calcul d'un échéancier d'emprunt"
Print
Color 15
Print "Saisissez les paramètres de l'emprunt :"
Input "Capital emprunté : ",capital
Input "Durée de l'emprunt en années : ",duree
Input "Taux annuel : ",taux

'---Calcul et affichage de la mensualité
taux=taux/100
mens = (capital*taux/12) / (1-(1+taux/12)^-(duree*12))
Print "Mensualité : ";Format(mens,"0.00")
'---Calcul, affichage et enregistrement de l'échéancier
capitalrestant=capital
For i=1 To duree*12
    if (i+11) mod 12=0 then
        print "Capital restant - Intérêts - Capital remboursé - Capital restant"
    end if
    interet=capitalrestant*taux/12
    capitalremb=mens-interet
    'Affichage de la ligne en cours
    Print i ; " : ";Format(capitalrestant,"0.00");" - ";Format(interet,"0.00");" - ";Format(capitalremb,"0.00");" - ";Format(capitalrestant-capitalremb,"0.00")
    'MAJ du capital restant à rembourser en fin de période
    capitalrestant=capitalrestant-capitalremb
    'MAJ des totalisations annuelles
    interetperiode=interetperiode+interet
    capitalperiode=capitalperiode+capitalremb
    'Dernière de l'année : affichage des totaux
    If i Mod 12 = 0 Then
        Print "Total année ";i/12;String(60,"-")
        Print "Intérêts de la période : ",Format(interetperiode,"0.00")
        Print "Capital de la période : ",Format(capitalperiode,"0.00")
        Print String(75,"-")
        'RAZ des totalisations de l'année
        interetperiode=0
        capitalperiode=0
    End If
Next i

Sleep

Toutes les explications sur ce code source et s’initier à la programmation au langage Basic : Initiation au langage Basic (série d’articles).

Pour exécuter ce programme (mode console) : Menu Exécuter puis :

FBIDE Exécuter

  • Compiler : génère le fichier exécutable (*.exe) qui sera ensuite exécutable par l’utilisateur indépendamment de l’EDI et diffusable à des tiers (sans communiquer le code source) (dans cet exemple l’exécutable prend le nom de calcul emprunt v1.1.exe) ;
  • Exécuter : exécute le programme ;
  • Compiler et Exécuter ; lance les deux étapes précédentes.

Exécution du programme avec un emprunt de 100 000 € d’une durée de 10 ans (échéances mensuelles) au taux de 3,60 % :

Emprunt v1.1 console

A titre de comparaison, voici le même échéancier calculé avec la calculatrice en ligne programmée en PHP (cf calcul d’échéanciers d’emprunt en ligne) :

Echéancier avec calculatrice

Share Button
FreeBASIC-1.10.0-winlibs-gcc
FreeBASIC-1.10.0-winlibs-gcc
FreeBASIC-1.10.0-winlibs-gcc-9.3.0.7z
Version: 9.3.0
35.5 MiB
19 téléchargements
Détails...
Calcul Emprunt V1.1
Calcul Emprunt V1.1
calcul-emprunt-v1.1.bas
Version: 1.1
2 KiB
22 téléchargements
Détails...
The following two tabs change content below.
Après seize années passées en cabinet d’expertise-comptable et de commissariat aux comptes (où j’ai exercé comme expert-comptable et chef de mission audit), j’ai pris le poste de directeur comptable d’un groupe de distribution automobile en novembre 2014. Au cours de ma carrière, j’ai acquis une expérience significative en audit et en exploitation des systèmes d’information (analyse de données, automatisation des tâches, programmation informatique) au service de la production des comptes annuels et consolidés. C’est cette expérience personnelle et ma passion pour l’informatique que je partage sur ce blog. Mon CV / Réalisations personnelles et projets informatiques / Ma collection / Me contacter

Laisser un commentaire

Votre adresse e-mail ne sera pas publiée. Les champs obligatoires sont indiqués avec *

Ce site utilise Akismet pour réduire les indésirables. En savoir plus sur comment les données de vos commentaires sont utilisées.