1scale=2
2print "\nCheck book program!\n"
3print "  Remember, deposits are negative transactions.\n"
4print "  Exit by a 0 transaction.\n\n"
5
6print "Initial balance? "; bal = read()
7bal /= 1
8print "\n"
9while (1) {
10  "current balance = "; bal
11  "transaction? "; trans = read()
12  if (trans == 0) break;
13  bal -= trans
14  bal /= 1
15}
16quit
17