Page 1 sur 2
010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 18:52
par G-Rom
0100101001100101001000000111001101100001011010010111001100100000001011000010000001110100011101010010000001110100001001110110010101110011011101000010000001100110011000010110100101110100001000000110001101101000011010010110010101110010001000001110000000100000011001100110000101101001011100100110010100100000011101010110111001100101001000000110110101101111011101010110110001101001011011100110010101110100011101000110010100100000011100000110111101110101011100100010000001100011011000010010111000101110001011100000101001000011001001110110010101110011011101000010000001100001011100110111001101100101011110100010000001100100011001010110001101100101011101100110000101101110011101000010000000101100001000000110001001101111011011100010000000101100001000000110101001110101011100110111010001100101001000000111000001101111011101010111001000100000011001000110100101110010011001010010000001110001011101010110010100100000011010100010011101100001011010010010000000110011001101111011000000110010001000000010110000100000011001010111010000100000011011000110010101110011001000000111010101110010011010010110111001100101011100110010000001100011011011000110000101101001011100100110010100101110001011100010111000001010010000000010101100101011
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 19:30
par venom
Coucou, Que t'arrive t'il G-Rom ?
@++
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 20:39
par 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...
@++
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 20:42
par 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$
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 20:54
par 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.
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 21:09
par G-Rom
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 21:37
par Backup
nico a écrit :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 ...
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 21:51
par case
de mémoire dans tout les basics que j'ai utilisé une chaine commence toujours a 1
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 22:24
par 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
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 22:33
par 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'
Re: 010000110110111101110101011000110110111101110101
Publié : mar. 21/juin/2011 23:47
par graph100
Dobro a écrit :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 *
Re: 010000110110111101110101011000110110111101110101
Publié : mer. 22/juin/2011 13:34
par falsam
Nombre de 0 : 688
Nombre de 1 : 528
C'est ce qui fallait trouver ?:p
Re: 010000110110111101110101011000110110111101110101
Publié : mer. 22/juin/2011 13:46
par graph100
Bah Droopy a déjà traduit
Re: 010000110110111101110101011000110110111101110101
Publié : mer. 22/juin/2011 14:41
par Backup
graph100 a écrit :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
Re: 010000110110111101110101011000110110111101110101
Publié : mer. 22/juin/2011 20:13
par SPH
Ha, on recommence un concours de crypto ?