Rooba
/
pokecrystal
mirror of https://github.com/pret/pokecrystal.git
1
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity
pokecrystal/data/odd_eggs.asm

490 lines
7.2 KiB
NASM
Raw Normal View History

move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
GiveOddEgg: ; 1fb4b6
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
; Figure out which egg to give.
; Compare a random word to
; probabilities out of 0xffff.
rename RNG to Random also fix 'Far' naming scheme for BattleRandom this was a long time coming
2013-08-31 02:59:40 +00:00
call Random
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld hl, .Probabilities
ld c, 0
ld b, c
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
.loop
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
; Break on $ffff.
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld a, d
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
cp $ffff / $100
jr nz, .not_done
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld a, e
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
cp $ffff % $100
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
jr z, .done
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
.not_done
; Break when [hRandom] <= de.
ld a, [hRandom + 1]
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
cp d
jr c, .done
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
jr z, .ok
jr .next
.ok
ld a, [hRandom + 0]
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
cp e
jr c, .done
jr z, .done
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
.next
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
inc bc
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
jr .loop
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
.done
ld hl, OddEggs
ld a, OddEgg2 - OddEgg1
call AddNTimes
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
Prepare to merge
2015-11-01 23:13:31 +00:00
ld de, OddEggSpecies
Replace party struct relative values with EQUS constants
2015-11-04 16:19:58 +00:00
ld bc, PARTYMON_STRUCT_LENGTH + 2 * PKMN_NAME_LENGTH
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
call CopyBytes
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld a, EGG_TICKET
ld [CurItem], a
Prepare to merge
2015-11-01 23:13:31 +00:00
ld a, 1
ld [wItemQuantityChangeBuffer], a
ld a, -1
ld [ItemCountBuffer], a
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld hl, NumItems
fix item asm labels CheckItem was called PickUpItem by mistake Also label TossItem and ReceiveItem
2013-09-08 05:35:10 +00:00
call TossItem
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
Prepare to merge
2015-11-01 23:13:31 +00:00
; load species in wcd2a
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld a, EGG
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld [wcd2a], a
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
Prepare to merge
2015-11-01 23:13:31 +00:00
; load pointer to wcd29 in wcd20
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld a, wcd29 % $100
Prepare to merge
2015-11-01 23:13:31 +00:00
ld [wcd20], a
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld a, wcd29 / $100
ld [wcd21], a
Prepare to merge
2015-11-01 23:13:31 +00:00
; load pointer to OddEggSpecies in wcd22
ld a, OddEggSpecies % $100
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld [wcd22], a
Prepare to merge
2015-11-01 23:13:31 +00:00
ld a, OddEggSpecies / $100
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld [wcd23], a
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
Prepare to merge
2015-11-01 23:13:31 +00:00
; load Odd Egg Name in wcd2b
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
ld hl, .Odd
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld de, wcd2b
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
ld bc, PKMN_NAME_LENGTH
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
call CopyBytes
Prepare to merge
2015-11-01 23:13:31 +00:00
; load pointer to wcd2b in wcd24
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld a, wcd2b % $100
ld [wcd24], a
ld a, wcd2b / $100
ld [wcd25], a
Prepare to merge
2015-11-01 23:13:31 +00:00
; load pointer to wOddEggName in wcd26
ld a, wOddEggName % $100
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld [wcd26], a
Prepare to merge
2015-11-01 23:13:31 +00:00
ld a, wOddEggName / $100
Blindly use wram labels for everything except mobile, part 1. Wram banks and mobile make this tough, since any address can secretly be a ghost. As usual, mobile completely disregards 99% of the codebase. It's been ignored in kind.
2015-02-08 08:03:32 +00:00
ld [wcd27], a
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
callba Function11b98f
ret
; 1fb546
.Odd
db "ODD@@@@@@@@@"
.Probabilities
Use a macro for Odd Egg probabilities.
2014-07-18 12:28:30 +00:00
prob: MACRO
prob_total = prob_total + (\1)
dw prob_total * $ffff / 100
ENDM
prob_total = 0
prob 8
prob 1
prob 16
prob 3
prob 16
prob 3
prob 14
prob 2
prob 10
prob 2
prob 12
prob 2
prob 10
prob 1
move GiveOddEgg into odd_eggs.asm
2013-08-30 03:26:01 +00:00
; 1fb56e
OddEggs: ; 1fb56e
GiveOddEgg and related asm That's it for bank 7e
2013-08-21 21:18:58 +00:00
OddEgg1:
dump odd eggs
2013-08-21 20:02:18 +00:00
db PICHU
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db THUNDERSHOCK, CHARM, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 02048 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 30, 20, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 17 ; Max HP
bigdw 9 ; Atk
bigdw 6 ; Def
bigdw 11 ; Spd
bigdw 8 ; SAtk
bigdw 8 ; SDef
db "EGG@@@@@@@@"
GiveOddEgg and related asm That's it for bank 7e
2013-08-21 21:18:58 +00:00
OddEgg2:
dump odd eggs
2013-08-21 20:02:18 +00:00
db PICHU
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db THUNDERSHOCK, CHARM, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00256 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 30, 20, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 17 ; Max HP
bigdw 9 ; Atk
bigdw 7 ; Def
bigdw 12 ; Spd
bigdw 9 ; SAtk
bigdw 9 ; SDef
db "EGG@@@@@@@@"
db CLEFFA
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db POUND, CHARM, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 04096 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 35, 20, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 20 ; Max HP
bigdw 7 ; Atk
bigdw 7 ; Def
bigdw 6 ; Spd
bigdw 9 ; SAtk
bigdw 10 ; SDef
db "EGG@@@@@@@@"
db CLEFFA
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db POUND, CHARM, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00768 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 35, 20, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 20 ; Max HP
bigdw 7 ; Atk
bigdw 8 ; Def
bigdw 7 ; Spd
bigdw 10 ; SAtk
bigdw 11 ; SDef
db "EGG@@@@@@@@"
db IGGLYBUFF
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db SING, CHARM, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 04096 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 15, 20, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 24 ; Max HP
bigdw 8 ; Atk
bigdw 6 ; Def
bigdw 6 ; Spd
bigdw 9 ; SAtk
bigdw 7 ; SDef
db "EGG@@@@@@@@"
db IGGLYBUFF
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db SING, CHARM, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00768 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 15, 20, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 24 ; Max HP
bigdw 8 ; Atk
bigdw 7 ; Def
bigdw 7 ; Spd
bigdw 10 ; SAtk
bigdw 8 ; SDef
db "EGG@@@@@@@@"
db SMOOCHUM
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db POUND, LICK, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 03584 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 35, 30, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 19 ; Max HP
bigdw 8 ; Atk
bigdw 6 ; Def
bigdw 11 ; Spd
bigdw 13 ; SAtk
bigdw 11 ; SDef
db "EGG@@@@@@@@"
db SMOOCHUM
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db POUND, LICK, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00512 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 35, 30, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 19 ; Max HP
bigdw 8 ; Atk
bigdw 7 ; Def
bigdw 12 ; Spd
bigdw 14 ; SAtk
bigdw 12 ; SDef
db "EGG@@@@@@@@"
db MAGBY
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db EMBER, DIZZY_PUNCH, 0, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 02560 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 25, 10, 0, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 19 ; Max HP
bigdw 12 ; Atk
bigdw 8 ; Def
bigdw 13 ; Spd
bigdw 12 ; SAtk
bigdw 10 ; SDef
db "EGG@@@@@@@@"
db MAGBY
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db EMBER, DIZZY_PUNCH, 0, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00512 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 25, 10, 0, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 19 ; Max HP
bigdw 12 ; Atk
bigdw 9 ; Def
bigdw 14 ; Spd
bigdw 13 ; SAtk
bigdw 11 ; SDef
db "EGG@@@@@@@@"
db ELEKID
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db QUICK_ATTACK, LEER, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 03072 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 30, 30, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 19 ; Max HP
bigdw 11 ; Atk
bigdw 8 ; Def
bigdw 14 ; Spd
bigdw 11 ; SAtk
bigdw 10 ; SDef
db "EGG@@@@@@@@"
db ELEKID
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db QUICK_ATTACK, LEER, DIZZY_PUNCH, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00512 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 30, 30, 10, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 19 ; Max HP
bigdw 11 ; Atk
bigdw 9 ; Def
bigdw 15 ; Spd
bigdw 12 ; SAtk
bigdw 11 ; SDef
db "EGG@@@@@@@@"
db TYROGUE
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db TACKLE, DIZZY_PUNCH, 0, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 02560 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $0, $0 ; DVs
db 35, 10, 0, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 18 ; Max HP
bigdw 8 ; Atk
bigdw 8 ; Def
bigdw 8 ; Spd
bigdw 8 ; SAtk
bigdw 8 ; SDef
db "EGG@@@@@@@@"
db TYROGUE
db NO_ITEM
No more NONE
2015-11-02 19:37:02 +00:00
db TACKLE, DIZZY_PUNCH, 0, 0
dump odd eggs
2013-08-21 20:02:18 +00:00
dw 00256 ; OT ID
dt 125 ; Exp
; Stat exp
bigdw 0
bigdw 0
bigdw 0
bigdw 0
bigdw 0
db $2a, $aa ; DVs
db 35, 10, 0, 0 ; PP
db 20 ; Happiness
db 0, 0, 0 ; Pokerus, Caught data
db 5 ; Level
db 0, 0 ; Status
bigdw 0 ; HP
bigdw 18 ; Max HP
bigdw 8 ; Atk
bigdw 9 ; Def
bigdw 9 ; Spd
bigdw 9 ; SAtk
bigdw 9 ; SDef
db "EGG@@@@@@@@"