How to become an author
Search
Write a publication
Pull to refresh

Comments 37

От же жесть… Спасибо!!!
Пригодится на парах… %)
Total votes 5: ↑3 and ↓2+1
Капитан Очевидность должен сделать в своей жизни три вещи: первую, вторую и третью. ©
Total votes 5: ↑4 and ↓1+3
UFO just landed and posted this here
Прирост брейнфака увеличен на 50%? =3
Total votes 22: ↑22 and ↓0+22
UFO just landed and posted this here
Слава Богу, не во всех блогах…
Total votes 13: ↑12 and ↓1+11
Мдемс… Ну, кто напишет первый интерпретатор брейнфака на CSS? :)
Total votes 15: ↑15 and ↓0+15
Ну что ж вы ниже пояса бьёте. Вот DSSSL и XSL ещё имеют шансы.
This comment wasn’t rated yet0
В классическим brainfuck'е можно написать brainfuck на brainfuck'e?
Total votes 14: ↑14 and ↓0+14
тогда это будет реальный брейнфак О_о
Total votes 10: ↑10 and ↓0+10
Да, можно. Есть готовые интерпретаторы brainfuck написанные на brainfuck.
Total votes 8: ↑7 and ↓1+6
Блин, я только хотел сесть поломать голову а тут такой облом =(
Total votes 10: ↑9 and ↓1+8
Согласно философии, мозг надо не ломать, а «иметь».
Total votes 2: ↑1 and ↓10
С чем Brainfuck удачно справляется! :)
Total votes 8: ↑7 and ↓1+6
Да, я лично писал.
Total votes 3: ↑3 and ↓0+3
Есть даже оптимизирующий компилятор awib
Total votes 2: ↑2 and ↓0+2
А можно написать на брейнфаке интерпретатор баша, а дальше понятно что сделать…
Total votes 5: ↑5 and ↓0+5
Ой спасибо за линк на сайт. Иногда подобного не хватает чтобы мозг разгрузить.
Еще юзаю fucking-great-advice.ru/ :)
Total votes 3: ↑2 and ↓1+1
Все-таки код немного вирвиглаз…
(я про баш)
Total votes 2: ↑1 and ↓10
а я-то уж подумал что про брейнфак
Total votes 4: ↑4 and ↓0+4
Интересно, написал ли кто-нибудь оптимизатор лучше, чем придумал когда-то я:

Total votes 2: ↑2 and ↓0+2
Внимание! Ссылка на почту.ру, которая свою рекламу подсовывает и почему-то загружает яву. Я когда-то так делал: http://tronix286.pochta.ru/brainfk/
Total votes 5: ↑3 and ↓2+1
Что? О чём вы вообще?
Total votes 4: ↑2 and ↓20
Это он не про вашу ссылку, а про свою )
Total votes 1: ↑1 and ↓0+1
У вас оптимизации очень простые и их мало, а я спрашивал написал ли кто-то лучше.
This comment wasn’t rated yet0
Я в брейнфаках не силен, но интерпретатор выглядит симпотично.
Total votes 7: ↑2 and ↓5-3
Чтобы полностью соответствовать «классическому» Brainfuck'у по части переменных (возможные значения — 0..255, по остатку от 256) надо сделать примерно так:
#!/bin/bash

C="s[0]=0; p=0;"
while read -n1 c; do case $c in
\+) C="$C s[\$p]=\$((\${s[\$p]}+1));";
C="$C if [ \${s[\$p]} -eq 256 ];then s[\$p]=0;fi;";;
\-) C="$C s[\$p]=\$((\${s[\$p]}-1));";
C="$C if [ \${s[\$p]} -eq -1 ];then s[\$p]=255;fi;";;
\>) C="$C p=\$((\$p+1));";;
\<) C="$C p=\$((\$p-1));";;
\.) C="$C printf \\\\\$(printf '%03o' \${s[\$p]});";;
\,) C="$C read -n1 c; s[\$p]=\`printf '%d' \"'\$c\"\`;";;
\[) C="$C while [[ \${s[\$p]} > 0 ]]; do ";;
\]) C="$C done;";;
esac; done < $1;
eval $C
This comment wasn’t rated yet0
еще и номера ячеек. их 3000, поэтому нумерация от 0 до 2999:
#!/bin/bash

C="s[0]=0; p=0;"
while read -n1 c; do case $c in
\+) C="$C s[\$p]=\$((\${s[\$p]}+1));";
C="$C if [ \${s[\$p]} -eq 256 ];then s[\$p]=0;fi;";;
\-) C="$C s[\$p]=\$((\${s[\$p]}-1));";
C="$C if [ \${s[\$p]} -eq -1 ];then s[\$p]=255;fi;";;
\>) C="$C if [ \$p -eq 2999 ];then p=-1;fi;";
C="$C p=\$((\$p+1));";;
\<) C="$C if [ \$p -eq 0 ];then p=3000;fi;";
C="$C p=\$((\$p-1));";;
\.) C="$C printf \\\\\$(printf '%03o' \${s[\$p]});";;
\,) C="$C read -n1 c; s[\$p]=\`printf '%d' \"'\$c\"\`;";;
\[) C="$C while [[ \${s[\$p]} > 0 ]]; do ";;
\]) C="$C done;";;
esac; done < $1;
eval $C


простите мою «кривоту», но в sh не мастер.
This comment wasn’t rated yet0
Sign up to leave a comment.

Articles

Show the best of all time

Your account

Sections

Information

Services

Support
© 2006–2024, Habr