235 lines
19 KiB
AutoIt
235 lines
19 KiB
AutoIt
|
#NoTrayIcon
|
||
|
|
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
|
||
|
|
#AutoIt3Wrapper_Change2CUI=y
|
||
|
|
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
|
||
|
|
|
||
|
|
Global $Row0 = " # # "
|
||
|
|
Global $Row1 = " # # # ## ## ### ### # # # # # # # # # # # # "
|
||
|
|
Global $Row2 = " # #### #### #### ##### ##### ### ## ####### ######## ##### ## ## ## ### ### #### ### #### #### ##### ## #### ### # # ## ## ## ## ##### ## ## ### ## # # ## ### ### # ### ### # ##### ### ##### ### ### # ### # # #### # # # # # # # # # # # # # # # ### # ## # # # # "
|
||
|
|
Global $Row3 = " # # # # # # # # # # # # # # # # # # # # ## ## # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # ## # # # # ## # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # "
|
||
|
|
Global $Row4 = " ## # # # # # # # # # # # # # # # # # ## ## ## # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # ## ####### # # ## # # # # # ##### # # # # # # # # # # # # # # # "
|
||
|
|
Global $Row5 = " # # ### # # # ### ### # #### # # ## # ## ## ## # # # ### # # ### ## # # # # # ### # # # ## ### ### ### ## #### #### ### ## ## # ### # #### #### ## #### ### ## ## #### ### ## ## ### ### # # ## ## ### ## #### # # # # ## # # #### #### # ### # # # # # # # # ## # # ### # # ##### ##### # # # # # # # # # # #### # "
|
||
|
|
Global $Row6 = " # # # # # # # # # # # # ### # # # # # # # # # # # ## # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # ## # # # # # # # # # # # # # # # # # # # # # # # # # # # #### # # # # # # ## # # ### # # # # # # # # # # # # # # # # "
|
||
|
|
Global $Row7 = " #### # # # # # # # # # # # # # # # # # # # # ## # # # ### # # # # # # # ## # # # # # # ### # # # # # #### # ## # # # # ### # # # # # # # # # # # # # ## # # # # # ### # # # # # # # # # #### # # # # # # # # # ### ###### # # ## ## # # # # ##### # # # # # # # # # # # # # # "
|
||
|
|
Global $Row8 = " # # # # # # # # # # # # # # # # # # # # ## # # # # # # # # ## # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # ## # # # # ## # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # "
|
||
|
|
Global $Row9 = "## ###### ### #### ##### ### ## ## ####### # # ### ######### # # ### # ### ### ### ### ###### ### ## # # # ## ## ### ##### #### ### ### #### ### #### #### ### ## ### # ### ####### # # # ### ## ## ### ### ### #### ## #### # # # ## ## # #### ### ### ##### ### ## ### ### # ### ### # #### # # #### # # # # # # # # # # # # # # # # # ## ## # "
|
||
|
|
Global $Row10 = " ### ## # # # # # # # # # ## ## ### ### # # # # "
|
||
|
|
Global $Row11 = " ### ### ### ### ## ###### # # "
|
||
|
|
|
||
|
|
;Global $Row0 = " "
|
||
|
|
;Global $Row1 = " # # ### # ## ## # ### # # ### # ### # # # # ## ## ### ### # # # # ## # ### # "
|
||
|
|
;Global $Row2 = " # #### ### #### #### #### #### # # ##### #### # # # # # # # #### #### ### ### #### ##### # # # ## ## # # # ##### # # # # # # # ### ## ### ### ## #### ### ##### ### ### # # ## # # ### # # # # # # # # # # # # # # # # ## # # # # # "
|
||
|
|
;Global $Row3 = " # # # # ## # ## # # # # # # # # # # # # ## # ## ## # ### # # # # # # # # ## # # # # # # ### #### ### #### ### # ######### ### #### # # # ##### #### ### #### #### #### ### ##### # # # ## ### ## # # #### # # # # # # # # # # ## # # # # # # # # # # # # #### ### # # # # # # # ## ## # # # # # # # # # # # # # "
|
||
|
|
;Global $Row4 = " # # # # # # # # # # # # # # # # # # ## # ## # # # # ## # # # # # # # # ## # ## # # # # ## # ## # # # ###### # # # # # # # # # # # # # # # # ## # # # # # # # # # # ## # # # # # # # # ## # # # # # # # # ## # # # # # # ####### # # # # # # # # # # # # # ## ## # # # # # # # ## # "
|
||
|
|
;Global $Row5 = " # # #### # # # #### #### # ## #### # # ## # # ## # ## # # # #### # # ### ### # # # # # # ## # ## # # #### # # # # # ##### # # # # # # # ## # # # # # # # # # # # # # ## # # # # ## # # ## # # # # # # # # ## # # ### #### # ### #### # # ## # # # ### # # # # ##### ####### ## # # # # # ## # ### # ### # # "
|
||
|
|
;Global $Row6 = "##### # # # # # # # # # # # # # # # # # # # ## # # # # # # # # # # # # # #### ## # # # # # # # # # # # #### # # # # ## # # # # # # # # # # # # # ## # # # # # # ### ## # # # ## # # # # ###### # # # # # ## # # # ## ####### # # # ### # # ### # # # # # # # # # # # ### # ## # "
|
||
|
|
;Global $Row7 = "# # # # ## # ## # # ## # # # # # # # # # # # ## ## ## # # ## # # # # # # # # # ## # # # # # ## # # # # ## ## # # # # # # # # # # # # # # # # # # # ## # # # # # # # ## ## # # ## # # # # # # # # # # # # # # # ### # # # # # # # # # ##### # # # # # ## ## # # # ## ## # # # # "
|
||
|
|
;Global $Row8 = "# # #### ### #### #### # #### # # ##### ### # # #### # # # # #### # ### # # #### # ### # # # ## ## # #### #### #### ### ## # #### # ##### # # #### # # # #### # # # # # ### #### ## # # ### ### #### # # # ## ## # #### ### ##### ##### ### # ### ### # ### ### # # # # #### # ### # # # # # # ## ## # # # ## ## # # ##### # "
|
||
|
|
;Global $Row9 = " # # # # # # # # # # # # # # # ## # ## # # "
|
||
|
|
;Global $Row10 = " ## #### ### # # ### #### # # ###### ## ## ### ### ## ## # "
|
||
|
|
;Global $Row11 = " "
|
||
|
|
|
||
|
|
Func _Big_CHR($String, $Ins = "#")
|
||
|
|
If @NumParams < 1 Then
|
||
|
|
Return 0
|
||
|
|
ElseIf @NumParams = 1 Then
|
||
|
|
Local $InsX = "#"
|
||
|
|
Else
|
||
|
|
Local $InsX = $Ins
|
||
|
|
$InsX = StringLeft($InsX, 1)
|
||
|
|
EndIf
|
||
|
|
|
||
|
|
Local $SrcString = $String
|
||
|
|
Local $SrcStringLenth = StringLen($SrcString)
|
||
|
|
|
||
|
|
Local $Big_Type_Str0
|
||
|
|
Local $Big_Type_Str1
|
||
|
|
Local $Big_Type_Str2
|
||
|
|
Local $Big_Type_Str3
|
||
|
|
Local $Big_Type_Str4
|
||
|
|
Local $Big_Type_Str5
|
||
|
|
Local $Big_Type_Str6
|
||
|
|
Local $Big_Type_Str7
|
||
|
|
Local $Big_Type_Str8
|
||
|
|
Local $Big_Type_Str9
|
||
|
|
Local $Big_Type_Str10
|
||
|
|
Local $Big_Type_Str11
|
||
|
|
|
||
|
|
For $j = 1 To $SrcStringLenth Step 1
|
||
|
|
Local $Src_Head = StringLeft($SrcString, 1)
|
||
|
|
$SrcString = StringTrimLeft($SrcString, 1)
|
||
|
|
Local $Big_Type_Num = _SringNum($Src_Head)
|
||
|
|
If $Big_Type_Num = 0 Then
|
||
|
|
ConsoleWrite(@CRLF & "Error: Character(s) Not Supported." & @CRLF)
|
||
|
|
Return 1
|
||
|
|
EndIf
|
||
|
|
|
||
|
|
Local $Big_Type_Pos
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str0 &= StringMid($Row0, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str1 &= StringMid($Row1, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str2 &= StringMid($Row2, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str3 &= StringMid($Row3, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str4 &= StringMid($Row4, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str5 &= StringMid($Row5, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str6 &= StringMid($Row6, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str7 &= StringMid($Row7, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str8 &= StringMid($Row8, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str9 &= StringMid($Row9, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str10 &= StringMid($Row10, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
$Big_Type_Pos = ($Big_Type_Num-1)*6
|
||
|
|
For $k = 1 To 6 Step 1
|
||
|
|
$Big_Type_Pos += 1
|
||
|
|
$Big_Type_Str11 &= StringMid($Row11, $Big_Type_Pos, 1)
|
||
|
|
Next
|
||
|
|
|
||
|
|
Next
|
||
|
|
|
||
|
|
Local $Big_Type_Str = $Big_Type_Str0 & @CRLF _
|
||
|
|
& $Big_Type_Str1 & @CRLF _
|
||
|
|
& $Big_Type_Str2 & @CRLF _
|
||
|
|
& $Big_Type_Str3 & @CRLF _
|
||
|
|
& $Big_Type_Str4 & @CRLF _
|
||
|
|
& $Big_Type_Str5 & @CRLF _
|
||
|
|
& $Big_Type_Str6 & @CRLF _
|
||
|
|
& $Big_Type_Str7 & @CRLF _
|
||
|
|
& $Big_Type_Str8 & @CRLF _
|
||
|
|
& $Big_Type_Str9 & @CRLF _
|
||
|
|
& $Big_Type_Str10 & @CRLF _
|
||
|
|
& $Big_Type_Str11 & @CRLF
|
||
|
|
$Big_Type_Str = StringReplace($Big_Type_Str, "#", $InsX)
|
||
|
|
ConsoleWrite($Big_Type_Str)
|
||
|
|
|
||
|
|
EndFunc
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
Func _SringNum($String)
|
||
|
|
Local $Big_Type_String = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
|
||
|
|
Local $Big_Type_Num = _SringNumPlus($String)
|
||
|
|
If $Big_Type_Num = 0 Then
|
||
|
|
$Big_Type_Num = StringInStr($Big_Type_String, $String, 1)
|
||
|
|
If $Big_Type_Num = 0 Then
|
||
|
|
Return 0
|
||
|
|
Else
|
||
|
|
Return $Big_Type_Num
|
||
|
|
EndIf
|
||
|
|
Else
|
||
|
|
Return $Big_Type_Num
|
||
|
|
EndIf
|
||
|
|
EndFunc
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
Func _SringNumPlus($String)
|
||
|
|
Local $Big_Type_Num = 0
|
||
|
|
;Switch $String
|
||
|
|
If $String == "!" Then $Big_Type_Num = 63
|
||
|
|
If $String == "@" Then $Big_Type_Num = 64
|
||
|
|
If $String == "#" Then $Big_Type_Num = 65
|
||
|
|
If $String == "$" Then $Big_Type_Num = 66
|
||
|
|
If $String == "%" Then $Big_Type_Num = 67
|
||
|
|
If $String == "*" Then $Big_Type_Num = 68
|
||
|
|
If $String == "(" Then $Big_Type_Num = 69
|
||
|
|
If $String == ")" Then $Big_Type_Num = 70
|
||
|
|
If $String == "-" Then $Big_Type_Num = 71
|
||
|
|
If $String == "_" Then $Big_Type_Num = 72
|
||
|
|
If $String == "=" Then $Big_Type_Num = 73
|
||
|
|
If $String == "+" Then $Big_Type_Num = 74
|
||
|
|
If $String == "{" Then $Big_Type_Num = 75
|
||
|
|
If $String == "}" Then $Big_Type_Num = 76
|
||
|
|
If $String == "[" Then $Big_Type_Num = 77
|
||
|
|
If $String == "]" Then $Big_Type_Num = 78
|
||
|
|
If $String == ":" Then $Big_Type_Num = 79
|
||
|
|
If $String == ";" Then $Big_Type_Num = 80
|
||
|
|
If $String == '"' Then $Big_Type_Num = 81
|
||
|
|
If $String == "'" Then $Big_Type_Num = 82
|
||
|
|
If $String == "\" Then $Big_Type_Num = 83
|
||
|
|
If $String == "<" Then $Big_Type_Num = 84
|
||
|
|
If $String == ">" Then $Big_Type_Num = 85
|
||
|
|
If $String == "," Then $Big_Type_Num = 86
|
||
|
|
If $String == "." Then $Big_Type_Num = 87
|
||
|
|
If $String == "?" Then $Big_Type_Num = 88
|
||
|
|
If $String == "/" Then $Big_Type_Num = 89
|
||
|
|
If $String == "~" Then $Big_Type_Num = 90
|
||
|
|
If $String == "^" Then $Big_Type_Num = 91
|
||
|
|
If $String == "&" Then $Big_Type_Num = 92
|
||
|
|
If $String == "|" Then $Big_Type_Num = 93
|
||
|
|
If $String == " " Then $Big_Type_Num = 94
|
||
|
|
Return $Big_Type_Num
|
||
|
|
EndFunc
|
||
|
|
|
||
|
|
|
||
|
|
Func _Big_Char()
|
||
|
|
Local $Tips = @CRLF & "CMD:" & @TAB & "/CHR String [Instead=#]" & @CRLF _
|
||
|
|
& "Usage:" & @TAB & "Print a string with big font by a specified character." & @CRLF & @CRLF
|
||
|
|
If $CMDLINE[0] < 2 Then
|
||
|
|
ConsoleWrite($Tips)
|
||
|
|
Exit 0
|
||
|
|
ElseIf $CMDLINE[0] = 2 Then
|
||
|
|
Local $String = $CMDLINE[2]
|
||
|
|
_Big_CHR($String, "#")
|
||
|
|
Exit 0
|
||
|
|
Else
|
||
|
|
Local $String = $CMDLINE[2]
|
||
|
|
Local $Ins = $CMDLINE[3]
|
||
|
|
_Big_CHR($String, $Ins)
|
||
|
|
Exit
|
||
|
|
EndIf
|
||
|
|
EndFunc
|