YOU SAID:
(defmethod initialize-instance :after ((account bank-account) &key opening-bonus-precentage) (when opening-bonus-precentage (incf (slot-value account 'balance) (* (slot-value account 'balance) (/ opening-bonus-precentage 100)))))
INTO JAPANESE
(defmethod 初期化インスタンス: 後 ((銀行口座をアカウント) オープニング ボーナス割合をキー &) (ときオープニング ボーナス命中 (incf (スロット値アカウント 'バランス) (* (スロット値アカウント' バランス) (/オープニング-ボーナス-命中 100)))
BACK INTO ENGLISH
(defmethod initialization instance: after ((bank account) opening bonus percentage key &) (when opening bonus hit (incf (slot value accounts ' balance) (* (slot value accounts ' balance) (100 / intro - bonus - hit)))
INTO JAPANESE
(defmethod 初期化インスタンス: ボーナス割合キーを開く ((bank account) 後 &) (開口部のボーナスを打つとき (incf (スロット値アカウントのバランス) (* (値のアカウントのバランスをスロット) (100/イントロ - ボーナス - ヒット)))
BACK INTO ENGLISH
(defmethod initialization instance: bonus percentage key to open ((bank account) after &) (when you opening bonus beat (incf (slot-value account balance) (* (balance account of the value of slot) (100 / intro - bonus - hit)))
INTO JAPANESE
(defmethod 初期化インスタンス: 後 ((bank account) を開くためにボーナス割合キー &) (開口部のボーナスを打つとき (incf (スロット値残高) (* (スロットの値のアカウント残高) (100/イントロ - ボーナス - ヒット)))
BACK INTO ENGLISH
(defmethod initialization instance: after ((bank account) to open the bonus percentage key &) (when you opening bonus beat (incf (slot-value balance) (* (the value slot account balance) (100 / intro - bonus - hit)))
INTO JAPANESE
(defmethod 初期化インスタンス: ボーナス割合キーを開く ((bank account) 後 &) (開口部のボーナスを打つとき (incf (スロット値バランス) (* (値スロット収支) (100/イントロ - ボーナス - ヒット)))
BACK INTO ENGLISH
(defmethod initialization instance: bonus percentage key up ((bank account) after the &) (when you opening bonus beat (incf (slot-value balance) (* (the value slot revenue and expenditure) (100 / intro - bonus - hit)))
INTO JAPANESE
(defmethod 初期化インスタンス: ボーナス割合キーアップ後 ((bank account)、&) (開口部のボーナスを打つとき (incf (スロット値バランス) (* (値スロット収入と支出) (100/イントロ - ボーナス - ヒット)))
BACK INTO ENGLISH
(defmethod initialization instance: bonus percentage up after ((bank account), &) (when you opening bonus beat (incf (slot-value balance) (* (the value slot revenue and expenditure) (100 / intro - bonus - hit)))
INTO JAPANESE
(defmethod 初期化インスタンス: ((bank account) 後に、ボーナスの掛け率・) (開口部のボーナスを打つとき (incf (スロット値バランス) (* (値スロット収入と支出) (100/イントロ - ボーナス - ヒット)))
BACK INTO ENGLISH
(defmethod initialization instance: ((bank account), and bonus) (when you opening bonus beat (incf (slot-value balance) (* (the value slot revenue and expenditure) (100 / intro - bonus - hit)))
INTO JAPANESE
(defmethod 初期化インスタンス: ((bank account)、およびボーナス) (開口部のボーナスを打つとき (incf (スロット値バランス) (* (値スロット収入と支出) (100/イントロ - ボーナス - ヒット)))
BACK INTO ENGLISH
(defmethod initialization instance: ((bank account), and bonus) (when you opening bonus beat (incf (slot-value balance) (* (the value slot revenue and expenditure) (100 / intro - bonus - hit)))
That's deep, man.