Another thing about which I'd like to hear your opinion: I'm planning to implement some way of specifying the section alignment for each section in ELF and MS COFF formats (classic COFF doesn't allow this, there all sections are aligned to 4 KB), and the only problem I have with it is what syntax should such option have. Would the simple:

Code:

section '.data' writeable 16    

be enough to align section on 16 bytes boundary? What's your opinion?

What does ` (back tick) do?

macro DispLabel lbl {
  display 'The label name is: ', `lbl, $0d, $0a
}
    

I guess so, then you propose to extract day/month/year and hour/time/seconds with macro arithmetics?

macro months [dayscount]
 {
  forward
   if DAY <= dayscount
   else
    DAY = DAY-dayscount
    MONTH = MONTH+1
  forward
   end if
 }

TIME = %T

DAY = TIME/(24*3600)
DAY = DAY - (DAY+365)/(3*365+366)
YEAR = 1970+DAY/365
DAY = DAY mod 365 + 1
MONTH = 1
months 31,28,31,30,31,30,31,31,30,31,30,31

TIME = TIME mod (24*3600)
HOUR = TIME/3600
MINUTE = (TIME mod 3600)/60
SECOND = (TIME mod 3600) mod 60

display <YEAR,10>,'-',<MONTH,10>,'-',<DAY,10>,13,10
display <HOUR,10>,':',<MINUTE,10>,':',<SECOND,10>,13,10    

mov        dword [edx+14h],0E0h    ; size of optional header
   mov     dword [edx+16h],10B818Eh; flags and magic value
     mov     dword [edx+38h],1000h   ; section alignment
 mov     dword [edx+3Ch],200h    ; file alignment
    mov     word [edx+40h],1        ; OS version
        mov     eax,[image_base]
    mov     dword [edx+34h],eax
 mov     eax,[subsystem_version]
     mov     [edx+48h],eax
       mov     ax,[subsystem]
      mov     [edx+5Ch],ax
        cmp     ax,1
        jne     pe_alignment_ok
     mov     eax,20h
     mov     dword [edx+38h],eax
 mov     dword [edx+3Ch],eax
 mov     word [edx+5Eh],2000h            ;Kevin Zheng [110403]--WDM SYS Format
      pe_alignment_ok:
 mov     word [edx+1Ah],VERSION_MAJOR + VERSION_MINOR shl 8
  mov     dword [edx+60h],1000h   ; stack reserve
     mov     dword [edx+64h],1000h   ; stack commit
      mov     dword [edx+68h],10000h  ; heap reserve
      mov     dword [edx+6Ch],0       ; heap commit
       mov     dword [edx+74h],16      ; number of directories
     bsf     ecx,[edx+3Ch]
       imul    ebx,[number_of_sections],28h
        add     ebx,ebp
     dec     ebx
 shr     ebx,cl
      inc     ebx
 shl     ebx,cl
      sub     ebx,ebp
     mov     ecx,ebx
     mov     eax,[display_buffer]
        sub     eax,ecx
     cmp     edi,eax
     jae     out_of_memory
       shr     ecx,2
       xor     eax,eax
     rep     stos dword [edi]
    mov     eax,edi
     sub     eax,[code_start]
    add     eax,[stub_size]
     mov     [edx+54h],eax           ; size of headers
   bsf     ecx,[edx+38h]
       dec     eax
 shr     eax,cl
      inc     eax
 shl     eax,cl
      mov     [edx+28h],eax           ; entry point rva
   mov     [code_type],32
      or      [reloc_labels],-1
   mov     [number_of_sections],0
      lea     ebx,[edx+18h+0E0h]
  mov     [current_section],ebx
       mov     dword [ebx],'.fla'
        mov     dword [ebx+4],'t'
 mov     [ebx+14h],edi
       mov     [ebx+0Ch],eax
       mov     dword [ebx+24h],0E0000060h
  neg     eax
 add     eax,edi
     sub     eax,[edx+34h]
       mov     [org_origin],eax
    mov     [org_registers],0
   mov     [org_start],edi
     bt      [format_flags],8
    jnc     instruction_assembled
       or      dword [edx+16h],2000h
       cmp     word [edx+5Ch],1
    jne     instruction_assembled
       or      word [edx+5Eh],2000h
        jmp     instruction_assembled
      fp_to_version:
    

FORMAT          PE NATIVE 4.0 DLL AT 10000H ON 'STUB.EXE'    

FORMAT          PE NATIVE  DLL AT 10000H ON 'STUB.EXE'