?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.         MACRO filler x1, x2, y1, y2
  2.                 DUP (y2 - y1), .y
  3.                         DUP (x2 - x1), .x
  4.                                 DB x1 + .x, y1 + .y
  5.                         EDUP
  6.                 EDUP
  7.                 IF .x   ; index variable does exist after DUP with last used index (not +1 beyond it!)
  8.                         DD 0xA0DED1BA   ; but this is not documented and rather shouldn't be used at all
  9.                 ENDIF
  10.         ENDM
  11.  
  12.         filler 3, 5, 10, 12
  13.         filler 100, 101, 200, 201
  14.  
  15.         DUP 4   ,   idx                 ; eol comment test
  16.                 DB    0x12, idx
  17.         EDUP
  18.  
  19. main:
  20.         DUP 2   ,   .idx                ; eol comment test
  21.                 DB    0x23, .idx
  22.         EDUP
  23.  
  24.         DUP 1   ,   @idx2               ; only local label prefix "." is supported for index variable name
  25.                 DB    0x34, @idx2
  26.         EDUP
  27.  
  28.         DUP 1   ,   !idx2               ; only local label prefix "." is supported for index variable name
  29.                 DB    0x45, idx2
  30.         EDUP
  31.  
  32.         DUP 1 .idx                              ; invalid syntax, missing comma
  33.         EDUP
  34.  
  35.         DUP 1                                   ; w/o indexVar name, eol comment test
  36.                 DB idx, .idx
  37.         EDUP
  38.  
  39.