An Automated Teller MAchine to withdraw cash from

[links="#00c800"]
[link_offset="40"]

[page="start"]
[backing="atm.pcx"]
[callvrm="atm_check"]
[if fatal][goto="outoforder"]
[if no_account][goto="noaccount"]















[colour="#00a000"]     WELCOME TO MADLAND BANK

[colour="#00a000"]     WHICH SERVICE DO YOU REQUIRE?




[link="WITHDRAW MONEY"]
[linkto="withdraw"]
[link="BALANCE ENQUIRY"]
[linkto="balance"]
[link="RETURN CARD"]
[linkto="exit"]
[endpage]



[page="withdraw"]
[backing="atm.pcx"]















[colour="#00a000"]     WITHDRAW HOW MUCH




[link="100 CREDITS"]
[linkto="100"]
[link="200 CREDITS"]
[linkto="200"]
[link="500 CREDITS"]
[linkto="500"]
[link="1000 CREDITS"]
[linkto="1000"]
[link="OTHER AMOUNT"]
[linkto="other"]
[link="CANCEL AND RETURN CARD"]
[linkto="exit"]
[endpage]



[page="balance"]
[backing="atm.pcx"]















[colour="#00a000"]     YOUR BALANCE IS

[colour="#00a000"] 

[colour="#00a000"] 

[colour="#00a000"]     DO YOU REQUIRE ANOTHER SERVICE?


[callvrm="atm_balance"]
[link="YES"]
[linkto="start"]
[link="NO"]
[linkto="exit"]
[endpage]



[page="balance2"]
[backing="atm.pcx"]















[colour="#00a000"]     YOUR BALANCE IS NOW

[colour="#00a000"] 

[colour="#00a000"] 

[colour="#00a000"]     DO YOU REQUIRE ANOTHER SERVICE?


[callvrm="atm_balance"]
[link="YES"]
[linkto="start"]
[link="NO"]
[linkto="exit"]
[endpage]

Get_amount uses binary notaion 00 = 100, 01 = 200, 10 = 500, 11 = 1000

00 = 100

[page="100"]
[backing="atm.pcx"]
[clear atm_01]
[clear atm_10]
[callvrm="atm_getamount"]
[if true][goto="balance2"]
[goto="no_money"]
[endpage]

01 = 200

[page="200"]
[backing="atm.pcx"]
[clear atm_01]
[clear atm_10]
[set atm_01]
[callvrm="atm_getamount"]
[if true][goto="balance2"]
[goto="no_money"]
[endpage]

10 = 500

[page="500"]
[backing="atm.pcx"]
[clear atm_01]
[clear atm_10]
[set atm_10]
[callvrm="atm_getamount"]
[if true][goto="balance2"]
[goto="no_money"]
[endpage]

11 = 1000

[page="1000"]
[backing="atm.pcx"]
[clear atm_01]
[clear atm_10]
[set atm_01]
[set atm_10]
[callvrm="atm_getamount"]
[if true][goto="balance2"]
[goto="no_money"]
[endpage]

[page="other"]
[backing="panel.pcx"]
[callvrm="atm_getother"]
[if true][goto="balance2"]
[goto="no_money"]
[endpage]


[page="no_money"]
[backing="atm.pcx"]















[colour="#00a000"]     INSUFFICIENT FUNDS!  YOUR BALANCE IS

[colour="#00a000"] 

[colour="#00a000"] 

[colour="#00a000"]     DO YOU REQUIRE ANOTHER SERVICE?


[callvrm="atm_balance"]
[link="YES"]
[linkto="start"]
[link="NO"]
[linkto="exit"]
[endpage]

The player has destroyed the VAX minicomputer holding their account details

[page="outoforder"]
[backing="atm.pcx"]















[colour="#00a000"]     OUT OF ORDER
[nextpage="exit"]
[endpage]

The player has 'lost' their card, got a new one, closed their account
and is now trying to access it with their old card

[page="noaccount"]
[backing="atm.pcx"]















[colour="#00a000"]     YOUR CARD HAS EXPIRED
[nextpage="exit"]
[endpage]
