PureBasic:Realiser un RPG2D/Commençons

PureBasic:Realiser_un_RPG2D

<< Précédent | Sommaire | Suivant >>

Difficultée estimée de cette étape: facile
Pré-requis:

Connaissance fondamentale du PureBasic

Il est temps de commencer à développer le jeu!

Durant cette étape, nous allons initialiser les bibliothèques dont nous avons besoin (PureBasic se charge de libérer la mémoire lorsque l'on quitte un programme).

[modifier] Le fichier `main.pb`

Pour cela, il faut tout d'abord lancer PureBasic. Puis créez un nouveau fichier en cliquant sur Fichier/Nouveau.

Il vous faut choisir ensuite où sauvegarder votre fichier. Choisissez le répertoire du jeu. Sauvegardez ce fichier sous le nom main.pb.

Répétez l'opération pour ajouter à votre projet un second fichier: main.pbi.

Remarque : L'extension .pbi est utilisée pour indiquer que le fichier est un fichier PureBasic Include. Ce n'est pas obligatoire ,c'est simplement une convention bien pratique pour s'y retrouver.

Il ne reste plus qu'à écrire le programme minimal:

Fichier main.pb

;** main.pb
;**
;** Fichier principal.
;**
;** Rôle:
;** - initialisation des bibliothèques et ouvre un écran en mode plein écran.
;**  

XIncludeFile "main.pbi"
Init()
Main()
End

Procedure Main()
EndProcedure

Contrairement au langage C, la fonction main() est inutile avec PureBasic, cependant afin de respecter au mieux l'organisation du programme original , nous allons conserver cette fonction main(). le fichier contient également la fonction XIncludeFile qui permet d'inclure notre fichier d'en-tête correspondant à notre fichier source.

Fichier main.pbi

;/*
;** main.pb
;**
;** Fichier principal.
;**
;** Rôle:
;** - 
Declare Init()
Declare Main()

[modifier] Initialisation des bibliothèques

Ce qui rend PureBasic si agréable à utiliser, c'est bien sa simplicité d'utilisation. Nous allons en quelque lignes initialiser notre système graphique, créer un mode plein écran, indiquer le titre de cet écran et initialiser notre système sonore.

Remarque : Il est parfaitement possible de créer un mode fenêtré , cette option sera peut-être envisagée ultérieurement.

;**
;** Initialisation du programme
;**
Procedure Init()
    
    ; Initialise l'environnement nécessaire au fonctionnement des sprites.
    If InitSprite()=0
        MessageRequester("Erreur InitSprite()","Impossible d'initialiser DirectX 7 (ou +)",0)
        End
    EndIf
    
    ; Initialise l'environnement propre à la gestion du clavier.
    If InitKeyboard()=0
        MessageRequester("Erreur InitKeyBoard()","Impossible d'initialiser DirectX 7 (ou +)",0)
        End
    EndIf
    
    ; Initialise l'environnement propre à la gestion de la souris.
    If InitMouse()=0
        MessageRequester("Erreur InitMouse()","Impossible d'initialiser DirectX 7 (ou +)",0)
        End
    EndIf
    
    ; Initialise l'environnement propre à la gestion des fichiers multimédias.
    If InitMovie()=0
        MessageRequester("Erreur InitMovie()","Impossible d'initialiser DirectX 7 (ou +)",0)
        End
    EndIf
    
    ; Initialise l'environnement sonore.
    If InitSound()=0
        MessageRequester("Erreur InitSound()","Impossible d'initialiser DirectX 7 (ou +)",0)
        End
    EndIf
    
    ; Ouvre un nouvel écran avec les caractéristiques Largeur, Hauteur et Profondeur.
    If OpenScreen(800,600,32,"RPG 2D - Games Creators Network (http://www.games-creators.org)")=0
        MessageRequester("Erreur OpenScreen()","Impossible d'initialiser DirectX 7 (ou +)",0)
        End
    EndIf
    
    ;Active le support du format PNG (Portable Network Graphic)
    UsePNGImageDecoder()
    
EndProcedure