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

yandagui

;[FC][忍者神龟3代标题选关程序]
;作者:FlameCyclone 2017.4.1
7 [% x& s* C% Q7 @3 l$ |1 @! [
0 A' M0 `! s6 c' r: Y9 {& ?2 y
: Z  T$ C" `' ^;配置数据
KEY_ADDR = $F8    ;按键地址
9 P  s$ j# W2 V8 K5 q6 Y5 YSTAGE_TEMP = $6010    ;关卡临时地址
STAGE_MAX = $0E    ;最大关卡数
TITLE_A = $20    ;标题条件A
TITLE_A_ON = $02    ;标题条件A有效状态判定
TITLE_B = $21    ;标题条件B
TITLE_B_ON = $03    ;标题条件B有效状态判定
/ w+ S$ v7 ~9 tPPU_END = $FF    ;PPU结束符
TIME_LAY = $4A    ;标题显示延时地址
BUTTON_DEC = $42    ;关卡减少按键
BUTTON_INC = $81    ;关卡增加按键
- H2 ^, R( W. _3 x- v- P  A7 J" oNUMBER_A = $06    ;数字A距离STAGE偏移量
NUMBER_B = $08    ;数字B距离STAGE偏移量
) V4 r& n" [) ?5 @# \) w6 J$ HPPU_ADDR_H = $23    ;STAGE写入地址高位
; `$ e. @! l! k' p2 J3 ]2 qPPU_ADDR_L = $8C    ;STAGE写入地址低位
: w; e6 U2 M# h( z$ ACHAR_S = $A2    ;字符'S'
CHAR_T = $A3    ;字符'T'
CHAR_A = $90    ;字符'A'
3 j6 Y0 z, l/ D( p3 FCHAR_G = $96    ;字符'G'
CHAR_E = $94    ;字符'E'
CHAR_SPA = $00    ;字符空格
CHAR_LIN = $AE    ;字符'-'
CHAR_O = $9E    ;字符'o'
& G2 R- b( L- k0 G  s# lNUM_1 = $81    ;数字'1'
NUM_2 = $82    ;数字'2'
$ B* N/ j$ _" x' E3 c, hNUM_3 = $83    ;数字'3'
NUM_4 = $84    ;数字'4'
6 l& m  G! p* N2 d* h8 F$ jNUM_5 = $85    ;数字'5'
- y" z  y0 C; ~- D& |4 }- e: `NUM_6 = $86    ;数字'6'
NUM_7 = $87    ;数字'7'
1 R  ]# r" U" INUM_8 = $88    ;数字'8'
NUM_9 = $89    ;数字'9'
# I- Q4 q! P5 [4 K: ~NUM_0 = $80    ;数字'0'

' w8 n5 f* J% R6 [% F .ORG $F82A
JSR $E700
0 j5 a3 a. G& ?

& s4 |5 I" v( e2 e/ e/ p .ORG $E700
  
STY $4014    ;补上覆盖的精灵写入指令
PROTECT_DATA:    ;数据保护
; I! ]$ T& R  |+ W! l  Y PHA    ;数据保护开始
1 n! w! u' d& u$ y1 s. L1 l% h8 R TXA
% s# q! y$ {0 o! m PHA
: H# k7 X2 F8 I0 ~8 t- Z: s TYA
PHA    ;数据保护结束
LDA TITLE_A
2 ]" x; X, r7 @ CMP #TITLE_A_ON    ;比较是否为标题画面
" _1 m, Y+ ?0 H/ H BNE RET
+ t0 W' o6 b# |  Y4 ~5 e8 y- i LDA TITLE_B
- _9 m% X$ z" {/ w( u2 R CMP #TITLE_B_ON    ;比较是否为标题画面
$ ~" x9 ], W; u" J+ t4 P% u BEQ PPU_STAGE
8 t9 R! F) w7 P3 A0 [  q3 ?4 [5 ORET:    ;恢复数据
PLA    ;恢复数据开始
! A  e1 G) t5 Y0 R7 O TAY
; W' g2 t+ f! O9 x PLA
TAX
PLA    ;恢复数据结束
RTS    ;返回
PPU_STAGE:    ;字符STAGE写入程序
LDA #PPU_ADDR_H
* ?8 h3 A' v: k7 g2 r STA $2006    ;设置PPU字符写入高位地址
! }0 j) U# |! a1 N3 s; z, D, z LDA #PPU_ADDR_L
0 i* o" c" n$ F5 o6 u! t+ } STA $2006    ;设置PPU字符写入低位地址
. L* ]8 V% M& \# X& F LDX #$00
3 [: k3 [' A5 j. l$ X6 t0 Z/ ~7 MPPU_STAGE_WROTE:    ;写入STAGE字模
LDA STAGE_DATA,X
CMP #PPU_END    ;判断是否写入结束
BEQ STAGE_CMP
STA $2007
* H( m: r' h9 L0 i7 r INX
$ `2 s& L" W6 L! F# g) F  N BCC PPU_STAGE_WROTE
STAGE_CMP:    ;选关操作
! k& O4 {( z# E  v1 U LDA STAGE_TEMP
0 S5 I' S5 J' j+ h: r1 S CMP #$FF    ;关卡数据初始化条件判断
4 P3 i+ i3 A, k  N! e8 W& Q BNE KEY_B
; t! T2 o$ v+ I) i7 i; _8 J LDA #$00
STA STAGE_TEMP    ;关卡数据初始化
1 Q2 [/ F$ b; O4 Q+ i" F) DKEY_B:    ;关卡减少
& O9 {% z# Z2 |) { LDA KEY_ADDR
AND #BUTTON_DEC    ;按键B或左减关
$ J" C+ j+ L3 N  q BEQ KEY_A
! m/ @! f# G/ q* D LDA #$FF
& h( y$ \2 U' N0 F9 ~ STA TIME_LAY    ;重设标题延时
LDA STAGE_TEMP
CMP #$00    ;关卡比较
BEQ KEY_A
& s* a1 `6 ^+ b1 k9 U: S DEC STAGE_TEMP   ;减关
JSR MUSIC    ;按键音效
KEY_A:    ;关卡增加
# Q* L+ D) O- n1 z6 F3 C9 h LDA KEY_ADDR
6 K+ w4 V& B  V9 c! ~2 O$ g( d AND #BUTTON_INC    ;按键A或右加关
BEQ PPU_NUM_WRITE
LDA #$FF
2 k6 T& N# F4 ~4 B0 K9 u1 M$ f STA TIME_LAY    ;重设标题延时
LDA STAGE_TEMP
CMP #STAGE_MAX    ;关卡比较
, G; O6 B& B' |! P6 e* E  p' C8 ?/ x6 B BEQ PPU_NUM_WRITE
INC STAGE_TEMP    ;加关
- A% C  H/ ]  |2 R% b; c8 O6 w7 G JSR MUSIC    ;按键音效
PPU_NUM_WRITE:    ;关卡数字写入地址
& u" L7 k8 A( G9 H" m  ?/ Q5 V LDA #PPU_ADDR_H
STA $2006    ;设置PPU数字写入高位地址
0 Q4 t9 H- M9 p LDA #PPU_ADDR_L
0 c  q5 o3 v# C0 a& m& x( t  J CLC
ADC #NUMBER_A
- N2 M3 S; E" }8 |/ Y: [ STA $2006    ;设置PPU字符写入低位地址
' V( @, E0 K- e, ]7 D4 C) k LDA STAGE_TEMP
TAX
2 X/ T7 q/ `5 [. q) d& S6 t. U LDA STAGE_D1,X    ;写入数字
STA $2007
; l  \0 l* {( E0 E LDA #PPU_ADDR_H
STA $2006    ;设置PPU数字写入高位地址
3 _# S6 k: _, Q% h2 w LDA #PPU_ADDR_L
" A9 }3 T9 R7 d9 H: n0 Y5 n/ m CLC
) M2 @/ c! T% C& Y ADC #NUMBER_B
* Y+ [" v0 B1 \6 O( U" C STA $2006    ;设置PPU字符写入低位地址
LDA STAGE_TEMP
TAX
LDA STAGE_D2,X    ;写入数字
STA $2007
# j$ _- c' d! B, o5 c9 _) jSTAHE_WRITE:
/ z6 |& Z) D7 l LDA STAGE_TEMP
4 g  o- |8 `  V# y8 m- b' g STA $2D   ;初始关卡写入
8 d" [/ b1 K; r( u# m3 I9 D! y1 O" ePPU_RTS:    ;恢复数据
) `# g  A0 g3 x7 e PLA
; p& h$ G, k/ t! W0 U& Q TAY
PLA
0 e3 M- [0 z; ?6 p( T$ O: n: R# C TAX
PLA
; l1 \# i1 j* Q$ z RTS
+ E  V+ I, f* }  e3 W: Q" O
STAGE_DATA:    ;关卡文字S,T,A,G,E,X,-,X字模数据
/ x, N) T  y. U .BYTE CHAR_S,CHAR_T,CHAR_A,CHAR_G,CHAR_E,CHAR_SPA,CHAR_SPA,CHAR_LIN,CHAR_SPA,CHAR_SPA,PPU_END

" G, l; Q  d% k, v$ Y$ q( iSTAGE_D1:   ;关卡数字
.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
; ^0 T7 Y- N6 |/ D8 T& `- L; Z
STAGE_D2:   ;场景数字
% Q" P* ~) c2 f! C .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
7 s% |0 l/ _, c6 e. B2 ]
+ \2 X# Z. U  x5 d) a9 Y3 H1 Y5 @
MUSIC:    ;按键音效
LDA #$3B    ;音乐号
JSR $919E    ;系统音乐调用
RTS

283167657

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

liujunbtx

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

文子萝卜

天书{:4_112:}

cheap9003

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