Codeur decodeur qui utilise $encode $decode

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 440 fois - Téléchargée 29 fois

Contenu du snippet

tout simplement code et deocde du texte . Plusieurs options sont disponibles mais certaines ne marchent j'attends vos suggestions a propos de ce code

Source / Exemple :


menu menubar,query,channel {
  -
  codeur décodeur:/ouvrir
}

dialog crypte {
  size -1 -1 250 130
  option dbu
  button "fermer",1, 5 120 240 9, ok
  edit "texte à crypter ici",2, 5 15 170 10, autohs
  edit "",3, 5 30 170 10, read, autohs
  button "crypter",4, 5 45 170 10
  box "cryptage",5, 2 5 180 55
  edit "texte à décrypter ici",6, 5 70 170 10, autohs
  edit "",7, 5 85 170 10, read, autohs
  button "décrypter",8, 5 100 170 10
  box "décryptage",9, 2 60 180 55
  box "indiquer",10, 190 5 50 55
  box "indiquer",11, 190 60 50 55
  button "sur le channel",12, 195 15 40 15
  button "pour soi même",13, 195 35 40 15
  button "sur le channel",14, 195 70 40 15
  button "pour soi même",15, 195 90 40 15
}
ON *:DIALOG:crypte:*:*: { 
  if ($devent == edit) {
    if ($did == 2) { 
      if ($did(2).text == $null) { .did -b crypte 4 }
      if ($did(2).text != $null) { .did -e crypte 4 }
    }
    if ($did == 6) { 
      if ($did(6).text == $null) { .did -b crypte 8 }
      if ($did(6).text != $null) { .did -e crypte 8 }
    }

  }
  if ($devent == init) {
    if ($did(2).text == $null) { .did -e crypte 4 }
    if ($did(2).text != $null) { .did -b crypte 4 }
    if ($did(6).text == $null) { .did -e crypte 8 }
    if ($did(6).text != $null) { .did -b crypte 8 }
    .did -b crypte 12,13,14,15

  }
  if ($devent == sclick) {
    if ($did == 4) { 
      $iif($server == $null,.did -e crypte 13) 
      $iif($server != $null,.did -e crypte 12,.did -e crypte 13)
      /crypte 
    }
    if ($did == 8) { 
      $iif($server == $null,.did -e crypte 15) 
      $iif($server != $null,.did -e crypte 14,.did -e crypte 15)
      /decrypte 
    }
    if ($did == 12) { .msg $?"Sur quel channel ?" Codage de 4 $+ $did(2).text : 7 $+ $did(3).text }
    if ($did == 13) { .echo -a Codage de 4 $+ $did(2).text : 7 $+ $did(3).text }
    if ($did == 14) { .msg $?"Sur quel channel ?" décodage de 4 $+ $did(6).text : 7 $+ $did(7).text }
    if ($did == 15) { .echo -a Décodage de 4 $+ $did(6).text : 7 $+ $did(7).text }
  }
}

alias crypte {
  set %trucacrypte $did(2).text
  //did -ra crypte 3 $encode(%trucacrypte,m)
  /unset %trucacrypte
}
alias decrypte {
  set %trucadecrypte $did(6).text
  //did -ra crypte 7 $decode(%trucadecrypte,m)
  /unset %trucadecrypte
}

alias ouvrir {
  if ($dialog(crypte)) { halt }
  else { /dialog -m crypte crypte }
}

A voir également

Ajouter un commentaire

Commentaires

Messages postés
708
Date d'inscription
lundi 15 juillet 2002
Statut
Membre
Dernière intervention
17 mars 2005

T'expliquer ?!! oula faudrait entrer dans des considération beaucoup abstraites pour toi, si j'ai eu du mal a les comprendre je doute que tu puisses y arriver a l'age de 13 ans. Faut etre réaliste.

Mais avec de la bonne volonté je pourrais pas t'aider a voir plus clair. Si tu veux avoir une idée de cryptage qui utilise mon cours d'algèbre vas la : http://www.ircfr.com/code.aspx?ID=20824
Messages postés
343
Date d'inscription
dimanche 30 novembre 2003
Statut
Membre
Dernière intervention
19 août 2006
1
Un peu d'algebre niveau deug, ou le cours de spé math de terminale et le tour est joué . Kerrigan le probléme c'est que je suis encore loin de la terminale je n'ai que 13 ans et mes cours de math ne portent pas dur les algorythmes lol voila si tu pouvais un peu m'expliquer ça serais sympa
Messages postés
708
Date d'inscription
lundi 15 juillet 2002
Statut
Membre
Dernière intervention
17 mars 2005

je rejoins dark dragoon tu aurais du faire ton propre algo de cryptage en plus c'est vraiment pas dur... Un peu d'algebre niveau deug, ou le cours de spé math de terminale et le tour est joué ...

(Evitez les tables de convertion ça se casse très facilment )
Messages postés
2087
Date d'inscription
jeudi 12 décembre 2002
Statut
Modérateur
Dernière intervention
30 janvier 2011
8
Pas très utile, surtout que $encode n'est pas un 'algorythme' avec lequel on peut se fier ! Sinon, pour améliorer ta source, tu aurais dû mettre un auto $decode.
Comme ca, si quelqu'un prononce quelque chose sur IRC en l'ayant encodé avec $encode, tu l'auras décodé tout aussi tôt.
Messages postés
228
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
26 octobre 2004

hum hmu....
code pas tes developer, tu orai pu utiliser ton propre algorythme sa aurait eter plus simpa

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.