Celebi non english language source

This commit is contained in:
notblisy 2023-11-17 08:51:19 -05:00 committed by GitHub
parent a4fcee5cee
commit 9ecdcfbdb7
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
48 changed files with 1750 additions and 0 deletions

View File

@ -0,0 +1,175 @@
INCLUDE "../macros.asm"
SECTION "eonticket",ROM0[$100]
jp Start
db $00
TicketSprite: ; 104
INCBIN "Spr_3r_251.img.bin"
TicketPalette: ; 1604
INCBIN "Spr_3r_251.pal.bin"
Prologue:
INCBIN "prologue-{REGION_NAME}.bin"
DataPacket: ; 164a
INCBIN "eonticket-{REGION_NAME}.mev"
db 0,0,0 ; padding
INCLUDE "../common/mem_struct.asm"
SpriteData:
dw TicketSprite,TicketPalette
db $07,$07,$01,$01,$01,$01,$01 ; width 15, height 15
Instructions1: ; 1921
db "Veuillez connecter l'e-Reader a\n"
db "RUBIS ou SAPHIR et sélectionner\n"
db "EVENEMENTS MYSTERES sur le menu\n"
db "principal. B pour annuler.\0"
Instructions2: ; 199d
db "Appuyez sur le Bouton A de la\n"
db "Game Boy Advance contenant\n"
db "POKéMON RUBIS ou SAPHIR pour\n"
db "commencer l'envoi de CELEBI\0"
DeliveryInProcess: ; 1a0d
db " Réception de CELEBI en cours...\0"
TicketDelivered: ; 1a2f
db "CELEBI recu!\n"
db "\n"
db "Appuyez sur A pour renvoyer.\n"
db "Appuyez sur B pour annuler.\0"
; this function is subtly different than the one
; on the Battle e cards, for no apparent reason
TransferData:
LD_IND_HL SomeVar1
push de
ld hl, $bbbb
LD_IND_HL Space_1
EX_DE_HL
LD_IND_HL Space_2
API_0C7 Space_1
wait $01
pop hl
inc hl
ld b, $01
call WordShiftRight
LD_IND_HL SomeVar2
.asm_1aa1
LD_HL_IND SomeVar2
ld a, l
or h
ret z
ld hl, $8888
LD_IND_HL Space_1
ld e, $01
.asm_1aaf
ld a, e
cp $08
jr nc, .asm_1ad9
push de
LD_HL_IND SomeVar1
ld c, [hl]
inc hl
ld b, [hl]
inc hl
LD_IND_HL SomeVar1
ld l, e
ld h, $00
add hl, hl
ld de, Space_1
add hl, de
ld [hl], c
inc hl
ld [hl], b
pop de
LD_HL_IND SomeVar2
dec hl
LD_IND_HL SomeVar2
ld a, l
or h
jr z, .asm_1ad9
inc e
jr .asm_1aaf
.asm_1ad9
API_0C7 Space_1
wait $01
jr .asm_1aa1
Start: ; 1ae2
API_121
CreateCustomSprite SpriteHandlePtr, $80, SpriteData
SetSpritePos SpriteHandlePtr, 120, 64
SpriteHide SpriteHandlePtr
CreateRegion RegionHandlePtr, 30, 6, 0, 14, 0, 4
ld h, a
ld l, $00
SetTextSize
API_09B RegionHandlePtr, $0102
SetTextColor RegionHandlePtr, 2, 0
SetRegionColor RegionHandlePtr, 0
SetBackgroundPalette 16, $0040, TicketPalette
FadeIn 16
wait 16
API $0C6
DrawText RegionHandlePtr, Instructions1, 8, 4
API $08D
INCLUDE "../common/wait_for_link.asm"
SpriteShow SpriteHandlePtr
DrawText RegionHandlePtr, Instructions2, 8, 4
API $08D
ld a, b
nop
UNKNOWN_VALUE EQU $0078
INCLUDE "../common/wait_for_ready.asm"
DrawText RegionHandlePtr, DeliveryInProcess, 8, 4
DATA_TRANSFER_LENGTH EQU 6144
INCLUDE "../common/transfer_data.asm"
ld hl, $5fff
LD_IND_HL Space_1
API_0C7 Space_1
wait $80
SpriteHide SpriteHandlePtr
DrawText RegionHandlePtr, TicketDelivered, 8, 4
API $08D
ld c, a
nop
INCLUDE "../common/wrap_up.asm"
INCLUDE "../common/word_shift_right.asm"
SomeVar1: ; 1CA2
db $FF,0 ; mark EOF
RegionHandlePtr: db 0 ; 1CA4
SpriteHandlePtr: db 0,0 ; 1CA5
SomeVar2: db 0,0 ; 1CA7

View File

@ -0,0 +1,40 @@
all: 00-C000-EN.raw verify
verify:
md5sum --check eonticket.md5
eonticket-%.tx: eonticket.asm
python ../scripts/regionalize.py $< $@ $* $*
eonticket-%.o: eonticket-%.tx
./rgbasm -o $@ $<
eonticket-%.gbc: eonticket-%.o
./rgblink -o $@ $<
eonticket-%.bin: eonticket-%.gbc
python ../scripts/stripgbc.py $< $@
eonticket-%.mev: eonticket-%.bin
python ../scripts/checksum.py $< $@
prologue-%.tx: prologue.asm
python ../scripts/regionalize.py $< $@ $* $*
prologue-%.o: prologue-%.tx
./rgbasm -o $@ $<
prologue-%.gbc: prologue-%.o
./rgblink -o $@ $<
prologue-%.bin: prologue-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.tx: 00-C000.asm eonticket-%.mev prologue-%.bin
python ../scripts/ereadertext.py $< $@ $*
00-C000-%.o: 00-C000-%.tx
./rgbasm -o $@ $<
00-C000-%.gbc: 00-C000-%.o
./rgblink -o $@ $<
00-C000-%.z80: 00-C000-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.vpk: 00-C000-%.z80
./nevpk -c -i $< -o $@
00-C000-%.raw: 00-C000-%.vpk
./nedcmake -i $< -o $@ -type 1 -region 1
clean:
rm -f *.tx *.o *.gbc *.z80 *.bin *.mev *.vpk *.raw

Binary file not shown.

View File

@ -0,0 +1 @@
_F9W˙ýk¸SO;č"$˙µîr'f€Y|Ö^ÍA

Binary file not shown.

View File

@ -0,0 +1,206 @@
INCLUDE "../macros.asm"
INCLUDE "../constants/items.asm"
INCLUDE "../constants/scriptcommandscelebibattleger.asm"
Mystery_Event
db CHECKSUM_CRC
dd 0 ; checksum placeholder
GBAPTR DataStart
GBAPTR DataEnd
DataStart:
db IN_GAME_SCRIPT
db 24,11 ; petalburg gym
db 2 ; norman
GBAPTR NormanScriptStart
GBAPTR NormanScriptEnd
db PRELOAD_SCRIPT
GBAPTR PreloadScriptStart
db END_OF_CHUNKS
GoSeeYourFather:
Text_EN "Un flash lumineux a été aperçu au\n"
Text_EN "BOIS CLEMENTI!\p"
Text_EN "Depuis, un POKéMON rare a été\n"
Text_EN "vu en train de faire repousser\l"
Text_EN "de petits arbres.@"
NormanScriptStart:
setvirtualaddress NormanScriptStart
virtualmsgbox Poor
waitmsg
db $6E, $17, $8
release
compare LASTRESULT, 0
virtualgotoif 1, Changemind
virtualgotoif 5, CelebiEvent
TEMPCELEBI
STRUCTURETABLEG
STRUCTURETABLEA
STRUCTURETABLEE
STRUCTURETABLEM
LOADSTOREPARTYAMOUNT
COLORNG
MEMCPYSETUP
SUBSTRUCTURECPY
CHECKSUM
ENCRYPT
CALCSTATS
CAPTURECELEBI
CELEBICOPY1
SRFIX
CelebiEvent:
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoom
copyvar $800B, $800D
callasm $02028E9D
callasm $02028EB1
callasm $02028F91
callasm $02028FA1
callasm $02028FD5
callasm $02028FED
special $13D
sound $13
waitstate
playmoncry $FB, $0
virtualmsgbox Celebi
waitmsg
waitmoncry
waitkeypress
release
special $138
playsong $0166, $0
waitmoncry
waitstate
db $43
comparevar LASTRESULT, $800B
virtualgotoif 3, FlewAway
virtualgotoif 2, Catch
Catch:
callasm $02028FB1
killscript
NoRoom:
virtualmsgbox NoSpace
waitmsg
waitkeypress
release
end
Changemind:
virtualmsgbox Change
waitmsg
waitkeypress
release
end
NoRoomToGive:
virtualloadpointer NoSpace
setbyte 3
killscript
FlewAway:
db $97, $01
db $97, $00
virtualmsgbox Flew
waitmsg
waitkeypress
release
killscript
Poor:
Text_EN "Un POKéMON sagite\n"
Text_EN "dans cet arbre\p"
Text_EN "Voulez-vous enquêter?@"
Change:
Text_EN "Une autre fois peut-être.@"
Flew:
Text_EN "Le CELEBI prend la fuite!@"
NoSpace:
Text_EN "Vous avez besoin dune place dans votre\n"
Text_EN "équipe pour capturer CELEBI.@"
Celebi:
Text_EN "CELEBI: Biyoo!@"
NormanScriptEnd:
PreloadScriptStart:
setvirtualaddress PreloadScriptStart
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoomToGive
virtualloadpointer GoSeeYourFather
setbyte 2
end
DataEnd:
EOF

View File

@ -0,0 +1 @@
901180e44767e19e5dc9d5df881fe123 00-C000-EN.z80

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,15 @@
INCLUDE "../macros.asm"
SECTION "prologue", ROM0[$100]
db "GameFreak inc."
db 0,0,0,0,0,0
dd 0
Text "e reader" ; no string terminator
db 0,0,0,0,$01,$55
db 0,0,0,0
db REGION_FR
db 0
db "GameFreak inc."
db 0,0
EOF

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,174 @@
INCLUDE "../macros.asm"
SECTION "eonticket",ROM0[$100]
jp Start
db $00
TicketSprite: ; 104
INCBIN "Spr_3r_251.img.bin"
TicketPalette: ; 1604
INCBIN "Spr_3r_251.pal.bin"
Prologue:
INCBIN "prologue-{REGION_NAME}.bin"
DataPacket: ; 164a
INCBIN "eonticket-{REGION_NAME}.mev"
db 0,0,0 ; padding
INCLUDE "../common/mem_struct.asm"
SpriteData:
dw TicketSprite,TicketPalette
db $07,$07,$01,$01,$01,$01,$01 ; width 15, height 15
Instructions1: ; 1921
db "Verbinde den e-Reader mit POKéMON\n"
db "Rubin oder Saphir und wahle\n"
db "GEHEIMGESCHEHEN im Spiels.\n"
db "Drucke B, um abzubrechen.\0"
Instructions2: ; 199d
db "Drucke den A auf dem GameBoy\n"
db "Advance mit Pokémon Rubin oder\n"
db "Saphir, um mit der Ubertragung des\n"
db "CELEBI zu beginnen\0"
DeliveryInProcess: ; 1a0d
db "Die Ubertragung des CELEBI\n"
db "bist im Gange..\0"
TicketDelivered: ; 1a2f
db "Das CELEBI wurde ubertragen!\0"
; this function is subtly different than the one
; on the Battle e cards, for no apparent reason
TransferData:
LD_IND_HL SomeVar1
push de
ld hl, $bbbb
LD_IND_HL Space_1
EX_DE_HL
LD_IND_HL Space_2
API_0C7 Space_1
wait $01
pop hl
inc hl
ld b, $01
call WordShiftRight
LD_IND_HL SomeVar2
.asm_1aa1
LD_HL_IND SomeVar2
ld a, l
or h
ret z
ld hl, $8888
LD_IND_HL Space_1
ld e, $01
.asm_1aaf
ld a, e
cp $08
jr nc, .asm_1ad9
push de
LD_HL_IND SomeVar1
ld c, [hl]
inc hl
ld b, [hl]
inc hl
LD_IND_HL SomeVar1
ld l, e
ld h, $00
add hl, hl
ld de, Space_1
add hl, de
ld [hl], c
inc hl
ld [hl], b
pop de
LD_HL_IND SomeVar2
dec hl
LD_IND_HL SomeVar2
ld a, l
or h
jr z, .asm_1ad9
inc e
jr .asm_1aaf
.asm_1ad9
API_0C7 Space_1
wait $01
jr .asm_1aa1
Start: ; 1ae2
API_121
CreateCustomSprite SpriteHandlePtr, $80, SpriteData
SetSpritePos SpriteHandlePtr, 120, 64
SpriteHide SpriteHandlePtr
CreateRegion RegionHandlePtr, 30, 6, 0, 14, 0, 4
ld h, a
ld l, $00
SetTextSize
API_09B RegionHandlePtr, $0102
SetTextColor RegionHandlePtr, 2, 0
SetRegionColor RegionHandlePtr, 0
SetBackgroundPalette 16, $0040, TicketPalette
FadeIn 16
wait 16
API $0C6
DrawText RegionHandlePtr, Instructions1, 8, 4
API $08D
INCLUDE "../common/wait_for_link.asm"
SpriteShow SpriteHandlePtr
DrawText RegionHandlePtr, Instructions2, 8, 4
API $08D
ld a, b
nop
UNKNOWN_VALUE EQU $0078
INCLUDE "../common/wait_for_ready.asm"
DrawText RegionHandlePtr, DeliveryInProcess, 8, 4
DATA_TRANSFER_LENGTH EQU 6144
INCLUDE "../common/transfer_data.asm"
ld hl, $5fff
LD_IND_HL Space_1
API_0C7 Space_1
wait $80
SpriteHide SpriteHandlePtr
DrawText RegionHandlePtr, TicketDelivered, 8, 4
API $08D
ld c, a
nop
INCLUDE "../common/wrap_up.asm"
INCLUDE "../common/word_shift_right.asm"
SomeVar1: ; 1CA2
db $FF,0 ; mark EOF
RegionHandlePtr: db 0 ; 1CA4
SpriteHandlePtr: db 0,0 ; 1CA5
SomeVar2: db 0,0 ; 1CA7

Binary file not shown.

View File

@ -0,0 +1,40 @@
all: 00-C000-EN.raw verify
verify:
md5sum --check eonticket.md5
eonticket-%.tx: eonticket.asm
python ../scripts/regionalize.py $< $@ $* $*
eonticket-%.o: eonticket-%.tx
./rgbasm -o $@ $<
eonticket-%.gbc: eonticket-%.o
./rgblink -o $@ $<
eonticket-%.bin: eonticket-%.gbc
python ../scripts/stripgbc.py $< $@
eonticket-%.mev: eonticket-%.bin
python ../scripts/checksum.py $< $@
prologue-%.tx: prologue.asm
python ../scripts/regionalize.py $< $@ $* $*
prologue-%.o: prologue-%.tx
./rgbasm -o $@ $<
prologue-%.gbc: prologue-%.o
./rgblink -o $@ $<
prologue-%.bin: prologue-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.tx: 00-C000.asm eonticket-%.mev prologue-%.bin
python ../scripts/ereadertext.py $< $@ $*
00-C000-%.o: 00-C000-%.tx
./rgbasm -o $@ $<
00-C000-%.gbc: 00-C000-%.o
./rgblink -o $@ $<
00-C000-%.z80: 00-C000-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.vpk: 00-C000-%.z80
./nevpk -c -i $< -o $@
00-C000-%.raw: 00-C000-%.vpk
./nedcmake -i $< -o $@ -type 1 -region 1
clean:
rm -f *.tx *.o *.gbc *.z80 *.bin *.mev *.vpk *.raw

View File

@ -0,0 +1,205 @@
INCLUDE "../macros.asm"
INCLUDE "../constants/items.asm"
INCLUDE "../constants/scriptcommandscelebibattleger.asm"
Mystery_Event
db CHECKSUM_CRC
dd 0 ; checksum placeholder
GBAPTR DataStart
GBAPTR DataEnd
DataStart:
db IN_GAME_SCRIPT
db 24,11 ; petalburg gym
db 2 ; norman
GBAPTR NormanScriptStart
GBAPTR NormanScriptEnd
db PRELOAD_SCRIPT
GBAPTR PreloadScriptStart
db END_OF_CHUNKS
GoSeeYourFather:
Text_EN "Ein heller Blitz wurde im\n"
Text_EN "BLÜTENBURGWALD gesichtet!\p"
Text_EN "Seitdem wurde ein seltenes Pokemon\n"
Text_EN "gesehen, welches kahle Bäume heilt.@"
NormanScriptStart:
setvirtualaddress NormanScriptStart
virtualmsgbox Poor
waitmsg
db $6E, $17, $8
release
compare LASTRESULT, 0
virtualgotoif 1, Changemind
virtualgotoif 5, CelebiEvent
TEMPCELEBI
STRUCTURETABLEG
STRUCTURETABLEA
STRUCTURETABLEE
STRUCTURETABLEM
LOADSTOREPARTYAMOUNT
COLORNG
MEMCPYSETUP
SUBSTRUCTURECPY
CHECKSUM
ENCRYPT
CALCSTATS
CAPTURECELEBI
CELEBICOPY1
SRFIX
CelebiEvent:
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoom
copyvar $800B, $800D
callasm $02028E9D
callasm $02028EB1
callasm $02028F91
callasm $02028FA1
callasm $02028FD5
callasm $02028FED
special $13D
sound $13
waitstate
playmoncry $FB, $0
virtualmsgbox Celebi
waitmsg
waitmoncry
waitkeypress
release
special $138
playsong $0166, $0
waitmoncry
waitstate
db $43
comparevar LASTRESULT, $800B
virtualgotoif 3, FlewAway
virtualgotoif 2, Catch
Catch:
callasm $02028FB1
killscript
NoRoom:
virtualmsgbox NoSpace
waitmsg
waitkeypress
release
end
Changemind:
virtualmsgbox Change
waitmsg
waitkeypress
release
end
NoRoomToGive:
virtualloadpointer NoSpace
setbyte 3
killscript
FlewAway:
db $97, $01
db $97, $00
virtualmsgbox Flew
waitmsg
waitkeypress
release
killscript
Poor:
Text_EN "Ein Pokémon raschelt in diesem Baum\n"
Text_EN "herum. Möchtest du es untersuchen?@"
Change:
Text_EN "Vielleicht ein anderes Mal.@"
Flew:
Text_EN "Das CELEBI ist weggeflogen!@"
NoSpace:
Text_EN "Du benötigst Platz in deinem Team, um\n"
Text_EN "CELEBI zu fangen!@"
Celebi:
Text_EN "CELEBI: Biyoo!@"
NormanScriptEnd:
PreloadScriptStart:
setvirtualaddress PreloadScriptStart
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoomToGive
virtualloadpointer GoSeeYourFather
setbyte 2
end
DataEnd:
EOF

View File

@ -0,0 +1 @@
901180e44767e19e5dc9d5df881fe123 00-C000-EN.z80

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,15 @@
INCLUDE "../macros.asm"
SECTION "prologue", ROM0[$100]
db "GameFreak inc."
db 0,0,0,0,0,0
dd 0
Text "e reader" ; no string terminator
db 0,0,0,0,$01,$55
db 0,0,0,0
db REGION_DE
db 0
db "GameFreak inc."
db 0,0
EOF

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,176 @@
INCLUDE "../macros.asm"
SECTION "eonticket",ROM0[$100]
jp Start
db $00
TicketSprite: ; 104
INCBIN "Spr_3r_251.img.bin"
TicketPalette: ; 1604
INCBIN "Spr_3r_251.pal.bin"
Prologue:
INCBIN "prologue-{REGION_NAME}.bin"
DataPacket: ; 164a
INCBIN "eonticket-{REGION_NAME}.mev"
db 0,0,0 ; padding
INCLUDE "../common/mem_struct.asm"
SpriteData:
dw TicketSprite,TicketPalette
db $07,$07,$01,$01,$01,$01,$01 ; width 15, height 15
Instructions1: ; 1921
db "Collega l'e-reader a POKéMON\n"
db "seleziona EVENTI SEGRETI\n"
db "nel menu principale del gioco.\n"
db "B per annullare.\0"
Instructions2: ; 199d
db "Premi il pulsante A sul Game Boy\n"
db "Advance che contiene POKéMON\n"
db "per cominciare ad inviare\n"
db "l'EVENTO DI CELEBI.\0"
DeliveryInProcess: ; 1a0d
db "Consegna EVENTO DI CELEBI\n"
db "in corso...\0"
TicketDelivered: ; 1a2f
db "EVENTO DI CELEBI consegnato!\n"
db "\n"
db "A per inviare di nuovo\n"
db "B per annullare.\0"
; this function is subtly different than the one
; on the Battle e cards, for no apparent reason
TransferData:
LD_IND_HL SomeVar1
push de
ld hl, $bbbb
LD_IND_HL Space_1
EX_DE_HL
LD_IND_HL Space_2
API_0C7 Space_1
wait $01
pop hl
inc hl
ld b, $01
call WordShiftRight
LD_IND_HL SomeVar2
.asm_1aa1
LD_HL_IND SomeVar2
ld a, l
or h
ret z
ld hl, $8888
LD_IND_HL Space_1
ld e, $01
.asm_1aaf
ld a, e
cp $08
jr nc, .asm_1ad9
push de
LD_HL_IND SomeVar1
ld c, [hl]
inc hl
ld b, [hl]
inc hl
LD_IND_HL SomeVar1
ld l, e
ld h, $00
add hl, hl
ld de, Space_1
add hl, de
ld [hl], c
inc hl
ld [hl], b
pop de
LD_HL_IND SomeVar2
dec hl
LD_IND_HL SomeVar2
ld a, l
or h
jr z, .asm_1ad9
inc e
jr .asm_1aaf
.asm_1ad9
API_0C7 Space_1
wait $01
jr .asm_1aa1
Start: ; 1ae2
API_121
CreateCustomSprite SpriteHandlePtr, $80, SpriteData
SetSpritePos SpriteHandlePtr, 120, 64
SpriteHide SpriteHandlePtr
CreateRegion RegionHandlePtr, 30, 6, 0, 14, 0, 4
ld h, a
ld l, $00
SetTextSize
API_09B RegionHandlePtr, $0102
SetTextColor RegionHandlePtr, 2, 0
SetRegionColor RegionHandlePtr, 0
SetBackgroundPalette 16, $0040, TicketPalette
FadeIn 16
wait 16
API $0C6
DrawText RegionHandlePtr, Instructions1, 8, 4
API $08D
INCLUDE "../common/wait_for_link.asm"
SpriteShow SpriteHandlePtr
DrawText RegionHandlePtr, Instructions2, 8, 4
API $08D
ld a, b
nop
UNKNOWN_VALUE EQU $0078
INCLUDE "../common/wait_for_ready.asm"
DrawText RegionHandlePtr, DeliveryInProcess, 8, 4
DATA_TRANSFER_LENGTH EQU 6144
INCLUDE "../common/transfer_data.asm"
ld hl, $5fff
LD_IND_HL Space_1
API_0C7 Space_1
wait $80
SpriteHide SpriteHandlePtr
DrawText RegionHandlePtr, TicketDelivered, 8, 4
API $08D
ld c, a
nop
INCLUDE "../common/wrap_up.asm"
INCLUDE "../common/word_shift_right.asm"
SomeVar1: ; 1CA2
db $FF,0 ; mark EOF
RegionHandlePtr: db 0 ; 1CA4
SpriteHandlePtr: db 0,0 ; 1CA5
SomeVar2: db 0,0 ; 1CA7

View File

@ -0,0 +1,40 @@
all: 00-C000-EN.raw verify
verify:
md5sum --check eonticket.md5
eonticket-%.tx: eonticket.asm
python ../scripts/regionalize.py $< $@ $* $*
eonticket-%.o: eonticket-%.tx
./rgbasm -o $@ $<
eonticket-%.gbc: eonticket-%.o
./rgblink -o $@ $<
eonticket-%.bin: eonticket-%.gbc
python ../scripts/stripgbc.py $< $@
eonticket-%.mev: eonticket-%.bin
python ../scripts/checksum.py $< $@
prologue-%.tx: prologue.asm
python ../scripts/regionalize.py $< $@ $* $*
prologue-%.o: prologue-%.tx
./rgbasm -o $@ $<
prologue-%.gbc: prologue-%.o
./rgblink -o $@ $<
prologue-%.bin: prologue-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.tx: 00-C000.asm eonticket-%.mev prologue-%.bin
python ../scripts/ereadertext.py $< $@ $*
00-C000-%.o: 00-C000-%.tx
./rgbasm -o $@ $<
00-C000-%.gbc: 00-C000-%.o
./rgblink -o $@ $<
00-C000-%.z80: 00-C000-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.vpk: 00-C000-%.z80
./nevpk -c -i $< -o $@
00-C000-%.raw: 00-C000-%.vpk
./nedcmake -i $< -o $@ -type 1 -region 1
clean:
rm -f *.tx *.o *.gbc *.z80 *.bin *.mev *.vpk *.raw

Binary file not shown.

View File

@ -0,0 +1 @@
_F9W˙ýk¸SO;č"$˙µîr'f€Y|Ö^ÍA

View File

@ -0,0 +1,206 @@
INCLUDE "../macros.asm"
INCLUDE "../constants/items.asm"
INCLUDE "../constants/scriptcommandscelebibattleita.asm"
Mystery_Event
db CHECKSUM_CRC
dd 0 ; checksum placeholder
GBAPTR DataStart
GBAPTR DataEnd
DataStart:
db IN_GAME_SCRIPT
db 24,11 ; petalburg gym
db 2 ; norman
GBAPTR NormanScriptStart
GBAPTR NormanScriptEnd
db PRELOAD_SCRIPT
GBAPTR PreloadScriptStart
db END_OF_CHUNKS
GoSeeYourFather:
Text_EN "Si è visto un bagliore accecante\n"
Text_EN "nel BOSCO PETALO!\p"
Text_EN "Da allora, un POKéMON raro è stato\n"
Text_EN "vvistato mentre curava alberelli\l"
Text_EN "abbattuti.@"
NormanScriptStart:
setvirtualaddress NormanScriptStart
virtualmsgbox Poor
waitmsg
db $6E, $17, $8
release
compare LASTRESULT, 0
virtualgotoif 1, Changemind
virtualgotoif 5, CelebiEvent
TEMPCELEBI
STRUCTURETABLEG
STRUCTURETABLEA
STRUCTURETABLEE
STRUCTURETABLEM
LOADSTOREPARTYAMOUNT
COLORNG
MEMCPYSETUP
SUBSTRUCTURECPY
CHECKSUM
ENCRYPT
CALCSTATS
CAPTURECELEBI
CELEBICOPY1
SRFIX
CelebiEvent:
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoom
copyvar $800B, $800D
callasm $02028E9D
callasm $02028EB1
callasm $02028F91
callasm $02028FA1
callasm $02028FD5
callasm $02028FED
special $13D
sound $13
waitstate
playmoncry $FB, $0
virtualmsgbox Celebi
waitmsg
waitmoncry
waitkeypress
release
special $138
playsong $0166, $0
waitmoncry
waitstate
db $43
comparevar LASTRESULT, $800B
virtualgotoif 3, FlewAway
virtualgotoif 2, Catch
Catch:
callasm $02028FB1
killscript
NoRoom:
virtualmsgbox NoSpace
waitmsg
waitkeypress
release
end
Changemind:
virtualmsgbox Change
waitmsg
waitkeypress
release
end
NoRoomToGive:
virtualloadpointer NoSpace
setbyte 3
killscript
FlewAway:
db $97, $01
db $97, $00
virtualmsgbox Flew
waitmsg
waitkeypress
release
killscript
Poor:
Text_EN "Si sente un fruscio provenire\n"
Text_EN "da questalbero.\p"
Text_EN "Sembra che sia un POKéMON a causarlo,\n"
Text_EN "vuoi controllare?@"
Change:
Text_EN "Forse unaltra volta.@"
Flew:
Text_EN "CELEBI è sparito fra gli alberi!@"
NoSpace:
Text_EN "Hai bisogno di spazio libero\n"
Text_EN "nella tua squadra\p"
Text_EN "per catturare CELEBI!@"
Celebi:
Text_EN "CELEBI: Biyoo!@"
NormanScriptEnd:
PreloadScriptStart:
setvirtualaddress PreloadScriptStart
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoomToGive
virtualloadpointer GoSeeYourFather
setbyte 2
end
DataEnd:
EOF

View File

@ -0,0 +1 @@
901180e44767e19e5dc9d5df881fe123 00-C000-EN.z80

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,15 @@
INCLUDE "../macros.asm"
SECTION "prologue", ROM0[$100]
db "GameFreak inc."
db 0,0,0,0,0,0
dd 0
Text "e reader" ; no string terminator
db 0,0,0,0,$01,$55
db 0,0,0,0
db REGION_IT
db 0
db "GameFreak inc."
db 0,0
EOF

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,175 @@
INCLUDE "../macros.asm"
SECTION "eonticket",ROM0[$100]
jp Start
db $00
TicketSprite: ; 104
INCBIN "Spr_3r_251.img.bin"
TicketPalette: ; 1604
INCBIN "Spr_3r_251.pal.bin"
Prologue:
INCBIN "prologue-{REGION_NAME}.bin"
DataPacket: ; 164a
INCBIN "eonticket-{REGION_NAME}.mev"
db 0,0,0 ; padding
INCLUDE "../common/mem_struct.asm"
SpriteData:
dw TicketSprite,TicketPalette
db $07,$07,$01,$01,$01,$01,$01 ; width 15, height 15
Instructions1: ; 1921
db "Vincula el e-Reader a Pokémon Rubi\n"
db "o Zafiro y pulsa EVENTOS MISTERIOSOS\n"
db "desde el menu Principal.\n"
db "Pulsa el Boton B para cancelar.\0"
Instructions2: ; 199d
db "Pulsa el Boton A en la Game Boy\n"
db "Advance con Pokémon Rubi o\n"
db "Zafiro para iniciar el envio del\n"
db "CELEBI\0"
DeliveryInProcess: ; 1a0d
db "Cargando el CELEBI...\0"
TicketDelivered: ; 1a2f
db "CELEBI enviado!\n"
db "\n"
db "Pulsa el Boton A para reenviar.\n"
db "Pulsa el Boton B para cancelar.\0"
; this function is subtly different than the one
; on the Battle e cards, for no apparent reason
TransferData:
LD_IND_HL SomeVar1
push de
ld hl, $bbbb
LD_IND_HL Space_1
EX_DE_HL
LD_IND_HL Space_2
API_0C7 Space_1
wait $01
pop hl
inc hl
ld b, $01
call WordShiftRight
LD_IND_HL SomeVar2
.asm_1aa1
LD_HL_IND SomeVar2
ld a, l
or h
ret z
ld hl, $8888
LD_IND_HL Space_1
ld e, $01
.asm_1aaf
ld a, e
cp $08
jr nc, .asm_1ad9
push de
LD_HL_IND SomeVar1
ld c, [hl]
inc hl
ld b, [hl]
inc hl
LD_IND_HL SomeVar1
ld l, e
ld h, $00
add hl, hl
ld de, Space_1
add hl, de
ld [hl], c
inc hl
ld [hl], b
pop de
LD_HL_IND SomeVar2
dec hl
LD_IND_HL SomeVar2
ld a, l
or h
jr z, .asm_1ad9
inc e
jr .asm_1aaf
.asm_1ad9
API_0C7 Space_1
wait $01
jr .asm_1aa1
Start: ; 1ae2
API_121
CreateCustomSprite SpriteHandlePtr, $80, SpriteData
SetSpritePos SpriteHandlePtr, 120, 64
SpriteHide SpriteHandlePtr
CreateRegion RegionHandlePtr, 30, 6, 0, 14, 0, 4
ld h, a
ld l, $00
SetTextSize
API_09B RegionHandlePtr, $0102
SetTextColor RegionHandlePtr, 2, 0
SetRegionColor RegionHandlePtr, 0
SetBackgroundPalette 16, $0040, TicketPalette
FadeIn 16
wait 16
API $0C6
DrawText RegionHandlePtr, Instructions1, 8, 4
API $08D
INCLUDE "../common/wait_for_link.asm"
SpriteShow SpriteHandlePtr
DrawText RegionHandlePtr, Instructions2, 8, 4
API $08D
ld a, b
nop
UNKNOWN_VALUE EQU $0078
INCLUDE "../common/wait_for_ready.asm"
DrawText RegionHandlePtr, DeliveryInProcess, 8, 4
DATA_TRANSFER_LENGTH EQU 6144
INCLUDE "../common/transfer_data.asm"
ld hl, $5fff
LD_IND_HL Space_1
API_0C7 Space_1
wait $80
SpriteHide SpriteHandlePtr
DrawText RegionHandlePtr, TicketDelivered, 8, 4
API $08D
ld c, a
nop
INCLUDE "../common/wrap_up.asm"
INCLUDE "../common/word_shift_right.asm"
SomeVar1: ; 1CA2
db $FF,0 ; mark EOF
RegionHandlePtr: db 0 ; 1CA4
SpriteHandlePtr: db 0,0 ; 1CA5
SomeVar2: db 0,0 ; 1CA7

View File

@ -0,0 +1,40 @@
all: 00-C000-EN.raw verify
verify:
md5sum --check eonticket.md5
eonticket-%.tx: eonticket.asm
python ../scripts/regionalize.py $< $@ $* $*
eonticket-%.o: eonticket-%.tx
./rgbasm -o $@ $<
eonticket-%.gbc: eonticket-%.o
./rgblink -o $@ $<
eonticket-%.bin: eonticket-%.gbc
python ../scripts/stripgbc.py $< $@
eonticket-%.mev: eonticket-%.bin
python ../scripts/checksum.py $< $@
prologue-%.tx: prologue.asm
python ../scripts/regionalize.py $< $@ $* $*
prologue-%.o: prologue-%.tx
./rgbasm -o $@ $<
prologue-%.gbc: prologue-%.o
./rgblink -o $@ $<
prologue-%.bin: prologue-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.tx: 00-C000.asm eonticket-%.mev prologue-%.bin
python ../scripts/ereadertext.py $< $@ $*
00-C000-%.o: 00-C000-%.tx
./rgbasm -o $@ $<
00-C000-%.gbc: 00-C000-%.o
./rgblink -o $@ $<
00-C000-%.z80: 00-C000-%.gbc
python ../scripts/stripgbc.py $< $@
00-C000-%.vpk: 00-C000-%.z80
./nevpk -c -i $< -o $@
00-C000-%.raw: 00-C000-%.vpk
./nedcmake -i $< -o $@ -type 1 -region 1
clean:
rm -f *.tx *.o *.gbc *.z80 *.bin *.mev *.vpk *.raw

Binary file not shown.

View File

@ -0,0 +1 @@
_F9W˙ýk¸SO;č"$˙µîr'f€Y|Ö^ÍA

View File

@ -0,0 +1,206 @@
INCLUDE "../macros.asm"
INCLUDE "../constants/items.asm"
INCLUDE "../constants/scriptcommandscelebibattleita.asm"
Mystery_Event
db CHECKSUM_CRC
dd 0 ; checksum placeholder
GBAPTR DataStart
GBAPTR DataEnd
DataStart:
db IN_GAME_SCRIPT
db 24,11 ; petalburg gym
db 2 ; norman
GBAPTR NormanScriptStart
GBAPTR NormanScriptEnd
db PRELOAD_SCRIPT
GBAPTR PreloadScriptStart
db END_OF_CHUNKS
GoSeeYourFather:
Text_EN "¡Se ha visto un gran resplandor en\n"
Text_EN "el BOSQUE PETALIA!\p"
Text_EN "Desde entonces, un extraño Pokémon\n"
Text_EN "se ha podido observar curando\l"
Text_EN "árboles débiles.@"
NormanScriptStart:
setvirtualaddress NormanScriptStart
virtualmsgbox Poor
waitmsg
db $6E, $17, $8
release
compare LASTRESULT, 0
virtualgotoif 1, Changemind
virtualgotoif 5, CelebiEvent
TEMPCELEBI
STRUCTURETABLEG
STRUCTURETABLEA
STRUCTURETABLEE
STRUCTURETABLEM
LOADSTOREPARTYAMOUNT
COLORNG
MEMCPYSETUP
SUBSTRUCTURECPY
CHECKSUM
ENCRYPT
CALCSTATS
CAPTURECELEBI
CELEBICOPY1
SRFIX
CelebiEvent:
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoom
copyvar $800B, $800D
callasm $02028E9D
callasm $02028EB1
callasm $02028F91
callasm $02028FA1
callasm $02028FD5
callasm $02028FED
special $13D
sound $13
waitstate
playmoncry $FB, $0
virtualmsgbox Celebi
waitmsg
waitmoncry
waitkeypress
release
special $138
playsong $0166, $0
waitmoncry
waitstate
db $43
comparevar LASTRESULT, $800B
virtualgotoif 3, FlewAway
virtualgotoif 2, Catch
Catch:
callasm $02028FB1
killscript
NoRoom:
virtualmsgbox NoSpace
waitmsg
waitkeypress
release
end
Changemind:
virtualmsgbox Change
waitmsg
waitkeypress
release
end
NoRoomToGive:
virtualloadpointer NoSpace
setbyte 3
killscript
FlewAway:
db $97, $01
db $97, $00
virtualmsgbox Flew
waitmsg
waitkeypress
release
killscript
Poor:
Text_EN "Se puede escuchar el murmullo\n"
Text_EN "de un Pokemon en este árbol.\p"
Text_EN "¿Investigar el árbol?@"
Change:
Text_EN "Tal vez en otro momento.@"
Flew:
Text_EN "¡El CELEBI ha salido volando!@"
NoSpace:
Text_EN "¡Necesitas espacio en tu equipo para\n"
Text_EN "capturar a CELEBI!@"
Celebi:
Text_EN "CELEBI: ¡Biyoo!@"
NormanScriptEnd:
PreloadScriptStart:
setvirtualaddress PreloadScriptStart
db $43
compare LASTRESULT, 5
virtualgotoif 2, NoRoomToGive
virtualloadpointer GoSeeYourFather
setbyte 2
end
DataEnd:
EOF

View File

@ -0,0 +1 @@
901180e44767e19e5dc9d5df881fe123 00-C000-EN.z80

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,15 @@
INCLUDE "../macros.asm"
SECTION "prologue", ROM0[$100]
db "GameFreak inc."
db 0,0,0,0,0,0
dd 0
Text "e reader" ; no string terminator
db 0,0,0,0,$01,$55
db 0,0,0,0
db REGION_ES
db 0
db "GameFreak inc."
db 0,0
EOF

Binary file not shown.

Binary file not shown.