GoldenrodMagnetTrain_MapScriptHeader;trigger count
	db 0
 ;callback count
	db 0

GoldenrodMagnetTrainEmployee:
	checkitem MAGNET_PASS
	sif false
		jumptext .no_pass_text
	opentext
	writetext .where_to_text
	loadmenudata .menu
	verticalmenu
	closewindow
	sif >, 2
		addvar 1
	farjump TrainStationScript

.menu
	db $40 ; flags
	db 01, 10 ; start coords
	db 11, 19 ; end coords
	dw .options
	db 1 ; default option

.options
	db $80
	db $4
	db "Naljo@"
	db "Rijon@"
	db "Kanto@"
	db "Cancel@"

.where_to_text
	ctxt "Hello."

	para "Where do you want"
	line "to go?"
	done

.no_pass_text
	ctxt "Hello."

	para "Unfortunately, you"
	line "can't use this"

	para "station without a"
	line "Magnet Pass."

	para "Come back when you"
	line "get one."
	done

GoldenrodMagnetTrainNPC:
	jumptextfaceplayer .text

.text
	ctxt "I'm the"
	line "President."

	para "This train is"
	line "faster than any"
	cont "#mon, and"
	cont "will take you to"
	cont "Rijon or Naljo"
	cont "in a flash!"

	para "If you have a"
	line "special pass, it"
	cont "can also be"
	cont "taken to Kanto."

	para "We have plans to"
	line "expand to other"
	cont "regions in the"
	cont "future."
	done

GoldenrodMagnetTrain_MapEventHeader ;filler
	db 0, 0

;warps
	db 2
	warp_def $11, $8, 5, GOLDENROD_CITY
	warp_def $11, $9, 5, GOLDENROD_CITY

	;xy triggers
	db 0

	;signposts
	db 0

	;people-events
	db 2
	person_event SPRITE_OFFICER, 9, 9, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_OW_RED, PERSONTYPE_SCRIPT, 0, GoldenrodMagnetTrainEmployee, -1
	person_event SPRITE_GENTLEMAN, 14, 6, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, PAL_OW_RED, PERSONTYPE_SCRIPT, 0, GoldenrodMagnetTrainNPC, -1
