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
» Découpe dans une image
par Jean Claude Aujourd'hui à 20:38

» quel est ce comportement de Panoramic_editor
par Jean Claude Aujourd'hui à 20:34

» FNC IsDateValide(d$) pour vérifier la validité d'une date
par papydall Aujourd'hui à 18:57

» bug BORDER_HIDE : bloque la commande full_space
par Jean Claude Aujourd'hui à 18:20

» Pour faire plaisir à jjn4.
par Pedro Alvarez Aujourd'hui à 8:13

» Pour faire plaisir à Marc37.
par Marc Hier à 21:46

» Couleur d'une variable qui n'est pas un mot-clé
par bignono Hier à 14:03

» Un catalogue de photos de fleurs, avec KBDD, affichage HTML
par Klaus Mer 21 Fév 2018 - 22:44

» KGF_dll - nouvelles versions
par Klaus Mer 21 Fév 2018 - 22:30

» Mah-Jong anglais
par jjn4 Mer 21 Fév 2018 - 14:22

» Partie fractionnaire d'un flottant
par silverman Mer 21 Fév 2018 - 14:19

» bug CREATE_HIDE : corruption de form
par silverman Mer 21 Fév 2018 - 13:32

» Racine carrée d’un nombre par l’algorithme de Héron
par Ouf_ca_passe Mer 21 Fév 2018 - 9:52

» Méthode manuelle d'extraction de la racine carrée
par pascal10000 Mer 21 Fév 2018 - 7:47

» [annulé]ON_MOVE n,l ne fonctionne que sur le form 0
par silverman Mar 20 Fév 2018 - 16:52

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Février 2018
LunMarMerJeuVenSamDim
   1234
567891011
12131415161718
19202122232425
262728    
CalendrierCalendrier

Partagez | 
 

 Feu d'artifice

Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5746
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/
 
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: