12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667 |
- # 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 = 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 <<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 ---------------------------------
|