EuroAssembler Index Manual Download Source Macros

Sitemap Links Forum Tests Projects


This file can be included to programs written in Euro Assembler.
The library contains OS-independent and width-independent macroinstructions with calling convention similar to the standard Intel machine instruction set.

See also cpuext16.htm, cpuext32.htm, cpuext64.htm.

cpuext HEAD
↑ Dispatch Control, Case1, Case2, Case3,...

Macro Dispatch implements the programming figure switch. It compares value of the Control operand (register or memory) with one or more Case values and, when equal, it jumps to the corresponding label .Case: constructed from the compared value.
Macro does nothing when none of Case values was found equal to Control at run-time.

The label of target jump is constructed from the value by prefixing its verbatim notation with fullstop . and appending it with colon :, so it creates a local label. The label must exist somewhere in Dispatch's namespace, of course.

When the macro Dispatch is used several times in the same namespace, we can exploit different notations of the same number to avoid collision. Dispatch AL, 2 jumps to local label .2:, in other expansion of this macro we may dispatch to alternative labels which retain the value 2, such as 2d, 2D, 0n2, 0x02, 0x00_02.
Control is a register or typed memory variable of arbitrary width.
Case* specifies the value, comparable with Control. It can be a register of the same width as Control, or memory variable, or immediate operand.
Immediate value can also be in single apostrophes ( character constant), both apostrophes will be stripped off to construct a valid label from character constant.
Only letters and digits can be used in character constants, we cannot code Dispatch AL, '+', '-' because .+: and .-: are invalid labels. Use Dispatch AL, 0x2B, 0x2D or Dispatch AL, 43, 45 instead.
ZF=0 if the control was not dispatched, thread continues below the macro. All registers are preserved.
Dispatch DL,0x20,'y','n',10,13 ; Jump to label .0x20: .y: .n: .10: .13: respectively. Dispatch EAX, WM_CREATE, WM_PAINT ; Jump to label .WM_CREATE:, .WM_PAINT:, respectively. JMP WinDefProc: ; Otherwise jump to WinDefProc if the value in EAX was not dispatched.
Dispatch  %MACRO Control, Case1, Case2, , ,
 %DispatchNr  %SETA 2                     ; Start with the second operand.
      %WHILE %DispatchNr <= %#            ; Repeat with each Case* operand.                        >
        %DispatchArg %SET %*{%DispatchNr} ; Load the operand value to %DispatchArg.
        CMP %Control,%DispatchArg         ; Emit instruction for the actual comparison.
        %IF "%DispatchArg[1]%DispatchArg[1]" === "''" ; Is the operand in apostrophes?
          JE .%DispatchArg[2..%&-1]:      ; Strip them off and jump to this label.
          JE .%DispatchArg:               ; Use local label made from Case.
        %DispatchNr %SETA %DispatchNr+1   ; The next Case*.
 %ENDMACRO Dispatch

▲Back to the top▲