Mercurial > repo
comparison interps/fukyorbrane/programs/logicex-2.fyb @ 996:859f9b4339e6
<Gregor> tar xf egobot.tar.xz
| author | HackBot |
|---|---|
| date | Sun, 09 Dec 2012 19:30:08 +0000 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| 995:6883f5911eb7 | 996:859f9b4339e6 |
|---|---|
| 1 ( | |
| 2 Copyright {c} 2005 Gregor Richards | |
| 3 | |
| 4 Permission is hereby granted, free of charge, to any person obtaining a copy | |
| 5 of this software and associated documentation files {the "Software"}, to deal | |
| 6 in the Software without restriction, including without limitation the rights | |
| 7 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
| 8 copies of the Software, and to permit persons to whom the Software is | |
| 9 furnished to do so. | |
| 10 | |
| 11 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |
| 12 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |
| 13 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE | |
| 14 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |
| 15 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, | |
| 16 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE | |
| 17 SOFTWARE. | |
| 18 ) | |
| 19 ( | |
| 20 <jix> AHHH GregorR strikes back | |
| 21 ) | |
| 22 | |
| 23 A trick to prevent simple algorithms from getting me = I loop only once so it will find me but cant | |
| 24 hurt me | |
| 25 :@%>+++++++++++++++[............................................................................... | |
| 26 ...............................................................................................+]*; | |
| 27 | |
| 28 Bomb finding algorithm to try to disable any set bombs | |
| 29 @:[>]>[>]>[[>?+++]!+]*;@ | |
| 30 % | |
| 31 | |
| 32 Simple quicksearcher | |
| 33 :{>>}[+]++++++++++++++!; | |
| 34 >:{>>}[+]++++++++++++++!; | |
| 35 < | |
| 36 | |
| 37 Try to hinder the program by destroying loops and quits | |
| 38 <<<<<<<<<<<<<<<<<<<< Start early | |
| 39 :[>?++]++++++++++++++!; Destroy (*) | |
| 40 %%%%%% | |
| 41 :[>?+++++]>?[+]++++++++++++++!; (:... becomes :B) | |
| 42 %%%%%%%%% | |
| 43 :[>?+++++++]>?[+]++++++++++++++!; ({... -> {B) | |
| 44 %%%%%%%%%%% | |
| 45 :[>?+++++++++]>?[+]++++++++++++++!; ([... -> [B) | |
| 46 %%%%%%%%%%%%% | |
| 47 | |
| 48 If there are somehow no loops or quits, bomb the very beginning (it's guaranteed to get hit) | |
| 49 [+]++++++++++++++! | |
| 50 ********** | |
| 51 |