# 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) '
Bank
' '
' if karta > 0:'In the bank <> rubles' 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 & 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 <> rubles, now on your account <> 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 <> rubles, now on your account <> rubles.' end act 'Move away':gt 'bank', 'start' end end act 'Leave':gt 'down' end --- bank ---------------------------------