glife/locations/vokzaltorg

# vokzaltorg
$d_kachatprava = {
	act 'swing right':
		cls
		money = 0
		tovarL = 0
		minut += 120
		manna = 0
		gs 'stat'
		'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
		'You have decided to shake their rights, Police responded to what is to be expected, dragged you to the department, money seized and confiscated goods. Once you promuryzhili two o`clock, you still released.'

		act 'Leave':minut += 1 & gt 'vokzalGin'
	end
}

cls
minut += 30
gs 'stat'
prodskill = vnesh + will + dom

if prodskill < 20:prodskill = 20
if prodskill > 150:minimumtov = 3
if prodskill > 100 and prodskill <= 150:minimumtov = 2
if prodskill < 100:minimumtov = 1

tovarand = rand(minimumtov, prodskill / 10)

if tovarand > tovarL:tovarand = tovarL

tovpay = tovarand * 300
money += tovpay
tovarL -= tovarand
will += rand(0, 1)
TorgVokzalTimes += 1
dom += 1
gs 'stat'
'<center><img src="images/qwest/vokzal/peron.jpg"></center>'
'You managed vtyuhat <<tovarand>> One unit of product, while earning <<tovpay>> rubles.'

act 'Leave':
	cls
	gs 'stat'
	'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
	'Near the platform you are already waiting for the police. "breach? Trade without proper papers?"'

	if money >= 500:
		act 'Pay (500 rubles)':
			cls
			money -= 500
			gs 'stat'
			'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
			'you paid 500 rubles police. He took the money and immediately lost interest to you.'

			act 'Leave':minut += 1 & gt 'vokzalGin'
		end
	end

	act 'persuaded to forgive':
		cls
		gs 'stat'
		'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
		'You started to persuade police captain forgive you and release.'

		if katalkinSexOnce >= 1:
			if katalkinSexDay+7 >= daystart:
				'captain grinned "Well."'

				act 'Leave':minut += 1 & gt 'vokzalGin'
			end

			if katalkinSexDay + 7 < daystart:
				'The captain frowned "You long ago to me did not come, avoiding?"'

				act 'No, what do you, simply no':
					cls
					gs 'stat'
					'<center><img src="images/qwest/vokzal/katalkin.jpg"></center>'
					'You started arguing opravdyvatsya, that you just do not have enough time. captain grinned "Come then now the Department. Carry out bodily searches."'

					act 'Go to the police':minut += 5 & katalkinNoexit = 1 & gt 'katalkin'
				end
			end
		end

		if katalkinSexOnce = 0:
			schtraf = 500
			'captain grinned "Come then now the Department. there shall understand."'

			act 'Go to the police':minut += 5 & katalkinNoexit = 1 & gt 'katalkin'
		end
	end

	dynamic $d_kachatprava
end

--- vokzaltorg ---------------------------------