?login_element?

Subversion Repositories NedoOS

Rev

Rev 126 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.         MACRO filler x1, x2, y1, y2
  2.                 ld      hl,y1*2
  3.                 add     hl,sp
  4.                 ld      sp,hl
  5.  
  6.                 DUP (y2 - y1)
  7.                         ld      de,x1
  8.                         pop     hl
  9.                         add     hl,de
  10.  
  11.                         DUP (x2 - x1)
  12.                                 ld      (hl),a
  13.                                 inc     l
  14.                         EDUP
  15.  
  16.                         ld      (hl),a
  17.                 EDUP
  18.         ENDM
  19.  
  20.         OUTPUT "dup_var.bin"
  21.         filler 15, 20, 35, 40
  22.