FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» Logiciel de planétarium.
a laide pour codé Emptypar Pedro Sam 23 Nov 2024 - 15:50

» Un autre pense-bête...
a laide pour codé Emptypar Froggy One Jeu 21 Nov 2024 - 15:54

» Récupération du contenu d'une page html.
a laide pour codé Emptypar Pedro Sam 16 Nov 2024 - 14:04

» Décompilation
a laide pour codé Emptypar JL35 Mar 12 Nov 2024 - 19:57

» Un album photos comme du temps des grands-mères
a laide pour codé Emptypar jjn4 Mar 12 Nov 2024 - 17:23

» traitement d'une feuille excel
a laide pour codé Emptypar jjn4 Jeu 7 Nov 2024 - 3:52

» Aide-mémoire mensuel
a laide pour codé Emptypar jjn4 Lun 4 Nov 2024 - 18:56

» Des incomprèhension avec Timer
a laide pour codé Emptypar Klaus Mer 30 Oct 2024 - 18:26

» KGF_dll - nouvelles versions
a laide pour codé Emptypar Klaus Mar 29 Oct 2024 - 17:58

» instructions panoramic
a laide pour codé Emptypar maelilou Lun 28 Oct 2024 - 19:51

» Figures fractales
a laide pour codé Emptypar Marc Ven 25 Oct 2024 - 12:18

» Panoramic et Scanette
a laide pour codé Emptypar Yannick Mer 25 Sep 2024 - 22:16

» Editeur d étiquette avec QR évolutif
a laide pour codé Emptypar JL35 Lun 23 Sep 2024 - 22:40

» BUG QR Code DelphiZXingQRCode
a laide pour codé Emptypar Yannick Dim 22 Sep 2024 - 11:40

» fichier.exe
a laide pour codé Emptypar leclode Ven 20 Sep 2024 - 19:02

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Novembre 2024
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier
Le Deal du moment :
Smartphone Xiaomi 14 – 512 Go- 6,36″ 5G ...
Voir le deal
599 €

 

 a laide pour codé

Aller en bas 
2 participants
AuteurMessage
pascal10000

pascal10000


Nombre de messages : 812
Localisation : Troyes
Date d'inscription : 05/02/2011

a laide pour codé Empty
MessageSujet: a laide pour codé   a laide pour codé EmptyJeu 19 Déc 2019 - 17:09

Bonsoir a vous tous

Qui peut m'aider a codé selon le tableau ci dessous pour faire le calcul

                               CP < 1350  |          1350 = CP < 1500                |  CP >= 1500
Cadences lentes               K = 25  |   K = 25 - 10 x (CP – 1350) / 150     |  K = 15
Cadences accélérées         K = 15  |   K = 15 - 10 x (CP – 1350) / 150     |  K = 5

voici le code que j'en ai déduit mais je doute qu'il soit bon

  Pts$=grid_read$(Grd,PosY,Pos+6)
         If Val(Pts$)=<1350 Then K=25
         If Val(Pts$)=>1500 Then K=15
         If K=25 And Val(Pts$)>1350 And Val(Pts$)<1500 Then K=(15*(Val(Pts$)-1350))/150
         If K=15 And Val(Pts$)>1350 And Val(Pts$)<1500 Then K=(15*(Val(Pts$)-1350))/150
  Pts$=grid_read$(Grd,PosY,Pos+3)
  Pts1$=grid_read$(Grd,PosY,Pos+4)
  Res=(Val(Pts$)-Val(Pts1$))*K
  Grid_Write Grd,PosY,Pos+7,Res1$



merci d'avance et bonne soirée


Revenir en haut Aller en bas
Marc

Marc


Nombre de messages : 2466
Age : 63
Localisation : TOURS (37)
Date d'inscription : 17/03/2014

a laide pour codé Empty
MessageSujet: Re: a laide pour codé   a laide pour codé EmptyVen 20 Déc 2019 - 1:10

Bonjour à tous !

@Pascal10000

Je te propose pour exemple, ce petit programme qui calcul K en fonction du capital-points et de la cadence.
Je n'ai pas arrondi le résultat de K. Tu peux ajouter la fonction INT() pour n'afficher que le partie entière de K.

Les calculs conditionnels sont effectués lignes 32 à 35.

Tu pourras aisément utiliser une partie de ce programme pour l'adapter à ton tableau.

Bonne programmation !

Code:
' Calcul de K en fonction de la cadence et du CP du joueur

LABEL Calcul
DIM CP : ' Capital points joueur
DIM K1 : ' valeur de K en cadences lentes
DIM K2 : ' valeur de K en cadences accelerees

EDIT 1 : ' Zone de saisie du CP
LEFT 1,10
TOP 1,10

ALPHA 2
LEFT 2,145
TOP 2,15
CAPTION 2,"<= Entrez le CP du joueur"

ALPHA 3 : ' Affichage de K1 (cadences lentes)
LEFT 3,10
TOP 3,50

ALPHA 4 : ' Affichage de K2 (cadences accélérées)
LEFT 4,10
TOP 4,100

ON_CHANGE 1,Calcul

END

Calcul:
    IF NUMERIC(TEXT$(1))= 0 THEN k1 = 0 : K2 = 0: AfficheK() : RETURN
    CP = Val(TEXT$(1))
    IF CP < 1350 THEN K1 = 25 : K2 = 15 : AfficheK() : RETURN   
    IF CP >= 1500 THEN K1 = 15 : K2 = 5 : AfficheK() : RETURN
    K1 = 25-10*(CP-1350)/150
    K2 = 15-10*(CP-1350)/150
    AfficheK()
RETURN

SUB AfficheK()
    CAPTION 3,"K = " + STR$(K1)+" en cadences lentes"
    CAPTION 4,"K = " + STR$(K2)+" en cadences accélérées"
END_SUB
Revenir en haut Aller en bas
pascal10000

pascal10000


Nombre de messages : 812
Localisation : Troyes
Date d'inscription : 05/02/2011

a laide pour codé Empty
MessageSujet: Re: a laide pour codé   a laide pour codé EmptyVen 20 Déc 2019 - 10:59

merci marc de ton intervention

je vais regarder ça au plus près
Revenir en haut Aller en bas
Contenu sponsorisé





a laide pour codé Empty
MessageSujet: Re: a laide pour codé   a laide pour codé Empty

Revenir en haut Aller en bas
 
a laide pour codé
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Code Morse pour 007
» Le code hexadécimal pour les image ???
» besoin d'aide pour ce code
» 3 lignes de code à tester pour moi ?
» besoin daide pour code

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: A l'aide!-
Sauter vers: