| 1 | compute prime numbers
|
|---|
| 2 | to use type the max number then push Alt 1 0
|
|---|
| 3 | ===================================================================
|
|---|
| 4 | ======================== OUTPUT STRING ============================
|
|---|
| 5 | ===================================================================
|
|---|
| 6 | >++++++++[<++++++++>-]<++++++++++++++++.[-]
|
|---|
| 7 | >++++++++++[<++++++++++>-]<++++++++++++++.[-]
|
|---|
| 8 | >++++++++++[<++++++++++>-]<+++++.[-]
|
|---|
| 9 | >++++++++++[<++++++++++>-]<+++++++++.[-]
|
|---|
| 10 | >++++++++++[<++++++++++>-]<+.[-]
|
|---|
| 11 | >++++++++++[<++++++++++>-]<+++++++++++++++.[-]
|
|---|
| 12 | >+++++[<+++++>-]<+++++++.[-]
|
|---|
| 13 | >++++++++++[<++++++++++>-]<+++++++++++++++++.[-]
|
|---|
| 14 | >++++++++++[<++++++++++>-]<++++++++++++.[-]
|
|---|
| 15 | >+++++[<+++++>-]<+++++++.[-]
|
|---|
| 16 | >++++++++++[<++++++++++>-]<++++++++++++++++.[-]
|
|---|
| 17 | >++++++++++[<++++++++++>-]<+++++++++++.[-]
|
|---|
| 18 | >+++++++[<+++++++>-]<+++++++++.[-]
|
|---|
| 19 | >+++++[<+++++>-]<+++++++.[-]
|
|---|
| 20 |
|
|---|
| 21 | ===================================================================
|
|---|
| 22 | ======================== INPUT NUMBER ============================
|
|---|
| 23 | ===================================================================
|
|---|
| 24 | + cont=1
|
|---|
| 25 | [
|
|---|
| 26 | - cont=0
|
|---|
| 27 | >,
|
|---|
| 28 | ======SUB10======
|
|---|
| 29 | ----------
|
|---|
| 30 |
|
|---|
| 31 | [ not 10
|
|---|
| 32 | <+> cont=1
|
|---|
| 33 | =====SUB38======
|
|---|
| 34 | ----------
|
|---|
| 35 | ----------
|
|---|
| 36 | ----------
|
|---|
| 37 | --------
|
|---|
| 38 |
|
|---|
| 39 | >
|
|---|
| 40 | =====MUL10=======
|
|---|
| 41 | [>+>+<<-]>>[<<+>>-]< dup
|
|---|
| 42 |
|
|---|
| 43 | >>>+++++++++
|
|---|
| 44 | [
|
|---|
| 45 | <<<
|
|---|
| 46 | [>+>+<<-]>>[<<+>>-]< dup
|
|---|
| 47 | [<<+>>-]
|
|---|
| 48 | >>-
|
|---|
| 49 | ]
|
|---|
| 50 | <<<[-]<
|
|---|
| 51 | ======RMOVE1======
|
|---|
| 52 | <
|
|---|
| 53 | [>+<-]
|
|---|
| 54 | ]
|
|---|
| 55 | <
|
|---|
| 56 | ]
|
|---|
| 57 | >>[<<+>>-]<<
|
|---|
| 58 |
|
|---|
| 59 | ===================================================================
|
|---|
| 60 | ======================= PROCESS NUMBER ===========================
|
|---|
| 61 | ===================================================================
|
|---|
| 62 |
|
|---|
| 63 | ==== ==== ==== ====
|
|---|
| 64 | numd numu teid teiu
|
|---|
| 65 | ==== ==== ==== ====
|
|---|
| 66 |
|
|---|
| 67 | >+<-
|
|---|
| 68 | [
|
|---|
| 69 | >+
|
|---|
| 70 | ======DUP======
|
|---|
| 71 | [>+>+<<-]>>[<<+>>-]<
|
|---|
| 72 |
|
|---|
| 73 | >+<--
|
|---|
| 74 |
|
|---|
| 75 | >>>>>>>>+<<<<<<<< isprime=1
|
|---|
| 76 |
|
|---|
| 77 | [
|
|---|
| 78 | >+
|
|---|
| 79 |
|
|---|
| 80 | <-
|
|---|
| 81 |
|
|---|
| 82 | =====DUP3=====
|
|---|
| 83 | <[>>>+>+<<<<-]>>>>[<<<<+>>>>-]<<<
|
|---|
| 84 |
|
|---|
| 85 | =====DUP2=====
|
|---|
| 86 | >[>>+>+<<<-]>>>[<<<+>>>-]<<< <
|
|---|
| 87 |
|
|---|
| 88 |
|
|---|
| 89 | >>>
|
|---|
| 90 |
|
|---|
| 91 |
|
|---|
| 92 | ====DIVIDES=======
|
|---|
| 93 | [>+>+<<-]>>[<<+>>-]< DUP i=div
|
|---|
| 94 |
|
|---|
| 95 | <<
|
|---|
| 96 | [
|
|---|
| 97 | >>>>>+ bool=1
|
|---|
| 98 | <<<
|
|---|
| 99 | [>+>+<<-]>>[<<+>>-]< DUP
|
|---|
| 100 | [>>[-]<<-] IF i THEN bool=0
|
|---|
| 101 | >>
|
|---|
| 102 | [ IF i=0
|
|---|
| 103 | <<<<
|
|---|
| 104 | [>+>+<<-]>>[<<+>>-]< i=div
|
|---|
| 105 | >>>
|
|---|
| 106 | - bool=0
|
|---|
| 107 | ]
|
|---|
| 108 | <<<
|
|---|
| 109 | - DEC i
|
|---|
| 110 | <<
|
|---|
| 111 | -
|
|---|
| 112 | ]
|
|---|
| 113 |
|
|---|
| 114 | +>>[<<[-]>>-]<<
|
|---|
| 115 | >[-]< CLR div
|
|---|
| 116 | =====END DIVIDES====
|
|---|
| 117 |
|
|---|
| 118 |
|
|---|
| 119 | [>>>>>>[-]<<<<<<-] if divides then isprime=0
|
|---|
| 120 |
|
|---|
| 121 |
|
|---|
| 122 | <<
|
|---|
| 123 |
|
|---|
| 124 | >>[-]>[-]<<<
|
|---|
| 125 | ]
|
|---|
| 126 |
|
|---|
| 127 | >>>>>>>>
|
|---|
| 128 | [
|
|---|
| 129 | -
|
|---|
| 130 | <<<<<<<[-]<<
|
|---|
| 131 |
|
|---|
| 132 | [>>+>+<<<-]>>>[<<<+>>>-]<<<
|
|---|
| 133 |
|
|---|
| 134 | >>
|
|---|
| 135 |
|
|---|
| 136 |
|
|---|
| 137 |
|
|---|
| 138 |
|
|---|
| 139 | ===================================================================
|
|---|
| 140 | ======================== OUTPUT NUMBER ===========================
|
|---|
| 141 | ===================================================================
|
|---|
| 142 | [>+<-]>
|
|---|
| 143 |
|
|---|
| 144 | [
|
|---|
| 145 | ======DUP======
|
|---|
| 146 | [>+>+<<-]>>[<<+>>-]<
|
|---|
| 147 |
|
|---|
| 148 |
|
|---|
| 149 | ======MOD10====
|
|---|
| 150 | >+++++++++<
|
|---|
| 151 | [
|
|---|
| 152 | >>>+<< bool= 1
|
|---|
| 153 | [>+>[-]<<-] bool= ten==0
|
|---|
| 154 | >[<+>-] ten = tmp
|
|---|
| 155 | >[<<++++++++++>>-] if ten=0 ten=10
|
|---|
| 156 | <<- dec ten
|
|---|
| 157 | <- dec num
|
|---|
| 158 | ]
|
|---|
| 159 | +++++++++ num=9
|
|---|
| 160 | >[<->-]< dec num by ten
|
|---|
| 161 |
|
|---|
| 162 | =======RROT======
|
|---|
| 163 | [>+<-]
|
|---|
| 164 | < [>+<-]
|
|---|
| 165 | < [>+<-]
|
|---|
| 166 | >>>[<<<+>>>-]
|
|---|
| 167 | <
|
|---|
| 168 |
|
|---|
| 169 | =======DIV10========
|
|---|
| 170 | >+++++++++<
|
|---|
| 171 | [
|
|---|
| 172 | >>>+<< bool= 1
|
|---|
| 173 | [>+>[-]<<-] bool= ten==0
|
|---|
| 174 | >[<+>-] ten = tmp
|
|---|
| 175 | >[<<++++++++++>>>+<-] if ten=0 ten=10 inc div
|
|---|
| 176 | <<- dec ten
|
|---|
| 177 | <- dec num
|
|---|
| 178 | ]
|
|---|
| 179 | >>>>[<<<<+>>>>-]<<<< copy div to num
|
|---|
| 180 | >[-]< clear ten
|
|---|
| 181 |
|
|---|
| 182 | =======INC1=========
|
|---|
| 183 | <+>
|
|---|
| 184 | ]
|
|---|
| 185 |
|
|---|
| 186 | <
|
|---|
| 187 | [
|
|---|
| 188 | =======MOVER=========
|
|---|
| 189 | [>+<-]
|
|---|
| 190 |
|
|---|
| 191 | =======ADD48========
|
|---|
| 192 | +++++++[<+++++++>-]<->
|
|---|
| 193 |
|
|---|
| 194 | =======PUTC=======
|
|---|
| 195 | <.[-]>
|
|---|
| 196 |
|
|---|
| 197 | ======MOVEL2========
|
|---|
| 198 | >[<<+>>-]<
|
|---|
| 199 |
|
|---|
| 200 | <-
|
|---|
| 201 | ]
|
|---|
| 202 |
|
|---|
| 203 | >++++[<++++++++>-]<.[-]
|
|---|
| 204 |
|
|---|
| 205 | ===================================================================
|
|---|
| 206 | =========================== END FOR ===============================
|
|---|
| 207 | ===================================================================
|
|---|
| 208 |
|
|---|
| 209 |
|
|---|
| 210 | >>>>>>>
|
|---|
| 211 | ]
|
|---|
| 212 | <<<<<<<<
|
|---|
| 213 |
|
|---|
| 214 |
|
|---|
| 215 |
|
|---|
| 216 | >[-]<
|
|---|
| 217 | [-]
|
|---|
| 218 | <<-
|
|---|
| 219 | ]
|
|---|
| 220 |
|
|---|
| 221 | ======LF========
|
|---|
| 222 |
|
|---|
| 223 | ++++++++++.[-]
|
|---|
| 224 | @
|
|---|
