#IF PRESTACAO @FABS 0.001 < 
   FUTURO PRESENTE / PERIODO @RAIZN 1 - 100 *  "JUROS"  @GUARDA_VARIAVEL
#ELSE
   "PREST" PRESTACAO -1 *  @GUARDA_VARIAVEL
   "FUT"   FUTURO -1 *  @GUARDA_VARIAVEL
   "RCL0"  FUT @FABS PREST PERIODO * PRESENTE + @FABS - PREST PERIODO * FUT + @FABS PRESENTE @FABS - *  @GUARDA_VARIAVEL
   "RCL9"  RCL0 RCL0 @FABS / 0.000000001 *  @GUARDA_VARIAVEL
   "RCLZ"  0.00002  @GUARDA_VARIAVEL
   #WHILE  0.0000001  RCLZ @FABS <= 
      "RCL7"  RCL9 1 +  @GUARDA_VARIAVEL
      "RCL8"  RCL7 PERIODO -1 * ^  @GUARDA_VARIAVEL
      "RCL6"  RCL8 RCL7 / PERIODO *  @GUARDA_VARIAVEL
      "RCLZ"  PREST 1 RCL8 - * RCL9 / PRESENTE + FUT RCL8 * + RCL6 1 RCL8 - RCL9 / - PREST RCL9 / * FUT RCL6 * - /  @GUARDA_VARIAVEL
      "RCL9"  RCL9 RCLZ -  @GUARDA_VARIAVEL
   #END_WHILE
   RCL9 100 * "JUROS" @GUARDA_VARIAVEL
#END_IF
JUROS