pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2024-11-16 11:27:33 -08:00
Code Issues Packages Projects Releases Wiki Activity
6c3000efd2
pokecrystal-board/data/odd_eggs.asm

484 lines
7.1 KiB
NASM
Raw Normal View History

move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
GiveOddEgg: ; 1fb4b6
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07: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-30 19:59:40 -07:00
call Random
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld hl, .Probabilities
ld c, 0
ld b, c
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
.loop
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld a, [hli]
ld e, a
ld a, [hli]
ld d, a
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
; Break on $ffff.
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld a, d
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
cp $ffff / $100
jr nz, .not_done
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld a, e
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
cp $ffff % $100
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
jr z, .done
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
.not_done
; Break when [hRandom] <= de.
ld a, [hRandom + 1]
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
cp d
jr c, .done
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
jr z, .ok
jr .next
.ok
ld a, [hRandom + 0]
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
cp e
jr c, .done
jr z, .done
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
.next
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
inc bc
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
jr .loop
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
.done
ld hl, OddEggs
ld a, OddEgg2 - OddEgg1
call AddNTimes
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
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 00:03:32 -08:00
ld de, wEnemyMoveStruct
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld bc, $0046
call CopyBytes
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld a, EGG_TICKET
ld [CurItem], a
ld a, $1
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 00:03:32 -08:00
ld [wd10c], a
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld a, $ff
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 00:03:32 -08:00
ld [wd107], a
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
ld hl, NumItems
fix item asm labels CheckItem was called PickUpItem by mistake Also label TossItem and ReceiveItem
2013-09-07 22:35:10 -07:00
call TossItem
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07: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 00:03:32 -08:00
ld [wcd2a], a
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
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 00:03:32 -08:00
ld a, wcd29 % $100
ld [CreditsPos], a
ld a, wcd29 / $100
ld [wcd21], a
ld a, wEnemyMoveStruct % $100
ld [wcd22], a
ld a, wEnemyMoveStruct / $100
ld [wcd23], a
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07: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 00:03:32 -08:00
ld de, wcd2b
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07:00
ld bc, PKMN_NAME_LENGTH
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
call CopyBytes
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 00:03:32 -08:00
ld a, wcd2b % $100
ld [wcd24], a
ld a, wcd2b / $100
ld [wcd25], a
ld a, BattleMonHappiness % $100
ld [wcd26], a
ld a, BattleMonHappiness / $100
ld [wcd27], a
move GiveOddEgg into odd_eggs.asm
2013-08-29 20:26:01 -07:00
callba Function11b98f
ret
; 1fb546
.Odd
db "ODD@@@@@@@@@"
.Probabilities
Use a macro for Odd Egg probabilities.
2014-07-18 05:28:30 -07: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-29 20:26:01 -07:00
; 1fb56e
OddEggs: ; 1fb56e
GiveOddEgg and related asm That's it for bank 7e
2013-08-21 14:18:58 -07:00
OddEgg1:
dump odd eggs
2013-08-21 13:02:18 -07:00
db PICHU
db NO_ITEM
db THUNDERSHOCK, CHARM, DIZZY_PUNCH, NONE
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 14:18:58 -07:00
OddEgg2:
dump odd eggs
2013-08-21 13:02:18 -07:00
db PICHU
db NO_ITEM
db THUNDERSHOCK, CHARM, DIZZY_PUNCH, NONE
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
db POUND, CHARM, DIZZY_PUNCH, NONE
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
db POUND, CHARM, DIZZY_PUNCH, NONE
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
db SING, CHARM, DIZZY_PUNCH, NONE
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
db SING, CHARM, DIZZY_PUNCH, NONE
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
db POUND, LICK, DIZZY_PUNCH, NONE
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
db POUND, LICK, DIZZY_PUNCH, NONE
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
db EMBER, DIZZY_PUNCH, NONE, NONE
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
db EMBER, DIZZY_PUNCH, NONE, NONE
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
db QUICK_ATTACK, LEER, DIZZY_PUNCH, NONE
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
db QUICK_ATTACK, LEER, DIZZY_PUNCH, NONE
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
db TACKLE, DIZZY_PUNCH, NONE, NONE
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
db TACKLE, DIZZY_PUNCH, NONE, NONE
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@@@@@@@@"
Reference in New Issue Copy Permalink