; Lammy im gonna send you the updated Items to corespond with the Bank

SCENE 5002,  "interior11"
	
	ACTOR 1, "Mythical Assassin", "k", 4, 35, 90

	OFFER 5119

	1: Welcome to the KoC Bank
	1: To use the bank please Click on me.
	END

@eventActorClick1
	MENU "Buy 1K Dollar Notes=@notes1k","Buy 5K Dollar Notes=@notes5k", "Buy 10K Dollar Notes=@notes10k", "Buy 50K Dollar Notes=@notes50k", "Buy 100K Dollar Notes=@notes100k", "Buy 250K Dollar Notes=@notes250k", "Buy 500K Dollar Notes=@notes500k", "Buy 1M Dollar Note=@notes1m",  "More information=@infonotes","Cancel=@cancel"
	GOTO @eventActorClick1

@notes1k
	SET bankitem, "180"
	1: How many %I#<bankitem> do you want to buy?
	ASK 300
	STRCMP #<lastAsk>, ""
	IF= @cancel
	COMPARE "#<lastAsk>", "1"
	IF< @error1
	COMPARE "#<lastAsk>", "100"
	IF> @error2
	SET bankcheck1, "#<lastAsk>"
	SET bankcheck2, "0"
	STRCMP "#<bankcheck2>", "0"
	IF< @bankban
	IF> @bankban
	SET bankcheck2, "1"
	STRCMP "#<bankcheck2>", "1"
	IF< @bankban
	IF> @bankban
	SET bankcheck3, "#<num.item180>"
	SET bankcheck4, "#<num.hostLevel>"
	SET bankcheck5, "#<num.hostGP>"
	SET bankcheck6, "1000"	
	MUL bankcheck6, "#<bankcheck1>"
	SET bankcheck7, "#<lastAsk>"

	COMPARE #<bankcheck4>, "100"
	IF> @bankban
	IF= @skipadd1k
	ADD bankcheck4, "1"

@skipadd1k

	COMPARE "#<bankcheck3>","#<bankcheck4>" 
	IF= @error3

	ADD bankcheck1, "#<bankcheck3>"		
	COMPARE "#<bankcheck1>","#<bankcheck4>" 
	IF> @error4

	COMPARE "#<bankcheck5>","#<bankcheck6>"	
	IF< @error5

	1: #<lastAsk> %I#<bankitem> will cost you #<bankcheck6> Dollar in total.
	1: Do you accept?
	ASK 300
	IF YES, @accept1k
	1: Very well.
	GOTO @cancel

@accept1k
	HOST_TAKE G#<bankcheck6>
	HOST_GIVE I#<bankitem>.#<bankcheck7>
	GOTO @cancel

@notes5k
	SET bankitem, "181"
	1: How many %I#<bankitem> do you want to buy?
	ASK 300
	STRCMP #<lastAsk>, ""
	IF= @cancel
	COMPARE "#<lastAsk>", "1"
	IF< @error1
	COMPARE "#<lastAsk>", "100"
	IF> @error2
	SET bankcheck1, "#<lastAsk>"
	SET bankcheck2, "0"
	STRCMP "#<bankcheck2>", "0"
	IF< @bankban
	IF> @bankban
	SET bankcheck2, "1"
	STRCMP "#<bankcheck2>", "1"
	IF< @bankban
	IF> @bankban
	SET bankcheck3, "#<num.item181>"
	SET bankcheck4, "#<num.hostLevel>"
	SET bankcheck5, "#<num.hostGP>"
	SET bankcheck6, "5000"	
	MUL bankcheck6, "#<bankcheck1>"
	SET bankcheck7, "#<lastAsk>"

	COMPARE #<bankcheck4>, "100"
	IF> @bankban
	IF= @skipadd5k
	ADD bankcheck4, "1"

@skipadd5k

	COMPARE "#<bankcheck3>","#<bankcheck4>" 
	IF= @error3

	ADD bankcheck1, "#<bankcheck3>"
	COMPARE "#<bankcheck1>","#<bankcheck4>" 
	IF> @error4

	COMPARE "#<bankcheck5>","#<bankcheck6>"	
	IF< @error5

	1: #<lastAsk> %I#<bankitem> will cost you #<bankcheck6> Dollar in total.
	1: Do you accept?
	ASK 300
	IF YES, @accept5k
	1: Very well.
	GOTO @cancel

@accept5k
	HOST_TAKE G#<bankcheck6>
	HOST_GIVE I#<bankitem>.#<bankcheck7>
	GOTO @cancel

@notes10k
	SET bankitem, "182"
	1: How many %I#<bankitem> do you want to buy?
	ASK 300
	STRCMP #<lastAsk>, ""
	IF= @cancel
	COMPARE "#<lastAsk>", "1"
	IF< @error1
	COMPARE "#<lastAsk>", "100"
	IF> @error2
	SET bankcheck1, "#<lastAsk>"
	SET bankcheck2, "0"
	STRCMP "#<bankcheck2>", "0"
	IF< @bankban
	IF> @bankban
	SET bankcheck2, "1"
	STRCMP "#<bankcheck2>", "1"
	IF< @bankban
	IF> @bankban
	SET bankcheck3, "#<num.item182>"
	SET bankcheck4, "#<num.hostLevel>"
	SET bankcheck5, "#<num.hostGP>"
	SET bankcheck6, "10000"	
	MUL bankcheck6, "#<bankcheck1>"
	SET bankcheck7, "#<lastAsk>"

	COMPARE #<bankcheck4>, "100"
	IF> @bankban
	IF= @skipadd10k
	ADD bankcheck4, "1"

@skipadd10k

	COMPARE "#<bankcheck3>","#<bankcheck4>" 
	IF= @error3

	ADD bankcheck1, "#<bankcheck3>"
	COMPARE "#<bankcheck1>","#<bankcheck4>" 
	IF> @error4

	COMPARE "#<bankcheck5>","#<bankcheck6>"	
	IF< @error5

	1: #<lastAsk> %I#<bankitem> will cost you #<bankcheck6> Dollar in total.
	1: Do you accept?
	ASK 300
	IF YES, @accept10k
	1: Very well.
	GOTO @cancel

@accept10k
	HOST_TAKE G#<bankcheck6>
	HOST_GIVE I#<bankitem>.#<bankcheck7>
	GOTO @cancel

@notes50k
	IF -V4, @error6
	SET bankitem, "183"
	1: How many %I#<bankitem> do you want to buy?
	ASK 300
	STRCMP #<lastAsk>, ""
	IF= @cancel
	COMPARE "#<lastAsk>", "1"
	IF< @error1
	COMPARE "#<lastAsk>", "100"
	IF> @error2
	SET bankcheck1, "#<lastAsk>"
	SET bankcheck2, "0"
	STRCMP "#<bankcheck2>", "0"
	IF< @bankban
	IF> @bankban
	SET bankcheck2, "1"
	STRCMP "#<bankcheck2>", "1"
	IF< @bankban
	IF> @bankban
	SET bankcheck3, "#<num.item183>"
	SET bankcheck4, "#<num.hostLevel>"
	SET bankcheck5, "#<num.hostGP>"
	SET bankcheck6, "50000"	
	MUL bankcheck6, "#<bankcheck1>"
	SET bankcheck7, "#<lastAsk>"

	COMPARE #<bankcheck4>, "100"
	IF> @bankban
	IF= @skipadd50k
	ADD bankcheck4, "1"

@skipadd50k

	COMPARE "#<bankcheck3>","#<bankcheck4>" 
	IF= @error3

	ADD bankcheck1, "#<bankcheck3>"
	COMPARE "#<bankcheck1>","#<bankcheck4>" 
	IF> @error4

	COMPARE "#<bankcheck5>","#<bankcheck6>"	
	IF< @error5

	1: #<lastAsk> %I#<bankitem> will cost you #<bankcheck6> Dollar in total.
	1: Do you accept?
	ASK 300
	IF YES, @accept50k
	1: Very well.
	GOTO @cancel

@accept50k
	HOST_TAKE G#<bankcheck6>
	HOST_GIVE I#<bankitem>.#<bankcheck7>
	GOTO @cancel

@notes100k
	SET bankitem, "184"
	IF -V9, @error6
	MENU "Buy 1 Bank Note 100K=@notes100k1", "Buy 2 Bank Notes 100K=@notes100k2", "Buy 3 Bank Notes 100K=@notes100k3","Buy 4 Bank Notes 100K=@notes100k4","Buy 5 Bank Notes 100K=@notes100k5","Buy 6 Bank Notes 100K=@notes100k6","Buy 7 Bank Notes 100K=@notes100k7","Buy 8 Bank Notes 100K=@notes100k8","Buy 9 Bank Notes 100K=@notes100k9","Buy 10 Bank Notes 100K=@notes100k10","Cancel=@cancel"
	GOTO @notes100k

@notes100k1
	COMPARE #<num.item184>, "99"
	IF> @error3
	IF -G100000, @error5
	HOST_TAKE G100000
	HOST_GIVE I184
	N: You received 1 %I184.
	GOTO @cancel

@notes100k2
	COMPARE #<num.item184>, "98"
	IF> @error2
	IF -G200000, @error5
	HOST_TAKE G200000
	HOST_GIVE I184.2
	N: You received 2 %I184.
	GOTO @cancel

@notes100k3
	COMPARE #<num.item184>, "97"
	IF> @error2
	IF -G300000, @error5
	HOST_TAKE G300000
	HOST_GIVE I184.3
	N: You received 3 %I184.
	GOTO @cancel

@notes100k4
	COMPARE #<num.item184>, "96"
	IF> @error2
	IF -G400000, @error5
	HOST_TAKE G400000
	HOST_GIVE I184.4
	N: You received 4 %I2004.
	GOTO @cancel

@notes100k5
	COMPARE #<num.item184>, "95"
	IF> @error2
	IF -G500000, @error5
	HOST_TAKE G500000
	HOST_GIVE I184.5
	N: You received 5 %I184.
	GOTO @cancel

@notes100k6
	COMPARE #<num.item184>, "94"
	IF> @error2
	IF -G600000, @error5
	HOST_TAKE G600000
	HOST_GIVE I184.6
	N: You received 6 %I184.
	GOTO @cancel

@notes100k7
	COMPARE #<num.item184>, "93"
	IF> @error2
	IF -G700000, @error5
	HOST_TAKE G700000
	HOST_GIVE I184.7
	N: You received 7 %I184.
	GOTO @cancel

@notes100k8
	COMPARE #<num.item184>, "92"
	IF> @error2
	IF -G800000, @error5
	HOST_TAKE G800000
	HOST_GIVE I184.8
	N: You received 8 %I184.
	GOTO @cancel

@notes100k9
	COMPARE #<num.item184>, "91"
	IF> @error2
	IF -G900000, @error5
	HOST_TAKE G900000
	HOST_GIVE I184.9
	N: You received 9 %I184.
	GOTO @cancel

@notes100k10
	COMPARE #<num.item184>, "90"
	IF> @error2
	IF -G1000000, @error5
	HOST_TAKE G1000000
	HOST_GIVE I184.10
	N: You received 10 %I184.
	GOTO @cancel

@notes250k
	SET bankitem, "185"
	IF -V24, @error6
	MENU "Buy 1 Bank Note 250K=@notes250k1","Buy 2 Bank Notes 250K=@notes250k2","Buy 3 Bank Notes 250K=@notes250k3","Buy 4 Bank Notes 250K=@notes250k4","Cancel=@cancel"
	GOTO @notes250k

@notes250k1
	COMPARE #<num.item185>, "99"
	IF> @error3
	IF -G250000, @error5
	HOST_TAKE G250000
	HOST_GIVE I185
	N: You received 1 %I185.
	GOTO @cancel

@notes250k2
	COMPARE #<num.item185>, "98"
	IF> @error2
	IF -G500000, @error5
	HOST_TAKE G500000
	HOST_GIVE I185.2
	N: You received 2 %I185.
	GOTO @cancel

@notes250k3
	COMPARE #<num.item185>, "97"
	IF> @error2
	IF -G750000, @error5
	HOST_TAKE G750000
	HOST_GIVE I155.3
	N: You received 3 %I185.
	GOTO @cancel

@notes250k4
	COMPARE #<num.item155>, "96"
	IF> @error2
	IF -G1000000, @error5
	HOST_TAKE G1000000
	HOST_GIVE I185.4
	N: You received 4 %I185.
	GOTO @cancel

@notes500k
	SET bankitem, "186"
	IF -V49, @error6
	MENU "Buy 1 Bank Note 500K=@notes500k1","Buy 2 Bank Notes 500K=@notes500k2","Cancel=@cancel"
	GOTO @notes500k

@notes500k1
	COMPARE #<num.item186>, "99"
	IF> @error3
	IF -G500000, @error5
	HOST_TAKE G500000
	HOST_GIVE I186
	N: You received 1 %I186.
	GOTO @cancel

@notes500k2
	COMPARE #<num.item186>, "98"
	IF> @error2
	IF -G1000000, @error5
	HOST_TAKE G1000000
	HOST_GIVE I186.2
	N: You received 2 %I186.
	GOTO @cancel

@notes1m
	SET bankitem, "187"
	COMPARE #<num.item187>, "99"
	IF> @error3
	IF -V99, @error6
	IF -G1000000, @error5
	HOST_TAKE G1000000
	HOST_GIVE I187
	N: You received 1 %I187.
	GOTO @cancel

@error1
	1: You have to enter a number that is larger then 0.
	GOTO @cancel

@error2
	1: You can not buy that many %I#<bankitem>s.
	GOTO @cancel

@error3
	1: You have already reached your maximum carry capacity for %I#<bankitem>.
	GOTO @cancel

@error4
	SUB bankcheck4, "#<bankcheck3>" 
	1: You can only buy #<bankcheck4> more %I#<bankitem> before reaching your maximum carry capacity.
	GOTO @cancel

@error5
	1: You do not have enough Dollars with you right now.
	GOTO @cancel

@error6
	1: Your level is not high enough yet to buy a %I#<bankitem>.
	GOTO @cancel

@infonotes
	1: Bank Notes are items that can be sold in shops or in banks.
	1: You can not give these items away to transfer them to other people, but they are very useful to have with you.
	1: When you are nearing the maximum amount of money that you can carry it is wise to buy a Bank Note.
	1: Bank Notes can only be bought in Banks, but can be sold to any shop you want.
	1: The level of the Bank Notes is level 200 to prevent that you accidently use the item on your character and lose money.
	1: To sell your Bank Notes just select them in your inventory and then right click to sell them.
	1: I hope I informed you sufficiently enough about Bank Notes.
	GOTO @cancel

@cancel
	SET bankcheck1, "0"
	SET bankcheck2, "0"
	SET bankcheck3, "0"
	SET bankcheck4, "0"
	SET bankcheck5, "0"
	SET bankcheck6, "0"
	SET bankcheck7, "0"
	END

@bankban
	HOST_GIVE T4000
	EJECT T4000
	GOTO LINK 4,0

END
;---------------------------------------------