День добрый!
Обращаюсь ко всем. Может у кого в королевстве есть код взятия даты на 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'
|
|