[VB.NET] Fake Api Generator [SOURCE]

Code:

apicoder.Append(vbNewLine + "Declare Unicode Function " & random_key(generator) & " Lib """ & random_key(generator) & ".dll" & """ (ByVal " & random_key(generator) & " As String,ByVal " & random_key(generator) & " As String(),ByVal " & random_key(generator) & " As char) As Byte()")

Code:

Declare Unicode Function plZtlcp Lib "AhhTGiE.dll" (ByVal QfNePTt As String,ByVal igbrpMh As String(),ByVal FMHSVmG As char) As Byte()

Declare Unicode Function IRdVBPi Lib "DUQFmtu.dll" (ByVal szldlOc As String,ByVal bqtvoNd As String(),ByVal TFnpLnr As char) As Byte()

Declare Unicode Function FPlzmVA Lib "TSuetgm.dll" (ByVal LmvqHFd As String,ByVal zUOLUoC As String(),ByVal VMTsoQR As char) As Byte()

Declare Unicode Function ASZhUCL Lib "MIOnsBf.dll" (ByVal rqGLNEe As String,ByVal smUDFcD As String(),ByVal HURBOoo As char) As Byte()

Declare Unicode Function OVlMgLi Lib "CcCNGZH.dll" (ByVal fObfcnE As String,ByVal RbdmIEh As String(),ByVal iPUpvnR As char) As Byte()

Declare Unicode Function NOMQDIQ Lib "hHGVNPH.dll" (ByVal gIonSHe As String,ByVal SLZiQQE As String(),ByVal EfoBdvc As char) As Byte()

Declare Unicode Function AReRPIc Lib "ZufqurD.dll" (ByVal TTqsCbG As String,ByVal lAgnFND As String(),ByVal iefdhSM As char) As Byte()

Declare Unicode Function SzZIbeg Lib "VvbEplZ.dll" (ByVal tlcpAhh As String,ByVal TGiEQfN As String(),ByVal ePTtigb As char) As Byte()

Declare Unicode Function rpMhFMH Lib "SVmGIRd.dll" (ByVal VBPiDUQ As String,ByVal Fmtuszl As String(),ByVal dlOcbqt As char) As Byte()

Declare Unicode Function voNdTFn Lib "pLnrFPl.dll" (ByVal zmVATSu As String,ByVal etgmLmv As String(),ByVal qHFdzUO As char) As Byte()