git.hungrycats.org Git - xscreensaver/blob - disco.asm

   1 ; DISCO DISCO
   2 ; submitted by Anonymous
   3
   4 start:
   5  inx
   6  txa
   7  sta $200, y
   8  sta $300, y
   9  sta $400, y
  10  sta $500, y
  11  iny
  12  tya
  13  cmp 16
  14  bne do
  15  iny
  16  jmp start
  17 do:
  18  iny
  19  iny
  20  iny
  21  iny
  22 jmp start
  23