#cs ----------------------------------------------------------------------------
AutoIt Version: 3.2.12.1
Author: Mr.JacK
web: www.kingpc.tk
email: giuseppe-94@live.it
Script Function:
convertitore da parole a numeri
#ce ----------------------------------------------------------------------------
#include <GUIConstants.au3>
Global $Form = GUICreate("l33t c0nv3r73r By Mr.JacK", 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
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $conv
GUICtrlSetData($mod,"")
$leggo=GUICtrlRead($nick)
$a=StringReplace($leggo,"a", "4",0,1)
$b=StringReplace($a,"A","4",0,1)
$c=stringreplace($b,"b","b",0,1)
$d=StringReplace($c,"B","B",0,1)
...
Read the whole post...
Tags: AutoIT, Programmazione