home *** CD-ROM | disk | FTP | other *** search
/ ftp.sberbank.sumy.ua / 2014.11.ftp.sberbank.sumy.ua.tar / ftp.sberbank.sumy.ua / incoming / 1 / helloWsprintf.asm < prev    next >
Assembly Source File  |  2014-02-08  |  1KB  |  60 lines
  1.     .386
  2.     .model flat, stdcall
  3.     option casemap :none                  ; case sensitive
  4.  
  5.     include \masm32\include\windows.inc
  6.     include \masm32\include\kernel32.inc
  7.     include \masm32\include\user32.inc
  8.     include \masm32\macros\macros.asm
  9.  
  10.     includelib \masm32\lib\kernel32.lib
  11.     includelib \masm32\lib\user32.lib
  12.  
  13.     CreateCurrentDateDirectoryLoc PROTO 
  14.  
  15. .data
  16.  EVK           db "Evgeney Victorovich Kupin 27 April 1982",0
  17.  
  18. .code
  19.  
  20. start:
  21.  
  22.     invoke CreateCurrentDateDirectoryLoc
  23.  
  24.     exit
  25.  
  26. CreateCurrentDateDirectoryLoc proc
  27.  LOCAL cBuffer[100]:BYTE
  28.  LOCAL cFormatTime[20]:BYTE
  29.  LOCAL sysTime:SYSTEMTIME
  30.  LOCAL Month:DWORD
  31.  LOCAL Day:DWORD
  32.  LOCAL Year:DWORD
  33.  
  34.  
  35.         mov DWORD PTR cFormatTime[0], "d20%" 
  36.         mov DWORD PTR cFormatTime[4], "d20%"
  37.         mov DWORD PTR cFormatTime[8], "d40%"
  38.         mov DWORD PTR cFormatTime[12], 0        
  39.        
  40.         invoke GetLocalTime, addr sysTime 
  41.  
  42.         mov eax,0
  43.         mov ax, sysTime.wDay 
  44.         mov Day, eax
  45.  
  46.         xor ecx, ecx
  47.         mov cx, sysTime.wYear
  48.         mov Year, ecx    
  49.  
  50.         and eax, 0 
  51.         mov ax, sysTime.wMonth
  52.         mov Month, eax
  53.  
  54.         invoke wsprintf, addr cBuffer, addr cFormatTime, Day, Month, Year          
  55.  
  56.         invoke CreateDirectory, addr cBuffer, 0
  57.  
  58.         ret 
  59. CreateCurrentDateDirectoryLoc endp
  60. end start