函数无法正常运行(自动)

Question

所以我试图从许多功能中发挥功能（我相信它称为递归，在此论坛上较早地阅读有关它的帖子）

当我尝试将许多事情变成1个大函数时，以后我可以打电话似乎不起作用，但是当我从func _hello（）中取出" func _hello（）"one_answers" endfunc"时最后，一切似乎都很好。有人可以向我解释一下吗？我知道由于"转换"功能，问题正在发生，但我似乎不明白为什么会发生这种情况。请帮助，这里使用的语言是自动

;;;****Program adds spaces *****
;;;***** the input variable here is $New*****
Global $final
Global $Hexadec
Func _hello()
$DataToBeDecrypted = "55fdaf fdafd"
$2space = $DataToBeDecrypted
$New = $2space
$AddingSpace = StringSplit($New, "")
$Final = ""
If Conversion($AddingSpace[0]) Then
For $Spacing = 1 to $AddingSpace[0] Step 2
    $Final = $Final & $AddingSpace[$Spacing] & $AddingSpace[$Spacing+1] & " "
Next
MsgBox(0, "Adding space to the message so it can be converted back to Hex",     $Final)
Else
MsgBox(0, "Result", "String does not contain an even number of characters.")
EndIf
Func Conversion($Hexadec)
Return Mod($Hexadec, 2) = 0
EndFunc
;;;***The final value is stored in the $final variable****

;***** Hexadecimals to ASCII***** 
;;***Input variable is $HexadecimaltoASCII2******
$HexadecimalToASCII2 =$final
$HexadecimalsToASCII = ChrH($HexadecimalToASCII2)
$Ascii2Hex = Sub($HexadecimalsToASCII)
$v5ar = Chr($HexadecimalsToASCII);char
MsgBox(0,"Hex to ASCII",$HexadecimalsToASCII)
Func ChrH($v8)
Local $v5=""
$A1 = StringSplit($v8, " ")
For $count = 1 To $A1[0]
    $v5 &= Chr(Dec($A1[$count]))
Next
Return $v5
endFunc

Func Sub($v8)
Local $v9=""
For $count = 1 To StringLen($v8)
    If StringLen(Hex(Asc(StringMid($v8, $count, 1)),2)) = 1 Then
        $v9 &=  "0" & Hex(Asc(StringMid($v8, $count, 1)))
    Else
        $v9 &=  Hex(Asc(StringMid($v8, $count, 1)),2)
    EndIf
    If $count <> StringLen($v8) Then $v9 &=  " "
Next
Return $v9
endFunc
 ;*****HEXADECIMAL to ASCII*****
EndFunc

Answer 1

似乎您从未调用Hello（）函数。要执行一个函数，您必须调用它。

尝试在文件顶部添加hello（），它应该可以工作。