SingleDigit-Calculator/Calculator.bf at master · devPablo/SingleDigit-Calculator · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
>>>>>>,<+++++[->---------<]>---<<<<<< (first input)
+++++++++++++++++++++++++++++++++++++++++++ (sum symbol)
>,
[
->+>+
<<
]
>>>+
<<
-------------------------------------------
[ (subtraction)
-
>>- (cell 5)
+++++++++++++++++++++++++++++++++++++++++++++< (sub symbol)
 [
 ---------------------------------------------
  [
  (other)
  >[-] (cell 5)
  <[-] (cell 4)
  <[-] (cell 3)
  <<[-] (cell 2)
  > (cell 1)
  ++++++++ [<++++++++++>-] <->[-]          O
  >++++++++++ [<+++++++++++>-] <++>[-]     p
  >++++++++++ [<++++++++++>-] <+>[-]       e
  >++++++++++ [<+++++++++++>-] <++++>[-]    r
  >++++++++++ [<++++++++++>-] <--->[-]     a
  >++++++++++ [<++++++++++++>-] <---->[-]  t
  >++++++++++ [<+++++++++++>-] <+>[-]      o
  >++++++++++ [<+++++++++++>-] <++++>[-]    r
  >++++++++++ [<+++++++++++>-] <+++++>[-]  s
  >++++++ [<++++++++++>-] <-->[-]          (colon)
  >+++ [<++++++++++>-] <++>[-]             (space)
  >+++++ [<+++++++++>-] <-->[-]            (sum sign)
  >+++++ [<+++++++++>-] <->[-]             (comma)
  >+++ [<++++++++++>-] <++>[-]             (space)
  >+++++ [<+++++++++>-] [-]                (sub sign)
  <<<<<<<<<<<<<<<
  .>.>.>.>.>.>.>.>.>.>.>.>.>.>.>.
  ,
  ]
  (subtraction)
  > (cell 5)
  [-]
  << (cell 3)
  [-]
  << (cell 1)
  [-]
  +.,
 ]
] (cell 3)
< (summation) (cell 2)
>>>[-] (cell 5)
<[-] (cell 4)
<<<[-] (cell 1)

(transfer numbers)
>>>>>> (cell 6)
[
-
<<<<<<+ (cell 1)
>>>>>>
]
<<<<< (cell 2)
,>+++++[-<--------->]<---
[ (applying sum)
-<+>
]                           (0 1 0 (a) (b) 0)
< (cell 1)
>+ (cell 2)
>>+++++++++ (cell 4)
<<< (cell 1)
[
->>>>+>>+<<<<<<
]
>>> (cell 4 at position (a))
[->-[>]<<] (indicator of first zero value)

<[-
 ((a) is less than 9)
 >>[-] (cell 4)
 >>>>+++++ (cell 8)
  [
  <+++++++++>-
  ]
  <+++. (cell 7)
  , (end)
 ]

<[-
 ((a) is greater or equals 9)
 >>>[-] (cell 5)
 >+ (cell 6)
 >>++ (cell 8)
  [ (Decimal to ASCII 1st digit)
   -<----->
  ]
  +++++
  [
  -<<+++++++++>>
  ]
  <<+++ (cell 6)
  >>+++++ (cell 8)
  [ (Decimal to ASCII 2nd digit)
   -<+++++++++>
  ]
  <+++ (cell 7)
  <. (cell 6)
  >. (cell 7)
  ,  (end)
 ]