Don't like ads? PRO users don't see any ads ;-)
Guest

pxl-plot 2

By: Zeda on Dec 14th, 2011  |  syntax: None  |  size: 0.79 KB  |  hits: 98  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. ;D=X
  2. ;E=Y
  3. ;C=Method
  4. ;   0=test
  5. ;   1=on
  6. ;   2=invert
  7. ;   3=off
  8.      srl d \ rra         ;12  
  9.      srl d \ rra         ;12  
  10.      srl d \ rra         ;12      
  11.      ld b,a              ;4
  12.      ld a,d              ;4
  13.  
  14.      ld d,0              ;7    
  15.      ld h,d \ ld l,e     ;4    
  16.      add hl,de           ;11  
  17.      add hl,de           ;11  
  18.      add hl,hl           ;11  
  19.      add hl,hl           ;11  
  20.      ld e,a              ;4    
  21.      add hl,de           ;11  
  22.      ld de,(BufPtr)      ;20  
  23.      add hl,de           ;11  
  24.      inc b
  25.      ld a,1
  26.      rrca
  27.      djnz $-1
  28.      ld b,a
  29.      and (hl)
  30.      ld e,a
  31.      ld a,b
  32.      ld b,c
  33.      djnz $+3
  34.        or (hl)
  35.      djnz $+5
  36.        xor (hl)
  37.      djnz $+4
  38.        cpl
  39.        and (hl)
  40.      ld (hl),a
  41.      ret