Faire une page de chiffre binaire

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Faire une page de chiffre binaire

Hasgard

Fire,Water.Air &Earth

hello,

voila j ai un soucis il faut que je mettre des chiffres 1 et 0 sur tout une page sur un fond noir et j aurai aimer savoir commen m y prendre pour faire ca assez vite car sinon il y a la methode de tout faire chiffre par chiffre mais demain je serai encore la :pt1cable:
j attend vous suggestions

merci d avance

Publicité

Suri

Darksurious

attends... ya meme des touches SPECIALES pour faire des 0 et des 1, faut pas abuser qd meme
moi j'aimerai bien une touche qui me fasse un CyberDemon en 3D

---------------
Suri.morkitu.org : Balades au coeur de la ville...

herbesahne

une macro word

Code :

Sub blah()
For t = 1 To 1000
i = Int(Rnd + 0.5)
ActiveDocument.Content.InsertAfter (i)
Next t
End Sub

Hasgard

Fire,Water.Air &Earth

suri a écrit :

attends... ya meme des touches SPECIALES pour faire des 0 et des 1, faut pas abuser qd meme
moi j'aimerai bien une touche qui me fasse un CyberDemon en 3D

oui je sais qu il y a des touche special pour ca mais bon j ai un grand fichier a faire et je veux pas passer tout ma nuit a taper sur les touches...

Hasgard

Fire,Water.Air &Earth

herbesahne a écrit :

une macro word

Code :

Sub blah()
For t = 1 To 1000
i = Int(Rnd + 0.5)
ActiveDocument.Content.InsertAfter (i)
Next t
End Sub

merci bcp dis moi c est possible de pouvoir mettre des espaces en fesant le macro?ou bien pas je sais j en demande bcp la mais je me renseigne

herbesahne

Tu veux dire entre chaque chiffre ou séparé par bloc de 8 ?

Hasgard

Fire,Water.Air &Earth

herbesahne a écrit :

Tu veux dire entre chaque chiffre ou séparé par bloc de 8 ?

entre chaque chiffre mais disons de façon aleatoire si c est possible

herbesahne

modifie cette ligne alors
ActiveDocument.Content.InsertAfter (Str(i) + String(Rnd * 5, " " ))
(on peut changer le 5)

kaiser47

c'était mieux avant...

si tu peux faire avec autre chose que uniquement des 0 et 1 : tu ouvre n'importe quel petit exe dans ton bloc note et tu fais une capture d'ecran ou un copier coller du texte.

Hasgard

Fire,Water.Air &Earth

herbesahne a écrit :

modifie cette ligne alors
ActiveDocument.Content.InsertAfter (Str(i) + String(Rnd * 5, " " ))
(on peut changer le 5)

merci infiniment de ton aide tu me sauve la vie la :jap: et si je veux mettre un 6 car en gros faut que je passe de chiffre 0 1 au chiffre 6 et en fin de texte il y aie que des 6 il faut changer quelle ligne de commande sur le macro?

Message édité par Hasgard le 27-07-2004 à 00:27:25

Publicité

herbesahne

j'ai refait un peu le code (ça reste bourrin qd même [:athlonxp2100+] )

Sub plop()
longueur = 1000 'nombre de chiffres
transition = longueur * 0.8
For t = 1 To longueur
i = Int(Rnd + 0.5 - (t > transition) * (5 * (t - transition) / (longueur - transition)))
If i > 1 And i < 4 Then i = Int(Rnd + 0.5)
If i > 3 And i < 7 Then i = 6
ActiveDocument.Content.InsertAfter (Str(i) + String(Rnd * 5, " " ))
Next t
'100 six à la fin
For t = 1 To 100
i = 6
ActiveDocument.Content.InsertAfter (Str(i) + String(Rnd * 5, " " ))
Next t
End Sub

Hasgard

Fire,Water.Air &Earth

herbesahne a écrit :

j'ai refait un peu le code (ça reste bourrin qd même [:athlonxp2100+] )

tu es un dieu man :sol:
tu va me prendre pour un fou encore mais il y a moyen de mettre des 1 et des 0 dans la ligne des 6 exemple: 0 0 1 6 0 1 6 6 6 11 0 6
je sais que je t embete avec tout ca mais merci de prendre un peu de ton temps pour aider une novice comme moi dans le macro

Suri

Darksurious

kaiser47 a écrit :

si tu peux faire avec autre chose que uniquement des 0 et 1 : tu ouvre n'importe quel petit exe dans ton bloc note et tu fais une capture d'ecran ou un copier coller du texte.

[:totozzz]

---------------
Suri.morkitu.org : Balades au coeur de la ville...

Paradise-

avec un .tiff ca marche encore mieux

FORUM HardWare.fr

Graphisme

PAO / Desktop Publishing

Faire une page de chiffre binaire

Sujets relatifs
Quelle intégration du son dans une page web ?	Page chargée dans un cadre ?
Mettre une page HTML dans une animation Flash ?	[wipBlender]Alfa 147 GTA fini meilleur rendu page 12
Comment aligner un tableau sur le bord gauche d'une page web	Netobject fusion: comment faire une page web avec un mot de passe
[WIP 3Dmax] Buggy [ Rendu Final page 10 ]	lien sur une autre page a une ligne precise
transparence d une page	indesign et pied de page
Plus de sujets relatifs à : Faire une page de chiffre binaire

Page générée en 0.037 secondes