Index	Manual	Download	Source	Macros	Embedded word Case ins.
	Sitemap	Links	Forum	Tests	Projects

Test t2701: Pseudoinstruction %WHILE chained

See also

t5762  

Tested procedures

PseudopcWHILE   PseudopcENDWHILE  

Source file t2701.asm

      EUROASM LIST=ON, DUMP=ON, DUMPWIDTH=16, LISTREPEAT=OFF
t2701 PROGRAM FORMAT=BIN,MODEL=TINY,WIDTH=16,LISTMAP=OFF,LISTGLOBALS=OFF,IMAGEBASE=0
[BIN] SEGMENT PURPOSE=DATA
%Var  %SETA 0x00          ; Initialization of control %variable.
      ; Classic %WHILE/%ENDWHILE loop.
      %WHILE %Var < 8
        DB %Var ; Actual emitting statement.
%Var    %SETA %Var + 1 ; Modification of control %variable.
      %ENDWHILE
      ; Control %variable was abandoned at value 8
      %WHILE %Var ; Condition is TRUE if %Var <> 0.
        DB %Var ; Actual emitting statement.
%Var    %SETA %Var - 1 ; Modification of control %variable.
      %ENDWHILE
       DB %Var
      ENDPROGRAM t2701

Expected listing t2701.asm.lst

| | EUROASM LIST=ON, DUMP=ON, DUMPWIDTH=16, LISTREPEAT=OFF | |t2701 PROGRAM FORMAT=BIN,MODEL=TINY,WIDTH=16,LISTMAP=OFF,LISTGLOBALS=OFF,IMAGEBASE=0 |[BIN] |[BIN] SEGMENT PURPOSE=DATA |30 |%Var %SETA 0x00 ; Initialization of control %variable. |0000: | ; Classic %WHILE/%ENDWHILE loop. |TRUE | %WHILE %Var < 8 |0000:00 | DB %Var ; Actual emitting statement. |31 |%Var %SETA %Var + 1 ; Modification of control %variable. | | %ENDWHILE |0008: | ; Control %variable was abandoned at value 8 |TRUE | %WHILE %Var ; Condition is TRUE if %Var <> 0. |0008:08 | DB %Var ; Actual emitting statement. |37 |%Var %SETA %Var - 1 ; Modification of control %variable. | | %ENDWHILE |0010:00 | DB %Var | | ENDPROGRAM t2701

Expected messages t2701.out

I0180 Assembling source file "t2701.asm". I0270 Assembling source "t2701". I0310 Assembling source pass 1. I0330 Assembling source pass 2 - final. I0470 Assembling program "t2701". "t2701.asm"{2} I0510 Assembling program pass 1. "t2701.asm"{2} I0530 Assembling program pass 2 - final. "t2701.asm"{2} I0660 16bit TINY BIN file "t2701.bin" created, size=17. "t2701.asm"{16} I0650 Program "t2701" assembled in 2 passes with errorlevel 0. "t2701.asm"{16} I0750 Source "t2701" (16 lines) assembled in 2 passes with errorlevel 0. I0860 Listing file "t2701.asm.lst" created, size=954. I0990 EuroAssembler terminated with errorlevel 0.

Expected output file t2701. bin

0000: 00 01 02 03 04 05 06 07 08 07 06 05 04 03 02 01  °···············
0010: 00                                               °