P3D-Legacy/P3D/Content/Data/Scripts/floe/dockguy.dat

version=2
:if:<register.registered(rainbowpass)>=True
	@text.show(Ahoy there!*Where do you~want to sail?)
	@Options.show(Vermilion,One Island,Two Island,Three Island,Five Island,Six Island,Seven Island,Exit)
		:when:Vermilion
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 7!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(vermilion\dock.dat,-11,0.1,1)
			@level.update
			@player.turnto(1)
			@screen.fadein
		:when:One Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(knot\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
		:when:Two Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(boon\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
		:when:Three Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(kin\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
		:when:Four Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 3!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(floe\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
		:when:Five Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 3!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(chrono\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
		:when:Six Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(fortune\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
		:when:Seven Island
			@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
			@screen.fadeout
			@script.start(speedboatscene)
			@player.warp(quest\dock.dat,5,0.1,1)
			@level.update
			@player.turnto(2)
			@screen.fadein
	:endwhen
	:end
:else
	:if:<register.registered(tripass)>=True
		@text.show(Ahoy there!*Where do you~want to sail?)
		@Options.show(Vermilion,One Island,Two Island,Three Island,Exit)
			:when:Vermilion
				@text.show(All right!*All aboard the~Seagallop Hi-Speed 7!)
				@screen.fadeout
				@script.start(speedboatscene)
				@player.warp(vermilion\dock.dat,-11,0.1,1)
				@level.update
				@player.turnto(1)
				@screen.fadein
			:when:One Island
				@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
				@screen.fadeout
				@script.start(speedboatscene)
				@player.warp(knot\dock.dat,5,0.1,1)
				@level.update
				@player.turnto(2)
				@screen.fadein
			:when:Two Island
				@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
				@screen.fadeout
				@script.start(speedboatscene)
				@player.warp(boon\dock.dat,5,0.1,1)
				@level.update
				@player.turnto(2)
				@screen.fadein
			:when:Three Island
				@text.show(All right!*All aboard the~Seagallop Hi-Speed 6!)
				@screen.fadeout
				@script.start(speedboatscene)
				@player.warp(kin\dock.dat,5,0.1,1)
				@level.update
				@player.turnto(2)
				@screen.fadein
		:endwhen
		:end
	:else
		:if:<register.registered(protoncerulean)>=True
			:if:<register.registered(findlostelle)>=True
				@text.show(Lostelle should be~in Three Island's~Berry Forest.*Let's go!)
				@screen.fadeout
				@script.start(speedboatscene)
				@player.warp(kin\dock.dat,5,0.1,1)
				@level.update
				@player.turnto(2)
				@screen.fadein
				:end
			:else
				@text.show(The guy I want~you to talk to~is on Two Island.*Let's go!)
				@screen.fadeout
				@script.start(speedboatscene)
				@player.warp(boon\dock.dat,5,0.1,1)
				@level.update
				@player.turnto(2)
				@screen.fadein
				:end
			:endif
		:else
			@text.show(You want to return~to Five Island?*I can take you there!*Or would you rather~go to Vermilion City~first?)
			@Options.show(Five Island,Vermilion City,Quit)
				:when:Five Island
					@text.show(Okay let's go!)
					@screen.fadeout
					@script.start(speedboatscene)
					@player.warp(chrono\memorial.dat,8,0.1,51)
					@entity.warp(0,8,-0.5,57)
					@entity.setscale(0,0.03,0.03,0.03)
					@level.update
					@player.turnto(2)
					@screen.fadein
					@text.show(If you want to return to~Vermilion City or heal your~Pokémon let me know.)
					:end
				:when:Vermilion City
					@screen.fadeout
					@script.start(speedboatscene)
					@player.warp(vermilion\dock.dat,-11,0.1,1)
					@level.update
					@player.turnto(1)
					@screen.fadein
					@text.show(Let me know when~you want to return.)
					:end
			:endwhen
		:endif
	:endif
:endif
:end