PureBasic 4.00 - Beta 1

Vous avez développé un logiciel en PureBasic et vous souhaitez le faire connaitre ?
KarLKoX
Messages : 1191
Inscription : jeu. 26/févr./2004 15:36
Localisation : France
Contact :

Message par KarLKoX »

nico a écrit :En fait le passage des mots de fonctions fait toute la puissance des macros:

Code : Tout sélectionner

Procedure Multiplication(a.l,b.l)
  ProcedureReturn a*b
EndProcedure 

Procedure Addition(a.l,b.l)
  ProcedureReturn a+b
EndProcedure 

Macro Multiple_operation(fonction,param1, param2)
  fonction#(param1,param2)
EndMacro 

Debug Multiple_operation(Addition,5,7)

Debug Multiple_operation(Multiplication,5,7)
C'est exactement ce que je demandais à Fred concernant le support des noms de fonctions pour les macros, ça peut être tres utile dans, par exemple, l'émulation d'un processeur : il suffit de définir les noms de fonction de type OP_## où ## deviendra invariablement OP_AND, OP_XOR, OP_WRITEMEM etc ... ça permet une certaine souplesse dans la saisie de code rébarbatif.
En tout cas, PB a avancé à grand pas car bien que les différences ne soient pas visibles, le fond, lui l'est et permet moultes astuces terribles.
"Qui baise trop bouffe un poil." P. Desproges
lionel_om
Messages : 1500
Inscription : jeu. 25/mars/2004 11:23
Localisation : Sophia Antipolis (Nice)
Contact :

Message par lionel_om »

Oué PB semble être devenu encore plus puissant et plus souple...
Webmestre de Basic-univers
Participez à son extension: ajouter vos programmes et partagez vos codes !
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

la Cross-compil est prevu ? 8O
CameleonTH
Messages : 333
Inscription : sam. 25/juin/2005 11:18
Localisation : Laon (02)
Contact :

Message par CameleonTH »

Le Cross-Compil mais qu'est-ce donc?
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

CameleonTH a écrit :Le Cross-Compil mais qu'est-ce donc?
Compilateur croisé

Un compilateur croisé (en anglais cross compiler) est un programme capable de traduire un code source en code objet ayant un environnement d'exécution (architecture matérielle, système d'exploitation) différent de celui où la compilation est effectuée. Ces compilateurs sont principalement utilisés en informatique industrielle.
en clair la possibilité de programmer sur ton pc , et de compiler pour un MAC, Linux , ou que sais-je !! :D
wolfjeremy
Messages : 1202
Inscription : sam. 31/déc./2005 23:52

Message par wolfjeremy »

8O sa serai super sa !
Oliv
Messages : 2117
Inscription : mer. 21/janv./2004 18:39

Message par Oliv »

Dobro a écrit :la Cross-compil est prevu ? 8O
Il me semble que j'avais lu que oui sur le forum Anglais, et que ça venait de Fred ou Freaks il y a quelques temps mais je ne suis pas sur du tout , en tout cas ça pourrais être terrible :D
Fred
Site Admin
Messages : 2805
Inscription : mer. 21/janv./2004 11:03

Message par Fred »

C'est prevu, mais pas a court terme car ca demande plutot pas mal de changement. A voir donc :).

freddix: c'est vrai qu'il y'a un petit residu en fin de procedure, j'avais essayé de le virer mais ca necessité des hacks un peu trop crade a mon gout, donc pour l'instant je laisse comme ca. Mais un jour ca sera virer :). Ca change quand meme pas mal entre les procedures v3.94 et v4.00 ;).
olivier
Messages : 305
Inscription : mer. 05/janv./2005 12:58
Localisation : http://www.tib-net.com/meca/index.htm

Message par olivier »

Tellement absorbé par regarder les nouveautés, je n'arrive pas à poster mes fellicitations à l'équipe de PUREBASIC LONGUE VIE !!! :D :D :D :D

Je m'arrette devant un problème tout simple, ce code ne marche plus 8O et je reste 8O alors si vous aviez une piste pour me dé 8O ,

Code : Tout sélectionner

Procedure.s codage(texte$)
    texte_coder$=""
    For i=1 To Len(texte$)
        char$=Mid(texte$,i,1)

        If Asc(char$)>=30 And Asc(char$)<=127
            
            nv_char$= Chr(Asc(char$)+80)
        EndIf
        
        texte_coder$=texte_coder$+nv_char$
    Next
    ProcedureReturn texte_coder$
EndProcedure

Procedure.s DeCodage(texte$)
    texte_decoder$=""
    For i=1 To Len(texte$)
        char$=Mid(texte$,i,1)
        If Asc(char$)>=110 And Asc(char$)<=207
            char$=Chr(Asc(char$)-80)
            
        EndIf
        texte_decoder$=texte_decoder$+char$
    Next
    ;Debug texte_decoder$
    ProcedureReturn texte_decoder$
EndProcedure

Debug DeCodage(codage("abcdefgh"))
@Droopy : c'est la mise à jour de ta lib qui doit arrivé un lundi ???? :D
Juste une boutade pour te remercier encore pour ta fabuleuse lib et que j'attends apres pour pouvoir corriger mes progs....

Merci d'avance.
Vive le temps libre !
Avatar de l’utilisateur
djes
Messages : 4252
Inscription : ven. 11/févr./2005 17:34
Localisation : Arras, France

Message par djes »

Ô Plaisir ecstatique !
Ô Joie surannée !
Ô Félicité !
Purebasic 4 est arrivé !

Je ne suis pas prêt de me coucher !

Merci Fred! Je suis super excité! Yahoo!!!
bernard13
Messages : 1221
Inscription : mer. 05/janv./2005 21:30

Message par bernard13 »

vivement la version finale
mais je suis content de voir que la 4 est sorti
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

Je m'arrette devant un problème tout simple, ce code ne marche plus Shocked
j'ai regardé ! pour moi c'est un Gros Bug bien nourri ! :lol:
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Message par nico »

Olivier, c'est bien de coder quelque chose mais c'est encore mieux de savoir le debugger.

Alors au boulot, parce que si tu laisses tomber un prog de 23 lignes t'as pas fini d'être emm*****.
popstatic
Messages : 83
Inscription : lun. 20/sept./2004 18:21
Localisation : derriere toi fais gaffe!

Message par popstatic »

N'est-ce arrivé qu'a moi? parmis les appels de fonctions de mon code, un foire et le message d'erreur est.....

---------------------------
PureBasic
---------------------------
Line 128: A array name need to start with a character (a-z, _ or *)
---------------------------
OK
---------------------------

ma fonction s'appelle redim() et elle est appellée depuis une autre fonction.
Asus bien? asus tres bien!
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Message par Backup »

je regrette ya bien un problemm !!!

dans un premier temps les code ascii sont augmenté de 80

au decodage , le meme code ascii augmenté de 80 de retrouve avec une valeur de -79 !!!!

ya un blemm ! :lol:
Répondre