CODICE
#include <GUIConstants.au3>
Global $Form = GUICreate("l33t c0nv3r73r M0d1f13d By M3g480S5", 336, 177, -1, -1, -1)
Global $nick = GUICtrlCreateInput("", 8, 48, 321, 21)
GUICtrlSetTip(-1, "1n53r15c1 1l 7u0 n1ck")
Global $mod = GUICtrlCreateInput("", 8, 144, 321, 21)
GUICtrlSetTip(-1, "N1ck m0d1f1c470")
Global $conv = GUICtrlCreateButton("C0nv3r71", 104, 96, 100, 30)
GUICtrlSetTip(-1, "c0nv3r71r3")
Global $Label1 = GUICtrlCreateLabel("l33t N1ck C0nv3r73r ", 57, 0, 224, 48)
GUICtrlSetFont(-1, 26, 800, 2, "Myriad Pro Light")
GUICtrlSetColor(-1, 0x0000FF)
GUISetState(@SW_SHOW)
While 1
$a1= Int (Random (0,2))
$b1= Int (Random (0,2))
$c1= Int (Random (0,2))
$d1= Int (Random (0,2))
$e1= Int (Random (0,2))
$f1= Int (Random (0,2))
$g1= Int (Random (0,2))
$h1= Int (Random (0,2))
$i1= Int (Random (0,2))
$j1= Int (Random (0,2))
$k1= Int (Random (0,2))
$l1= Int (Random (0,2))
$m1= Int (Random (0,2))
$n1= Int (Random (0,2))
$o1= Int (Random (0,2))
$p1= Int (Random (0,2))
$q1= Int (Random (0,2))
$r1= Int (Random (0,2))
$s1= Int (Random (0,2))
$t1= Int (Random (0,2))
$u1= Int (Random (0,2))
$v1= Int (Random (0,2))
$w1= Int (Random (0,2))
$x1= Int (Random (0,2))
$y1= Int (Random (0,2))
$z1= Int (Random (0,2))
$11= Int (Random (0,2))
$21= Int (Random (0,2))
$31= Int (Random (0,2))
$41= Int (Random (0,2))
$51= Int (Random (0,2))
$61= Int (Random (0,2))
$71= Int (Random (0,2))
$81= Int (Random (0,2))
$91= Int (Random (0,2))
$101= Int (Random (0,2))
$111= Int (Random (0,2))
$121= Int (Random (0,2))
$131= Int (Random (0,2))
$141= Int (Random (0,2))
$151= Int (Random (0,2))
$161= Int (Random (0,2))
$171= Int (Random (0,2))
$181= Int (Random (0,2))
$191= Int (Random (0,2))
$201= Int (Random (0,2))
$211= Int (Random (0,2))
$221= Int (Random (0,2))
$231= Int (Random (0,2))
$241= Int (Random (0,2))
$251= Int (Random (0,2))
$261= Int (Random (0,2))
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $conv
GUICtrlSetData($mod,"")
$leggo=GUICtrlRead($nick)
$a=StringReplace($leggo,"a", "4",0,1)
Switch $a
Case $a1=0
$a=StringReplace($leggo,"a","A",0,1)
Case $a1=2
$a=StringReplace($leggo,"a","4",0,1)
Case $a1=1
$a=StringReplace($leggo,"a","a",0,1)
EndSwitch
$b=StringReplace($a,"A","4",0,1)
Switch $b
Case $b1=0
$b=StringReplace($leggo,"A","A",0,1)
Case $b1=2
$b=StringReplace($leggo,"A","4",0,1)
Case $b1=1
$b=StringReplace($leggo,"A","a",0,1)
EndSwitch
$c=stringreplace($b,"b","b",0,1)
Switch $c
Case $c1=0
$c=StringReplace($leggo,"b","b",0,1)
Case $c1=2
$c=StringReplace($leggo,"b","B",0,1)
Case $c1=1
$c=StringReplace($leggo,"b","b",0,1)
EndSwitch
$d=StringReplace($c,"B","B",0,1)
Switch $d
Case $d1=0
$d=StringReplace($leggo,"B","b",0,1)
Case $d1=2
$d=StringReplace($leggo,"B","B",0,1)
Case $d1=1
$d=StringReplace($leggo,"B","b",0,1)
EndSwitch
$e=StringReplace($d,"c","c",0,1)
Switch $e
Case $e1=0
$e=StringReplace($leggo,"c","c",0,1)
Case $e1=2
$e=StringReplace($leggo,"c","C",0,1)
Case $e1=1
$e=StringReplace($leggo,"c","c",0,1)
EndSwitch
$f=StringReplace($e,"C","C",0,1)
Switch $f
Case $f1=0
$f=StringReplace($leggo,"C","c",0,1)
Case $f1=2
$f=StringReplace($leggo,"C","C",0,1)
Case $f1=1
$f=StringReplace($leggo,"C","c",0,1)
EndSwitch
$g=StringReplace($f,"d","d",0,1)
Switch $g
Case $g1=0
$g=StringReplace($leggo,"d","d",0,1)
Case $g1=2
$g=StringReplace($leggo,"d","D",0,1)
Case $g1=1
$g=StringReplace($leggo,"d","d",0,1)
EndSwitch
$h=StringReplace($g,"D","D",0,1)
Switch $h
Case $h1=0
$h=StringReplace($leggo,"D","d",0,1)
Case $h1=2
$h=StringReplace($leggo,"D","D",0,1)
Case $h1=1
$h=StringReplace($leggo,"D","d",0,1)
EndSwitch
$i=StringReplace($h,"e", "3",0,1)
Switch $i
Case $i1=0
$c=StringReplace($leggo,"e","E",0,1)
Case $i1=2
$i=StringReplace($leggo,"e","3",0,1)
Case $i1=1
$i=StringReplace($leggo,"e","e",0,1)
EndSwitch
$j=StringReplace($i, "E", "3",0,1)
Switch $j
Case $j1=0
$j=StringReplace($leggo,"E","E",0,1)
Case $j1=2
$j=StringReplace($leggo,"E","3",0,1)
Case $j1=1
$j=StringReplace($leggo,"E","e",0,1)
EndSwitch
$k=StringReplace($j, "f", "f",0,1)
Switch $k
Case $k1=0
$k=StringReplace($leggo,"f","f",0,1)
Case $k1=2
$k=StringReplace($leggo,"f","F",0,1)
Case $k1=1
$c=StringReplace($leggo,"f","f",0,1)
EndSwitch
$l=StringReplace($k,"F", "F",0,1)
Switch $l
Case $l1=0
$l=StringReplace($leggo,"F","f",0,1)
Case $l1=2
$l=StringReplace($leggo,"F","F",0,1)
Case $l1=1
$l=StringReplace($leggo,"F","f",0,1)
EndSwitch
$m=StringReplace($l,"g", "g",0,1)
Switch $m
Case $m1=0
$m=StringReplace($leggo,"g","g",0,1)
Case $m1=2
$m=StringReplace($leggo,"g","G",0,1)
Case $m1=1
$m=StringReplace($leggo,"g","g",0,1)
EndSwitch
$n=StringReplace($m,"G", "G",0,1)
Switch $n
Case $n1=0
$n=StringReplace($leggo,"G","g",0,1)
Case $n1=2
$n=StringReplace($leggo,"G","G",0,1)
Case $n1=1
$n=StringReplace($leggo,"G","g",0,1)
EndSwitch
$o=StringReplace($n, "h", "h",0,1)
Switch $o
Case $o1=0
$o=StringReplace($leggo,"h","h",0,1)
Case $o1=2
$o=StringReplace($leggo,"h","H",0,1)
Case $o1=1
$o=StringReplace($leggo,"h","h",0,1)
EndSwitch
$p=StringReplace($o, "H", "h",0,1)
Switch $p
Case $p1=0
$p=StringReplace($leggo,"H","h",0,1)
Case $p1=2
$p=StringReplace($leggo,"H","H",0,1)
Case $p1=1
$p=StringReplace($leggo,"H","h",0,1)
EndSwitch
$q=StringReplace($p, "i", "1",0,1)
Switch $q
Case $q1=0
$q=StringReplace($leggo,"i","I",0,1)
Case $q1=2
$q=StringReplace($leggo,"i","1",0,1)
Case $q1=1
$q=StringReplace($leggo,"i","i",0,1)
EndSwitch
$r=StringReplace($q, "I", "1",0,1)
Switch $r
Case $r1=0
$r=StringReplace($leggo,"I","I",0,1)
Case $r1=2
$r=StringReplace($leggo,"I","1",0,1)
Case $r1=1
$r=StringReplace($leggo,"I","i",0,1)
EndSwitch
$s=StringReplace($r, "l", "l",0,1)
Switch $s
Case $s1=0
$s=StringReplace($leggo,"l","l",0,1)
Case $s1=2
$s=StringReplace($leggo,"l","L",0,1)
Case $s1=1
$s=StringReplace($leggo,"l","l",0,1)
EndSwitch
$t=StringReplace($s, "L", "l",0,1)
Switch $t
Case $t1=0
$t=StringReplace($leggo,"L","l",0,1)
Case $t1=2
$t=StringReplace($leggo,"L","L",0,1)
Case $t1=1
$t=StringReplace($leggo,"L","l",0,1)
EndSwitch
$u=StringReplace($t, "m", "m",0,1)
Switch $u
Case $u1=0
$u=StringReplace($leggo,"m","m",0,1)
Case $u1=2
$u=StringReplace($leggo,"m","M",0,1)
Case $u1=1
$u=StringReplace($leggo,"m","m",0,1)
EndSwitch
$v=StringReplace($u, "M", "M",0,1)
Switch $v
Case $v1=0
$v=StringReplace($leggo,"M","m",0,1)
Case $v1=2
$v=StringReplace($leggo,"M","M",0,1)
Case $v1=1
$v=StringReplace($leggo,"M","m",0,1)
EndSwitch
$w=StringReplace($v, "n", "n",0,1)
Switch $w
Case $w1=0
$w=StringReplace($leggo,"n","n",0,1)
Case $w1=2
$w=StringReplace($leggo,"n","N",0,1)
Case $w1=1
$w=StringReplace($leggo,"n","n",0,1)
EndSwitch
$x=StringReplace($w, "N", "N",0,1)
Switch $x
Case $x1=0
$x=StringReplace($leggo,"N","n",0,1)
Case $x1=2
$x=StringReplace($leggo,"N","N",0,1)
Case $x1=1
$x=StringReplace($leggo,"N","n",0,1)
EndSwitch
$y=StringReplace($x, "o", "0",0,1)
Switch $y
Case $y1=0
$y=StringReplace($leggo,"o","O",0,1)
Case $y1=2
$y=StringReplace($leggo,"o","0",0,1)
Case $y1=1
$y=StringReplace($leggo,"o","o",0,1)
EndSwitch
$z=StringReplace($y, "O", "0",0,1)
Switch $z
Case $z1=0
$z=StringReplace($leggo,"O","O",0,1)
Case $z1=2
$z=StringReplace($leggo,"O","0",0,1)
Case $z1=1
$z=StringReplace($leggo,"O","o",0,1)
EndSwitch
$1=StringReplace($z, "p", "9",0,1)
Switch $1
Case $11=0
$1=StringReplace($leggo,"p","P",0,1)
Case $11=2
$1=StringReplace($leggo,"p","9",0,1)
Case $11=1
$1=StringReplace($leggo,"p","p",0,1)
EndSwitch
$2=StringReplace($1, "P", "9",0,1)
Switch $2
Case $21=0
$2=StringReplace($leggo,"P","P",0,1)
Case $21=2
$2=StringReplace($leggo,"P","9",0,1)
Case $21=1
$2=StringReplace($leggo,"P","p",0,1)
EndSwitch
$3=StringReplace($2, "q", "q",0,1)
Switch $3
Case $31=0
$3=StringReplace($leggo,"q","q",0,1)
Case $31=2
$3=StringReplace($leggo,"q","Q",0,1)
Case $31=1
$3=StringReplace($leggo,"q","q",0,1)
EndSwitch
$4=StringReplace($3, "Q", "Q",0,1)
Switch $4
Case $41=0
$4=StringReplace($leggo,"Q","q",0,1)
Case $41=2
$4=StringReplace($leggo,"Q","Q",0,1)
Case $41=1
$4=StringReplace($leggo,"Q","q",0,1)
EndSwitch
$5=StringReplace($4, "r", "r",0,1)
Switch $5
Case $51=0
$5=StringReplace($leggo,"r","r",0,1)
Case $51=2
$5=StringReplace($leggo,"r","R",0,1)
Case $51=1
$5=StringReplace($leggo,"r","r",0,1)
EndSwitch
$6=StringReplace($5, "R", "R",0,1)
Switch $6
Case $61=0
$6=StringReplace($leggo,"R","r",0,1)
Case $61=2
$6=StringReplace($leggo,"R","R",0,1)
Case $61=1
$6=StringReplace($leggo,"R","r",0,1)
EndSwitch
$7=StringReplace($6, "s", "5",0,1)
Switch $7
Case $71=0
$7=StringReplace($leggo,"s","s",0,1)
Case $71=2
$7=StringReplace($leggo,"s","S",0,1)
Case $71=1
$7=StringReplace($leggo,"s","s",0,1)
EndSwitch
$8=StringReplace($7, "S", "5",0,1)
Switch $8
Case $81=0
$8=StringReplace($leggo,"S","S",0,1)
Case $81=2
$8=StringReplace($leggo,"S","5",0,1)
Case $81=1
$8=StringReplace($leggo,"S","s",0,1)
EndSwitch
$9=StringReplace($8, "t", "7",0,1)
Switch $9
Case $91=0
$9=StringReplace($leggo,"t","T",0,1)
Case $91=2
$9=StringReplace($leggo,"t","7",0,1)
Case $91=1
$9=StringReplace($leggo,"t","t",0,1)
EndSwitch
$10=StringReplace($9, "T", "'7'",0,1)
Switch $10
Case $101=0
$10=StringReplace($leggo,"T","T",0,1)
Case $101=2
$10=StringReplace($leggo,"T","7",0,1)
Case $101=1
$10=StringReplace($leggo,"T","t",0,1)
EndSwitch
$11=StringReplace($10, "u", "u",0,1)
Switch $11
Case $111=0
$11=StringReplace($leggo,"u","u",0,1)
Case $111=2
$11=StringReplace($leggo,"u","U",0,1)
Case $111=1
$11=StringReplace($leggo,"u","u",0,1)
EndSwitch
$12=StringReplace($11, "U", "U",0,1)
Switch $12
Case $121=0
$12=StringReplace($leggo,"U","u",0,1)
Case $121=2
$12=StringReplace($leggo,"U","U",0,1)
Case $121=1
$12=StringReplace($leggo,"U","u",0,1)
EndSwitch
$13=StringReplace($12, "v", "v",0,1)
Switch $13
Case $131=0
$13=StringReplace($leggo,"v","v",0,1)
Case $131=2
$13=StringReplace($leggo,"v","V",0,1)
Case $131=1
$13=StringReplace($leggo,"v","v",0,1)
EndSwitch
$14=StringReplace($13, "V", "V",0,1)
Switch $14
Case $141=0
$14=StringReplace($leggo,"V","v",0,1)
Case $141=2
$14=StringReplace($leggo,"V","V",0,1)
Case $141=1
$14=StringReplace($leggo,"V","v",0,1)
EndSwitch
$15=StringReplace($14, "z", "2",0,1)
Switch $15
Case $151=0
$15=StringReplace($leggo,"z","Z",0,1)
Case $151=2
$15=StringReplace($leggo,"z","2",0,1)
Case $151=1
$15=StringReplace($leggo,"z","z",0,1)
EndSwitch
$16=StringReplace($15, "Z", "2",0,1)
Switch $16
Case $161=0
$16=StringReplace($leggo,"Z","Z",0,1)
Case $161=2
$16=StringReplace($leggo,"Z","2",0,1)
Case $161=1
$16=StringReplace($leggo,"Z","z",0,1)
EndSwitch
$17=StringReplace($16, "x", "x",0,1)
Switch $17
Case $171=0
$17=StringReplace($leggo,"x","x",0,1)
Case $171=2
$17=StringReplace($leggo,"x","X",0,1)
Case $171=1
$17=StringReplace($leggo,"x","x",0,1)
EndSwitch
$18=StringReplace($17, "X", "X",0,1)
Switch $18
Case $181=0
$18=StringReplace($leggo,"X","x",0,1)
Case $181=2
$18=StringReplace($leggo,"X","X",0,1)
Case $181=1
$18=StringReplace($leggo,"X","x",0,1)
EndSwitch
$19=StringReplace($18, "w", "w",0,1)
Switch $19
Case $191=0
$19=StringReplace($leggo,"w","w",0,1)
Case $191=2
$19=StringReplace($leggo,"w","W",0,1)
Case $191=1
$19=StringReplace($leggo,"w","w",0,1)
EndSwitch
$20=StringReplace($19, "W", "W",0,1)
Switch $20
Case $201=0
$20=StringReplace($leggo,"W","w",0,1)
Case $201=2
$20=StringReplace($leggo,"W","W",0,1)
Case $201=1
$20=StringReplace($leggo,"W","w",0,1)
EndSwitch
$21=StringReplace($20, "y", "y",0,1)
Switch $21
Case $211=0
$21=StringReplace($leggo,"y","y",0,1)
Case $211=2
$21=StringReplace($leggo,"y","Y",0,1)
Case $211=1
$21=StringReplace($leggo,"y","y",0,1)
EndSwitch
$22=StringReplace($21, "Y", "Y",0,1)
Switch $22
Case $221=0
$22=StringReplace($leggo,"Y","y",0,1)
Case $221=2
$22=StringReplace($leggo,"Y","Y",0,1)
Case $221=1
$22=StringReplace($leggo,"Y","y",0,1)
EndSwitch
$23=StringReplace($22, "j", "j",0,1)
Switch $23
Case $231=0
$23=StringReplace($leggo,"j","j",0,1)
Case $231=2
$23=StringReplace($leggo,"j","J",0,1)
Case $231=1
$23=StringReplace($leggo,"j","j",0,1)
EndSwitch
$24=StringReplace($23, "J", "J",0,1)
Switch $24
Case $241=0
$24=StringReplace($leggo,"J","j",0,1)
Case $241=2
$24=StringReplace($leggo,"J","J",0,1)
Case $241=1
$24=StringReplace($leggo,"J","j",0,1)
EndSwitch
$25=StringReplace($24, "k", "k",0,1)
Switch $25
Case $251=0
$25=StringReplace($leggo,"k","k",0,1)
Case $251=2
$25=StringReplace($leggo,"k","K",0,1)
Case $251=1
$25=StringReplace($leggo,"k","k",0,1)
EndSwitch
$26=StringReplace($25, "K", "K",0,1)
Switch $26
Case $261=0
$26=StringReplace($leggo,"K","k",0,1)
Case $261=2
$26=StringReplace($leggo,"K","K",0,1)
Case $261=1
$26=StringReplace($leggo,"K","k",0,1)
EndSwitch
$26=StringReplace($25, "@", "©",0,1)
Switch $26
Case $261=0
$26=StringReplace($leggo,"@","@",0,1)
Case $261=2
$26=StringReplace($leggo,"@","@",0,1)
Case $261=1
$26=StringReplace($leggo,"@","@",0,1)
EndSwitch
GUICtrlSetData($mod,$26)
EndSwitch
WEnd
)
