rb 510-$$$
dw 0xAA55    

Wouldn’t it break the feature that allows saving generated data into multiple files? I mean, should we count all the bytes or bytes of a specific addressing space?

I would think about all the possible variations at once since it won’t take long for people to ask more and further (consistent from language point of view) improvements might become more difficult by that time. A language constantly extended with features that are just easy to implement approaches C++ as the number of such features approaches infinity.

section '.idata' import data readable

library kernel32, 'kernel32.dll',\
        msvcrt, 'msvcrt.dll'

        import_kernel32
        all_api
 
import  msvcrt,\
        printf, 'printf'    

section '.idata' import data readable

library kernel32, 'kernel32.dll'

import  kernel32,\
        CreateFileA, 'CreateFileA',\
        CloseHandle, 'CloseHandle',\
        ExitProcess, 'ExitProcess',\
        . . .
        GetFirmwareEnvironmentVariableA, 'GetFirmwareEnvironmentVariableA'

        api CreateFile
        api GetFirmwareEnvironmentVariable    

macro simport library_label*,label*,string
{
    match ,string \{ define library_label#.collection label,`label \}
    match any, string \{ define library_label#.collection label,string \}
}

macro import library_label*,list*&
{
    common
        local all
        define all ,
        irpv a ,library_label#.collection \{ all equ all a, \}
        match alist, all \{ import library_label alist list \}
}     

simport kernel32,GetFirmwareEnvironmentVariableA
api GetFirmwareEnvironmentVariable    

impapi kernel32,\
    GetFirmwareEnvironmentVariableA, 'GetFirmwareEnvironmentVariableA'

implib msvcrt,'msvcrt.dll'
impapi msvcrt,\
    printf, 'printf',\
    scanf, 'scanf'    

Maybe Tomasz can make some macros that will help to add new functions and new dlls?

Tomasz, great, thanks!
But how can I add new library using macros like this?
E.g. printf from msvcrt.

p.s. Please add these macros to fasm 1 includes.

macro simport library_label*,label*,string
{
    match ,string \{ define library_label#.collection label,`label \}
    match any, string \{ define library_label#.collection label,string \}
}

macro import library_label*,list&
{
    common
        local all
        define all
        irpv a ,library_label#.collection \{ all equ all , a \}
        match a, list \{ all equ , list all \}
        match complete, all \{ import library_label complete \}
}

macro slibrary library_label*,string
{
    match ,string \{ define import_library library_label,`library_label#'.DLL' \}
    match any, string \{ define import_library library_label,string \}
}

macro library list&
{
    common
        local all
        define all
        irpv a, import_library \{ all equ all , a \}
        match complete, list all \{ library complete \}
        irpv a, import_library \{ match library_label=,string, a \\{ import library_label \\} \}
}    

        slibrary msvcrt
        simport msvcrt,sprintf    

macro   simport library_label*, [label*, string]    

simport msvcrt, printf,, getch,'_getch', scanf    

Can we convert a string to uppercase to generate 'MSVCRT.DLL' string (instead of 'msvcrt.DLL') on slibrary msvcrt call?

slibrary msvcrt,'MSVCRT.DLL'    

Looking at the macro it appears as though you can do this:

Code:

slibrary msvcrt,'MSVCRT.DLL'    

Therefore I thought that it would be great if dll name string converted to upper case automatically.