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
» Planétarium virtuel.
par Pedro Alvarez Sam 21 Juil 2018 - 16:57

» Roues dentées
par jean_debord Sam 21 Juil 2018 - 10:40

» Attention arnaque !
par mindstorm Jeu 19 Juil 2018 - 19:18

» Qui fait quoi ?
par silverman Mer 18 Juil 2018 - 15:21

» ITEM_SELECT N,L pour synedit
par silverman Mer 18 Juil 2018 - 15:20

» Boussole
par jean_debord Mer 18 Juil 2018 - 11:06

» Roue à n faces
par Marc Dim 15 Juil 2018 - 22:16

» Exemple d'une nouvelle version d'un GRID
par Jean Claude Ven 13 Juil 2018 - 10:32

» Une simple question
par Oscaribout Sam 7 Juil 2018 - 23:20

» BUG sur l'objet TAB
par Jack Sam 7 Juil 2018 - 21:12

» Monopoly moderne
par jjn4 Sam 7 Juil 2018 - 15:06

» Récapitulatif ludothèque panoramic jjn4
par jjn4 Ven 6 Juil 2018 - 17:41

» Lignes ondulées
par JL35 Ven 6 Juil 2018 - 17:39

» bug off_activate 0 : sans d'effet
par silverman Ven 6 Juil 2018 - 13:02

» Position des objets d'un conteneur dans FBPano et Panoramic
par Navigateur Ven 6 Juil 2018 - 12:59

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juillet 2018
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
CalendrierCalendrier

Partagez | 
 

 Re : Programme graphique

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 - 15: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 : 5527
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: Re : Programme graphique   Jeu 6 Mai 2010 - 21: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
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Re : Programme graphique
» 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 ?
» Intégrer une page HTML dans son programme ?

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: