13 lines
621 B
Plaintext
13 lines
621 B
Plaintext
; A simple compound interest calculator in MU8A for mu808 VM
|
|
; Prompts for the percentage and then for the period, outputs the resulting multiplier
|
|
; Created by Luxferre in 2025, released into public domain
|
|
|
|
set 100 0 1 ; store the constant 100 at loc 1
|
|
inp 2 3 0 ; prompt for the percentage into loc 2 and the period into loc 3
|
|
div 2 1 5 ; divide the percentage value at loc 2 by the constant at loc 1 into loc 5
|
|
inc 5 ; increment loc 5
|
|
log 5 5 ; replace loc 5 with its ln
|
|
mul 3 5 ; replace loc 5 with loc 3 * ln loc 5
|
|
exp 5 5 ; replace loc 5 with its nexp
|
|
out 5 5 0 ; output the resulting value
|