mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-12-23 19:11:36 +13:00
Whitespace.
This commit is contained in:
IIMarckus
parent
d9c77261a1
commit
4decef28dd
96
main.asm
96
main.asm
|
|
@ -18646,7 +18646,7 @@ HpBarAndStatusGraphics: ; 0x11ea0
|
||||||
INCBIN "baserom.gbc",$12080,$12288 - $12080 ; FIXME
|
INCBIN "baserom.gbc",$12080,$12288 - $12080 ; FIXME
|
||||||
|
|
||||||
TextBoxGraphics: ; 0x12288
|
TextBoxGraphics: ; 0x12288
|
||||||
INCBIN "gfx/text_box.2bpp"
|
INCBIN "gfx/text_box.2bpp"
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$12488,$12953 - $12488
|
INCBIN "baserom.gbc",$12488,$12953 - $12488
|
||||||
|
|
||||||
|
|
@ -70200,86 +70200,86 @@ INCBIN "baserom.gbc",$71FB6,$71FEB-$71FB6
|
||||||
|
|
||||||
SendSGBPacket: ;$5feb
|
SendSGBPacket: ;$5feb
|
||||||
;check number of packets
|
;check number of packets
|
||||||
ld a,[hl]
|
ld a,[hl]
|
||||||
and a,$07
|
and a,$07
|
||||||
ret z
|
ret z
|
||||||
; store number of packets in B
|
; store number of packets in B
|
||||||
ld b,a
|
ld b,a
|
||||||
.loop2\@
|
.loop2\@
|
||||||
; save B for later use
|
; save B for later use
|
||||||
push bc
|
push bc
|
||||||
; load a non-zero value in $fff9 to disable the routine that checks actual
|
; load a non-zero value in $fff9 to disable the routine that checks actual
|
||||||
; joypad input (said routine, located at $15f, does nothing if $fff9 is not
|
; joypad input (said routine, located at $15f, does nothing if $fff9 is not
|
||||||
; zero)
|
; zero)
|
||||||
ld a,$01
|
ld a,$01
|
||||||
ld [$fff9],a
|
ld [$fff9],a
|
||||||
; send RESET signal (P14=LOW, P15=LOW)
|
; send RESET signal (P14=LOW, P15=LOW)
|
||||||
xor a
|
xor a
|
||||||
ld [$ff00],a
|
ld [$ff00],a
|
||||||
; set P14=HIGH, P15=HIGH
|
; set P14=HIGH, P15=HIGH
|
||||||
ld a,$30
|
ld a,$30
|
||||||
ld [$ff00],a
|
ld [$ff00],a
|
||||||
;load length of packets (16 bytes)
|
;load length of packets (16 bytes)
|
||||||
ld b,$10
|
ld b,$10
|
||||||
.nextByte\@
|
.nextByte\@
|
||||||
;set bit counter (8 bits per byte)
|
;set bit counter (8 bits per byte)
|
||||||
ld e,$08
|
ld e,$08
|
||||||
; get next byte in the packet
|
; get next byte in the packet
|
||||||
ld a,[hli]
|
ld a,[hli]
|
||||||
ld d,a
|
ld d,a
|
||||||
.nextBit0\@
|
.nextBit0\@
|
||||||
bit 0,d
|
bit 0,d
|
||||||
; if 0th bit is not zero set P14=HIGH,P15=LOW (send bit 1)
|
; if 0th bit is not zero set P14=HIGH,P15=LOW (send bit 1)
|
||||||
ld a,$10
|
ld a,$10
|
||||||
jr nz,.next0\@
|
jr nz,.next0\@
|
||||||
; else (if 0th bit is zero) set P14=LOW,P15=HIGH (send bit 0)
|
; else (if 0th bit is zero) set P14=LOW,P15=HIGH (send bit 0)
|
||||||
ld a,$20
|
ld a,$20
|
||||||
.next0\@
|
.next0\@
|
||||||
ld [$ff00],a
|
ld [$ff00],a
|
||||||
; must set P14=HIGH,P15=HIGH between each "pulse"
|
; must set P14=HIGH,P15=HIGH between each "pulse"
|
||||||
ld a,$30
|
ld a,$30
|
||||||
ld [$ff00],a
|
ld [$ff00],a
|
||||||
; rotation will put next bit in 0th position (so we can always use command
|
; rotation will put next bit in 0th position (so we can always use command
|
||||||
; "bit 0,d" to fetch the bit that has to be sent)
|
; "bit 0,d" to fetch the bit that has to be sent)
|
||||||
rr d
|
rr d
|
||||||
; decrease bit counter so we know when we have sent all 8 bits of current byte
|
; decrease bit counter so we know when we have sent all 8 bits of current byte
|
||||||
dec e
|
dec e
|
||||||
jr nz,.nextBit0\@
|
jr nz,.nextBit0\@
|
||||||
dec b
|
dec b
|
||||||
jr nz,.nextByte\@
|
jr nz,.nextByte\@
|
||||||
; send bit 1 as a "stop bit" (end of parameter data)
|
; send bit 1 as a "stop bit" (end of parameter data)
|
||||||
ld a,$20
|
ld a,$20
|
||||||
ld [$ff00],a
|
ld [$ff00],a
|
||||||
; set P14=HIGH,P15=HIGH
|
; set P14=HIGH,P15=HIGH
|
||||||
ld a,$30
|
ld a,$30
|
||||||
ld [$ff00],a
|
ld [$ff00],a
|
||||||
xor a
|
xor a
|
||||||
ld [$fff9],a
|
ld [$fff9],a
|
||||||
; wait for about 70000 cycles
|
; wait for about 70000 cycles
|
||||||
call Wait7000
|
call Wait7000
|
||||||
; restore (previously pushed) number of packets
|
; restore (previously pushed) number of packets
|
||||||
pop bc
|
pop bc
|
||||||
dec b
|
dec b
|
||||||
; return if there are no more packets
|
; return if there are no more packets
|
||||||
ret z
|
ret z
|
||||||
; else send 16 more bytes
|
; else send 16 more bytes
|
||||||
jr .loop2\@
|
jr .loop2\@
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$7202B,$7214A-$7202B
|
INCBIN "baserom.gbc",$7202B,$7214A-$7202B
|
||||||
|
|
||||||
Wait7000: ;$614a
|
Wait7000: ;$614a
|
||||||
; each loop takes about 10 cycles so this routine actually loops through 70000
|
; each loop takes about 10 cycles so this routine actually loops through 70000
|
||||||
; cycles.
|
; cycles.
|
||||||
ld de,$1b58 ; = 7000
|
ld de,$1b58 ; = 7000
|
||||||
.loop\@
|
.loop\@
|
||||||
nop
|
nop
|
||||||
nop
|
nop
|
||||||
nop
|
nop
|
||||||
dec de
|
dec de
|
||||||
ld a,d
|
ld a,d
|
||||||
or e
|
or e
|
||||||
jr nz,.loop\@
|
jr nz,.loop\@
|
||||||
ret
|
ret
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$72156,$725C8-$72156
|
INCBIN "baserom.gbc",$72156,$725C8-$72156
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue