VPF::FASM и GetLocalTime - Форум программистов

Moky

Дата 7.2.2014, 12:37 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 18
Регистрация: 4.3.2013

Репутация: нет
Всего: нет

День добрый!
Обращаюсь ко всем. Может у кого в королевстве есть код взятия даты на FASMe фукцией GetLocalTime. Буду очень благодарен! Moky.

День добрый!
Подождав некоторое время, не получив внятного ответа, решил самостоятельно рашить эту задачу. Говорю сразу для меня ассемблер и в частности FASM, китайская грамота и что получилось то и получилось. Вот код.

Код


  format PE GUI 4.0

entry start

include 'win32ax.inc'
include 'api\user32.inc'

section '.data' data readable writable

formats db '%02d',0
result db 256 dup (?)
stime           SYSTEMTIME


section '.code' code readable executable

start:

invoke  GetLocalTime,stime

 xor ebx,ebx
 movzx   ebx,[stime.wYear]
 invoke wsprintf,result,formats,ebx
 invoke MessageBox, 0,result, 'Год', MB_OK

 xor ebx,ebx
 movzx   ebx,[stime.wMonth]
 invoke wsprintf,result,formats,ebx
 invoke MessageBox, 0,result, 'Месяц', MB_OK

 xor ebx,ebx
 movzx   ebx,[stime.wDayOfWeek]
 invoke wsprintf,result,formats,ebx
 invoke MessageBox, 0,result, 'День недели', MB_OK

 xor ebx,ebx
 movzx   ebx,[stime.wDay]
 invoke wsprintf,result,formats,ebx
 invoke MessageBox, 0,result, 'День месяца', MB_OK

 xor ebx,ebx
 movzx   ebx,[stime.wHour]
 invoke wsprintf,result,formats,ebx
 invoke MessageBox, 0,result, 'Час', MB_OK

  xor ebx,ebx
  movzx   ebx,[stime.wMinute]
  invoke wsprintf,result,formats,ebx
  invoke MessageBox, 0, result, 'Минута', MB_OK

  xor ebx,ebx
  movzx   ebx,[stime.wSecond]
  invoke wsprintf,result,formats,ebx
  invoke MessageBox, 0, result, 'Секунда', MB_OK

  xor ebx,ebx
  movzx   ebx,[stime.wMilliseconds]
  invoke wsprintf,result,formats,ebx
  invoke MessageBox, 0, result, 'Миллисекунда', MB_OK

invoke ExitProcess,0 

section '.idata' import data readable

library kernel32,'KERNEL32.DLL', user32, 'USER32.DLL'

import kernel32, ExitProcess, 'ExitProcess', GetLocalTime, 'GetLocalTime'

Это сообщение отредактировал(а) Moky - 8.2.2014, 19:54

ФедосеевПавел

Дата 8.2.2014, 08:35 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 291
Регистрация: 7.2.2009

Репутация: нет
Всего: 10

Учимся пользоваться яндексом. Получаем кучу ссылок, например, эту.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Asm для Windows/Dos \| Следующая тема »