его, еще тики какие то считывает, таймер чтоли ,возможно есть ошибки, там один ксор недоделаный я закоментировал с ходу не пойму зачем он там, вот боюсь запустить не попортит ли мне жесткий диск, ктонить может на вскитку сказать на сколько это опасно? :)
format pe console
include 'win32ax.inc'
macro call1 f,p1{
mov ebx,p1
call f}
macro call2 f,p1,p2{
mov ecx,p2
call1 f,p1}
macro call3 f,p1,p2,p3{
mov edx,p3
call2 f,p1,p2}
.data
lead_time dd ?
handle_input dd ?
handle_output dd ?
byte_read_write dd ?
.code
string db 'cozahren.mu ',13,10,0
array_procs dd __strlen,_strlen,strlen,0
putdword:;ebx-handle,ecx-byte
mov eax,esp
mov esi,eax
sub esp,16
xchg eax,ecx
mov edi,10
@@:xor edx,edx
div edi
add dl,'0'
dec ecx
mov [ecx],dl
test eax,eax
jnz @b
sub esi,ecx
mov edx,esi
invoke WriteFile,ebx,ecx,edx,byte_read_write,0
add esp,16
ret
align 4
strlen:;ebx-array of char
mov eax,12
ret
align 4
_strlen:;ebx-array of char
clc
xor ecx,ecx
dec ecx
mov edi,ebx
xor al,al
repne scasb
not ecx
dec ecx
mov eax,ecx
ret
align 4
__strlen:;ebx-array of char
xor eax,eax
dec eax
@@:inc eax
cmp byte[ebx+eax],0
jne @b
ret
start:
invoke GetStdHandle,STD_INPUT_HANDLE
mov [handle_input],eax
invoke GetStdHandle,STD_OUTPUT_HANDLE
mov [handle_output],eax
mov ebp,array_procs
next_step:
call [GetTickCount]
mov [lead_time],eax
; xor ecx, ;?
@@:push ecx
mov ebx,string
call dword[ebp]
pop ecx
loop @b
push eax
call [GetTickCount]
sub eax,[lead_time]
mov ecx,1000
xor edx,edx
div ecx
push edx
call2 putdword,[handle_output],eax
invoke WriteFile,ebx,string+8,1,byte_read_write,0
pop ecx
call2 putdword,[handle_output],ecx
invoke WriteFile,ebx,string+11,1,byte_read_write,0
pop ecx
call2 putdword,[handle_output],ecx
invoke WriteFile,[handle_output],string+12,2,byte_read_write,0
add ebp,4
cmp dword[ebp],0
jne next_step
call [GetTickCount]
mov [lead_time],eax
invoke SetConsoleMode,[handle_input],0
invoke ReadFile,[handle_input],byte_read_write,1,byte_read_write,0
invoke ExitProcess,0
.end start
----------------------------------
ты нашел исходный код на асме. обычно к таким файлам делают приписку что он делает или в контексте общения автор говорит что эта за прога. просто так найти и скачать - а зачем?
Да в том то и дело что приписка была но она не объяснила что делает этот код, там автор жаловался на repne и scasb а скачал просто как пример работы с функциями winapi посмотреть обсудить разобрать так сказать!
http://govnokod.ru/27216
Осторожно! Теперь народ знает что ты умеешь пользоваться гуглом :)
И что ты не умеешь)
Если что я там его и взял :)
А зачем заменил строку "string"?
Так это рекламма стороннего ресурса, админ забанит тебя сейчас!
Или это транслит?)
да просто от балды :)
Остается только узнать, зойчем все это (включая вопрос о функциональности прожки))?
Это какая то теория заговора наверное!
А вообще ты напряжен, расслабся, тут люди собрались по интересам, обсуждают асмовые проги учатся задают вопросы это же чат по асму! Тут со всего инета код тянут так же разбирают кому чего не понятно, для этого же и чат! Получаем опыт вопросов тысячи
Обсуждают сегодня