AutoIt Français

Code : Tout sélectionner

#cs ----------------------------------------------------------------------------

 AutoIt Version : 3.3.6.0
 Auteur:         Canaud Thibaud

 Fonction du Script :
    Script reproduisant le code césar.

#ce ----------------------------------------------------------------------------

; Début du script - Ajouter votre code ci-dessous.
#include <array.au3>

Func _Cryptage_Cesar($oMessage,$oDecal)
    Local $oMessageoReturn
    $oMessageoArray = StringToASCIIArray($oMessage)
    For $i = 0 To UBound($oMessageoArray) - 1 Step 1
        $oMessageoCalcule = $oMessageoArray[$i] + $oDecal
        $oMessageoReturn &= Chr($oMessageoCalcule)
    Next
    Return $oMessageoReturn
EndFunc

Func _Decryptage_Cesar($oMessage,$oDecal)
    Local $oMessageoReturn
    $oMessageoArray = StringToASCIIArray($oMessage)
    For $i = 0 To UBound($oMessageoArray) - 1 Step 1
        $oMessageoCalcule = $oMessageoArray[$i] - $oDecal
        $oMessageoReturn &= Chr($oMessageoCalcule)
    Next
    Return $oMessageoReturn
EndFunc