Поиск:

Ответ в темуСоздание новой темы Создание опроса
> FASM и GetLocalTime, Взятие даты 
V
    Опции темы
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
PM MAIL   Вверх
ФедосеевПавел
Дата 8.2.2014, 08:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



Учимся пользоваться яндексом. Получаем кучу ссылок, например, эту.
PM MAIL   Вверх
Google
  Дата 24.5.2019, 22:49 (ссылка)  





  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Asm для Windows/DOS"
MAKCim
  • Проставьте несколько ключевых слов темы, чтобы её можно было легче найти.
  • Не забывайте пользоваться кнопкой КОД.
  • Телепатов на форуме нет! Задавайте чёткий, конкретный и полный вопрос. Указывайте полностью ошибки компилятора и компоновщика.
  • Новое сообщение должно иметь прямое отношение к разделу форума. Флуд, флейм, оффтопик запрещены.
  • Категорически запрещается обсуждение вареза, "кряков", взлома программ и т.д.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, MAKCim.

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


 




[ Время генерации скрипта: 0.1762 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.