FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Projet de planétarium virtuel.
par Pedro Alvarez Hier à 17:29

» Quantité de mémoire utilisée par un exe
par Navigateur Hier à 14:52

» Problème avec 'file_load'.
par Pedro Alvarez Hier à 8:12

» Version instantanée V 0.9.28i20 du 13/06/2018
par jjn4 Sam 16 Juin 2018 - 14:25

» string$(0,chr$(32)) sans erreur
par silverman Ven 15 Juin 2018 - 19:56

» Version instantanée V 0.9.28i19 du 13/06/2018
par Minibug Ven 15 Juin 2018 - 19:14

» PanExpress : l'éditeur Panoramic avec création d'objet
par Jean Claude Ven 15 Juin 2018 - 7:52

» Mes souhaits d'amélioration de Panoramic.
par Pedro Alvarez Jeu 14 Juin 2018 - 20:17

» [RÉSOLU] Message d'erreur impossible à indentifier
par Minibug Mer 13 Juin 2018 - 20:52

» Cadre pour image
par Jean Claude Mar 12 Juin 2018 - 16:31

» Créateur d'objets Panoramic
par Minibug Mar 12 Juin 2018 - 14:02

» Planétarium gratuit.
par Jean Claude Sam 9 Juin 2018 - 18:50

» Comment afficher une image sans fond.
par JL35 Sam 9 Juin 2018 - 14:16

» image_width(n) et image_height(n)
par silverman Sam 9 Juin 2018 - 11:22

» Site sur la programmation sympa
par Jean Claude Jeu 7 Juin 2018 - 11:20

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juin 2018
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier

Partagez | 
 

 Feu d'artifice

Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5951
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Feu d'artifice   Ven 14 Juil 2017 - 12:45

Code:

rem ============================================================================
rem                      Artifice.bas
rem                     Feu d’artifice
rem ============================================================================
label Afficher
dim i
' full_space 0
' width 0,1000 : height 0,600
timer 99 : timer_interval 99,100 : on_timer 99, Afficher
picture 10 : full_space 10
caption 0,"<ESC> pour terminer ..."
end
rem ============================================================================
Afficher:
   i = i + 1
   if i > 4 then i = 1
   file_load 10,str$(i) + ".jpg" : stretch_on 10
   if scancode = 27 then terminate
return
rem ============================================================================

Feu d’artifice :

Le programme utilise les 4 images (1.jpg , 2.jpg, 3.jpg, 4.jpg) qui vous sont données en spoiler ci-dessus.
Click-droit sur les images
Enregistrer l’image sous ..

Enregistrez les 4 images dans le même dossier que le programme Artifice.bas



1.jpg:
 

2.jpg:
 

3.jpg:
 


4.jpg:
 


!!! BON FEU D'ARTIFICE !!!!



Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Fredisland

avatar

Nombre de messages : 257
Age : 53
Localisation : Centre France
Date d'inscription : 30/03/2018

MessageSujet: Re: Feu d'artifice   Sam 7 Avr 2018 - 17:56

Ah mince, moi qui croyait avoir à admirer un générateur de particules Smile
Revenir en haut Aller en bas
Voir le profil de l'utilisateur https://acpc.me
Jean Claude

avatar

Nombre de messages : 5472
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: Feu d'artifice   Sam 7 Avr 2018 - 18:14

Joli !

Ça ressemble à un gif décomposé et recomposé.

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

Nombre de messages : 1755
Date d'inscription : 13/09/2009

MessageSujet: +++   Sam 7 Avr 2018 - 19:10

Ouaaah ! On dirait un vrai !
Joli !
cheers
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Contenu sponsorisé




MessageSujet: Re: Feu d'artifice   

Revenir en haut Aller en bas
 
Feu d'artifice
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Feu d'artifice
» J'vais tester. [4/4] A noter!

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Les inutilitaires-
Sauter vers: