Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 3507
Réponses : 24
Type : discussion
Etat : réponses autorisées
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.

Crypto

craminou le 24/06/2007 à 21:42
j'ai ti graph link qui marche !! c'est merveilleux , je peut poster des prog sans avoir a les recopier a la main !!

alor voici un prog ... qui ne marche pas ... godgrace.gif godgrace.gif
et ben oui , j'ai pas besoin de vous pour les prog qui marche !!! laugh.gif laugh.gif

le programme , comme l'indique son nom est un programme de cryptage , il decale le message de x lettre ex: programme pourri --> qsphsbnnf qpvssj
il respecte meme les espace
le probleme c'est qu'il demande le message . il faut le rentrer puis appuiyer sur enter . il vous demande le nombre de lettre de decalage , le transcrit puis redemande le nombre de lettre de decalage .. de facon a pouvoir utiliser la brute force pour decoder un message dont le nombre de lettre de decalage est inconnu or la , il decale normalement la premiere fois , puis apres , a chaque fois , il transcrit la meme chose , quel que soit le nombre de lettres demandé. crazy.gif

voila le code

Code

ClrHome
ClrAllLists
1ü ( ) B
0ü ( ) A
Disp "ENTRER MESSAGE
Lbl 0
While A=0
getKeyü ( ) A
End
If int(A/10)=1 or int(A/10)=2 or int(A/10)=3 or A=44 or A=45 or A=101 or A=103 or A=104 or A=95 or A=94
Then
Output(1,1,"CARACTERE INEXISTANT
Pause
ClrHome
0ü ( ) A
Goto 0
End
While Aø105
Aü ( ) L(B)
0ü ( ) A
B+1ü ( ) B
Goto 0
End
ClrHome
0ü ( ) L(B)
1ü ( ) B
Lbl 4
L(B)ü ( ) A
If A=41
1ü ( ) L(B)
If A=42
2ü ( ) L(B)
If A=43
3ü ( ) L(B)
If A=51
4ü ( ) L(B)
If A=52
5ü ( ) L(B)
If A=53
6ü ( ) L(B)
If A=54
7ü ( ) L(B)
If A=55
8ü ( ) L(B)
If A=61
9ü ( ) L(B)
If A=62
10ü ( ) L(B)
If A=63
11ü ( ) L(B)
If A=64
12ü ( ) L(B)
If A=65
13ü ( ) L(B)
If A=71
14ü ( ) L(B)
If A=72
15ü ( ) L(B)
If A=73
16ü ( ) L(B)
If A=74
17ü ( ) L(B)
If A=75
18ü ( ) L(B)
If A=81
19ü ( ) L(B)
If A=82
20ü ( ) L(B)
If A=83
21ü ( ) L(B)
If A=84
22ü ( ) L(B)
If A=85
23ü ( ) L(B)
If A=91
24ü ( ) L(B)
If A=92
25ü ( ) L(B)
If A=93
26ü ( ) L(B)
If A=102
ú ( ) 26ü ( ) L(B)
While Aø0
B+1ü ( ) B
Goto 4
End
1ü ( ) B
Lbl 7
Disp "NBR DE LETTRE DE
Disp "DECALAGE?
Input D
If D>25 or D<1
Then
Disp "IMPOSSIBLE
Pause
ClrHome
Goto 7
End
ClrHome
Lbl 5
If L(B)=0
Goto 6
L(B)+Dü ( ) L(B)
If L(B)>26
L(B)-26ü ( ) L(B)
B+1ü ( ) B
Goto 5
Lbl 6
1ü ( ) X
1ü ( ) Y
1ü ( ) B
Lbl 3
L(B)ü ( ) A
If A=0
Then
Pause
Goto 7
End
If A=2
Output(Y,X,"B
If A=3
Output(Y,X,"C
If A=4
Output(Y,X,"D
If A=5
Output(Y,X,"E
If A=6
Output(Y,X,"F
If A=7
Output(Y,X,"G
If A=8
Output(Y,X,"H
If A=9
Output(Y,X,"I
If A=10
Output(Y,X,"J
If A=11
Output(Y,X,"K
If A=12
Output(Y,X,"L
If A=13
Output(Y,X,"M
If A=14
Output(Y,X,"N
If A=15
Output(Y,X,"O
If A=16
Output(Y,X,"P
If A=17
Output(Y,X,"Q
If A=18
Output(Y,X,"R
If A=19
Output(Y,X,"S
If A=20
Output(Y,X,"T
If A=21
Output(Y,X,"U
If A=22
Output(Y,X,"V
If A=23
Output(Y,X,"W
If A=24
Output(Y,X,"X
If A=25
Output(Y,X,"Y
If A=26
Output(Y,X,"Z
If A=1
Output(Y,X,"A
If A÷ ( ) 0
Output(Y,X,"
B+1ü ( ) B
X+1ü ( ) X
If X=17
Then
Y+1ü ( ) Y
1ü ( ) X
End
If Y=9
Goto 2
Goto 3
Lbl 2
Pause
ClrHome
1ü ( ) X
1ü ( ) Y
Goto 3


L = L1

filler moi un bon hebergeur et je passe le lien ... ^^
vibra le 24/06/2007 à 22:59
T'es en forme dis moi !! happy.gif
craminou le 24/06/2007 à 23:02
non non , le prog est vieux , au moin 3 semaine , mais que le cable marche comme je veut , sa c'est nouveau godgrace.gif
mad67 le 25/06/2007 à 08:07
oui mais il sert a quoi ce prog?
Sangohan38 le 25/06/2007 à 08:49
A crypté un code par exemple.
Ca peut être intéressant couplé à un prog de mot de passe.

Sangohan38
mad67 le 25/06/2007 à 11:39
oui comme sa au bac on pourra pas trouver mes progs.
coc5 le 25/06/2007 à 12:09
Peut-être qu'il faut faire Clrliste à chaque fois non ?
(j'ai vu qu'il est au début, mais peut-être qu'il faut le mettre après le lbl 3)


>Mad pour ça ils peuvent faire "éditer^^"
Seul les programmes ASM peuvent être totalement inviolable.
mad67 le 25/06/2007 à 12:13
comment on fait pour eviter de se faire choper?
coc5 le 25/06/2007 à 12:28
On apprend ses cours^^

Ou l'ASM.

Ou alors tu évites de faire des programmes de stockage de textes et tu fais des programmes intelligents (d'ailleurs j'en ai fais un sur la chimie organique, tu ebntre les données et ça te dis ce que c'est, avec quoi ça réagit etc...)

Ou sinon tu crypte.
vibra le 25/06/2007 à 13:05
Vas y, donne le !!
Stupid le 25/06/2007 à 13:25
il suffit d'activer l'onglet proteger quand on envoie un porg depuis graph link
mad67 le 26/06/2007 à 09:51
ah oui sa a l'air genial de faire sa mais je l'ai pas cry.gif cry.gif cry.gif
ratuss le 28/06/2007 à 01:57
mad67 a écrit :
oui comme sa au bac on pourra pas trouver mes progs.


ca fait 100 fois que je le répète mais bon :p :

au bac on a le droit de mettre tout ce que l'on veut ,y compris les cours sur sa calculatrice . beer.gif beer.gif Le seul truc qui est interdit c'est de disposer de plusieurs calcus en même temps.

A part ca je vous déconseille fortement de tricher (sinon 4 ans sans passer d'exams, permis/bac...cupsmiley.gif )

+
Sangohan38 le 28/06/2007 à 07:19
Tu t'est trompé, c'est 5 ans (du moins c'est ce que je me rappel).
Par contre, il faut qu'une calcu sur la table alors si jamais ya un problème vous pouvez changer.

Sangohan38
mad67 le 28/06/2007 à 09:36
oui bon en tout cas je sais pas comment faire pour ti graph link
ratuss le 28/06/2007 à 09:56
moi j'ai peu être une solution, mais bon j'ai la flemme de tester et puis ca prendras trop de temps pour moi crazy.gif .

+
ratuss le 28/06/2007 à 10:00
http://www.aquadesign.be/news/article-9293.php a écrit :
les sanctions encourues par les fraudeurs vont du blâme à l'interdiction temporaire (de 1 à 5 ans) ou définitive de se présenter à des examens, même à l'examen du permis de conduire ou encore de s'inscrire dans l'enseignement supérieur, en cas de "triche grave", comme d' envoyer quelqu'un à sa place, ou le vol des sujets etc...
craminou le 28/06/2007 à 14:22
c'est bien gentil tout ça mais c'est tres flood est surtout tres hors sujet ...
désolé de vous cassez dans votre élant mais j'aimerai bien que vous m'aidiez a le faire marcher ... minied.gif
Sangohan38 le 28/06/2007 à 15:34
Donc fait une boucle à partir de l'endroit ou il demande le nombre de lettres de décalages.

Sangohan38
craminou le 28/06/2007 à 15:56
pourquoi ahh.gif j'en vois pas l'interet la
Sangohan38 le 28/06/2007 à 22:17
Il est marquer que lorsque le prog recommence, il reprend le même nombre de décalcage.
Il suffit donc de faire une boucle.

Sangohan3
craminou le 28/06/2007 à 22:37
en fait au debu tout marche comme il faut , il me demande le nombre de lettre de decalage .. puis apres avoir coder le message il redemande le nombre de lettre et la , il rmet le meme message codé que le coup d'avant , comme si on avait redemander le meme nombre de lettre , quel que soit le nombre qu'on rentre . Teste le tu verra bien (si tu a la flegme de réécrire , passe moi un lien de site pour uploader et je te file un lien)
mad67 le 29/06/2007 à 10:09
tu peux me donner cette solution?
craminou le 30/06/2007 à 03:08
???? ahh.gif ahh.gif
en fait je demande la solution... je vous la fait pas chercher juste pour le fun !! evil.gif evil.gif
godgrace.gif
mad67 le 30/06/2007 à 10:31
met un label juste apres la demande et ne reinitialise pas les varibleset a la fin tu met goto
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.