Forum Liberty Basic France : Voir tous les messages du membre

   Le 29/10/2022 à 10h21 Général » Courbes de niveaux
Ce zip contient deux softs.
"trace.bas": Permet de tracer des courbes de niveaux.
"image.bas": Reprend ces courbes et les colorise.
Pour avoir des exécutables, c'est simple:
- Télécharger: "DLL.zip"
- La décompression créera un dossier: "DLL".
- Verser tout le contenu de: "DLL" dans--->: "courbe de niveau".
- Renommer: "jbrun101.exe" en--->: "image.exe".
- Faire une copie de: "image.exe" dans le dossier.
- La renommer: "trace.exe".
Les deux exe peuvent êtres ouverts simultanément.

C'est là--->: courbe de niveau.zip
Et là--->: DLL.zip
Ok, je contacte jagang, on verra bien ce qu'il décide.
Navigateur---> Firefox
C'est bon ton nouveau lei accepte mon "vieux" navigateur.
Hey, tu n'a pas donné de réponse concernant l'hébergement/gestion du site, what is ?
Ton lien (Mega) veut encore me faire mettre à jour mon navigateur qui marche très bien partout sur le net, sauf pour Mega.
Et moi, je ne veux pas de mises à jour qui ne respectent pas la rétrocompatibilité, parce que: "Qui dit pouvoir le "plus" doit pouvoir le "moins".
Quand cette condition n'est pas respectée, ce n'est pas un progrès, c'est une contrainte.
   Le 04/08/2022 à 14h17 Général » Presse Papier
Avec l'aide d'Anatoly alias tsh73 du forum anglophone
Attention: Ce soft crée un nouveau fichier horodaté dans le dossier à chaque lancement si heure différente
Tant que le soft est ouvert (lancé), chaque "copy" est ajouté dans le fichier en cours.
Le presse papier est lu toutes les 2 secondes.
C'est là--->: presse-papier.zip
   Le 12/07/2022 à 10h46 Général » Casino
Fonctionnement:
Clic Droit sur les jetons
Clic Gauche pour poser sur le tapis
L'avoir est à 50 par défaut (modifiable dans le textbox).

Pour avoir l'exécutable:
Prendre: "casino.zip" et: "dll.zip"
Mettre le contenu de "DLL" dans: "casino"
Renommer: "dll" en--->: "casino"
Note: Si "dll.exe"--->: "casino.exe"

Dernière modif le: 16/07 à: 08h56
Ajout d'un bouton pour fixer le jeu, ce qui permet d'étudier des martingales.
Ajout d'une mémorisation des "G" gagné; "P" perdu pour le jeu fixé et proba
C'est là--->: casino.zip Et là--->: DLL.zip
   Le 03/07/2022 à 13h27 Général » Nombre de Jours
Nombre de jours de date à date.
Modif le 04/06 à 11H34
Deux formats disponibles
M/J/A et: J/M/A
Code VB :
 
 
    NOMAINWIN
     mapw=350: maph= 300
    WindowWidth=mapw+15: WindowHeight=maph+40
    UpperLeftX = 10: UpperLeftY = 20
    mois$ = "Janvier Février Mars Avril Mai Juin Juillet Aout Septempbre Octobre Novembre Décenbre"
    today$ = date$("mm/dd/yyyy")
    j = date$(today$)
    jsem$ = word$("Mar Mer Jeu x Ven Sam x Dim Lun",int((j/7-int(j/7))*10)+1)
    date$ = jsem$+" "+mid$(today$,4,2)+" "+word$(mois$, val(today$))+" "+left$(time$(),5)'right$(today$,4)
    BUTTON #w.conv, "/", [conv], UL, 20, 35, 25, 25
    TEXTBOX  #w.deb, 20 , 70, 150, 30
    TEXTBOX  #w.fin, 190 , 70, 150, 30
    BUTTON #w.c, "C", [c], UL, 310, 35, 25, 25
    BUTTON #w.valdeb, "Valider", [valdeb], UL, 45, 110, 100, 25
    BUTTON #w.valfin, "Valider", [valfin], UL, 210, 110, 100, 25
    BUTTON #w.calc, "Calculer", [calc], UL, 125, 150, 100, 25
    TEXTBOX  #w.resu, 90 , 190, 170, 30
    TEXTBOX  #w.dat, 60 , 250, 250, 25
   GRAPHICBOX #w.g, 5, 5, mapw, maph
    OPEN "Jours de date à date" FOR window_nf AS #w
    #w, "TRAPCLOSE [closeHelp]"
    #w.deb, "!font courrier 14 bold": #w.fin, "!font courrier 14 bold": #w.resu, "!font courrier 14 bold"
    #w.valdeb, "!font courrier 12 bold": #w.valfin, "!font courrier 12 bold"
    #w.dat, "!font courrier 12 bold": #w.calc, "!font courrier 12 bold"
    #w.g, "down;fill darkpink;color white;backcolor darkpink"
    #w.g, "font courrier 12 bold"
    #w.g, "place 70 20": #w.g, "\Début": #w.g, "place 240 20": #w.g, "\Fin"
    #w.g, "place 110 50": #w.g, "\Mois / Jour / Année" : #w.g, "place 10 260": #w.g, "\Date:"
    #w.deb, "1/1/1901": #w.fin, "1/1/1901"
    #w.g, "flush"
    d$ = date$( ): dd$=right$(d$,4)
    date$= jsem$+" "+mid$(today$,4,2)+" "+word$(mois$, val(today$))+" "+dd$+"  "+left$(time$(),5)'********
    #w.dat, date$
    #w.calc, "!disable"
    c=1
  wait
  [conv]
    c=c+1: if c=3 then c=1
    if c=1 then conv=0
    if c=2 then conv=1
    if conv=0 then
      #w.g, "color darkpink;backcolor darkpink"
      #w.g, "place 105 30": #w.g, "boxfilled 270 55"
      #w.g, "color white;backcolor darkpink"
      #w.g, "place 110 50": #w.g, "\Mois / Jour / Année"
    end if
    if conv=1 then
      #w.g, "color darkpink;backcolor darkpink"
      #w.g, "place 105 30": #w.g, "boxfilled 270 55"
      #w.g, "color white;backcolor darkpink"
      #w.g, "place 110 50": #w.g, "\Jour / Mois / Année"
    end if
    #w.conv, word$("/ \",c)
  wait
  [c]
    #w.resu, ""
  wait
  [valdeb]
    #w.deb, "!contents? deb$": deb=val(deb$): #w.dat, "!contents? date$"
    jdeb=date$(deb$): d=1
    if conv=1 then
      jo$="": mo$="": d$=""
      an$=right$(deb$,4)
      for x=1 to 3
        jo$=jo$+mid$(deb$,x,1)
        if mid$(deb$,x,1)="/" then s1=x: exit for
      next x
      for x=s1+1 to s1+3
        mo$=mo$+mid$(deb$,x,1)
        if mid$(deb$,x,1)="/" then exit for
      next x
      d$=mo$+jo$+an$
      jdeb=date$(d$): d=1
    end if
    if d=1 and f=1 then #w.calc, "!enable"
  wait
  [valfin]
    #w.fin, "!contents? fin$": fin=val(fin$): #w.dat, "!contents? date$"
    jfin=date$(fin$): f=1
    if conv=1 then
      jo$="": mo$="": f$=""
      an$=right$(fin$,4)
      for x=1 to 3
        jo$=jo$+mid$(fin$,x,1)
        if mid$(fin$,x,1)="/" then s1=x: exit for
      next x
      for x=s1+1 to s1+3
        mo$=mo$+mid$(fin$,x,1)
        if mid$(fin$,x,1)="/" then exit for
      next x
      f$=mo$+jo$+an$
      jfin=date$(f$): f=1
    end if
    if d=1 and f=1 then #w.calc, "!enable"
  wait
  [calc]
    #w.resu, str$(jfin-jdeb);"  Jours": d=0: f=0
  wait
  [closeHelp]
    CLOSE  #w
    END
 
 
   Le 02/07/2022 à 10h19 Général » Tierce quinte
Citation:
un genre de wolrd, excel et pp

Faire ce qui existe déjà et en moins bien n'est pas très excitant .
Je préfère les trucs qui n'existent pas.
   Le 27/06/2022 à 10h23 Général » Tierce quinte
Citation:
tu veux pas te lancer dans un "gros" projet ?

Comme tu l'aura repéré,les jeux ne m'intéressent pas trop, j'en ai tenté deux ou trois, c'est beaucoup de travail pour un résultat peu encourageant.
Mais si tu a quelques idées de gros projet qui ne soient pas des jeux, je suis bien sûr preneur (ou un jeu vraiment novateur, inédit, surprenant, bref, qui donne envie).
   Le 06/06/2022 à 16h41 Général » Tierce quinte
Le zip contient deux softs:
"accord-construct", qui donne
Les quintes, les structures à 4 doigts,
Les listes pour les structures.
Les pentatoniques
Contient un constructeur d'accords à 5 doigts.
Un Recorder/Player
Et une mémoire de clics clavier
Sauvegarde enregistrement en fichier ".txt"
ET: "liste-clic"
Pour en avoir l'exe
Faire une copie de: "accord-construct" (le flambeau) dans le dossier.
Renommer la copie: "liste-clic".
Note: Si "accord-construct.exe"--->"liste-clic.exe".
Dernière modif le:
----------18/06 à: 13 h 15--------

C'est là--->: quinte accords.zip

 |  |

1 Utilisateur en ligne : 0 Administrateur, 0 Modérateur, 0 Membre et 1 Visiteur
Utilisateur en ligne : Aucun membre connecté