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
» KGF.dll - demandes ou suggestions de modifications ou ajouts
par Klaus Hier à 23:55

» KGF_dll - nouvelles versions
par pascal10000 Hier à 17:27

» Mah-Jong européen new-look
par Minibug Mar 12 Déc 2017 - 22:31

» track_bar circulaire
par Klaus Mar 12 Déc 2017 - 13:54

» API Windows
par Klaus Mar 12 Déc 2017 - 3:21

» Cartes de voeux, menus, etc.
par JL35 Lun 11 Déc 2017 - 17:48

» a l'aide klaus
par Minibug Lun 11 Déc 2017 - 11:42

» bug SYNEDIT_TARGET_IS_OBJECT
par Jack Lun 11 Déc 2017 - 0:16

» Jukebox : Serge Reggiani
par papydall Sam 9 Déc 2017 - 5:58

» Ecouter la radio fm sur votre pc
par pascal10000 Sam 9 Déc 2017 - 3:42

» anomalie
par Klaus Sam 9 Déc 2017 - 3:21

» hommage
par Jicehel Ven 8 Déc 2017 - 11:29

» Logiciel de soutien scolaire en langues.
par Pedro Alvarez Ven 8 Déc 2017 - 10:43

» carte son
par Klaus Ven 8 Déc 2017 - 2:37

» mise a jour calculatrice
par joeeee2017 Mer 6 Déc 2017 - 22:19

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Décembre 2017
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
25262728293031
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 : 5086
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: