Mercurial > repo
diff interps/fukyorbrane/programs/simplething.fyb @ 996:859f9b4339e6
<Gregor> tar xf egobot.tar.xz
author | HackBot |
---|---|
date | Sun, 09 Dec 2012 19:30:08 +0000 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/interps/fukyorbrane/programs/simplething.fyb Sun Dec 09 19:30:08 2012 +0000 @@ -0,0 +1,27 @@ +( +Copyright {c} 2005 Jannis Harder + +Permission is hereby granted, free of charge, to any person obtaining a copy +of this software and associated documentation files {the "Software"}, to deal +in the Software without restriction, including without limitation the rights +to use, copy, modify, merge, publish, distribute, sublicense, and/or sell +copies of the Software, and to permit persons to whom the Software is +furnished to do so. + +THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR +IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, +FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE +AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER +LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, +OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE +SOFTWARE. +) +:@%>+++++++++++++++[............................................................................... +..............................................................................................+]*;(one-time-loop) +>>>>:[>>>+]:[+]++!>[+]+++++++++!>[+]!>[+]+++++++++!>[+]!>[+]+!>[+]+!>;;(defact-killer) +:{>}[+]++++++++++++>[+]+++++++++++++<!>![>++++++++]>>;(:; layer) +:@[>>?+++]!@;(fast self repair a) +:>@[>>?+++]!@;(fast self repair b) +:[+]++++++++++++!++!>>; (fast bomb layer a) +:>[+]++++++++++++!++!>>; (fast bomb layer b) +***** (end) \ No newline at end of file