From news-rocq.inria.fr!jussieu.fr!mathserv.mps.ohio-state.edu!howland.erols.net!EU.net!usenet2.news.uk.psi.net!uknet!usenet1.news.uk.psi.net!uknet!uknet!bcc.ac.uk!news Fri Oct 25 16:24:48 1996 Article: 6367 of rec.games.corewar Newsgroups: rec.games.corewar Path: news-rocq.inria.fr!jussieu.fr!mathserv.mps.ohio-state.edu!howland.erols.net!EU.net!usenet2.news.uk.psi.net!uknet!usenet1.news.uk.psi.net!uknet!uknet!bcc.ac.uk!news From: Bjoern Guenzel Subject: another losing warrior... Sender: news@ucl.ac.uk (Usenet News System) Message-ID: <3270A1C6.59E2@ucl.ac.uk> Date: Fri, 25 Oct 1996 11:17:26 GMT Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset=us-ascii Mime-Version: 1.0 X-Mailer: Mozilla 2.02 (X11; I; AIX 2) Organization: University College London Lines: 87 Here's another warrior that didn't make it to the hill... I thought it might be fun, as it is an unusual combination: A dodger combined with some imps (as paper protection). You could say it is a scanner/imp :-) Unfortunately, when it detects a bomb, it takes another 70 instructions untill the dodger is copied...:-( Perhaps somebody can improve it? I haven't even checked if it copies the dodger on the right location, but I think it should :-/ Bjoern ;redcode-94 test ;name Mrs Di ;author bjoern guenzel ;assert 1 ;strategy dodger/spiral ;strategy VERY slow response time and endless boot...:-( ;strategy @date@ ;released 24/10/96 istep equ 2667 bdist1 equ (-3000) scandist equ (-bdist1-200) bdist2 equ (-2000) ; decoy for 7 mov.f #0,#0 spl #0,#0 jmp #0,#0 nop #0,#0 djn.b #0,#0 slt #0,#0 rof ; dodger spl 1 spl 1 mov.i -1,0 jmz.f #0,}ptr mov.i switch,-1 mov.i empty,{ptr mov.i -500 clptr dat clear,100 bomb dat >2667,last-clptr+3 empty dat 0,0 dat 0,0 clear spl #0,{clptr mov.i bomb,>clptr last djn.f -1,>clptr s1 dat #0,#0 ; spiral spl 1 mov.i -1,0 spl 2,}0 jmp @1,}0 jmp imp+istep,imp jmp imp+3*istep,imp+2*istep jmp imp +5*istep,imp+4*istep imp mov.i #istep,*0 s2 dat #0,#0 boot z for 8 mov.i