home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 4: Demo 1 / almathera_demo1.bin / sourcecode / dexion / flash2.s < prev    next >
Text File  |  1995-03-17  |  262b  |  21 lines
  1. s:
  2. move.l #tabel,a0
  3. s1:
  4. cmp.b #$10,$dff006
  5. bne s1
  6. move.w farve,$dff180
  7. add.b #1,s1+2
  8. move.w (a0)+,farve
  9. cmp.w endtab,a0
  10. bne s1
  11. andi.b #64,$bfe001
  12. bne s
  13. rts
  14. even
  15. tabel:
  16. dc.w $000,$111,$222,$333,$444,$555,$666,$777,$888,$999,$aaa,$bbb
  17. endtab:
  18. even
  19. farve:
  20. dc.w $0
  21.