# bank if $ARGS[0] = 'start': cla clr *clr minut += 5 gs 'stat' if night_mode = 1: fcolor = rgb(255, 255, 255) bcolor = rgb(0, 0, 0) lcolor = rgb(106, 90, 205) else fcolor = rgb(0, 0, 0) bcolor = rgb(255, 255, 255) lcolor = rgb(106, 90, 205) end '
Bank
' '
> src="images/locations/city/citycenter/bank/bank.jpg">
' if week <= 5 and hour = 16 and minut >= 30 and mey_vika['mey_vika_qw'] >= 32: !r125 'Looks like Tamara Mikhailovna is going home.' end if bankAccount = 0: 'Do you want to open your account?' else if karta >= 0: 'You have <> in your account.' 'You have an approved credit of <>!' else 'You hava a debt of <<-1 * karta>> .' 'You have an approved credit of <>!' end end if BankPapper = 1 and dayBankPapper = daystart: 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 if bankloc = 1: gt 'down' else gt 'pavCommercial' end end 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: 'That is not a valid operation.' else karta += kartaIN money -= kartaIN if bankAccount = 0: bankAccount = 1 bankDebtLimit = 5000 end '
You deposited <> , your account balance is now <> .' end act 'Move away':gt 'bank', 'start' end end if karta + bankDebtLimit > 0: act 'Withdraw money': cla minut += 5 kartaOUT = input ("How much do you want to withdraw from account?") if kartaOUT <= 0 or kartaOUT > karta + bankDebtLimit: 'That is not a valid operation.' else karta -= kartaOUT money += kartaOUT if karta > 0: '
You withdraw <> . You have <> left in your bank account.' elseif karta = 0: '
You withdraw <> . You have no money left in your bank account.' else '
You withdraw <> . Your bank account is overdrawn by <> ₽.' end end act 'Move away':gt 'bank', 'start' end end act 'Leave': minut += 5 if bankloc = 1: gt 'down' else gt 'pavCommercial' end end end --- bank ---------------------------------