(define (make-account balance)
    (define (withdraw amount)
        (if (>= balance amount)
            (begin (set! balance (- balance amount))
                balance)
            "Insufficient funds"))
    (define (deposit amount)
        (set! balance (+ balance amount))
            balance)
    (define (dispatch m)
        (cond ((eq? m 'withdraw) withdraw)
            ((eq? m 'deposit) deposit)
            (else (error "Unknown request -- MAKE-ACCOUNT"
                m))))
    dispatch)
(define A1 (make-account 100))

((A1 'dispath) 100)

class 帐号 {
  constructor(初始余额) {
    this.余额 = 初始余额
  }

  收入(钱数) {
    // 收入到余额
  }

  支出(钱数) {
    // 检查并支出钱数
  }
}

function 创建帐号(初始余额) {
  var 余额 = 初始余额;

  return (方法名) => {
    let 支出 = function(数额) {
      if (余额 >= 数额) {
        余额 = 余额 - 数额;
      } else {
        throw new Error(`钱不够：缺少余额 ${数额 - 余额} 元`);
      }
    };

    let 收入 = function(数额) {
      余额 += 数额;
    }

    switch (方法名) {
      case '支出':
        return 支出;
      case '收入':
        return 收入;
      default:
        throw new Error(`找不到方法 ${方法名}`);
    }
  };
}

> 创建帐号
[Function: 创建帐号]
> duangsuse的钱包 = 创建帐号(0.5)
[Function]
> duangsuse的钱包('支出')(0.5) // 买包辣条
undefined
> duangsuse的钱包('支出')(0.5) // 还想买包辣条
Error: 钱不够：缺少余额 0.5 元
    at 支出 (repl:9:15)
> duangsuse的钱包('收入')(1) // 众筹了 1 块钱
undefined
> duangsuse的钱包('支出')(0.5) // 再买包辣条
undefined
> duangsuse的钱包('查看')() // 妄图查看钱包
Error: 找不到方法 查看
    at repl:23:15