(11C) Base Conversion

[Thomas Klemm]

Description:
This program allows to convert numbers from one base to another.

Register:
Reg 1: from-base
Reg 2: to-base

Program:
STO 0
RCL 1
RCL 2
-
x<>y
LBL 0
RCL 1
x<>y
RCL 2
÷
INT
x=0
GTO 1
R↓
×
R↓
×
STO + 0
R↓
GTO 0
LBL 1
RCL 0


Examples:
Dec - Bin
Reg 1: 10
Reg 2: 2
21 - 10101

Hex - Dec
Reg 1: 16
Reg 2: 100
0xCAFE = 12:10:15:14
12101514 - 51966

[Thomas Klemm]

Code:

01 -    44  0  STO 0
02 -    45  1  RCL 1
03 -    45  2  RCL 2
04 -       30  −
05 -       34  x<>y
06 -    45  1  RCL 1
07 -       34  x<>y
08 -    45  2  RCL 2
09 -       10  ÷
10 -    43 25  INTG
11 -    43 35  x=0
12 - 43,33 20  GTO 20
13 -       33  R↓
14 -       20  ×
15 -       33  R↓
16 -       20  ×
17 - 44 40  0  STO+ 0
18 -       33  R↓
19 - 43,33 06  GTO 06
20 -    45  0  RCL 0

Example: 2014₁₀ → 3736₈
10 STO 1
8 STO 2
2014 R/S


This is another solution that uses the function NPV:

Code:

01 -       36  ENTER
02 -       36  ENTER
03 -    45 15  RCL FV
04 -       10  ÷
05 -    43 25  INTG
06 -    43 13  CFo
07 -    45 15  RCL FV
08 -       10  ÷
09 -    43 25  INTG
10 -    43 35  x=0
11 - 43,33 14  GTO 14
12 -    43 14  CFj
13 - 43,33 07  GTO 07
14 -       33  R↓
15 -        1  1
16 -    45 14  RCL PMT
17 -       22  1/x
18 -       24  Δ%
19 -    44 12  STO i
20 -       33  R↓
21 -       33  R↓
22 -    42 13  NPV
23 -    45 14  RCL PMT
24 -    45 15  RCL FV
25 -       30  −
26 -       20  ×
27 -       40  +

Example: 2014₁₀ → 3736₈
10 STO PMT
8 STO FV
2014 R/S

[Thomas Klemm]

BC:ANS=
N+
(FROM-TO)\(\times\)
\(\Sigma\)(I:0:LOG(N)\(\div\)LOG(TO):1:
L(N:IDIV(N:TO))\(\times\)FROM^I
​)

Example: DEC → OCT

Code:

         2014
+   2 *   251
+  20 *    31
+ 200 *     3
         ----
         3736

10 → FROM
8 → TO
2014 → N
ANS