58 lines
775 B
Brainfuck
58 lines
775 B
Brainfuck
|
COMPAR :
|
||
|
========
|
||
|
|
||
|
<[
|
||
|
>[->+>+<<]>>[-<<+>>] on copie
|
||
|
+<[>-<[-]] on teste
|
||
|
>[->+>+<<]>>[-<<+>>]
|
||
|
<[<<<<[-]+>+>>>-] si le test est valide on efface
|
||
|
<<<-<-on finit la boucle
|
||
|
]
|
||
|
{add the last part}
|
||
|
|
||
|
|
||
|
EQUALS :
|
||
|
+>[<->[-]]>>[<<<->>>-]<<<
|
||
|
|
||
|
DIFFERENT :
|
||
|
>[<+>[-]]>>[<<<+>>>-]<<<
|
||
|
|
||
|
GREATER :
|
||
|
>>>[<<<+>>>-]<<<
|
||
|
|
||
|
GREATER OR EQUALS :
|
||
|
+>[<->[-]]<
|
||
|
|
||
|
SMALLER :
|
||
|
>[<+>[-]]<
|
||
|
|
||
|
SMALLER OR EQUALS :
|
||
|
+>>>[<<<->>>-]<<<
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
MUL :
|
||
|
=====
|
||
|
|
||
|
<[->>+<<]>[->[-<<+>>>+<]>[-<+>]<<]>[-]<<
|
||
|
|
||
|
|
||
|
|
||
|
DIV :
|
||
|
=====
|
||
|
|
||
|
[->+>>+<<<]
|
||
|
<[->+>>+<<<]
|
||
|
>>>
|
||
|
[>[->+>+<<]>>[-<<+>>]+<[>-<[-]]>[->+>+<<]>>[-<<+>>]<[<<<<[-]+>+>>>-]<<<-<-]+>[<->[-]]<
|
||
|
[
|
||
|
-<[-<->>+<]>[-<+>]
|
||
|
<<<+>
|
||
|
[->>+>+<<<]>>>[-<<<+>>>]<<
|
||
|
[->>+>+<<<]>>>[-<<<+>>>]<
|
||
|
<[>[->+>+<<]>>[-<<+>>]+<[>-<[-]]>[->+>+<<]>>[-<<+>>]<[<<<<[-]+>+>>>-]<<<-<-]>>>[<<<+>>>-]<<<
|
||
|
]
|
||
|
<[-]<[-]<
|