mirror of
https://github.com/wwarthen/RomWBW.git
synced 2026-02-06 22:43:15 -06:00
d156aba1f9
A new command line switch has been added '--hbios'. Using this switch after the filename, will cause tune.com to play thru the HBIOS sound driver MYM file types are not supported thru HBIOS yet.
40 lines
444 B
PHP
40 lines
444 B
PHP
STRINDEX: ; SEARCH FOR STRING AT DE WITHIN STRING AT HL
|
|
|
|
LD B, 0
|
|
LD C, 0
|
|
|
|
TRYNEXT:
|
|
PUSH HL
|
|
PUSH DE
|
|
CALL STRCMP
|
|
POP DE
|
|
POP HL
|
|
RET Z
|
|
|
|
INC HL
|
|
INC BC
|
|
LD A, (HL)
|
|
OR A
|
|
JR NZ, TRYNEXT
|
|
|
|
OR $FF ; RETURN NZ
|
|
RET
|
|
|
|
STRCMP: ; COMPARE STRING AT HL WITH DE - RETURN Z IF LIKE
|
|
LD A, (DE)
|
|
OR A
|
|
RET Z
|
|
|
|
LD B, A
|
|
LD A, (HL)
|
|
OR A
|
|
JR NZ, STRCMP1
|
|
OR $FF ; END OF STRING HL - SO NOT FOUND
|
|
RET
|
|
STRCMP1
|
|
CP B
|
|
RET NZ
|
|
INC HL
|
|
INC DE
|
|
JR STRCMP
|