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
» I Love You
par papydall Aujourd'hui à 1:15

» mise a jour calculatrice
par joeeee2017 Aujourd'hui à 1:01

» Convertisseur de base 10 de 2 à 36
par gigi75 Hier à 18:49

» [solved] 3D_LINE How to ?
par papydall Hier à 6:51

» supprimé
par joeeee2017 Dim 15 Oct 2017 - 20:02

» calculatrice avec touches movibles
par joeeee2017 Dim 15 Oct 2017 - 1:11

» CORTANA
par gigi75 Sam 14 Oct 2017 - 16:32

» supprimé
par Jean Claude Sam 14 Oct 2017 - 12:30

» Compilateur FBPano
par jean_debord Jeu 12 Oct 2017 - 9:53

» KGF_dll - nouvelles versions
par Klaus Mar 10 Oct 2017 - 18:49

» à propos de Panoramic_Editor [Résolu]
par Klaus Mar 10 Oct 2017 - 3:19

» Un petit "coucou" à tous les Panoramiciens !
par Jack Ven 6 Oct 2017 - 10:24

» Pourquoi le compilateur stagne
par mindstorm Mer 4 Oct 2017 - 20:38

» Panoramic ?
par Marc37 Mer 4 Oct 2017 - 0:39

» Premiers pas avec Arduino
par Marc37 Mer 4 Oct 2017 - 0:29

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Octobre 2017
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
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 : 5033
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 :: Les inutilitaires-
Sauter vers: