[FC][忍者神龟3代标题选关程序]

yandagui

;[FC][忍者神龟3代标题选关程序]
& Q( I8 k& r- P! K1 d+ [1 X;作者:FlameCyclone 2017.4.1

0 Q: p( S. a) H1 c9 d4 w. e
+ g9 s+ P3 X3 D. }4 D4 ~4 T;配置数据
2 ]9 R& ^+ V; s- ]6 A0 U( IKEY_ADDR = $F8    ;按键地址
/ j4 [& {) J7 G6 F: fSTAGE_TEMP = $6010    ;关卡临时地址
- j2 `. D- J8 v" @% Q! T$ W- P  @STAGE_MAX = $0E    ;最大关卡数
# X8 `$ q" q9 C$ A$ N) E' J' t# h$ ~TITLE_A = $20    ;标题条件A
( Z. J4 u# n9 F% cTITLE_A_ON = $02    ;标题条件A有效状态判定
! \( b# b4 Q- f1 {2 B1 S4 Z. d  Y; kTITLE_B = $21    ;标题条件B
TITLE_B_ON = $03    ;标题条件B有效状态判定
PPU_END = $FF    ;PPU结束符
& g- U( h' ^% qTIME_LAY = $4A    ;标题显示延时地址
BUTTON_DEC = $42    ;关卡减少按键
7 v. r; t) t% _- W+ _8 W) zBUTTON_INC = $81    ;关卡增加按键
) I5 T9 M2 P* g8 g2 C3 hNUMBER_A = $06    ;数字A距离STAGE偏移量
! n& Y* k/ T2 m0 G3 HNUMBER_B = $08    ;数字B距离STAGE偏移量
( `( R. n- ]8 |- L' QPPU_ADDR_H = $23    ;STAGE写入地址高位
PPU_ADDR_L = $8C    ;STAGE写入地址低位
CHAR_S = $A2    ;字符'S'
CHAR_T = $A3    ;字符'T'
CHAR_A = $90    ;字符'A'
4 B5 w9 G' J* [# N$ lCHAR_G = $96    ;字符'G'
CHAR_E = $94    ;字符'E'
* T" Y4 i' y! S5 {# ACHAR_SPA = $00    ;字符空格
, {+ m" d9 Q2 m" j9 p  G0 K% cCHAR_LIN = $AE    ;字符'-'
CHAR_O = $9E    ;字符'o'
NUM_1 = $81    ;数字'1'
NUM_2 = $82    ;数字'2'
* E5 l9 _7 f& A! [/ E; YNUM_3 = $83    ;数字'3'
NUM_4 = $84    ;数字'4'
6 m( X7 C' R$ K" [& `5 VNUM_5 = $85    ;数字'5'
NUM_6 = $86    ;数字'6'
6 I) ^% y( }3 ~/ m6 p# XNUM_7 = $87    ;数字'7'
* p/ S) u" c/ B- R& MNUM_8 = $88    ;数字'8'
NUM_9 = $89    ;数字'9'
NUM_0 = $80    ;数字'0'

. s: S( o/ t1 R- J' [8 H .ORG $F82A
3 s  R' K. D" X1 D; j JSR $E700

. w/ @/ r. \, e& G8 N$ v. m: f3 h
.ORG $E700
  
STY $4014    ;补上覆盖的精灵写入指令
PROTECT_DATA:    ;数据保护
PHA    ;数据保护开始
6 f! y7 {* M& N- B, O9 Z- q TXA
PHA
# |: W: ?: ?, }; O6 a! B TYA
# G0 G; J  g+ D& G8 ? PHA    ;数据保护结束
( T8 f+ ?. ?1 c, _( @ LDA TITLE_A
$ O$ j6 C! F0 ^/ L9 Y* T! h CMP #TITLE_A_ON    ;比较是否为标题画面
BNE RET
7 Q% |2 C+ U4 ^- w, H# S  }7 k- n LDA TITLE_B
CMP #TITLE_B_ON    ;比较是否为标题画面
BEQ PPU_STAGE
4 W( z5 z8 g% i' \RET:    ;恢复数据
PLA    ;恢复数据开始
0 N( m9 G2 Q: P# _" e TAY
PLA
1 ?/ w- l8 f. q, `9 _  H% o- r TAX
4 d0 Q* K' f* N2 X4 X. u PLA    ;恢复数据结束
RTS    ;返回
PPU_STAGE:    ;字符STAGE写入程序
! S$ d& ?5 m% D8 [$ H1 B. [5 S3 { LDA #PPU_ADDR_H
STA $2006    ;设置PPU字符写入高位地址
LDA #PPU_ADDR_L
/ r) Q) f# ?6 V- A$ N STA $2006    ;设置PPU字符写入低位地址
, L# L) M, F$ i1 L LDX #$00
PPU_STAGE_WROTE:    ;写入STAGE字模
LDA STAGE_DATA,X
. o: |" A7 y, x. J6 a CMP #PPU_END    ;判断是否写入结束
BEQ STAGE_CMP
# O3 \+ S/ Q4 R" m$ g STA $2007
& s! S3 ~5 R! f" i1 z, M. t INX
BCC PPU_STAGE_WROTE
STAGE_CMP:    ;选关操作
9 O) @& u$ J" l LDA STAGE_TEMP
% N! N" E. |; l9 a: J2 ]- c CMP #$FF    ;关卡数据初始化条件判断
/ f2 `+ V# w8 e) t; u BNE KEY_B
LDA #$00
STA STAGE_TEMP    ;关卡数据初始化
KEY_B:    ;关卡减少
' e- N# V9 n# l  K LDA KEY_ADDR
+ ]0 Q+ Q" ~) e/ U" n+ u AND #BUTTON_DEC    ;按键B或左减关
  d' X/ H; A" X BEQ KEY_A
' y' B% j' a% v( q5 R3 h2 R LDA #$FF
STA TIME_LAY    ;重设标题延时
LDA STAGE_TEMP
CMP #$00    ;关卡比较
BEQ KEY_A
# y9 P9 T6 S5 `8 ]( L* p DEC STAGE_TEMP   ;减关
$ c& g# O0 C/ ]1 { JSR MUSIC    ;按键音效
# v# g) ^5 E. g7 ?KEY_A:    ;关卡增加
LDA KEY_ADDR
; \# }  Z3 K2 v" Q AND #BUTTON_INC    ;按键A或右加关
BEQ PPU_NUM_WRITE
LDA #$FF
& f9 ], ]4 C" o) P1 S3 `: b2 ]' Y STA TIME_LAY    ;重设标题延时
LDA STAGE_TEMP
7 F. ]) I' C/ y+ L CMP #STAGE_MAX    ;关卡比较
BEQ PPU_NUM_WRITE
INC STAGE_TEMP    ;加关
0 M0 R1 x" Z  ~/ i, u JSR MUSIC    ;按键音效
* h2 Z+ i+ e7 ^- r7 R7 _PPU_NUM_WRITE:    ;关卡数字写入地址
6 f5 U9 i+ R" q7 i- q3 V LDA #PPU_ADDR_H
0 t4 L' J3 z! d% m3 f3 E STA $2006    ;设置PPU数字写入高位地址
0 _0 K$ Y7 {5 n LDA #PPU_ADDR_L
CLC
ADC #NUMBER_A
STA $2006    ;设置PPU字符写入低位地址
2 v7 r3 }6 ]& i" Z LDA STAGE_TEMP
( y" Y6 a- Z+ }6 A' ~0 E TAX
" h! I. d! @1 W6 i1 i. b LDA STAGE_D1,X    ;写入数字
STA $2007
5 h. d& Z& L: o* Z& g* f LDA #PPU_ADDR_H
1 u0 {+ h- m9 u$ Y STA $2006    ;设置PPU数字写入高位地址
' A/ j& n* |% t* z LDA #PPU_ADDR_L
& Y. _6 L9 J9 a  q CLC
2 G- C# K# m6 {( \5 i: d ADC #NUMBER_B
5 ^% W! N+ L4 l. ]" _+ L; ]0 A STA $2006    ;设置PPU字符写入低位地址
LDA STAGE_TEMP
7 }! w6 W4 v- P; e  A; j9 ^ TAX
LDA STAGE_D2,X    ;写入数字
5 J  N) f2 K' Y# |0 @6 L+ E# s1 K STA $2007
STAHE_WRITE:
LDA STAGE_TEMP
# L0 ?( H' R# g' K9 x STA $2D   ;初始关卡写入
/ {% N  J* i: `. xPPU_RTS:    ;恢复数据
PLA
( T2 x  y: H8 Q0 l3 ^ TAY
PLA
TAX
- Y. D- X1 X$ W+ K% `3 M PLA
RTS
  p) l8 a. [: k2 a! Z8 q* k
STAGE_DATA:    ;关卡文字S,T,A,G,E,X,-,X字模数据
, N' v6 N9 N) n  |# X, D .BYTE CHAR_S,CHAR_T,CHAR_A,CHAR_G,CHAR_E,CHAR_SPA,CHAR_SPA,CHAR_LIN,CHAR_SPA,CHAR_SPA,PPU_END

STAGE_D1:   ;关卡数字
. J- h5 a) U) ?4 L .BYTE NUM_1,NUM_2,NUM_2,NUM_3,NUM_4,NUM_4,NUM_5,NUM_5,NUM_6,NUM_6,NUM_7,NUM_7,NUM_8,NUM_8,NUM_8
; b" _7 r4 k  a& D6 I
STAGE_D2:   ;场景数字
' a! u6 D% v  t7 S3 ?! Q .BYTE NUM_1,NUM_1,NUM_2,NUM_1,NUM_1,NUM_2,NUM_1,NUM_2,NUM_1,NUM_2,NUM_1,NUM_2,NUM_1,NUM_2,NUM_3

- s# L" J& r7 x" q" `0 z$ {
& {% Q6 G! n, MMUSIC:    ;按键音效
LDA #$3B    ;音乐号
JSR $919E    ;系统音乐调用
, }! b" g4 `6 v. J1 H RTS

283167657

对于一个小白来说。。。这都写的什么啊。。

liujunbtx

完全看不懂哦、、、、、、

文子萝卜

天书{:4_112:}

cheap9003

应该是代码吧，一般人看不懂