|
|
本帖最后由 yandagui 于 2017-3-18 16:16 编辑
; M) \+ s* O; {% L5 {: Q+ g* G4 y0 N% t0 j$ x1 B
2017.3.13
0 n% F1 f$ I$ z3 t0 e9 H ( \' q, D3 n& ^* U0 G9 }
; X7 W3 S9 @, e0 Z* d' O0 Z# I$ [$ | 6 q+ C0 _$ u2 K) A6 |# e$ v% x2 Z
- .ORG $8001 ;SUPER CONTRA(J)
; [# H: b# Y1 U+ k, h) T+ A - LDA $39# H9 v6 @7 W# K& V
- BEQ ADDR_804D+ w- { H+ g: @. j2 R
- ADDR_8001: LDA $00874 x) I3 b2 \0 K1 ^3 g" A
- ADDR_8003: BEQ ADDR_804D
% J1 p3 V9 B, E8 H# f8 \# O - ADDR_8005: LDY $0020
1 [ U' E* B! w1 q, J* N1 A( ~ - ADDR_8007: STY $0002
% f/ H+ @2 q# N# M( U$ q) \& A% b - ADDR_8009: LDA $00CA,Y; k! ]7 \& X0 b" r
- ADDR_800C: LDY #$08
4 x: G: D( c; H" R# W - ADDR_800E: ORA $001F
. ?% \; u! J: W% C" Y9 X5 Y - ADDR_8010: BNE ADDR_801D
% [& [: J4 F& O y0 | - ADDR_8012: LDY $0002( T: r A4 X) n) @
- ADDR_8014: LDA $0053,Y+ h1 i2 o9 `0 v9 i6 \: u+ [! c
- CLC
. w9 l; A; K, z( G' G - ADC #$02- C' C! \( v; ?' g9 l/ i. w2 L, {% t
- ADDR_8017: LDY #$00. Q: f5 ?2 F+ r [+ _& Q7 T
- ADDR_8019: CMP #$08
. N% ~ y; h4 } - ADDR_801B: BCC ADDR_801F# X# ]" u5 }6 S( u5 d y& {# A, v
- ADDR_801D: LDA #$08# G( ]' p% i) a& T, E' v
- ADDR_801F: STA $0001
/ t& S8 [2 M X/ y - ADDR_8021: DEC $00010 {' I; y( r* F+ x% p
- ADDR_8023: BMI ADDR_8048
8 y; s5 Z: Y' D* u8 |$ G' l5 d/ z - ADDR_8025: LDA #$08
' @# d; ]# N* U$ n - ADDR_8027: STA $0200,X ;送入纵坐标地址
4 A1 I1 j" [5 S( S& G0 L8 l - ADDR_802A: LDA ADDR_804E,Y ;读取图快号数据* ?4 H( x; r$ T
- ADDR_802D: STA $0201,X ;送入图快号地址
+ \; C8 N. d- _# ^, q) ? - ADDR_8030: LDA $0002 ;读取属性值数据5 H, k# M Y! n9 ?+ K* o) z; [3 m3 C
- ADDR_8032: STA $0202,X ;送入属性值地址
# M; ]5 @1 S5 i - ADDR_8035: LSR ;逻辑右移
: `+ {! k3 d2 v- ~$ y - ADDR_8036: LDA ADDR_8056,Y ;读取横坐标数值0 L4 f$ V6 }4 R) l7 {
- ADDR_8039: BCC ADDR_803E ;C==0,有借位则跳过$2字节, C1 S( I- t. D6 X# @" \8 Z1 M) x
- PHA+ P" u6 N2 Y! x6 K" V. m0 | {
- TYA0 s5 R; O$ |/ `% w
- PHA
1 ]" b/ [8 d% X, Z3 n0 y5 F - LDA #$D4
6 l# S( G! |1 N! E Y" i" ^. G - STA $0200,X
9 H w+ k8 x$ [2 J - PLA
4 l, M5 Z# ~' ?7 r5 s - TAY0 `5 w4 K) s |* M8 t$ D
- PLA% F( [. p7 \0 |. z9 |
- ADDR_803D: CLC9 o/ ~/ O& G# ?+ ?2 e1 M
- ADDR_803E: JSR WEAPON7 \0 P% R: r1 k* u
- ADDR_8041: TXA
: o P! Y u" M: R) e8 A7 G - ADDR_8042: ADC #$C4* L7 Z5 K7 A; Q+ d% T F: I
- ADDR_8044: TAX v, h1 k7 z$ H' B/ {! k) ?
- ADDR_8045: INY
6 i |, E2 y3 O# k' t. {1 h - ADDR_8046: BNE ADDR_8021* r2 ^( B8 A) f2 Z
- ADDR_8048: LDY $0002# C- _2 f6 t) \4 Z5 D B
- ADDR_804A: DEY
+ p( t5 b. p$ I8 J% {6 _* H - ADDR_804B: BPL ADDR_8007
, C4 ]4 G, Q; ?( q _ - ADDR_804D: RTS+ t/ P* Y+ S* v+ |0 M/ ]
- $ M* F6 K3 }6 _; v4 N7 e( b
- .ORG $FF20& E8 a |# o/ t+ a
- ADDR_804E:
7 _, M- d# M$ i - .BYTE $8D,$8D,$8D,$8D,$8D,$8D,$8D,$8D ;生命图块号" F" O5 s/ R. w, Y0 h I. B- I+ J
- .BYTE $83,$85,$87,$89,$FF,$FF,$FF,$FF ;GAME OVER图块号
. p- K& H# h3 D* X# G0 s7 l0 t - ADDR_8056:
2 O: n Z9 r3 Q" p/ d# a - .BYTE $14,$1C,$28,$34,$40,$4C,$58,$64 ;生命图块坐标& a8 f. J: _+ Q8 ^' P) C
- .BYTE $10,$1C,$28,$34,$40,$4C,$58,$64 ;GAME OVER图块坐标
8 _, I. N% A2 E+ S% r& h2 ?. q - + m9 F. y2 A& W' V% m f W# V
0 \4 P5 Y! a% p; W; m+ X- .ORG $FF406 M; i! ~8 l Y! N0 n( ^# S- V
-
9 G" e, Z6 _4 w* H1 O; F) j - WEAPON: r b% `( T$ E1 i+ {
- STA $0203,X
2 m! ]( `0 A+ F4 _0 | - PHP6 r2 m; `6 Y, [8 {$ w4 ?
- PHA; T; ^8 {5 F3 n) M# q
- TYA
" p. g8 b- y4 q9 }2 @( { - PHA
D( R# y2 c6 l) @$ c5 |0 { - CPY #$00 ;9 T! g" r' [' l2 ?# I
- BNE LB& Y$ ^+ f2 x0 b2 D4 o
- JSR S_WRITE ;第一个精灵
' P# ~- m: j) U0 V0 ^2 B3 w - LB:% Z& a/ A5 j t4 `% S5 P( f3 Q! T
- CPY #$01
1 F8 X* I5 r2 Y - BNE RE
) x1 X" o2 g; N - JSR D_WRITE ;第二个精灵! E4 V* R+ J6 J, a9 V# z0 a
- RE:8 T- p9 Z A3 [0 Q7 v$ s) }
- PLA t; t/ J' b$ s+ y3 E) L
- TAY$ T) O- R' F N* n5 ~$ U/ i2 j9 x
- PLA
8 i5 j3 ?/ U7 D# M0 D) A - PLP0 ]$ c9 I1 F3 m) q' I
- RTS
' p5 h! k; g$ ] -
" D. K1 f ?) i# } - S_WRITE:
7 \% Q: ^4 O+ ]1 c; F9 Q( | - PHA/ _+ b1 i& ?" p( e* D% g3 m0 G
- TYA- V z2 L2 F: l
- PHA, w1 U8 }: L6 c* b" B) G/ B- A$ I
- S_CMP:
4 M- M. C9 \% E- L) F - LDY $02
3 j8 x- o" ~. c! b( ] - LDA $B8,Y ;读取武器值
2 E# D% w+ R9 x# e$ B - AND #$10- x& i* h% a3 Q1 v
- BNE S_WEAPON; P2 @8 |" f6 i' j
- M_WEAPON: ;普通状态; T- A. X: G/ D
- LDA #$93
8 ~. C( I; ^- }5 P/ f! d! {9 p* ~/ p7 O - STA $0201,X& l+ U/ {2 }& s- F/ X0 I4 s
- BNE RETURN+ f7 ?& x5 i S+ x) C) ~
- S_WEAPON: ;加速状态
, ^% g$ m1 f4 H8 w; Z( ? - LDA #$95
- t9 \2 w% M- {) B - STA $0201,X
$ G, o) _- Z9 p1 E" f1 m0 u+ ^ - 2 x& f* U2 r$ B: N1 \2 T
- RETURN:
% W; J" ?1 B4 l: M2 v - PLA& P ~/ c9 u8 f3 x$ q. O1 S+ D
- TAY7 [% X8 t0 F) B. h( P+ e5 k* T
- PLA2 {+ U `4 b7 d2 O* L' A a9 ^
- RTS8 ]& `8 d9 u7 X. z+ g1 z3 z; G, ^
-
( b) O, y6 p: d! X( L7 f
! a; q, ^4 a! C+ v8 G" y- 9 G4 I8 \. g) l, F5 p5 p
' v1 O& V; h: v8 U- D_WRITE:5 |0 f/ U- L" p \5 b$ S5 a
- PHA
* p" z( N1 D: o. V+ h$ k: C - TYA
) w& B) W- m- f* F$ M+ K- E4 N, f - PHA x6 U( Y, [% D1 T3 ^
- WEAA:5 b0 ~* J- C4 {$ g" \/ _
- LDY $02
. `# g; r6 R) W! U - LDA $B8,Y
# }- e: r* |" {: e9 q$ `9 y - AND #$0F
, r% P0 F4 {2 t6 w6 @7 m - TAY
! c& [0 h7 G B6 [% N* `/ o2 t. r - LDA DATA,Y
0 d& o* \7 H7 ~# ~7 Q4 W; { - STA $0201,X
$ c/ r: _0 K, j$ b; \ -
* T! m5 \$ [$ B, N6 ~$ {7 R - PLA
1 w7 M. W- d4 s, }& w' d - TAY
% M9 p/ D4 ?1 c. d/ l - PLA2 A3 F& y" E0 A* f
- RTS
6 P( K5 e8 l, y; j2 x6 w( E( @7 F R -
4 l& v# n& X6 f$ [ - DATA: ;武器种类图块6 A* P, J+ b* C8 |( l
- .BYTE $9B,$93,$95,$97,$99,$99
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有账号？立即注册
x
评分
-
1
查看全部评分
-
|
IP卡
狗仔卡
发表于 2017-3-13 21:31:30
提升卡
置顶卡
变色卡
显身卡