Skip to content

Commit

Permalink
Updating more comments
Browse files Browse the repository at this point in the history
  • Loading branch information
@unorig
unorig committed May 7, 2024
1 parent 7dbfa00 commit 49648c7
Show file tree
Hide file tree
Showing 4 changed files with 218 additions and 202 deletions.
8 changes: 4 additions & 4 deletions 2 Paris/4290.asm
View file
Original file line number Diff line number Diff line change
Expand Up @@ -50,7 +50,7 @@ l_42E7
AND #$07 ; (42EF) Logical AND with Accumulator and #$07 (7 / 00000111)
STA $02 ; (42F1) Store A to $02
INC $02 ; (42F3) Increment Memory $02
LDA SpritePointerArray,X ; (42F5) Load A with $6920,X
LDA SpritePointerArray,X ; (42F5) Load A with $6920,X
STA $AE ; (42F8) Store A to $AE
TXA ; (42FA) Transfer X to A
PHA ; (42FB) Push Accumulator to Stack
Expand Down Expand Up @@ -99,15 +99,15 @@ l_4324

l_4330
LDA $6800,X ; (4330) Load A with $6800,X
STA $6900,X ; (4333) Store A to $6900,X
STA $6900,X ; (4333) Store A to $6900,X
LDA $6840,X ; (4336) Load A with $6840,X
STA $6940,X ; (4339) Store A to $6940,X
LDA $6880,X ; (433C) Load A with $6880,X
STA $6980,X ; (433F) Store A to $6980,X
STA $6980,X ; (433F) Store A to $6980,X
LDA $68C0,X ; (4342) Load A with $68C0,X
STA $69C0,X ; (4345) Store A to $69C0,X
LDA $6820,X ; (4348) Load A with $6820,X
STA SpritePointerArray,X ; (434B) Store A to $6920,X
STA SpritePointerArray,X ; (434B) Store A to $6920,X
LDA $6830,X ; (434E) Load A with $6830,X
STA MaydayDirection,X ; (4351) Store A to $6930,X
JMP l_4375 ; (4354) Jump to $4375
Expand Down
160 changes: 160 additions & 0 deletions 2 Paris/5ab0.asm
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,160 @@
l_5AB0
LDX $5AA2 ; (5AB0) Load X with $5AA2
BEQ l_5AE0 ; (5AB3) Branch to $5AE0 if Equal
LDY $5AA3 ; (5AB5) Load Y with Data from $5AA3
DEY ; (5AB8) Decrement Y Register
BPL l_5ABD ; (5AB9) Branch to $5ABD if positive
LDY #$07 ; (5ABB) Load Y with #$07 (7 / 00000111)

l_5ABD
DEX ; (5ABD) Decrement X
BNE l_5AC6 ; (5ABE) Branch to $5AC6 if Not Equal
STX ForwardReverse ; (5AC0) Store X Register $03A4. #00 Forward / #08 Reverse.
STY CarFacingDirection ; (5AC3) Store Y Register $03A0

l_5AC6
STX $5AA2 ; (5AC6) Store X Register $5AA2
STY $5AA3 ; (5AC9) Store Y Register $5AA3
LDA BondSPArray,Y ; (5ACC) Load A with $03A8,Y
STA $AE ; (5ACF) Store A to $AE
CLC ; (5AD1) Clear Carry Flag
LDY #$BD ; (5AD2) Load Y with #$BD (189 / 10111101)
LDX #$AB ; (5AD4) Set X to #$AB (171 / 10101011)
LDA #$08 ; (5AD6) Set A to #$08 (8 / 00001000)
JSR l_4200 ; (5AD8) Jump to Subroutine at $4200
JMP l_4450 ; (5ADB) Jump to $4450

* = $5ADE
.byte $EA,$EA

* = $5AE0

l_5AE0
LDA $FE ; (5AE0) Load A with $FE
BNE l_5AF4 ; (5AE2) Branch to $5AF4 if Not Equal
STA $5AA0 ; (5AE4) Store A to $5AA0
LDA CarFacingDirection ; (5AE7) Load A with $03A0. ;00 N / 01 NE / 02 E / 03 SE / 04 S / 05 SW / 06 W / 07 NW.
AND #$01 ; (5AEA) Logical AND with Accumulator and #$01 (1 / 00000001)
EOR #$01 ; (5AEC) Exclusive OR (XOR) with Accumulator and #$01 (1 / 00000001)
STA $5AA1 ; (5AEE) Store A to $5AA1
JMP l_5B2A ; (5AF1) Jump to $5B2A

l_5AF4
CMP $5AA0 ; (5AF4) Subtract $5AA0 from A
BNE l_5B04 ; (5AF7) Branch to $5B04 if Not Equal
DEC $5AA1 ; (5AF9) Decrement $5AA1
LDA $5AA1 ; (5AFC) Load A with $5AA1
BMI l_5B40 ; (5AFF) Branch to $5B40 if minus
NOP ; (5B01) No operation
LDA $FE ; (5B02) Load A with $FE

l_5B04
BPL l_5B16 ; (5B04) Branch to $5B16 if positive
LDX CarFacingDirection ; (5B06) Load X with $03A0
DEX ; (5B09) Decrement X
CPX #$FF ; (5B0A) Subtract #$FF from X (255 / 11111111)
BNE l_5B10 ; (5B0C) Branch to $5B10 if Not Equal
LDX #$07 ; (5B0E) Set X to #$07 (7 / 00000111)

l_5B10
STX CarFacingDirection ; (5B10) Store X Register $03A0
JMP l_5B25 ; (5B13) Jump to $5B25

l_5B16
LDX CarFacingDirection ; (5B16) Load X with $03A0
INX ; (5B19) Increment X
CPX #$08 ; (5B1A) Subtract #$08 from X (8 / 00001000)
BNE l_5B10 ; (5B1C) Branch to $5B10 if Not Equal
LDX #$00 ; (5B1E) Set X to #$00 (0 / 00000000)
JMP l_5B10 ; (5B20) Jump to $5B10

* = $5B23
.byte $EA,$EA

* = $5B25

l_5B25
LDA $FE ; (5B25) Load A with $FE
STA $5AA0 ; (5B27) Store A to $5AA0

l_5B2A
LDX CarFacingDirection ; (5B2A) Load X with $03A0
LDA BondSPArray,X ; (5B2D) Load A with BondSPArray,X
STA $AE ; (5B30) Store A to $AE
CLC ; (5B32) Clear Carry Flag
LDY #$BD ; (5B33) Load Y with #$BD (189 / 10111101)
LDX #$AB ; (5B35) Set X to #$AB (171 / 10101011)
LDA #$08 ; (5B37) Set A to #$08 (8 / 00001000)
JSR l_4200 ; (5B39) Jump to Subroutine at $4200. Update sprite pointer.
NOP ; (5B3C) No operation
NOP ; (5B3D) No operation
NOP ; (5B3E) No operation
NOP ; (5B3F) No operation

l_5B40
LDA $FE ; (5B40) Load A with $FE
BEQ l_5B51 ; (5B42) Branch to $5B51 if Equal
LDA $07FD ; (5B44) Load A with $07FD
EOR #$02 ; (5B47) Exclusive OR (XOR) with Accumulator and #$02 (2 / 00000010)
STA $07FD ; (5B49) Store A to $07FD
TAY ; (5B4C) Transfer A to Y
DEY ; (5B4D) Decrement Y Register
STY $07FC ; (5B4E) Store Y Register $07FC

l_5B51
JSR CheckJoyInputs ; (5B51) Jump to Subroutine at $4260
LDA ForwardReverse ; (5B54) Load A with $03A4. #00 Forward / #08 Reverse.
BNE l_5B89 ; (5B57) Branch to $5B89 if reverse.
LDA $FD ; (5B59) Load A with $FD
BEQ l_5B86 ; (5B5B) Branch to $5B86 if Equal
BPL DecreaseCarSpeed ; (5B5D) Branch to $5B6F if positive

IncreaseCarSpeed
DEC CarSpeed ; (5B5F) Decrement $0340. Top speed #01 / Slowest speed #39.
LDA CarSpeed ; (5B62) Load A with $0340. Top speed #01 / Slowest speed #39.
BNE l_5B86 ; (5B65) Branch to $5B86 if Not Equal
LDA #$01 ; (5B67) Set A to #$01 (1 / 00000001). Top speed reached so set to #01.
STA CarSpeed ; (5B69) Store A to $0340. Top speed #01 / Slowest speed #39.
JMP l_5B86 ; (5B6C) Jump to $5B86

DecreaseCarSpeed
INC CarSpeed ; (5B6F) Increment Memory $0340. Top speed #01 / Slowest speed #39.
LDA CarSpeed ; (5B72) Load A with $0340. Top speed #01 / Slowest speed #39.
CMP #$40 ; (5B75) Subtract #$40 from A (64 / 01000000)
BNE l_5B86 ; (5B77) Branch to $5B86 if Not Equal
LDA ForwardReverse ; (5B79) Load A with $03A4. #00 Forward / #08 Reverse.
EOR #$08 ; (5B7C) Exclusive OR (XOR) with Accumulator and #$08 (8 / 00001000)
STA ForwardReverse ; (5B7E) Store A to $03A4. #00 Forward / #08 Reverse.
LDA #$3F ; (5B81) Set A to #$3F (63 / 00111111)
STA CarSpeed ; (5B83) Store A to $0340. Top speed #01 / Slowest speed #39.

l_5B86
JMP l_5B92 ; (5B86) Jump to $5B92

l_5B89
LDA $FD ; (5B89) Load A with $FD
BEQ l_5B86 ; (5B8B) Branch to $5B86 if Equal
BMI DecreaseCarSpeed ; (5B8D) Branch to $5B6F if minus
JMP IncreaseCarSpeed ; (5B8F) Jump to $5B5F

l_5B92
LDA $02 ; (5B92) Load A with $02
BEQ l_5BB8 ; (5B94) Branch to $5BB8 if Equal
LDA $5AA2 ; (5B96) Load A with $5AA2
BNE l_5BB8 ; (5B99) Branch to $5BB8 if Not Equal
LDA ForwardReverse ; (5B9B) Load A with $03A4. #00 Forward / #08 Reverse.
BEQ l_5BB5 ; (5B9E) Branch to $5BB5 if Equal
LDA CarSpeed ; (5BA0) Load A with $0340. Top speed #01 / Slowest speed #39.
CMP #$15 ; (5BA3) Subtract #$15 from A (21 / 00010101)
BCS l_5BB5 ; (5BA5) Branch if Carry Set $5BB5
LDA #$04 ; (5BA7) Set A to #$04 (4 / 00000100)
STA $5AA2 ; (5BA9) Store A to $5AA2
LDA CarFacingDirection ; (5BAC) Load A with $03A0
STA $5AA3 ; (5BAF) Store A to $5AA3
JMP l_5A66 ; (5BB2) Jump to $5A66

l_5BB5
JSR l_4570 ; (5BB5) Jump to Subroutine at $4570

l_5BB8
JMP l_5A66 ; (5BB8) Jump to $5A66
50 changes: 32 additions & 18 deletions 2 Paris/4e00.asm → 2 Paris/CalculateMapPosition.asm
View file
Original file line number Diff line number Diff line change
@@ -1,33 +1,44 @@
l_4E00
CalculateMapPosition
LDA V_MapXposition ; (4E00) Load A with $033C
STA $AE ; (4E03) Store A to $AE
LDA V_MapYposition ; (4E05) Load A with $033D
STA $AF ; (4E08) Store A to $AF
LDA $0335 ; (4E0A) Load A with $0335
BEQ l_4E2E ; (4E0D) Branch to $4E2E if Equal
BMI l_4E21 ; (4E0F) Branch to $4E21 if minus
LDA $0335 ; (4E0A) Load A with $0335. Goes between #ff to #01 when going North/South
BEQ CheckMapEastWest ; (4E0D) Branch to $4E2E if Equal
BMI MapNorth ; (4E0F) Branch to $4E21 if minus
; **********************************
; * Update for going south.
; **********************************
CLC ; (4E11) Clear Carry Flag
LDA #$7E ; (4E12) Set A to #$7E (126 / 01111110)
ADC $AE ; (4E14) Add with Carry $AE
LDA #$7E ; (4E12) Set A to #$7E (126 / 01111110). The value of map width.
ADC $AE ; (4E14) Add with Carry $AE (V_MapXposition)
STA $AE ; (4E16) Store A to $AE
LDA $AF ; (4E18) Load A with $AF
LDA $AF ; (4E18) Load A with $AF (V_MapYposition)
ADC #$00 ; (4E1A) Add with Carry with #$00 (0 / 00000000)
STA $AF ; (4E1C) Store A to $AF
JMP l_4E2E ; (4E1E) Jump to $4E2E
JMP CheckMapEastWest ; (4E1E) Jump to $4E2E

l_4E21
MapNorth
; **********************************
; * Update for going north.
; **********************************
SEC ; (4E21) Set Carry Flag
LDA $AE ; (4E22) Load A with $AE
SBC #$7E ; (4E24) Subtract with Carry #$7E (126 / 01111110)
LDA $AE ; (4E22) Load A with $AE (V_MapXposition)
SBC #$7E ; (4E24) Subtract with Carry #$7E (126 / 01111110). The value of map width.
STA $AE ; (4E26) Store A to $AE
LDA $AF ; (4E28) Load A with $AF
SBC #$00 ; (4E2A) Subtract with Carry #$00 (0 / 00000000)
STA $AF ; (4E2C) Store A to $AF

l_4E2E
LDA $0334 ; (4E2E) Load A with $0334
CheckMapEastWest
LDA $0334 ; (4E2E) Load A with $0334. Goes between #ff to #01 when going East/West.
BEQ l_4E52 ; (4E31) Branch to $4E52 if Equal
BMI l_4E45 ; (4E33) Branch to $4E45 if minus
BMI MapWest ; (4E33) Branch to $4E45 if minus
; **********************************
; * Update for going east.
; **********************************
CLC ; (4E35) Clear Carry Flag
LDA #$01 ; (4E36) Set A to #$01 (1 / 00000001)
ADC $AE ; (4E38) Add with Carry $AE
Expand All @@ -37,7 +48,10 @@ l_4E2E
STA $AF ; (4E40) Store A to $AF
JMP l_4E52 ; (4E42) Jump to $4E52

l_4E45
MapWest
; **********************************
; * Update for going west.
; **********************************
SEC ; (4E45) Set Carry Flag
LDA $AE ; (4E46) Load A with $AE
SBC #$01 ; (4E48) Subtract with Carry #$01 (1 / 00000001)
Expand All @@ -48,10 +62,10 @@ l_4E45

l_4E52
CLC ; (4E52) Clear Carry Flag
LDA $AE ; (4E53) Load A with $AE
ADC #$08 ; (4E55) Add with Carry with #$08 (8 / 00001000)
LDA $AE ; (4E53) Load A with $AE. Temp calculated V_MapXposition
ADC #$08 ; (4E55) Add with Carry with #$08 (8 / 00001000).
STA $AE ; (4E57) Store A to $AE
LDA $AF ; (4E59) Load A with $AF
LDA $AF ; (4E59) Load A with $AF. Temp calculated V_MapYposition
ADC #$03 ; (4E5B) Add with Carry with #$03 (3 / 00000011)
STA $AF ; (4E5D) Store A to $AF
SEC ; (4E5F) Set Carry Flag
Expand Down
Loading

0 comments on commit 49648c7

Please sign in to comment.