version=2
:if:<register.registered(oak_give_mega_bracelet)>=false
	@battle.starttrainer(mtsilver\red)
:else
	:if:<register.registered(kstarter1)>=true
		@battle.starttrainer(mtsilver\red1)
	:else
		:if:<register.registered(kstarter2)>=true
			@battle.starttrainer(mtsilver\red2)
		:else
			:if:<register.registered(kstarter3)>=true
				@battle.starttrainer(mtsilver\red3)
			:else
				@battle.starttrainer(mtsilver\red)
			:endif
		:endif
	:endif
:endif

@text.show(..............~..............)

@register.unregister(trainer_mtsilver\red)
@register.unregister(trainer_mtsilver\red1)
@register.unregister(trainer_mtsilver\red2)
@register.unregister(trainer_mtsilver\red3)

@player.achieveemblem(snow)

:if:<register.registered(clubextendinvite)>=True
:then
	@register.registertime(GreenAtClub,1,day)
:endif

:if:<register.registered(First_time_red)>=False
:then
	@register.register(First_time_red)
:endif

@screen.fadeout
@player.warp(yourroom.dat,1,0.1,3,0)
@level.wait(200)
@level.update
@player.save
@level.waitforsave
@sound.play(Save)
@screen.credits
@level.update
@screen.fadein
:end