Convertion hexa/texte :)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 8 671 fois - Téléchargée 25 fois

Contenu du snippet

Vous me direz... Quel intéret ? :)
Aucun, mais bon, c pour le fun quoi :))

Source / Exemple :


alias hexa {
  ; Initialisation boucle
  set %txttc $strip($1-)
  set %lent $len(%txttc)
  set %count 0
  set %crypt $null

  ; Debut boucle
  :gcloop
  inc %count
  set %tch $mid(%txttc,%count,1)
  set %crypt %crypt $base($asc(%tch),10,16)
  if ( %count < %lent ) goto gcloop
  set %hexresult $lower(%crypt)
}

alias stdc {
  ; Initialisation boucle
  set %txttc $strip($1-)
  set %lent $len(%txttc)
  set %count 0
  set %dcrypt $null

  :gcloop
  set %tnb $mid(%txttc,%count,3)
  set %tdc $base(%tnb,16,10)
  set %tch $chr(%tdc)
  if ( %tdc == 32 ) set %tch -
  set %dcrypt %dcrypt $+ %tch
  inc %count
  inc %count
  inc %count
  if ( %count < %lent ) goto gcloop
  set %stdresult %dcrypt
}

alias mx {
  hexa $1-
  msg $chan %hexresult
}

alias dc {
  stdc $1-
  msg $chan %stdresult
}

alias mxl {
 hexa $1-
 echo -a %hexresult
}

alias dcl {
  stdc $1-
  echo -a %stdresult
}

Conclusion :


donc :
/mx Texte : écrire en hexa sur un chan
/dc Hexa : Traduire de l'hexa sur un chan
/mxl Texte : echo d'un texte en hexa
/dcl Hexa : echo de la conversion hexa/texte :)

A voir également

Ajouter un commentaire

Commentaires

Korniax
Messages postés
41
Date d'inscription
vendredi 19 décembre 2003
Statut
Membre
Dernière intervention
23 décembre 2003
-
g un bleme kan je fé /mx <mon text> ca fé boucle commande inconnue ds mon statut c normal??
Korniax
Messages postés
41
Date d'inscription
vendredi 19 décembre 2003
Statut
Membre
Dernière intervention
23 décembre 2003
-
c cool
lol
PJulot
Messages postés
29
Date d'inscription
dimanche 8 juillet 2001
Statut
Membre
Dernière intervention
30 octobre 2003
-
et voilà, c corrigé ;)
PJulot
Messages postés
29
Date d'inscription
dimanche 8 juillet 2001
Statut
Membre
Dernière intervention
30 octobre 2003
-
C exact, merci :)
En fait j'avais mis dc, dcl, ... dans les Alias, donc j'y ai pas pensé :)
cs_taye
Messages postés
24
Date d'inscription
samedi 27 avril 2002
Statut
Membre
Dernière intervention
5 juin 2002
-
Rajoute "ALIAS" avant "dc {", "dcl {" etc.. parce que le script se passe dans les remotes donc un c/c dans les remotes pour un newbie (qui ne saura pas qu'il faut mettre ALIAS devant ces derniers ni qu'il faut mettre cette partie de code dans les alias) entraînera des erreurs.

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.