Advertisement
Guest User

Untitled

a guest
May 25th, 2017
56
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. LDA $7FFB18
  2.         BNE LBL1
  3.         LDA #$08
  4.         STA $7FFB18
  5.         LDA #$10
  6.         STA $7FFB20
  7.         LDA #$02
  8.         STA $7FFB19
  9.         STA $7FFB21
  10.         LDA #$0F
  11.         STA $7FFB1A
  12.         LDA #$0D
  13.         STA $7FFB22
  14.         LDA #$00
  15.         STA $7FFB1B
  16.         STA $7FFB23
  17.         LDA #$F0
  18.         STA $7FFB1C
  19.         LDA #$E8
  20.         STA $7FFB24
  21.         LDA #$7F
  22.         STA $7FFB1D
  23.         STA $7FFB25
  24.         RTS
  25.  
  26. LBL1:   PHX
  27.         LDA #$00
  28.         STA $7FEFFF
  29.         LDA $13
  30.         AND #$01
  31.         BNE LBL3
  32.         LDA $7FEFFD
  33.         INC A
  34.         STA $7FEFFD
  35.         STA $7FEFFE
  36. LBL3:   REP #$10 ;XY‚ð16bit‚É
  37.         LDX.w #$00
  38.  
  39. LOOP1:  LDA #$01
  40.         STA $7FF000,x
  41.         STA $7FE800,x
  42.         INX
  43.         LDA $7FEFFE
  44.         INC A
  45.         AND #$0F
  46.         STA $7FEFFE
  47.         CMP #$08
  48.         BCC LBL2
  49.         LDA #$10
  50.         SEC
  51.         SBC $7FEFFE
  52. LBL2:   LSR A
  53.         STA $7FEFFC
  54.         CLC
  55.         ADC $1466
  56.         STA $7FF000,x
  57.         LDA $1467
  58.         ADC #$00
  59.         STA $7FF001,x
  60.         LDA $7FEFFC
  61.         CLC
  62.         ADC $1462
  63.         STA $7FE800,x
  64.         LDA $1463
  65.         ADC #$00
  66.         STA $7FE801,x
  67.         INX
  68.         INX
  69.         LDA $7FEFFF
  70.         INC A
  71.         STA $7FEFFF
  72.         CMP #$F0
  73.         BNE LOOP1
  74.         LDA #$00
  75.         STA $7FF000,x
  76.         STA $7FE800,x
  77.         SEP #$10
  78.         PLX
  79.         RTS
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement