pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-01-23 09:16:20 -08:00
Code Issues Packages Projects Releases Wiki Activity

hram constants in serial interrupt

Browse Source
This commit is contained in:
yenatch 2013-08-28 04:28:53 -04:00
parent 03abb89474
commit 7fe1fa58e3
1 changed files with 22 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
main.asm
View File

@ -632,7 +632,6 @@ Function6e3: ; 6e3
; 6ef ; 6ef
Serial: ; 6ef Serial: ; 6ef
push af push af
push bc push bc
@ -652,16 +651,18 @@ Serial: ; 6ef
jr z, .asm_726 jr z, .asm_726
ld a, [rSB] ld a, [rSB]
ld [$ffce], a ld [hSerialReceive], a
ld a, [$ffcd]
ld a, [hSerialSend]
ld [rSB], a ld [rSB], a
ld a, [$ffcb] ld a, [$ffcb]
cp $2 cp $2
jr z, .asm_752 jr z, .asm_752
ld a, $00 ld a, 0 << rSC_ON
ld [rSC], a ld [rSC], a
ld a, $80 ld a, 1 << rSC_ON
ld [rSC], a ld [rSC], a
jr .asm_752 jr .asm_752
@ -681,21 +682,24 @@ Serial: ; 6ef
jr nz, .asm_752 jr nz, .asm_752
.asm_730 .asm_730
ld [$ffce], a ld [hSerialReceive], a
ld [$ffcb], a ld [$ffcb], a
cp $2 cp $2
jr z, .asm_74f jr z, .asm_74f
xor a xor a
ld [rSB], a ld [rSB], a
ld a, $3 ld a, $3
ld [rDIV], a ld [rDIV], a
.asm_73f .asm_73f
ld a, [rDIV] ld a, [rDIV]
bit 7, a bit 7, a
jr nz, .asm_73f jr nz, .asm_73f
ld a, $00
ld a, 0 << rSC_ON
ld [rSC], a ld [rSC], a
ld a, $80 ld a, 1 << rSC_ON
ld [rSC], a ld [rSC], a
jr .asm_752 jr .asm_752
@ -707,7 +711,7 @@ Serial: ; 6ef
ld a, $1 ld a, $1
ld [$ffca], a ld [$ffca], a
ld a, $fe ld a, $fe
ld [$ffcd], a ld [hSerialSend], a
.asm_75a .asm_75a
pop hl pop hl
@ -722,7 +726,7 @@ Function75f: ; 75f
ld [$ffcc], a ld [$ffcc], a
.asm_763 .asm_763
ld a, [hl] ld a, [hl]
ld [$ffcd], a ld [hSerialSend], a
call Function78a call Function78a
push bc push bc
ld b, a ld b, a
@ -820,7 +824,7 @@ Function78a: ; 78a
ld [$cf5e], a ld [$cf5e], a
.asm_7f8 .asm_7f8
ld a, [$ffce] ld a, [hSerialReceive]
cp $fe cp $fe
ret nz ret nz
call Function82b call Function82b
@ -846,7 +850,7 @@ Function78a: ; 78a
ld a, $fe ld a, $fe
ret z ret z
ld a, [hl] ld a, [hl]
ld [$ffcd], a ld [hSerialSend], a
call DelayFrame call DelayFrame
jp Function78a jp Function78a
@ -883,7 +887,7 @@ Function83b: ; 83b
.asm_847 .asm_847
call DelayFrame call DelayFrame
ld a, [hl] ld a, [hl]
ld [$ffcd], a ld [hSerialSend], a
call Function78a call Function78a
ld b, a ld b, a
inc hl inc hl
@ -976,7 +980,7 @@ Function8c1: ; 8c1
call Function8f3 call Function8f3
ld a, [$cf56] ld a, [$cf56]
add b add b
ld [$ffcd], a ld [hSerialSend], a
ld a, [$ffcb] ld a, [$ffcb]
cp $2 cp $2
jr nz, .asm_8ee jr nz, .asm_8ee
@ -992,13 +996,13 @@ Function8c1: ; 8c1
; 8f3 ; 8f3
Function8f3: ; 8f3 Function8f3: ; 8f3
ld a, [$ffce] ld a, [hSerialReceive]
ld [$cf51], a ld [$cf51], a
and $f0 and $f0
cp b cp b
ret nz ret nz
xor a xor a
ld [$ffce], a ld [hSerialReceive], a
ld a, [$cf51] ld a, [$cf51]
and $f and $f
ld [$cf52], a ld [$cf52], a
@ -1007,7 +1011,7 @@ Function8f3: ; 8f3
Function908: ; 908 Function908: ; 908
xor a xor a
ld [$ffcd], a ld [hSerialSend], a
ld a, [$ffcb] ld a, [$ffcb]
cp $2 cp $2
ret nz ret nz
@ -1025,7 +1029,7 @@ Function919: ; 919
ld a, $2 ld a, $2
ld [rSB], a ld [rSB], a
xor a xor a
ld [$ffce], a ld [hSerialReceive], a
ld a, $0 ld a, $0
ld [rSC], a ld [rSC], a
ld a, $80 ld a, $80