1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
AIActionTable_RockCrusher: ; 14f0e (5:4f0e)
dw .do_turn ; unused
dw .do_turn
dw .start_duel
dw .forced_switch
dw .ko_switch
dw .take_prize
.do_turn ; 14f1a (5:4f1a)
call AIMainTurnLogic
ret
.start_duel ; 14f1e (5:4f1e)
call InitAIDuelVars
call .store_list_pointers
call SetUpBossStartingHandAndDeck
call TrySetUpBossStartingPlayArea
ret nc
call AIPlayInitialBasicCards
ret
.forced_switch ; 14f2f (5:4f2f)
call AIDecideBenchPokemonToSwitchTo
ret
.ko_switch ; 14f33 (5:4f33)
call AIDecideBenchPokemonToSwitchTo
ret
.take_prize ; 14f37 (5:4f37)
call AIPickPrizeCards
ret
.list_arena ; 14f3b (5:4f3b)
db RHYHORN
db ONIX
db GEODUDE
db DIGLETT
db $00
.list_bench ; 14f40 (5:4f40)
db DIGLETT
db GEODUDE
db RHYHORN
db ONIX
db $00
.list_retreat ; 14f45 (5:4f45)
ai_retreat DIGLETT, -1
db $00
.list_energy ; 14f48 (5:4f48)
ai_energy DIGLETT, 3, +1
ai_energy DUGTRIO, 4, +0
ai_energy GEODUDE, 2, +1
ai_energy GRAVELER, 3, +0
ai_energy GOLEM, 4, +0
ai_energy ONIX, 2, -1
ai_energy RHYHORN, 3, +0
db $00
.list_prize ; 14f5e (5:4f5e)
db ENERGY_REMOVAL
db RHYHORN
db $00
.store_list_pointers ; 14f61 (5:4f61)
store_list_pointer wAICardListAvoidPrize, .list_prize
store_list_pointer wAICardListArenaPriority, .list_arena
store_list_pointer wAICardListBenchPriority, .list_bench
store_list_pointer wAICardListPlayFromHandPriority, .list_bench
; missing store_list_pointer wAICardListRetreatBonus, .list_retreat
store_list_pointer wAICardListEnergyBonus, .list_energy
ret
; 0x14f8f
|
