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
» Une autre façon de terminer une application.
par Francis-mr Aujourd'hui à 12:07

» Compilateur FBPano
par jean_debord Aujourd'hui à 10:09

» Copier / coller du texte à partir de la fenêtre de commandes
par jean_debord Aujourd'hui à 9:46

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par papydall Aujourd'hui à 5:01

» Mettre en windows en veille
par papydall Aujourd'hui à 4:15

» Stretch_on ne stretch plus...
par papydall Hier à 15:22

» Pb 18 (en analyse): RESTORE_LABEL avec DATA à la fin
par Jack Hier à 13:21

» Problème de traitement des opérateurs avec le compilateur.
par Pedro Alvarez Sam 19 Aoû 2017 - 20:01

» Pb 17 (résolu): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

» Pb 16 (résolu): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (résolu): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Re : Programme graphique

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
659_minifly



Nombre de messages : 590
Age : 69
Localisation : Valenciennes Nord
Date d'inscription : 29/04/2010

MessageSujet: Re : Programme graphique   Jeu 6 Mai 2010 - 16:59

Toujour dans lignée, maintenant je tire a blanc. Aucun danger.
Code:

' Déclaration des variables.
      dim x,y,n
' Déclaration des étiquettes.
 label key_down
 caption 0," Gauche <.Droite >.Espace pour tirer.Escape pour terminer"

 border_small 0
  color 0,0,0,0
 
 ' Déclaration de la mire pictures
  picture 2
    width 2,50
    height 2,10
      2d_target_is 2
      2d_fill_color 255,0,0
        2d_rectangle 0,0,50,10
        left 2,250
          top 2,420

' Initialisation des variables
  x=250
  y=500
 
 ' Déclaration de la Balle
  scene2d 3
    width 3,5
    height 3,5
      left 3,275
      top 3,410
 
' déclaration de l'évènement de frappe d'une touche
  on_key_down 0,key_down
  end

' Branchement sur l'étiquette key_down
key_down:

' code 37 de la touche flêche à gauche du clavier.
 if key_down_code=37 then  x=x-10
    if left(2)<10  then x=11
            left 2,x
              left 3,x +25
 ' code 39 de la touche flêche à droite du clavier.
 if key_down_code=39 then  x=x+10
    if left(2)>525 then x=524
                left 2,x
                    left 3,x +25

  ' code 32 de la touche Espace
  if key_down_code  = 32
              for n = 410 to 0  step -1
              top 3,N
              next n
              top 3,410

    end_if

 ' code 27 fermeture programme.
    if key_down_code  = 27 then terminate
return
What a Face
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

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

MessageSujet: Re: Re : Programme graphique   Jeu 6 Mai 2010 - 22:14

Reste à mettre une raquette en face (gérée par l'ordinateur) et le jeu de tennis n'est plus loin.
Bravo!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
 
Re : Programme graphique
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Re : Programme graphique
» simple question de pilotes qpres install OS
» Question sur compatibilité entre carte mére et carte graphique
» [Obsolète] Une autre programme d'animation gratuit.
» Comment importer un kit graphique sur WebzDitor ?

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