# bank
if $ARGS[0] = 'start':
	cla
	clr
	*clr
	minut += 5
	gs 'stat'
	fcolor = rgb(0, 0, 0)
	bcolor = rgb(255, 255, 255)
	lcolor = rgb(106, 90, 205)
	'<center><b><font color="maroon">Bank</font></b></center>'
	'<center><img src="images/etogame/bank.jpg"></center>'

	if karta > 0:'In the bank <<karta>> rubles'

	if BankPapper = 1 and dayBankPapper = day:
		act 'Give documents':
			cls
			minut += 15
			BankPapper = 2
			gs 'stat'
			'You went to the office and gave the documents to the manager.'

			act 'Leave':minut += 5 & gt 'down'
		end
	end

	if money > 0:
		act 'Deposit money':
			cla
			minut += 5
			kartaIN = input ("How much money you want to deposit into the account?")

			if kartaIN <= 0 or kartaIN > money:
				'Not correct operation.'
			else
				karta += kartaIN
				money -= kartaIN
				'You put on the account <<kartaIN>> rubles, now on your account <<karta>> rubles.'
			end

			act 'Move away':gt 'bank', 'start'
		end
	end

	if karta > 0:
		act 'Withdraw money':
			cla
			minut += 5
			kartaOUT = input ("How much do you want to withdraw from account?")

			if kartaOUT <= 0 or kartaOUT > karta:
				'Not correct operation.'
			else
				karta -= kartaOUT
				money += kartaOUT
				'You debited <<kartaOUT>> rubles, now on your account <<karta>> rubles.'
			end

			act 'Move away':gt 'bank', 'start'
		end
	end

	act 'Leave':gt 'down'
end

--- bank ---------------------------------