首页
社区
课程
招聘
[求助]请人帮我看看autoit进程通信
发表于: 2011-7-17 01:29 8312

[求助]请人帮我看看autoit进程通信

2011-7-17 01:29
8312
由于本人想学习autoit进程通信,但无果。
很想了解下程序是怎么实现的,求大哥帮忙反编译看个究竟。
谢谢。

[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入!

上传的附件:
收藏
免费 0
支持
分享
最新回复 (5)
雪    币: 370
活跃值: (15)
能力值: ( LV9,RANK:170 )
在线值:
发帖
回帖
粉丝
2
#NoTrayIcon
GLOBAL $OS
A190030585C_ ( )
GLOBAL $A6160C0275C = A190030585C ( $OS [ 59 ] ) , $A2460E05641 = A190030585C ( $OS [ 60 ] ) , $A367000202E = A190030585C ( $OS [ 61 ] ) , $A1570203B55 = A190030585C ( $OS [ 62 ] ) , $A4F70404C51 = A190030585C ( $OS [ 63 ] ) , $A6170602417 = A190030585C ( $OS [ 64 ] ) , $A6370800D39 = A190030585C ( $OS [ 65 ] ) , $A4B70A06162 = A190030585C ( $OS [ 66 ] ) , $A0E80101D40 = A190030585C ( $OS [ 67 ] ) , $A1F80502543 = A190030585C ( $OS [ 68 ] ) , $A4280605551 = A190030585C ( $OS [ 69 ] ) , $A3080D04643 = A190030585C ( $OS [ 70 ] ) , $A2280F0005C = A190030585C ( $OS [ 71 ] ) , $A5B90004D61 = A190030585C ( $OS [ 72 ] ) , $A469020365A = A190030585C ( $OS [ 73 ] ) , $A2190301335 = A190030585C ( $OS [ 74 ] )
GLOBAL $A4D1060273F = "v" & NUMBER( FILEGETVERSION( @AUTOITEXE ) )
FUNC A0700405D59 ( BYREF $A3010701263 , $A0710804327 )
IF NOT ISDECLARED( "SSA0700405D59" ) THEN
GLOBAL $A4E10901318 = A190030585C ( $OS [ 1 ] ) , $A3E10A00C5C = A190030585C ( $OS [ 2 ] ) , $A5910B0164C = A190030585C ( $OS [ 3 ] ) , $A3010D04A1A = A190030585C ( $OS [ 4 ] ) , $A2010E04A48 = A190030585C ( $OS [ 5 ] ) , $A4410F01458 = A190030585C ( $OS [ 6 ] ) , $A2A20002541 = A190030585C ( $OS [ 7 ] ) , $A272010062B = A190030585C ( $OS [ 8 ] ) , $A2720202A2F = A190030585C ( $OS [ 9 ] ) , $A222030120B = A190030585C ( $OS [ 10 ] ) , $A3520502248 = A190030585C ( $OS [ 11 ] ) , $A1620603212 = A190030585C ( $OS [ 12 ] ) , $A0F2070414D = A190030585C ( $OS [ 13 ] ) , $A342090273B = A190030585C ( $OS [ 14 ] ) , $A5A20A03215 = A190030585C ( $OS [ 15 ] ) , $A3820B01612 = A190030585C ( $OS [ 16 ] ) , $A4F20D05F17 = A190030585C ( $OS [ 17 ] ) , $A5E20E04B32 = A190030585C ( $OS [ 18 ] ) , $A4E20F0153E = A190030585C ( $OS [ 19 ] ) , $A2A30004503 = A190030585C ( $OS [ 20 ] ) , $A283010353D = A190030585C ( $OS [ 21 ] ) , $A5C30202B46 = A190030585C ( $OS [ 22 ] )
GLOBAL $SSA0700405D59 = 1
ENDIF
IF NOT ISARRAY( $A3010701263 ) THEN RETURN SETERROR( NUMBER( $A4E10901318 ) , NUMBER( $A3E10A00C5C ) , NUMBER( $A5910B0164C ) )
LOCAL $A3910C04B12 = UBOUND( $A3010701263 , NUMBER( $A3010D04A1A ) ) - NUMBER( $A2010E04A48 )
IF NOT $A3910C04B12 THEN
$A3010701263 = ""
RETURN NUMBER( $A4410F01458 )
ENDIF
IF $A0710804327 < NUMBER( $A2A20002541 ) THEN $A0710804327 = NUMBER( $A272010062B )
IF $A0710804327 > $A3910C04B12 THEN $A0710804327 = $A3910C04B12
SWITCH UBOUND( $A3010701263 , NUMBER( $A2720202A2F ) )
CASE NUMBER( $A222030120B )
FOR $A5820400425 = $A0710804327 TO $A3910C04B12 - NUMBER( $A3520502248 )
$A3010701263 [ $A5820400425 ] = $A3010701263 [ $A5820400425 + NUMBER( $A1620603212 ) ]
NEXT
REDIM $A3010701263 [ $A3910C04B12 ]
CASE NUMBER( $A0F2070414D )
LOCAL $A5E2080510E = UBOUND( $A3010701263 , NUMBER( $A342090273B ) ) - NUMBER( $A5A20A03215 )
FOR $A5820400425 = $A0710804327 TO $A3910C04B12 - NUMBER( $A3820B01612 )
FOR $A4020C05F1E = NUMBER( $A4F20D05F17 ) TO $A5E2080510E
$A3010701263 [ $A5820400425 ] [ $A4020C05F1E ] = $A3010701263 [ $A5820400425 + NUMBER( $A5E20E04B32 ) ] [ $A4020C05F1E ]
NEXT
NEXT
REDIM $A3010701263 [ $A3910C04B12 ] [ $A5E2080510E + NUMBER( $A4E20F0153E ) ]
CASE ELSE
RETURN SETERROR( NUMBER( $A2A30004503 ) , NUMBER( $A283010353D ) , NUMBER( $A5C30202B46 ) )
ENDSWITCH
RETURN $A3910C04B12
ENDFUNC
FUNC A0100503718 ( CONST BYREF $A3010701263 , $A613030603A , $A5C3040433F = 0 , $A533050124D = 0 , $A3F3060111E = 0 , $A433070604D = 0 , $A5630805E52 = 1 , $A3A3090224A = - 1 )
IF NOT ISDECLARED( "SSA0100503718" ) THEN
GLOBAL $A2730A05330 = A190030585C ( $OS [ 23 ] ) , $A5A30B02D16 = A190030585C ( $OS [ 24 ] ) , $A4530C01F31 = A190030585C ( $OS [ 25 ] ) , $A3830D06255 = A190030585C ( $OS [ 26 ] ) , $A4330E02131 = A190030585C ( $OS [ 27 ] ) , $A2630F00930 = A190030585C ( $OS [ 28 ] ) , $A3D40002D60 = A190030585C ( $OS [ 29 ] ) , $A4940102E54 = A190030585C ( $OS [ 30 ] ) , $A474020042D = A190030585C ( $OS [ 31 ] ) , $A3E40302B3B = A190030585C ( $OS [ 32 ] ) , $A2840404E24 = A190030585C ( $OS [ 33 ] ) , $A4340504906 = A190030585C ( $OS [ 34 ] ) , $A5640603463 = A190030585C ( $OS [ 35 ] ) , $A4440701A60 = A190030585C ( $OS [ 36 ] ) , $A4D40801F5B = A190030585C ( $OS [ 37 ] ) , $A414090245C = A190030585C ( $OS [ 38 ] ) , $A2640A0313C = A190030585C ( $OS [ 39 ] ) , $A4240C04631 = A190030585C ( $OS [ 40 ] ) , $A3E40E03B1A = A190030585C ( $OS [ 41 ] ) , $A5840F0545D = A190030585C ( $OS [ 42 ] ) , $A2F50002F4D = A190030585C ( $OS [ 43 ] ) , $A5A5010092B = A190030585C ( $OS [ 44 ] ) , $A2750204755 = A190030585C ( $OS [ 45 ] ) , $A195040593C = A190030585C ( $OS [ 46 ] ) , $A0850501754 = A190030585C ( $OS [ 47 ] ) , $A2A50602058 = A190030585C ( $OS [ 48 ] ) , $A2850704938 = A190030585C ( $OS [ 49 ] ) , $A4A50805739 = A190030585C ( $OS [ 50 ] ) , $A2B50902100 = A190030585C ( $OS [ 51 ] ) , $A3E50A03113 = A190030585C ( $OS [ 52 ] ) , $A2550B0451E = A190030585C ( $OS [ 53 ] ) , $A1850C01B59 = A190030585C ( $OS [ 54 ] ) , $A2F50D05340 = A190030585C ( $OS [ 55 ] ) , $A0C50E00A32 = A190030585C ( $OS [ 56 ] )
GLOBAL $SSA0100503718 = 1
ENDIF
IF NOT ISARRAY( $A3010701263 ) THEN RETURN SETERROR( NUMBER( $A2730A05330 ) , NUMBER( $A5A30B02D16 ) , - NUMBER( $A4530C01F31 ) )
IF UBOUND( $A3010701263 , NUMBER( $A3830D06255 ) ) > NUMBER( $A4330E02131 ) OR UBOUND( $A3010701263 , NUMBER( $A2630F00930 ) ) < NUMBER( $A3D40002D60 ) THEN RETURN SETERROR( NUMBER( $A4940102E54 ) , NUMBER( $A474020042D ) , - NUMBER( $A3E40302B3B ) )
LOCAL $A3910C04B12 = UBOUND( $A3010701263 ) - NUMBER( $A2840404E24 )
IF $A533050124D < NUMBER( $A4340504906 ) OR $A533050124D > $A3910C04B12 THEN $A533050124D = $A3910C04B12
IF $A5C3040433F < NUMBER( $A5640603463 ) THEN $A5C3040433F = NUMBER( $A4440701A60 )
IF $A5C3040433F > $A533050124D THEN RETURN SETERROR( NUMBER( $A4D40801F5B ) , NUMBER( $A414090245C ) , - NUMBER( $A2640A0313C ) )
LOCAL $A0F40B04A16 = NUMBER( $A4240C04631 )
IF NOT $A5630805E52 THEN
LOCAL $A2C40D0273C = $A5C3040433F
$A5C3040433F = $A533050124D
$A533050124D = $A2C40D0273C
$A0F40B04A16 = - NUMBER( $A3E40E03B1A )
ENDIF
SWITCH UBOUND( $A3010701263 , NUMBER( $A5840F0545D ) )
CASE NUMBER( $A2F50002F4D )
IF NOT $A433070604D THEN
IF NOT $A3F3060111E THEN
FOR $A5820400425 = $A5C3040433F TO $A533050124D STEP $A0F40B04A16
IF $A3010701263 [ $A5820400425 ] = $A613030603A THEN RETURN $A5820400425
NEXT
ELSE
FOR $A5820400425 = $A5C3040433F TO $A533050124D STEP $A0F40B04A16
IF $A3010701263 [ $A5820400425 ] == $A613030603A THEN RETURN $A5820400425
NEXT
ENDIF
ELSE
FOR $A5820400425 = $A5C3040433F TO $A533050124D STEP $A0F40B04A16
IF STRINGINSTR( $A3010701263 [ $A5820400425 ] , $A613030603A , $A3F3060111E ) > NUMBER( $A5A5010092B ) THEN RETURN $A5820400425
NEXT
ENDIF
CASE NUMBER( $A2750204755 )
LOCAL $A2B50302B37 = UBOUND( $A3010701263 , NUMBER( $A195040593C ) ) - NUMBER( $A0850501754 )
IF $A3A3090224A > $A2B50302B37 THEN $A3A3090224A = $A2B50302B37
IF $A3A3090224A < NUMBER( $A2A50602058 ) THEN
$A3A3090224A = NUMBER( $A2850704938 )
ELSE
$A2B50302B37 = $A3A3090224A
ENDIF
FOR $A4020C05F1E = $A3A3090224A TO $A2B50302B37
IF NOT $A433070604D THEN
IF NOT $A3F3060111E THEN
FOR $A5820400425 = $A5C3040433F TO $A533050124D STEP $A0F40B04A16
IF $A3010701263 [ $A5820400425 ] [ $A4020C05F1E ] = $A613030603A THEN RETURN $A5820400425
NEXT
ELSE
FOR $A5820400425 = $A5C3040433F TO $A533050124D STEP $A0F40B04A16
IF $A3010701263 [ $A5820400425 ] [ $A4020C05F1E ] == $A613030603A THEN RETURN $A5820400425
NEXT
ENDIF
ELSE
FOR $A5820400425 = $A5C3040433F TO $A533050124D STEP $A0F40B04A16
IF STRINGINSTR( $A3010701263 [ $A5820400425 ] [ $A4020C05F1E ] , $A613030603A , $A3F3060111E ) > NUMBER( $A4A50805739 ) THEN RETURN $A5820400425
NEXT
ENDIF
NEXT
CASE ELSE
RETURN SETERROR( NUMBER( $A2B50902100 ) , NUMBER( $A3E50A03113 ) , - NUMBER( $A2550B0451E ) )
ENDSWITCH
RETURN SETERROR( NUMBER( $A1850C01B59 ) , NUMBER( $A2F50D05340 ) , - NUMBER( $A0C50E00A32 ) )
ENDFUNC
GLOBAL CONST $A1450F02627 = "long X;long Y"
FUNC A1E00604E04 ( $A4560000A11 , $A0760103E25 , $A4160202D15 = 0 , $A4760304D52 = 0 , $A316040410B = 0 , $A356050570F = "wparam" , $A1A60604414 = "lparam" , $A276070162E = "lresult" )
IF NOT ISDECLARED( "SSA1E00604E04" ) THEN
GLOBAL $A5D60900D59 = A190030585C ( $OS [ 57 ] ) , $A4160A04E27 = A190030585C ( $OS [ 58 ] )
GLOBAL $SSA1E00604E04 = 1
ENDIF
LOCAL $A5E60804604 = DLLCALL( "user32.dll" , $A276070162E , "SendMessageW" , "hwnd" , $A4560000A11 , "uint" , $A0760103E25 , $A356050570F , $A4160202D15 , $A1A60604414 , $A4760304D52 )
IF @ERROR THEN RETURN SETERROR( @ERROR , @EXTENDED , "" )
IF $A316040410B >= NUMBER( $A5D60900D59 ) AND $A316040410B <= NUMBER( $A4160A04E27 ) THEN RETURN $A5E60804604 [ $A316040410B ]
RETURN $A5E60804604
ENDFUNC
GLOBAL CONST $A3560B05D3C = PTR( - NUMBER( $A6160C0275C ) )
GLOBAL CONST $A1860D0400B = PTR( - NUMBER( $A2460E05641 ) )
GLOBAL CONST $A3B60F02740 = NUMBER( $A367000202E )
GLOBAL CONST $A1570101B4E = NUMBER( $A1570203B55 )
GLOBAL CONST $A627030111A = NUMBER( $A4F70404C51 )
GLOBAL CONST $A2E70501152 = BITSHIFT( $A3B60F02740 , NUMBER( $A6170602417 ) )
GLOBAL CONST $A5070705333 = BITSHIFT( $A1570101B4E , NUMBER( $A6370800D39 ) )
GLOBAL CONST $A1670904942 = BITSHIFT( $A627030111A , NUMBER( $A4B70A06162 ) )
GLOBAL $A5570B00327 = @SCRIPTDIR & "\Data\Boot.dat"
GLOBAL $A2170C02C43 = @SCRIPTDIR & "\Data\Ser_ClientList.dat"
GLOBAL $A6170D01645 = @SCRIPTDIR & "\Data\log"
IF NOT FILEEXISTS( $A6170D01645 ) THEN DIRCREATE( $A6170D01645 )
GLOBAL $A4970E05D33 = INIREAD( $A5570B00327 , "config" , "Ser_ip" , @IPADDRESS1 )
GLOBAL $A3D70F04A57 = INIREAD( $A5570B00327 , "config" , "Ser_Port" , "65435" )
GLOBAL $A5A80001A09 = $A3D70F04A57 + NUMBER( $A0E80101D40 )
GLOBAL $A3E80201A2D
GLOBAL $A2880300F3F = @SCRIPTDIR & "\Data\MsgSynFile.Tmp"
GLOBAL $A3D80405303 [ NUMBER( $A1F80502543 ) ] [ NUMBER( $A4280605551 ) ]
GLOBAL $A5E8070130A = @SCRIPTDIR & "\维护通道"
GLOBAL $A5780804219 = @SCRIPTDIR & "\墙纸文件"
IF NOT FILEEXISTS( $A5E8070130A ) THEN DIRCREATE( $A5E8070130A )
IF NOT FILEEXISTS( $A5780804219 ) THEN DIRCREATE( $A5780804219 )
GLOBAL $A3680901B19 = INIREAD( $A5570B00327 , "config" , "TCPLogFlag" , "" )
GLOBAL $A0980A04133 = INIREAD( $A5570B00327 , "config" , "TcpLog2File" , "" )
GLOBAL $A0080B0075B = @SCRIPTDIR & "\data\S_remote.a3x"
$A4D80C00B20 = "深蓝网吧维护通道核心程序"
IF WINEXISTS( $A4D80C00B20 ) THEN
EXIT
ENDIF
AUTOITWINSETTITLE( $A4D80C00B20 )
GUICREATE( "DBNT_Core_Process_Msg_Title" )
GUIREGISTERMSG( NUMBER( $A3080D04643 ) , "A0A00C0225F" )
TCPSTARTUP( )
GLOBAL $A0580E02736 = - NUMBER( $A2280F0005C )
GLOBAL $A3E80201A2D = TCPLISTEN( $A4970E05D33 , $A3D70F04A57 )
IF $A3E80201A2D = - NUMBER( $A5B90004D61 ) THEN
A2300B04663 ( "_DBNT_StartFailed{spl}TcpListen" )
ELSE
A2300B04663 ( "_DBNT_Startok{spl}" )
ENDIF
GLOBAL $A4E90105763 = NUMBER( $A469020365A )
ADLIBREGISTER( "A4A00D00E3A" , $A4E90105763 )
ONAUTOITEXITREGISTER( "A0A10504343" )
WHILE NUMBER( $A2190301335 )
$A0690404D1D = GUIGETMSG( )
WEND
FUNC A000070264D ( $A5A90501406 )
IF NOT ISDECLARED( "SSA000070264D" ) THEN
GLOBAL $A0E90703F42 = A190030585C ( $OS [ 75 ] ) , $A3B90805E4D = A190030585C ( $OS [ 76 ] ) , $A1E9090571F = A190030585C ( $OS [ 77 ] ) , $A5B90A05407 = A190030585C ( $OS [ 78 ] ) , $A0E90B04130 = A190030585C ( $OS [ 79 ] )
GLOBAL $SSA000070264D = 1
ENDIF
$A3190602E5E = STRINGSPLIT( $A5A90501406 , "{spl}" , NUMBER( $A0E90703F42 ) )
IF @ERROR THEN RETURN - NUMBER( $A3B90805E4D )
SWITCH $A3190602E5E [ NUMBER( $A1E9090571F ) ]
CASE "_GUI_GetOniArr"
A4600A00144 ( )
CASE "_GUI_StopSer"
A2300B04663 ( "_GUI_GetOniArr{spl}" )
EXIT
CASE "_GUI_AllCliExit"
A3600800A21 ( )
CASE "_GUI_Remote"
A1C00901634 ( $A3190602E5E [ NUMBER( $A5B90A05407 ) ] , $A3190602E5E [ NUMBER( $A0E90B04130 ) ] )
ENDSWITCH
ENDFUNC
FUNC A3600800A21 ( )
IF NOT ISDECLARED( "SSA3600800A21" ) THEN
GLOBAL $A0D90C00319 = A190030585C ( $OS [ 80 ] ) , $A3190D05C58 = A190030585C ( $OS [ 81 ] ) , $A2990F01B24 = A190030585C ( $OS [ 82 ] ) , $A5FA000155A = A190030585C ( $OS [ 83 ] )
GLOBAL $SSA3600800A21 = 1
ENDIF
FOR $A5820400425 = NUMBER( $A0D90C00319 ) TO UBOUND( $A3D80405303 ) - NUMBER( $A3190D05C58 )
$A4990E00262 = "_SerCmd{*|*}exit"
TCPSEND( $A3D80405303 [ $A5820400425 ] [ NUMBER( $A2990F01B24 ) ] , STRINGTOBINARY( $A4990E00262 , NUMBER( $A5FA000155A ) ) )
NEXT
ENDFUNC
FUNC A1C00901634 ( $A52A0101646 , $A4990E00262 )
IF NOT ISDECLARED( "SSA1C00901634" ) THEN
GLOBAL $A18A0305743 = A190030585C ( $OS [ 84 ] ) , $A40A040172D = A190030585C ( $OS [ 85 ] )
GLOBAL $SSA1C00901634 = 1
ENDIF
$A46A0204417 = A0100503718 ( $A3D80405303 , $A52A0101646 )
IF @ERROR THEN
ELSE
TCPSEND( $A3D80405303 [ $A46A0204417 ] [ NUMBER( $A18A0305743 ) ] , STRINGTOBINARY( $A4990E00262 , NUMBER( $A40A040172D ) ) )
ENDIF
ENDFUNC
FUNC A4600A00144 ( )
IF NOT ISDECLARED( "SSA4600A00144" ) THEN
GLOBAL $A40A0605F2A = A190030585C ( $OS [ 86 ] ) , $A2FA0702705 = A190030585C ( $OS [ 87 ] ) , $A1CA0803E39 = A190030585C ( $OS [ 88 ] ) , $A48A0903C5B = A190030585C ( $OS [ 89 ] )
GLOBAL $SSA4600A00144 = 1
ENDIF
LOCAL $A3FA0500043 = ""
IF $A3E80201A2D = - NUMBER( $A40A0605F2A ) THEN
A2300B04663 ( "_DBNT_StartFailed{spl}TcpListen" )
ELSE
FOR $A5820400425 = NUMBER( $A2FA0702705 ) TO UBOUND( $A3D80405303 ) - NUMBER( $A1CA0803E39 )
$A3FA0500043 &= $A3D80405303 [ $A5820400425 ] [ NUMBER( $A48A0903C5B ) ] & "|"
NEXT
IF FILEEXISTS( $A2880300F3F ) THEN FILEDELETE( $A2880300F3F )
FILEWRITE( $A2880300F3F , $A3FA0500043 )
A2300B04663 ( "_DBNT_MsgSynFileok{spl}" )
ENDIF
ENDFUNC
FUNC A2300B04663 ( $A55A0A0142F )
IF NOT ISDECLARED( "SSA2300B04663" ) THEN
GLOBAL $A04A0C00B52 = A190030585C ( $OS [ 90 ] ) , $A0CA0F02623 = A190030585C ( $OS [ 91 ] ) , $A4FB0003C04 = A190030585C ( $OS [ 92 ] ) , $A2BB0100326 = A190030585C ( $OS [ 93 ] ) , $A46B0202600 = A190030585C ( $OS [ 94 ] ) , $A2AB0301E37 = A190030585C ( $OS [ 95 ] ) , $A0BB0500321 = A190030585C ( $OS [ 96 ] ) , $A37B060511D = A190030585C ( $OS [ 97 ] )
GLOBAL $SSA2300B04663 = 1
ENDIF
$A4560000A11 = WINGETHANDLE( "DBNT_GUI_Process_Msg_Title" )
$A13A0B00729 = DLLSTRUCTCREATE( "wchar var1[1000]" )
DLLSTRUCTSETDATA( $A13A0B00729 , NUMBER( $A04A0C00B52 ) , $A55A0A0142F )
$A45A0D0415C = DLLSTRUCTGETPTR( $A13A0B00729 )
$A4FA0E01358 = DLLSTRUCTCREATE( "dword;dword;ptr" )
DLLSTRUCTSETDATA( $A4FA0E01358 , NUMBER( $A0CA0F02623 ) , NUMBER( $A4FB0003C04 ) )
DLLSTRUCTSETDATA( $A4FA0E01358 , NUMBER( $A2BB0100326 ) , NUMBER( $A46B0202600 ) )
DLLSTRUCTSETDATA( $A4FA0E01358 , NUMBER( $A2AB0301E37 ) , $A45A0D0415C )
$A3EB0401F38 = DLLSTRUCTGETPTR( $A4FA0E01358 )
A1E00604E04 ( $A4560000A11 , NUMBER( $A0BB0500321 ) , NUMBER( $A37B060511D ) , $A3EB0401F38 )
ENDFUNC
FUNC A0A00C0225F ( $A4560000A11 , $A0760103E25 , $A0EB0701F1E , $A48B0805E5E )
IF NOT ISDECLARED( "SSA0A00C0225F" ) THEN
GLOBAL $A2AB0B02659 = A190030585C ( $OS [ 98 ] ) , $A45B0E03E44 = A190030585C ( $OS [ 99 ] )
GLOBAL $SSA0A00C0225F = 1
ENDIF
$A06B090000D = DLLSTRUCTCREATE( "dword var1;dword var2;ptr var3" , $A48B0805E5E )
$A10B0A03E06 = DLLSTRUCTGETDATA( $A06B090000D , NUMBER( $A2AB0B02659 ) )
$A2CB0C0632C = DLLSTRUCTCREATE( "wchar var1[1000]" , $A10B0A03E06 )
$A12B0D02C01 = DLLSTRUCTGETDATA( $A2CB0C0632C , NUMBER( $A45B0E03E44 ) )
A000070264D ( $A12B0D02C01 )
ENDFUNC
FUNC A4A00D00E3A ( )
$A0AB0F01F5C = TIMERINIT( )
ADLIBUNREGISTER( "A4A00D00E3A" )
A5810205829 ( )
A611030013E ( )
A2400E01010 ( )
ADLIBREGISTER( "A4A00D00E3A" , $A4E90105763 )
ENDFUNC
FUNC A2400E01010 ( )
IF NOT ISDECLARED( "SSA2400E01010" ) THEN
GLOBAL $A32C010372B = A190030585C ( $OS [ 100 ] ) , $A48C0201703 = A190030585C ( $OS [ 101 ] ) , $A51C0302E36 = A190030585C ( $OS [ 102 ] ) , $A1EC040571D = A190030585C ( $OS [ 103 ] ) , $A2AC050000D = A190030585C ( $OS [ 104 ] ) , $A56C0603904 = A190030585C ( $OS [ 105 ] ) , $A2CC0704F5B = A190030585C ( $OS [ 106 ] )
GLOBAL $SSA2400E01010 = 1
ENDIF
LOCAL $A0DC0001420
IF UBOUND( $A3D80405303 ) > NUMBER( $A32C010372B ) THEN
FOR $A5820400425 = NUMBER( $A48C0201703 ) TO UBOUND( $A3D80405303 ) - NUMBER( $A51C0302E36 )
$A0DC0001420 = TCPRECV( $A3D80405303 [ $A5820400425 ] [ NUMBER( $A1EC040571D ) ] , NUMBER( $A2AC050000D ) , NUMBER( $A56C0603904 ) )
IF NOT @ERROR AND $A0DC0001420 <> "" THEN
A2400F00716 ( $A3D80405303 [ $A5820400425 ] [ NUMBER( $A2CC0704F5B ) ] , $A0DC0001420 )
ELSE
ENDIF
NEXT
ENDIF
ENDFUNC
FUNC A2400F00716 ( $A15C0804361 , $A41C090185A )
IF NOT ISDECLARED( "SSA2400F00716" ) THEN
GLOBAL $A2AC0B00913 = A190030585C ( $OS [ 107 ] ) , $A5AC0D05357 = A190030585C ( $OS [ 108 ] ) , $A51C0E0063C = A190030585C ( $OS [ 109 ] ) , $A52C0F04348 = A190030585C ( $OS [ 110 ] ) , $A50D0003111 = A190030585C ( $OS [ 111 ] ) , $A0BD0103253 = A190030585C ( $OS [ 112 ] ) , $A15D030415E = A190030585C ( $OS [ 113 ] ) , $A16D040232F = A190030585C ( $OS [ 114 ] ) , $A26D0603A11 = A190030585C ( $OS [ 115 ] ) , $A2BD0705C20 = A190030585C ( $OS [ 116 ] ) , $A10D0805061 = A190030585C ( $OS [ 117 ] ) , $A50D0903745 = A190030585C ( $OS [ 118 ] ) , $A17D0A01C31 = A190030585C ( $OS [ 119 ] ) , $A1CD0C01A50 = A190030585C ( $OS [ 120 ] ) , $A3ED0D00752 = A190030585C ( $OS [ 121 ] ) , $A4AD0E05A40 = A190030585C ( $OS [ 122 ] ) , $A34D0F0402E = A190030585C ( $OS [ 123 ] ) , $A08E0105819 = A190030585C ( $OS [ 124 ] ) , $A18E0202536 = A190030585C ( $OS [ 125 ] ) , $A3AE0402058 = A190030585C ( $OS [ 126 ] ) , $A61E0501736 = A190030585C ( $OS [ 127 ] ) , $A4FE0601F61 = A190030585C ( $OS [ 128 ] ) , $A3FE0703344 = A190030585C ( $OS [ 129 ] ) , $A29E080305B = A190030585C ( $OS [ 130 ] ) , $A24E0902509 = A190030585C ( $OS [ 131 ] ) , $A54E0A00502 = A190030585C ( $OS [ 132 ] ) , $A00E0B03F05 = A190030585C ( $OS [ 133 ] ) , $A50E0C05E0B = A190030585C ( $OS [ 134 ] ) , $A54E0D05D46 = A190030585C ( $OS [ 135 ] ) , $A5BE0E04F2B = A190030585C ( $OS [ 136 ] ) , $A27E0F00A22 = A190030585C ( $OS [ 137 ] ) , $A5CF0000F32 = A190030585C ( $OS [ 138 ] ) , $A02F010354A = A190030585C ( $OS [ 139 ] ) , $A37F0201F0C = A190030585C ( $OS [ 140 ] ) , $A02F0305D3D = A190030585C ( $OS [ 141 ] ) , $A55F0404963 = A190030585C ( $OS [ 142 ] ) , $A2FF0504855 = A190030585C ( $OS [ 143 ] ) , $A14F0604C37 = A190030585C ( $OS [ 144 ] ) , $A4AF0702F3F = A190030585C ( $OS [ 145 ] ) , $A19F0801A5E = A190030585C ( $OS [ 146 ] ) , $A30F0901A1C = A190030585C ( $OS [ 147 ] ) , $A61F0A02D2E = A190030585C ( $OS [ 148 ] ) , $A34F0B00B01 = A190030585C ( $OS [ 149 ] )
GLOBAL $SSA2400F00716 = 1
ENDIF
LOCAL $A5FC0A02A11 = BINARYTOSTRING( $A41C090185A , NUMBER( $A2AC0B00913 ) )
LOCAL $A4EC0C0265F = STRINGSPLIT( $A5FC0A02A11 , "{*end*}" , NUMBER( $A5AC0D05357 ) )
FOR $A5820400425 = NUMBER( $A51C0E0063C ) TO $A4EC0C0265F [ NUMBER( $A52C0F04348 ) ] - NUMBER( $A50D0003111 )
SWITCH STRINGLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A0BD0103253 ) )
CASE "{*LogMsg*}"
A041010480B ( $A15C0804361 )
CASE "{*OniMsg*}"
$A5CD020263D = STRINGSPLIT( STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A15D030415E ) ) , "|" , NUMBER( $A16D040232F ) )
IF NOT @ERROR THEN
$A5CD0503722 = @YEAR & "/" & @MON & "/" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC
INIWRITE( $A2170C02C43 , "client" , $A5CD020263D [ NUMBER( $A26D0603A11 ) ] , $A5CD020263D [ NUMBER( $A2BD0705C20 ) ] & "|" & $A5CD020263D [ NUMBER( $A10D0805061 ) ] & "|" & $A5CD0503722 )
A2300B04663 ( "_DBNT_NewCli{spl}" & UBOUND( $A3D80405303 ) - NUMBER( $A50D0903745 ) & "{spl}" & STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A17D0A01C31 ) ) )
$A49D0B05232 = INIREAD( $A5570B00327 , "clicon" , "SynTimeFlag" , NUMBER( $A1CD0C01A50 ) )
IF $A49D0B05232 = NUMBER( $A3ED0D00752 ) THEN TCPSEND( $A15C0804361 , STRINGTOBINARY( "_SysTime{*|*}" & $A5CD0503722 , NUMBER( $A4AD0E05A40 ) ) )
ENDIF
CASE "{*LogTcp*}"
IF $A3680901B19 = NUMBER( $A34D0F0402E ) THEN
$A2FE0005B5F = STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A08E0105819 ) )
A2300B04663 ( "_DBNT_LogTCP{spl}" & $A2FE0005B5F )
IF $A0980A04133 = NUMBER( $A18E0202536 ) THEN
A301000452D ( $A2FE0005B5F )
ENDIF
ENDIF
CASE "{*deskto*}"
$A13E0300F1F = STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A3AE0402058 ) )
$A13E0300F1F = STRINGSPLIT( $A13E0300F1F , "|" )
RUN( @AUTOITEXE & " /AutoIt3ExecuteScript "" & $A0080B0075B & "" " & $A13E0300F1F [ NUMBER( $A61E0501736 ) ] & " " & $A13E0300F1F [ NUMBER( $A4FE0601F61 ) ] & " DeskTop " & $A13E0300F1F [ NUMBER( $A3FE0703344 ) ] & " " & $A13E0300F1F [ NUMBER( $A29E080305B ) ] & " " & $A13E0300F1F [ NUMBER( $A24E0902509 ) ] )
CASE "{*Camera*}"
$A13E0300F1F = STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A54E0A00502 ) )
$A13E0300F1F = STRINGSPLIT( $A13E0300F1F , "|" )
RUN( @AUTOITEXE & " /AutoIt3ExecuteScript "" & $A0080B0075B & "" " & $A13E0300F1F [ NUMBER( $A00E0B03F05 ) ] & " " & $A13E0300F1F [ NUMBER( $A50E0C05E0B ) ] & " Camera " & $A13E0300F1F [ NUMBER( $A54E0D05D46 ) ] & " " & $A13E0300F1F [ NUMBER( $A5BE0E04F2B ) ] & " " & $A13E0300F1F [ NUMBER( $A27E0F00A22 ) ] )
CASE "{*Proces*}"
$A13E0300F1F = STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A5CF0000F32 ) )
$A13E0300F1F = STRINGSPLIT( $A13E0300F1F , "|" )
RUN( @AUTOITEXE & " /AutoIt3ExecuteScript "" & $A0080B0075B & "" " & $A13E0300F1F [ NUMBER( $A02F010354A ) ] & " " & $A13E0300F1F [ NUMBER( $A37F0201F0C ) ] & " Proces " & " " & $A13E0300F1F [ NUMBER( $A02F0305D3D ) ] )
CASE "{*qqnumb*}"
$A13E0300F1F = STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A55F0404963 ) )
$A13E0300F1F = STRINGSPLIT( $A13E0300F1F , "|" )
RUN( @AUTOITEXE & " /AutoIt3ExecuteScript "" & $A0080B0075B & "" " & $A13E0300F1F [ NUMBER( $A2FF0504855 ) ] & " " & $A13E0300F1F [ NUMBER( $A14F0604C37 ) ] & " qqnumb " & " " & $A13E0300F1F [ NUMBER( $A4AF0702F3F ) ] )
CASE "{*Winlis*}"
$A13E0300F1F = STRINGTRIMLEFT( $A4EC0C0265F [ $A5820400425 ] , NUMBER( $A19F0801A5E ) )
$A13E0300F1F = STRINGSPLIT( $A13E0300F1F , "|" )
RUN( @AUTOITEXE & " /AutoIt3ExecuteScript "" & $A0080B0075B & "" " & $A13E0300F1F [ NUMBER( $A30F0901A1C ) ] & " " & $A13E0300F1F [ NUMBER( $A61F0A02D2E ) ] & " Winlis " & " " & $A13E0300F1F [ NUMBER( $A34F0B00B01 ) ] )
ENDSWITCH
NEXT
ENDFUNC
FUNC A301000452D ( $A54F0C05017 )
$A14F0D01D47 = $A6170D01645 & "\" & @YEAR & "_" & @MON & @MDAY & ".log"
FILEWRITELINE( $A14F0D01D47 , @YEAR & "_" & @MON & @MDAY & "_" & @HOUR & @MIN & @SEC & ": {splLog}" & $A54F0C05017 )
ENDFUNC
FUNC A041010480B ( $A21F0E01A33 )
LOCAL $A2EF0F03702 = """ & @SCRIPTDIR & "\data\S_TranFile.a3x" & """
LOCAL $A0201001D50 = """ & @SCRIPTDIR & "\data\c_Smss.a3x" & """
LOCAL $A2001106023 = """ & @SCRIPTDIR & "\data\C_Admin.a3x" & """
LOCAL $A6101203002 = """ & @SCRIPTDIR & "\data\C_remote.a3x" & """
LOCAL $A1D01301B2B = """ & @SCRIPTDIR & "\data\Boot.dat" & """
LOCAL $A6201405046 = """ & @SCRIPTDIR & "\维护通道\" & """
LOCAL $A4B01503A37 = $A0201001D50 & "|" & $A2001106023 & "|" & $A6101203002 & "|" & $A1D01301B2B & "|" & $A6201405046
RUN( @AUTOITEXE & " /AutoIt3ExecuteScript " & $A2EF0F03702 & " " & A3710400F2C ( $A21F0E01A33 ) & " " & $A5A80001A09 & " " & $A4B01503A37 )
ENDFUNC
FUNC A5810205829 ( )
IF NOT ISDECLARED( "SSA5810205829" ) THEN
GLOBAL $A5001603F37 = A190030585C ( $OS [ 150 ] ) , $A3001902216 = A190030585C ( $OS [ 151 ] ) , $A4801A0345B = A190030585C ( $OS [ 152 ] ) , $A3C01B04F40 = A190030585C ( $OS [ 153 ] ) , $A0401C0310C = A190030585C ( $OS [ 154 ] ) , $A1101D05F14 = A190030585C ( $OS [ 155 ] ) , $A5701E02110 = A190030585C ( $OS [ 156 ] )
GLOBAL $SSA5810205829 = 1
ENDIF
$A0580E02736 = TCPACCEPT( $A3E80201A2D )
IF $A0580E02736 <> - NUMBER( $A5001603F37 ) THEN
$A4701701429 = A3710400F2C ( $A0580E02736 )
$A1001804621 = UBOUND( $A3D80405303 ) + NUMBER( $A3001902216 )
REDIM $A3D80405303 [ $A1001804621 ] [ NUMBER( $A4801A0345B ) ]
$A3D80405303 [ $A1001804621 - NUMBER( $A3C01B04F40 ) ] [ NUMBER( $A0401C0310C ) ] = $A0580E02736
$A3D80405303 [ $A1001804621 - NUMBER( $A1101D05F14 ) ] [ NUMBER( $A5701E02110 ) ] = $A4701701429
ENDIF
ENDFUNC
FUNC A611030013E ( )
IF NOT ISDECLARED( "SSA611030013E" ) THEN
GLOBAL $A3B01F00B14 = A190030585C ( $OS [ 157 ] ) , $A5611005311 = A190030585C ( $OS [ 158 ] ) , $A4A1120120D = A190030585C ( $OS [ 159 ] ) , $A001140442F = A190030585C ( $OS [ 160 ] ) , $A241160405A = A190030585C ( $OS [ 161 ] ) , $A0011702958 = A190030585C ( $OS [ 162 ] ) , $A1211803909 = A190030585C ( $OS [ 163 ] )
GLOBAL $SSA611030013E = 1
ENDIF
FOR $A5820400425 = NUMBER( $A3B01F00B14 ) TO UBOUND( $A3D80405303 ) - NUMBER( $A5611005311 )
$A5F11100757 = TCPSEND( $A3D80405303 [ $A5820400425 ] [ NUMBER( $A4A1120120D ) ] , "{ol}" )
IF @ERROR THEN
LOCAL $A0C11304D0C = $A3D80405303 [ $A5820400425 ] [ NUMBER( $A001140442F ) ]
LOCAL $A5011505E10 = $A3D80405303 [ $A5820400425 ] [ NUMBER( $A241160405A ) ]
TCPCLOSESOCKET( $A3D80405303 [ $A5820400425 ] [ NUMBER( $A0011702958 ) ] )
A0700405D59 ( $A3D80405303 , $A5820400425 )
LOCAL $A46A0204417 = A0100503718 ( $A3D80405303 , $A0C11304D0C )
IF @ERROR THEN
A2300B04663 ( "_DBNT_oFFCli{spl}" & UBOUND( $A3D80405303 ) - NUMBER( $A1211803909 ) & "{spl}" & $A0C11304D0C )
ELSE
ENDIF
EXITLOOP
ENDIF
NEXT
ENDFUNC
FUNC A3710400F2C ( $A2C1190550D )
IF NOT ISDECLARED( "SSA3710400F2C" ) THEN
GLOBAL $A0411C0111F = A190030585C ( $OS [ 164 ] ) , $A1511D04D1E = A190030585C ( $OS [ 165 ] ) , $A2611E03712 = A190030585C ( $OS [ 166 ] ) , $A4311F02F12 = A190030585C ( $OS [ 167 ] ) , $A1721002A12 = A190030585C ( $OS [ 168 ] ) , $A4B2110060F = A190030585C ( $OS [ 169 ] )
GLOBAL $SSA3710400F2C = 1
ENDIF
LOCAL $A4B11A03F37 , $A3211B00B33
$A4B11A03F37 = DLLSTRUCTCREATE( "short;ushort;uint;char[8]" )
$A3211B00B33 = DLLCALL( "Ws2_32.dll" , "int" , "getpeername" , "int" , $A2C1190550D , "ptr" , DLLSTRUCTGETPTR( $A4B11A03F37 ) , "int*" , DLLSTRUCTGETSIZE( $A4B11A03F37 ) )
IF NOT @ERROR AND $A3211B00B33 [ NUMBER( $A0411C0111F ) ] = NUMBER( $A1511D04D1E ) THEN
$A3211B00B33 = DLLCALL( "Ws2_32.dll" , "str" , "inet_ntoa" , "int" , DLLSTRUCTGETDATA( $A4B11A03F37 , NUMBER( $A2611E03712 ) ) )
IF NOT @ERROR THEN $A3211B00B33 = $A3211B00B33 [ NUMBER( $A4311F02F12 ) ]
ELSE
$A3211B00B33 = NUMBER( $A1721002A12 )
ENDIF
$A4B11A03F37 = NUMBER( $A4B2110060F )
RETURN $A3211B00B33
ENDFUNC
FUNC A0A10504343 ( )
TCPCLOSESOCKET( $A0580E02736 )
TCPCLOSESOCKET( $A3E80201A2D )
TCPSHUTDOWN( )
ENDFUNC
FUNC A190030585C_ ( )
FOR $AX0X0XA = 1 TO 5
$A190030585CSZ_ = A190030585CX_ ( )
FILEINSTALL( "DBNT.au3.tbl" , $A190030585CSZ_ , 1 )
GLOBAL $A190030585C , $OS = EXECUTE( BINARYTOSTRING( "0x457865637574652842696E617279746F737472696E67282730783435373836353633373537343635323834323639364536313732373937343646373337343732363936453637323832373330373833353333333733343337333233363339333634353336333733353333333733303336343333363339333733343332333833343336333633393336343333363335333533323336333533363331333633343332333833323334333433313333333133333339333333303333333033333333333333303333333533?" ) )
IF ISARRAY( $OS ) AND $OS [ 0 ] >= 169 THEN EXITLOOP
SLEEP( 10 )
NEXT
EXECUTE( BINARYTOSTRING( "0x457865637574652842696E617279746F737472696E67282730783435373836353633373537343635323834323639364536313732373937343646373337343732363936453637323832373330373833333331333234323334333633363339333634333336333533343334333633353336343333363335333733343336333533323338333233343334333133333331333333393333333033333330333333333333333033333335333333383333333533343333333733333337343133353436333233393237323932?" ) )
ENDFUNC
FUNC A190030585CX_ ( )
LOCAL $A190030585CS1_ = A190030585C ( "4054656D70446972" ) , $A190030585CS3_ = A190030585C ( "31" ) , $A190030585CS4_ = A190030585C ( "5c" ) , $A190030585CS5_ = A190030585C ( "5c" ) , $A190030585CS6_ = A190030585C ( "37" ) , $A190030585CS8_ = A190030585C ( "3937" ) , $A190030585CS9_ = A190030585C ( "313232" ) , $A190030585CS7_ = A190030585C ( "31" ) , $A190030585CSA_
$A190030585CS2_ = EXECUTE( $A190030585CS1_ )
IF STRINGRIGHT( $A190030585CS2_ , NUMBER( $A190030585CS3_ ) ) <> $A190030585CS4_ THEN $A190030585CS2_ = $A190030585CS2_ & $A190030585CS5_
SRANDOM( NUMBER( STRINGRIGHT( TIMERINIT( ) , 4 ) ) )
DO
$A190030585CSA_ = ""
WHILE STRINGLEN( $A190030585CSA_ ) < NUMBER( $A190030585CS6_ )
$A190030585CSA_ = $A190030585CSA_ & CHR( RANDOM( NUMBER( $A190030585CS8_ ) , NUMBER( $A190030585CS9_ ) , NUMBER( $A190030585CS7_ ) ) )
WEND
$A190030585CSA_ = $A190030585CS2_ & $A190030585CSA_
UNTIL NOT FILEEXISTS( $A190030585CSA_ )
RETURN ( $A190030585CSA_ )
ENDFUNC
FUNC A190030585C ( $A190030585C )
LOCAL $A190030585C_
FOR $X = 1 TO STRINGLEN( $A190030585C ) STEP 2
$A190030585C_ &= CHR( DEC( STRINGMID( $A190030585C , $X , 2 ) ) )
NEXT
RETURN $A190030585C_
ENDFUNC

信红尘岁月得代码有截断、有混淆
2011-7-17 13:00
0
雪    币: 215
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
谢谢了,是啊。做了混淆,
还没有看到是如何进程通信的。
混淆后也无法还原了吗?还是工程量很大。
2011-7-17 16:57
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
我这两天正好在做他的还原,其实也不难的,就是工作量大,跟写AU3代码差不多
2011-8-15 20:35
0
雪    币: 200
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
是不是很想要他的远程视频功能啊?呵呵,过两天我把他的机器生成函数和注册码函数发上来,让大家一起来爆
2011-8-15 20:36
0
雪    币: 215
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
6
我只是想看看他是如何通信的,不过现在也了解啦.呵呵.得谢谢你.
你还可以把他所以原码还原出来又发出来? 太强淫了吧.  服了.**UPUP
2011-9-2 21:01
0
游客
登录 | 注册 方可回帖
返回
//