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

yandagui

;[FC][忍者神龟3代标题选关程序]
: x/ e) C2 B5 J. v;作者:FlameCyclone 2017.4.1
, C& g( }; V5 z1 h; V, Y) H

;配置数据
KEY_ADDR = $F8    ;按键地址
STAGE_TEMP = $6010    ;关卡临时地址
' w9 ?$ C5 X  G! l8 j1 d* E- L) i- R& ESTAGE_MAX = $0E    ;最大关卡数
TITLE_A = $20    ;标题条件A
, q" A6 q- y* E& K1 R9 pTITLE_A_ON = $02    ;标题条件A有效状态判定
" h3 I& K3 s+ I7 q, H$ zTITLE_B = $21    ;标题条件B
0 ^5 p- R1 @- [) k) N3 qTITLE_B_ON = $03    ;标题条件B有效状态判定
2 `! A4 I9 v2 K: C' PPPU_END = $FF    ;PPU结束符
5 s* x1 i% J3 r5 s, r2 j/ bTIME_LAY = $4A    ;标题显示延时地址
5 j) M" s# H  A" a2 H# h, x/ EBUTTON_DEC = $42    ;关卡减少按键
1 ?" s% L$ b& G3 o/ T& Z9 DBUTTON_INC = $81    ;关卡增加按键
7 N" V5 H" s& R5 J1 J5 bNUMBER_A = $06    ;数字A距离STAGE偏移量
, Y- Y- ]# e7 ?! Z$ E! [& PNUMBER_B = $08    ;数字B距离STAGE偏移量
PPU_ADDR_H = $23    ;STAGE写入地址高位
PPU_ADDR_L = $8C    ;STAGE写入地址低位
CHAR_S = $A2    ;字符'S'
CHAR_T = $A3    ;字符'T'
' ?9 d$ r& V0 H& i5 g) _) KCHAR_A = $90    ;字符'A'
/ _1 t5 G. u8 \& p5 A. }CHAR_G = $96    ;字符'G'
6 {, F" q' _4 T# l- @CHAR_E = $94    ;字符'E'
6 t: {; [+ M6 m" Y9 G0 MCHAR_SPA = $00    ;字符空格
CHAR_LIN = $AE    ;字符'-'
, a6 i3 X: ]+ F8 D4 VCHAR_O = $9E    ;字符'o'
! g, H! d/ @0 u4 F1 kNUM_1 = $81    ;数字'1'
7 `$ S; I* W7 J$ h. tNUM_2 = $82    ;数字'2'
NUM_3 = $83    ;数字'3'
) N# C# S3 X3 }% v1 }" ONUM_4 = $84    ;数字'4'
NUM_5 = $85    ;数字'5'
( k2 @: l: z; b6 j1 n, y) oNUM_6 = $86    ;数字'6'
NUM_7 = $87    ;数字'7'
NUM_8 = $88    ;数字'8'
4 V& r, b, u. C$ Y6 h8 lNUM_9 = $89    ;数字'9'
( w& f) Z3 p6 LNUM_0 = $80    ;数字'0'

. F) E6 F. m+ b3 n .ORG $F82A
0 B2 C+ M+ [( C5 K- v& ~" E' \ JSR $E700

  B$ m5 S" Z6 ~- [# K
.ORG $E700
! r( T( C4 f/ ?$ Y4 E& _  
/ v( k5 j, ^: _/ i; ~ STY $4014    ;补上覆盖的精灵写入指令
% H* o# }7 D  H8 x4 ]" m5 RPROTECT_DATA:    ;数据保护
3 X1 Y. ~7 E$ o& a+ n. K: h PHA    ;数据保护开始
% o3 x( l" {' i( V TXA
- q: H& r! W- o, f" j PHA
0 L8 s9 S& `$ u4 p' K  ?$ Q TYA
' P" ?  J: n6 G% ~. n1 x8 U PHA    ;数据保护结束
/ z1 O. i, C' |% C* r# W4 Q# r" N LDA TITLE_A
- l( t+ l1 ]: ^+ P" o CMP #TITLE_A_ON    ;比较是否为标题画面
4 ]5 W: O) s) s3 ` BNE RET
+ L$ f) ^3 n& W* r+ N* y# _ LDA TITLE_B
0 i" @4 x, T+ K9 i. p3 n CMP #TITLE_B_ON    ;比较是否为标题画面
BEQ PPU_STAGE
6 ~( k' B3 {$ M, F, rRET:    ;恢复数据
: b8 B4 _" r+ X9 u/ r6 n. O PLA    ;恢复数据开始
# ]; ~) i, W  M1 Y$ z7 n! d TAY
PLA
! R0 `" @% \: K0 B TAX
7 j! C) k1 k1 o+ r; k8 ?* w% n* I+ L PLA    ;恢复数据结束
RTS    ;返回
PPU_STAGE:    ;字符STAGE写入程序
7 D3 O% {/ q! ^7 N5 X LDA #PPU_ADDR_H
STA $2006    ;设置PPU字符写入高位地址
LDA #PPU_ADDR_L
STA $2006    ;设置PPU字符写入低位地址
LDX #$00
PPU_STAGE_WROTE:    ;写入STAGE字模
$ D3 ?% \: G" i! Q2 s% a LDA STAGE_DATA,X
- G% z" y7 w4 a7 j CMP #PPU_END    ;判断是否写入结束
BEQ STAGE_CMP
9 y  ?' p7 A' I3 W5 o: k STA $2007
$ K& P& [+ L/ Z* g6 K, \1 A INX
BCC PPU_STAGE_WROTE
STAGE_CMP:    ;选关操作
LDA STAGE_TEMP
5 P& k. O4 D) w; o% p CMP #$FF    ;关卡数据初始化条件判断
( i. ]8 M  {) S) }! F0 T BNE KEY_B
LDA #$00
STA STAGE_TEMP    ;关卡数据初始化
KEY_B:    ;关卡减少
LDA KEY_ADDR
AND #BUTTON_DEC    ;按键B或左减关
/ T( y7 }  U" Q9 s. z. h/ K BEQ KEY_A
( T" ?0 Z, a5 {! n LDA #$FF
STA TIME_LAY    ;重设标题延时
LDA STAGE_TEMP
8 {+ G1 q. e5 W. g6 T CMP #$00    ;关卡比较
) ^* y$ c) x7 E: r+ Y BEQ KEY_A
& l4 W0 t4 D2 X8 @ DEC STAGE_TEMP   ;减关
JSR MUSIC    ;按键音效
KEY_A:    ;关卡增加
LDA KEY_ADDR
9 u" f; |$ p% Q/ f% ]  R8 b. U AND #BUTTON_INC    ;按键A或右加关
. @' [+ v" _9 t BEQ PPU_NUM_WRITE
LDA #$FF
( I+ w* s% n$ g+ c STA TIME_LAY    ;重设标题延时
LDA STAGE_TEMP
CMP #STAGE_MAX    ;关卡比较
% [1 n( s9 D( ^  t" D3 o# H; e" l) Q: [ BEQ PPU_NUM_WRITE
INC STAGE_TEMP    ;加关
7 [0 T1 Q: e5 v: _5 C JSR MUSIC    ;按键音效
PPU_NUM_WRITE:    ;关卡数字写入地址
LDA #PPU_ADDR_H
STA $2006    ;设置PPU数字写入高位地址
* {) b0 B& }2 T/ ^# a: e LDA #PPU_ADDR_L
CLC
ADC #NUMBER_A
STA $2006    ;设置PPU字符写入低位地址
LDA STAGE_TEMP
, z! B; o4 |7 a$ f9 ~ TAX
0 t  s  d* K3 ]4 Q2 E/ }; m LDA STAGE_D1,X    ;写入数字
8 F+ v2 h/ S8 v1 Q1 i STA $2007
LDA #PPU_ADDR_H
STA $2006    ;设置PPU数字写入高位地址
LDA #PPU_ADDR_L
. l' h" y) Y. O8 b CLC
ADC #NUMBER_B
1 x. w+ [0 F$ t STA $2006    ;设置PPU字符写入低位地址
! \  s8 B2 t7 ~* P LDA STAGE_TEMP
6 D2 M7 F- y% r) H) I! K" t# Z' S5 o" A TAX
LDA STAGE_D2,X    ;写入数字
7 N7 c6 Y& C* s! J STA $2007
STAHE_WRITE:
LDA STAGE_TEMP
STA $2D   ;初始关卡写入
PPU_RTS:    ;恢复数据
9 X/ w2 [+ n$ G, Q. t+ R' Y PLA
TAY
PLA
TAX
PLA
% G2 ~  D; K3 ? RTS

STAGE_DATA:    ;关卡文字S,T,A,G,E,X,-,X字模数据
3 U: `+ m- N4 {; _ .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:   ;关卡数字
, i+ P9 ^4 `1 w9 x7 C0 Q! @/ s4 c .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
9 H# R& ]" H" N8 a" I7 }
STAGE_D2:   ;场景数字
.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
1 X5 a' b: j8 F( U! J" c$ i8 l) r

MUSIC:    ;按键音效
# D2 Y9 _1 f6 Z3 N LDA #$3B    ;音乐号
JSR $919E    ;系统音乐调用
. v$ p) G8 J0 d9 ^5 I# F RTS

283167657

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

liujunbtx

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

文子萝卜

天书{:4_112:}

cheap9003

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