PureBasic

Dobro a écrit :
Chris a écrit :Pas mal!
Et les datas, tu les a rentrées à la main?

Parce que ça aurait été plus simple d'aller les chercher dans le fichier "PBFunctionListing.txt" qui se trouve dans le dossier "Compilers", et en prime, tu avais toutes les fonctions des libs utilisateur.
T'aurai pu me le dire plus tot quand meme pour le PBFunctionListing.txt

Ben tu, me l'as pas demandé !!!!!

Petite remarque pour ton ArcSin().
Pourquoi tu fais pas ca par rapportà des StringField() ???
Tu refait juste un

Code : Tout sélectionner

For i = 1 To CountString(text$, " ")+1
  ReplaceString(StringField(text$, i," ") , "Wend", " [color="+couleur_basic$+"] [b] Wend [/b] [/color] ")
Next i

lionel_om a écrit :Petite remarque pour ton ArcSin().
Pourquoi tu fais pas ca par rapportà des StringField() ???
Tu refait juste un
Code : Tout sélectionner
For i = 1 To CountString(text$, " ")+1
  ReplaceString(StringField(text$, i," ") , "Wend", " [color="+couleur_basic$+"] [b] Wend [/b] [/color] ")
Next i

pour le ArcSin() et consord , le probleme est deja resolu , dans le listing presenté !

mais mon code n'est pas optimisé , c'etait pas le but !
l'optimisation, c'est un autre travail , c'est pas mon truc

mais je donne le code , pour laisser des pro comme toi le faire .

Dobro a écrit :mais je donne le code , pour laisser des pro comme toi le faire .

Merci pour le compliment, mais j'suis pas un pro... juste un emmerdeur qui aime bien poser des questions et essayer d'aider les autres...

juste un emmerdeur qui aime bien poser des questions et essayer d'aider les autres..

ya surement pire que toi , je te rassure !

Tiens un petit code pour lister les commandes de PureBasic
Avec recherche intégrer dans les userlibs

Sous zip il est un peu long (fichier prefs pour les commandes ASM)

http://www.penguinbyte.com/apps/pbwebst ... B_KEYS.zip

Gillou a écrit :Tiens un petit code pour lister les commandes de PureBasic
Avec recherche intégrer dans les userlibs

Sous zip il est un peu long (fichier prefs pour les commandes ASM)

http://www.penguinbyte.com/apps/pbwebst ... B_KEYS.zip

Merci !

@Dobro,
ton programme de colorisation est une très bonne idée, ça va rendre la lecture des codes plus agréables.
Voici une astuce qui va permettre d'améliorer ton programme :
-> quand l'utilisateur lance Colorer, le bouton est désactivé.
-> quand l'utilisateur copie un texte dans le presse-papiers, le bouton s'active.
-> quand l'utilisateur presse sur le bouton, celui-ci se désactive.
Cela donne à l'utilisateur une indication visuelle pour bien l'utiliser ton programme.

Enumeration
      #Window
EndEnumeration
Enumeration
      #Button_colorise
      #Image_0
      #Text
EndEnumeration

Procedure Open_Window()
      If OpenWindow ( #Window , 346, 153, 279, 149, #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , " Colorer ")
           If CreateGadgetList (WindowID())
                ButtonGadget ( #Button_colorise , 60, 100, 100, 40, " Met en couleur ")
                ImageGadget ( #Image_0 , 210, 0, 64, 148, Image0)
                TextGadget ( #Text , 30, 0, 160, 20, " Colorer by Dobro ", #PB_Text_Center )
               SetGadgetFont( #Text , FontID2)

           Endif
      Endif
EndProcedure
;******************************
Procedure WindowCallback(WindowID, message, wParam, lParam)
     Resultat = #PB_ProcessPureBasicEvents
      If message = #WM_DRAWCLIPBOARD
           DisableGadget ( #Button_colorise , 0)
      Endif
      ProcedureReturn Resultat
EndProcedure

ClearClipboard ()
Open_Window()
SetWindowPos_( WindowID (), #HWND_TOPMOST , 0, 0, 0, 0, #SWP_NOSIZE | #SWP_NOMOVE )
SetWindowCallback (@WindowCallback())
SetClipboardViewer_( WindowID ())
DisableGadget ( #Button_colorise , 1)

Repeat
     Event = WaitWindowEvent ()
      If Event = #PB_EventGadget
           Select EventGadgetID ()
                Case #Button_colorise
                     DisableGadget ( #Button_colorise , 1)
           EndSelect
      Endif
Until Event = #PB_Event_CloseWindow

Merci

je vais regarder ça de plus pres demain , la je suis mort !

voici la modification de Colorer prenant en compte le Code de Erix14

j'ai aussi corriger un petit bug qui pouvais survenir lors de certaines fonctions comportaient le terme "GadgetID"

en regle general dans un premier temps je vous conseille apres avoir coller
le code coloré dans le forum , de le recopier du forum vers votre IDE
pour etre sur qu'il marche toujours , cela permetra de retrouver certains petit bug qui peuvent encore trainer

; je m'excuse par avance , mais c'est en l'utilisant, qu'on va finir par le nettoyer ! (je ne peux pas avoir prevu tout les cas de figure

)

Ps l'image que le prg demande , c'est juste mon logo (une image jpg)
virer la commande de chargement, si vous ne voulez pas vous embeter la !

voici donc la derniere version

la version compillé se trouve toujours la

le source ci-dessous

Merci a Erix14 , pour son code

Super idée Erix14

Dobro, tu pourrais au moins mettre ton code en couleur

Dobro, tu pourrais au moins mettre ton code en couleur Laughing

ben surtout pas !! puisqu'il contient des code pour la couleur !!

Question d'un qui veut pas tester directement

Suis fragile du coeur

Si on Copie / Colle un programme "colorisé" du Forum vers l'éditeur Japbe ou Pure basic, qu'est-ce qui se passe ?

Que veux tu qui se passe?

Le code est collé avec la mise en forme de l'éditeur, pas avec celle du forum!

Bah ca copie sans les codes BBcode

PureBasic

the colorer