home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 93xx / 9311a.d64 / y-scroll.seq < prev    next >
Text File  |  1995-03-30  |  722b  |  46 lines
  1.          *= $1000
  2.  
  3.          SEI
  4.          LDA #<START
  5.          STA $0314
  6.          LDA #>START
  7.          STA $0315
  8.  
  9.          LDA #$00
  10.          STA SELFMOD+1
  11.  
  12.          LDA $DC0D
  13.          AND #$7F
  14.          ORA #$01
  15.          STA $DC0D
  16.          LDA #$2E
  17.          STA $D012
  18.          LDA $D011
  19.          AND #$7F
  20.          STA $D011
  21.          LDA #$01
  22.          STA $D01A
  23.          CLI
  24.          JMP *
  25.  
  26. START    INC $D019
  27.  
  28. SELFMOD  LDX #$00
  29. AGAIN    LDA $D012
  30.          LDY #$02
  31. RZA1     DEY
  32.          BNE RZA1
  33. WAIT     CMP $D012
  34.          BEQ WAIT
  35.          AND #$07
  36.          ADC #$18
  37.          STA $D011
  38.          DEX
  39.          BNE AGAIN
  40.          LDA SELFMOD+1
  41.          CMP #$01
  42.          BEQ IRQEND
  43.          DEC SELFMOD+1
  44. IRQEND   JMP $EA31
  45.  
  46.