piccolo crypter lol

#include <GuiEdit.au3>
#include <GuiConstantsEx.au3>

#include <GuiConstants.au3>
$GUI = GUICreate("",300,230)
$msg = GUIGetMsg()
$EDIT1 = GUICtrlCreateEdit("",10,10,200,200)
$BUTTON1 = GUICtrlCreateButton("CRIPTA",220,180,70,30)
$CIAO = 1
WHILE $msg <> $GUI_EVENT_CLOSE
       $msg = GUIGetMsg()
       
       GUIsetState()
       
       
       
       
       Switch $MSG
       
       
       
       
       
       
CASE $BUTTON1
       
       
       
       
       
       
       $ms = GUICtrlRead($EDIT1)
If $ms = "" Then $CIAO = 2
       
         
$split = StringSplit($ms,"") ;nel secondo parametro, se lo lascio vuoto splitta tutti caratteri uno per uno
GUICtrlSetData($Edit1, "" )
   
For $i = 1 To UBound($split)-1
       
       ;c
       if $split[$i] = "a" Then
               $split[$i] = "!"
       ELSEif $split[$i] = "!" Then
               $split[$i] = "a"
       ;c
       ELSEif $split[$i] = "b" Then
               $split[$i] = "'"        
       ELSEif $split[$i] = "'" Then
               $split[$i] = "b"
       ;c
   ELSEif $split[$i] = "c" Then
               $split[$i] = "£"
       ELSEif $split[$i] = "£" Then
               $split[$i] = "c"
       ;c        
       ELSEif $split[$i] = "d" Then
               $split[$i] = "$"
       ELSEif $split[$i] = "$" Then
               $split[$i] = "d"
       ;c        
       ELSEif $split[$i] = "e" Then
               $split[$i] = "é"
       ELSEif $split[$i] = "é" Then
               $split[$i] = "e"
       ;c        
       ELSEif $split[$i] = "f" Then
               $split[$i] = "%"
       ELSEif $split[$i] = "%" Then
               $split[$i] = "f"
       ;c        
       ELSEif $split[$i] = "g" Then
               $split[$i] = "&"
       ELSEif $split[$i] = "&" Then
               $split[$i] = "g"
       ;c        
       ELSEif $split[$i] = "h" Then
               $split[$i] = "/"
       ELSEif $split[$i] = "/" Then
               $split[$i] = "h"
       ;c        
       ELSEif $split[$i] = "i" Then
               $split[$i] = "("
       ELSEif $split[$i] = "(" Then
               $split[$i] = "i"
       ;c        
       ELSEif $split[$i] = "l" Then
               $split[$i] = ")"
       ELSEif $split[$i] = ")" Then
               $split[$i] = "l"
       ;c        
       ELSEif $split[$i] = "m" Then
               $split[$i] = "]"
       ELSEif $split[$i] = "]" Then
               $split[$i] = "m"
       ;c        
       ELSEif $split[$i] = "n" Then
               $split[$i] = "["
       ELSEif $split[$i] = "[" Then
               $split[$i] = "n"
   ;c        
       ELSEif $split[$i] = "o" Then
               $split[$i] = "{"
       ELSEif $split[$i] = "{" Then
               $split[$i] = "o"                
       ;c
       ELSEif $split[$i] = "p" Then
               $split[$i] = "}"
       ELSEif $split[$i] = "}" Then
               $split[$i] = "p"        
       ;c
       ELSEif $split[$i] = "q" Then
               $split[$i] = "="
       ELSEif $split[$i] = "=" Then
               $split[$i] = "q"
   ;c
       ELSEif $split[$i] = "r" Then
               $split[$i] = "?"
       ELSEif $split[$i] = "?" Then
               $split[$i] = "r"                        
       ;c
       ELSEif $split[$i] = "s" Then
               $split[$i] = "ì"
       ELSEif $split[$i] = "ì" Then
               $split[$i] = "s"
   ;c
       ELSEif $split[$i] = "t" Then
               $split[$i] = "^"
       ELSEif $split[$i] = "^" Then
               $split[$i] = "t"
   ;c
       ELSEif $split[$i] = "u" Then
               $split[$i] = "à"
       ELSEif $split[$i] = "à" Then
               $split[$i] = "u"
   ;c
       ELSEif $split[$i] = "v" Then
               $split[$i] = "ò"
       ELSEif $split[$i] = "ò" Then
               $split[$i] = "v"
       ;c
       ELSEif $split[$i] = "z" Then
               $split[$i] = "ù"
       ELSEif $split[$i] = "ù" Then
               $split[$i] = "z"
       ;c
   ELSEif $split[$i] = "1" Then
               $split[$i] = "è"
       ELSEif $split[$i] = "è" Then
               $split[$i] = "1"
       ;c
   ELSEif $split[$i] = "2" Then
               $split[$i] = "+"
       ELSEif $split[$i] = "+" Then
               $split[$i] = "2"
       ;c
   ELSEif $split[$i] = "3" Then
               $split[$i] = "§"
       ELSEif $split[$i] = "§" Then
               $split[$i] = "3"
       ;c
   ELSEif $split[$i] = "4" Then
               $split[$i] = "#"
       ELSEif $split[$i] = "#" Then
               $split[$i] = "4"
               ;c
   ELSEif $split[$i] = "5" Then
               $split[$i] = "@"
       ELSEif $split[$i] = "@" Then
               $split[$i] = "5"
       ;c
   ELSEif $split[$i] = "6" Then
               $split[$i] = "_"
       ELSEif $split[$i] = "_" Then
               $split[$i] = "6"
       ;c
   ELSEif $split[$i] = "7" Then
               $split[$i] = "-"
       ELSEif $split[$i] = "-" Then
               $split[$i] = "7"
       ;c
   ELSEif $split[$i] = "8" Then
               $split[$i] = ":"
       ELSEif $split[$i] = ":" Then
               $split[$i] = "8"
       ;c
       ELSEif $split[$i] = "9" Then
               $split[$i] = "\"
       ELSEif $split[$i] = "\" Then
               $split[$i] = "9"
       ;c
       ELSEif $split[$i] = "k" Then
               $split[$i] = "|"
       ELSEif $split[$i] = "|" Then
               $split[$i] = "k"
       ;c
       ELSEif $split[$i] = "j" Then
               $split[$i] = "™"
       ELSEif $split[$i] = "™" Then
               $split[$i] = "j"
       ;cccc
       ELSEif $split[$i] = "w" Then
               $split[$i] = "."
       ELSEif $split[$i] = "." Then
               $split[$i] = "w"
       ;c
       ELSEif $split[$i] = "y" Then
               $split[$i] = ","
       ELSEif $split[$i] = "," Then
               $split[$i] = "y"
       ;c
       ELSEif $split[$i] = " " Then
               $split[$i] = "ý"
       ELSEif $split[$i] = "ý" Then
               $split[$i] = " "
       
       
       
       
       
       
       
               
       Else
               $split[$i] = $split[$i]
   endiF

               _GUICtrlEdit_AppendText($Edit1, $split[$i] )
   

Next

IF $CIAO = 1 THEN
               GUICtrlSetData($BUTTON1, "DECRIPTA" )
               $CIAO = 2
       Else
               GUICtrlSetData($BUTTON1, "CRIPTA" )
               $CIAO = 1
       ENDIF


GUIsetState()


EndSwitch
WEND