010000110110111101110101011000110110111101110101

[G-Rom]

0100101001100101001000000111001101100001011010010111001100100000001011000010000001110100011101010010000001110100001001110110010101110011011101000010000001100110011000010110100101110100001000000110001101101000011010010110010101110010001000001110000000100000011001100110000101101001011100100110010100100000011101010110111001100101001000000110110101101111011101010110110001101001011011100110010101110100011101000110010100100000011100000110111101110101011100100010000001100011011000010010111000101110001011100000101001000011001001110110010101110011011101000010000001100001011100110111001101100101011110100010000001100100011001010110001101100101011101100110000101101110011101000010000000101100001000000110001001101111011011100010000000101100001000000110101001110101011100110111010001100101001000000111000001101111011101010111001000100000011001000110100101110010011001010010000001110001011101010110010100100000011010100010011101100001011010010010000000110011001101111011000000110010001000000010110000100000011001010111010000100000011011000110010101110011001000000111010101110010011010010110111001100101011100110010000001100011011011000110000101101001011100100110010100101110001011100010111000001010010000000010101100101011

[venom]

Coucou, Que t'arrive t'il G-Rom ?






@++

[Droopy]

Code : Tout sélectionner

a.s="0100101001100101001000000111001101100001011010010111001100100000001011000010000001110100011101010010000001110100001001110110010101110011011101000010000001100110011000010110100101110100001000000110001101101000011010010110010101110010001000001110000000100000011001100110000101101001011100100110010100100000011101010110111001100101001000000110110101101111011101010110110001101001011011100110010101110100011101000110010100100000011100000110111101110101011100100010000001100011011000010010111000101110001011100000101001000011001001110110010101110011011101000010000001100001011100110111001101100101011110100010000001100100011001010110001101100101011101100110000101101110011101000010000000101100001000000110001001101111011011100010000000101100001000000110101001110101011100110111010001100101001000000111000001101111011101010111001000100000011001000110100101110010011001010010000001110001011101010110010100100000011010100010011101100001011010010010000000110011001101111011000000110010001000000010110000100000011001010111010000100000011011000110010101110011001000000111010101110010011010010110111001100101011100110010000001100011011011000110000101101001011100100110010100101110001011100010111000001010010000000010101100101011"
For n=1 To Len(a) Step 8
  Out.s+Chr(Bin2Dec(Mid(a,n,8)))
Next

MessageRequester("",Out)

Bin2Dec est une fonction de la DroopyLib

Je sais , tu t'est fait chier à faire une moulinette pour ca...
C'est assez decevant , bon , juste pour dire que j'ai 37°2 , et les urines claire...
@++

[Backup]

Je sais , tu t'est fait chier à faire une moulinette pour ca...
C'est assez decevant , bon , juste pour dire que j'ai 37°2 , et les urines claire...
@++

[Reedit] ... Grillé par Droopy


mon code :

Code : Tout sélectionner

a$="0100101001100101001000000111001101100001011010010111001100100000001011000010000001110100011101010010000001110100001001110110010101110011011101000010000001100110011000010110100101110100001000000110001101101000011010010110010101110010001000001110000000100000011001100110000101101001011100100110010100100000011101010110111001100101001000000110110101101111011101010110110001101001011011100110010101110100011101000110010100100000011100000110111101110101011100100010000001100011011000010010111000101110001011100000101001000011001001110110010101110011011101000010000001100001011100110111001101100101011110100010000001100100011001010110001101100101011101100110000101101110011101000010000000101100001000000110001001101111011011100010000000101100001000000110101001110101011100110111010001100101001000000111000001101111011101010111001000100000011001000110100101110010011001010010000001110001011101010110010100100000011010100010011101100001011010010010000000110011001101111011000000110010001000000010110000100000011001010111010000100000011011000110010101110011001000000111010101110010011010010110111001100101011100110010000001100011011011000110000101101001011100100110010100101110001011100010111000001010010000000010101100101011"
for i=1 to Len(a$) step 8
		lettre$=mid(a$,i,8)
		lettre=val("%"+lettre$)
	lettre$=chr(lettre)
	toto$=toto$+lettre$
next i
debug toto$

Version optimisé

Code : Tout sélectionner

a$="0100101001100101001000000111001101100001011010010111001100100000001011000010000001110100011101010010000001110100001001110110010101110011011101000010000001100110011000010110100101110100001000000110001101101000011010010110010101110010001000001110000000100000011001100110000101101001011100100110010100100000011101010110111001100101001000000110110101101111011101010110110001101001011011100110010101110100011101000110010100100000011100000110111101110101011100100010000001100011011000010010111000101110001011100000101001000011001001110110010101110011011101000010000001100001011100110111001101100101011110100010000001100100011001010110001101100101011101100110000101101110011101000010000000101100001000000110001001101111011011100010000000101100001000000110101001110101011100110111010001100101001000000111000001101111011101010111001000100000011001000110100101110010011001010010000001110001011101010110010100100000011010100010011101100001011010010010000000110011001101111011000000110010001000000010110000100000011001010111010000100000011011000110010101110011001000000111010101110010011010010110111001100101011100110010000001100011011011000110000101101001011100100110010100101110001011100010111000001010010000000010101100101011"
for i=1 to Len(a$) step 8
toto$=toto$+chr(val("%"+mid(a$,i,8)))
next i
debug toto$

[nico]

j'ai fait le même code que toi sauf que j'ai mis si i=0 to ... ce qui fait que je n'ai pas réussi à décoder

C'est le problème de window, on commence toujours à compter à partir de 0 mais pas avec purebasic, je me suis fais avoir comme un débutant.

[G-Rom]

[Backup]

j'ai fait le même code que toi sauf que j'ai mis si i=0 to ... ce qui fait que je n'ai pas réussi à décoder

C'est le problème de window, on commence toujours à compter à partir de 0 mais pas avec purebasic, je me suis fais avoir comme un débutant.

c'est galere parce que certaines fonction on commence a 1 d'autre a 0
je perds souvent du temps a cause de ça ...

[case]

de mémoire dans tout les basics que j'ai utilisé une chaine commence toujours a 1

[Backup]

moi ce que je dis, c'est que certaines fonction en purebasic
(qui traite des chaines) , considere la position 0

par exemple :
- ListIconGadget() - renvoie le texte de l'élément de la liste. 'Colonne' est l'index de la colonne (commence à partir de 0).

pour la majorité des Gadgets :

Note: La numérotation des éléments commence à partir de 0.

pour l'editeur Gadget :
les ligne commencent a Zero !!!

Code : Tout sélectionner

EditorGadget(0, 8, 8, 306, 133) 
    For a = 0 To 5 
      AddGadgetItem(0, a, "Ligne "+Str(a)) 
    Next 

je peux en trouver d'autres ..
si Purebasic considerait que pour ce qui concerne les chaines/textes etc...
on commence a 1 pour tout le monde, ça serai plus simple a programmer

[G-Rom]

en toute logique , tout les iterateurs devrais commencer à zero , pour la simple et bonne raison
qu'un itérateur est un index qui est lui même multiplier par la taille de l'objet lu.
par exemple, pour une chaine 'Coucou' , si je parcours la chaine avec 'i' et qu'il vaut 0 : 'i*4 = 0' ( le 4 représente la taille d'un caractère )
on est bien à la position 0 , c'est à dire le 'C' , si i vaut 3 : 'i*4 = 12' , on obtient le second 'c'

[graph100]

moi ce que je dis, c'est que certaines fonction en purebasic
(qui traite des chaines) , considere la position 0

par exemple :
- ListIconGadget() - renvoie le texte de l'élément de la liste. 'Colonne' est l'index de la colonne (commence à partir de 0).

pour la majorité des Gadgets :

Note: La numérotation des éléments commence à partir de 0.

pour l'editeur Gadget :
les ligne commencent a Zero !!!

Code : Tout sélectionner

EditorGadget(0, 8, 8, 306, 133) 
    For a = 0 To 5 
      AddGadgetItem(0, a, "Ligne "+Str(a)) 
    Next 

je peux en trouver d'autres ..
si Purebasic considerait que pour ce qui concerne les chaines/textes etc...
on commence a 1 pour tout le monde, ça serai plus simple a programmer

Bah désolé, mais il me semble que les fonctions qui s'occupe des éléments commencent à zéro comme les getgadgetitem....
Même si la fonction renvoie une chaine, elle travaille sur un élément, Fred est donc bien logique.
Les fonctions qui traitent des chaines commencent bien à 1 : Findstring et autres...
* pas taper *

[falsam]

Nombre de 0 : 688
Nombre de 1 : 528

C'est ce qui fallait trouver ?:p

[graph100]

Bah Droopy a déjà traduit

[Backup]

Bah Droopy a déjà traduit

qui m'a grillé de 3 minutes ..

(le temps que je code...)
lui il triche, il utilise une lib

[SPH]

Ha, on recommence un concours de crypto ?