- 1
clearScreen = putStr $ take 50 (repeat '\n')
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+120
clearScreen = putStr $ take 50 (repeat '\n')
Написано нормально, но вот задумка...
Задумка нормальная, по крайней мере оно работает и кроссплатформенно (если терминал не выше 50 строк). Можно конечно написать putStrLn "\027[H\027[2J", но это не будет работать в винде. А других способов без дополнительных либ я не вижу.
Самым корректным решением, наверное, будет вот эта либа: http://hackage.haskell.org/packages/archive/ansi-terminal/0.5.0/doc/html/System-Console-ANSI.html. Тут и очистка, и цвета, и перемещение курсора... Поддерживает и win и *nix'овые терминалы.
> Написано нормально
- плюсую предыдущего оратора!
- минусую предыдущего оратора!
- мне похуй!
2) Убрать существующие кнопки + и -.
3) ???
4) Profit
Хорошая идея.
http://img12.nnm.ru/f/b/8/c/9/fa0de9312ba20d5746821cd6a4f.jpg
PS: Плюсанул.
Вротмненоги! Как он это сделал?
[b][/b]
Ответ, как обычно, в вопросе.
Нужно просто поставить галочку raw input.