SweetScentFromMenu:
	ld hl, .SweetScent
	call QueueScript
	ld a, $1
	ld [wFieldMoveSucceeded], a
	ret

.SweetScent:
	reloadmappart
	special UpdateTimePals
	callasm GetPartyNick
	writetext UnknownText_0x50726
	waitbutton
	callasm SweetScentEncounter
	iffalse SweetScentNothing
	randomwildmon
	startbattle
	reloadmapafterbattle
	end

SweetScentNothing:
	writetext UnknownText_0x5072b
	waitbutton
	closetext
	end

SweetScentEncounter:
	farcall CanUseSweetScent
	jr nc, .no_battle
	farcall GetMapEncounterRate
	ld a, b
	and a
	jr z, .no_battle
	farcall ChooseWildEncounter
	jr nz, .no_battle
	jr .start_battle

.start_battle
	ld a, $1
	ld [wScriptVar], a
	ret

.no_battle
	xor a
	ld [wScriptVar], a
	ld [wBattleType], a
	ret

UnknownText_0x50726:
	; used SWEET SCENT!
	text_jump UnknownText_0x1c0b03
	db "@"

UnknownText_0x5072b:
	; Looks like there's nothing here…
	text_jump UnknownText_0x1c0b1a
	db "@"
