glife/locations/city_industrial_train.qsrc

# city_industrial_train
!2021/05/06

if $ARGS[0] = 'inside':
	$loc_arg = 'inside'
	$loc = 'city_industrial_train'
	$menu_loc = 'city_industrial_train'
	$menu_arg = 'inside'
	menu_off = 0
	$location_type = 'public_indoors'
	killvar '$locclass'
	CLOSE ALL
	if sound = 0:PLAY 'sound/vokzal.mp3',30
	*clr & cla
	gs'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalholle.jpg" ></center>'
	act 'Leave the station': minut += 2 & gt 'city_industrial_train', 'outside'
	*nl
	if transportVars['trainpass_day'] > daystart:
		func('transport_functions', 'display_trainpass_time')
		act 'Go to the platforms': gt 'city_industrial_train', 'platform'
	else
		act 'Go to the ticket office': minut += 1 & gt 'city_industrial_train', 'ticket'
	end
	act 'Go to the restrooms': minut += 1 & gt 'city_industrial_train', 'toilet'
end

if $ARGS[0] = 'outside':
	$loc_arg = 'outside'
	$loc = 'city_industrial_train'
	$menu_loc = 'city_industrial_train'
	$menu_arg = 'outside'
	menu_off = 0
	$location_type = 'public_outdoors'
	*clr & cla
	gs'stat'
	'<center><B>Railway station</B></center>'
	if month >= 11 or month <= 3:
		if hour >= 9 and hour <= 16:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_winter_day.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_winter_night.jpg"></center>'
		end
	else
		if hour >= 7 and hour <= 18:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_day.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_night.jpg"></center>'
		end
	end
	
	if car > 0 and cardrive = 19:
		cardrive = 19
		'In the parking lot is <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
	end

	'There is a path leading off in to the distance, in the direction of the <a href="exec:minut += 60 & gt ''city_lake'', ''start''">lake</a>.'

	act 'Walk to the City Industrial Region': minut += 15 & gt 'city_industrial'
	act 'Walk to the lake': minut += 60 & gt 'city_lake', 'start'
	act 'Enter the station building': minut += 2 & gt 'city_industrial_train', 'inside'
end

if $ARGS[0] = 'platform':
	$loc_arg = 'platform'
	$loc = 'city_industrial_train'
	$menu_loc = 'city_industrial_train'
	$menu_arg = 'inside'
	menu_off = 0
	$location_type = 'public_outdoors'
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzalper.jpg" ></center>'
	'When you arrive at the platform, you can''t help but notice it bustling with activity. Lots of passengers are coming and going, all carrying large bags. It feels like it is always busy here, no matter at what time of the day you are here.'

	act 'Return to the station': minut += 5 & gt 'city_industrial_train', 'inside'
	
	if transportVars['trainpass_day'] > daystart:
		act 'Take a train to the city center (<<func(''transport_functions'', ''display_train_timecost'', ''ind'', ''center'')>>)': gt 'train', 'ind_center'
		act 'Take a train to the old platform by the communal village (<<func(''transport_functions'', ''display_train_timecost'', ''ind'', ''communal'')>>)': gt 'train', 'ind_communal'
		act 'Take a train to the village of Gadukino (<<func(''transport_functions'', ''display_train_timecost'', ''ind'', ''village'')>>)': gt 'train', 'ind_village'
		act 'Take a train to Pavlovsk (<<func(''transport_functions'', ''display_train_timecost'', ''ind'', ''pavlovsk'')>>)': gt 'train', 'ind_pavlovsk'
	end
end

if $ARGS[0] = 'toilet':
	$locM_arg = 'toilet'
	$locM = 'city_industrial_train'
	$loc_arg = 'toilet'
	$loc = 'city_industrial_train'
	$menu_loc = 'city_industrial_train'
	$menu_arg = 'inside'
	menu_off = 0
	$location_type = 'bathroom'
	$locclass = 'restroom'	
	*clr & cla
	gs'stat'

	gs 'themes', 'indoors'

	'<center><img <<$set_imgh>> src="images/locations/shared/bathroom/publictoilet.jpg"></center>'

	act 'Return to the station': minut += 1 & gt 'city_industrial_train', 'inside'

	act 'Look in the mirror': gt 'mirror', 'start'
	if pcs_hairbsh < 1: act 'Brush your hair': gt 'mirror', 'brush'

	dynamic $tampon
	dynamic $quickwash
	dynamic $basin
	dynamic $publicpan
end

if $ARGS[0] = 'ticket':
	$menu_loc = 'city_industrial_train'
	$menu_arg = 'ticket'
	menu_off = 0
	*clr & cla
	gs 'stat'
	'<center><h4>Ticket office</h4></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/ticketoffice.jpg"></center>'

	act 'Leave the ticket office':minut += 1 & gt 'city_industrial_train', 'inside'
	
	if money >= 50:
		act 'Buy a ticket':
			cla
			gs 'city_industrial_train', 'buy_ticket'
		end
	end

	gs 'transport_functions', 'buy_train_pass'
end

if $ARGS[0] = 'buy_ticket':
	$menu_loc = 'city_industrial_train'
	$menu_arg = 'buy_ticket'
	menu_off = 0
	
	act 'Leave the ticket office': gt 'city_industrial_train', 'inside'

	gs 'transport_functions', 'buy_train_ticket', 'ind'
end

--- city_industrial_train ---------------------------------