?login_element?

Subversion Repositories NedoOS

Rev

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

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