From news-rocq.inria.fr!jussieu.fr!fu-berlin.de!Cabal.CESspool!news-feed.inet.tele.dk!bofh.vszbr.cz!news1.tele.dk!news4.image.dk!194.234.169.53 Thu Mar 12 13:18:55 1998 Article: 8551 of rec.games.corewar From: qute@daimi.aau.dk (Anders Rosendal) Newsgroups: rec.games.corewar Subject: A good stone Date: Wed, 11 Mar 1998 23:12:49 GMT Message-ID: <35071758.1217214@news.image.dk> X-Newsreader: Forte Free Agent 1.1/32.230 NNTP-Posting-Host: 194.234.169.53 X-Trace: 11 Mar 1998 23:14:26 GMT, 194.234.169.53 Lines: 38 Path: news-rocq.inria.fr!jussieu.fr!fu-berlin.de!Cabal.CESspool!news-feed.inet.tele.dk!bofh.vszbr.cz!news1.tele.dk!news4.image.dk!194.234.169.53 Hello fellow Core Warriors. What makes a good stone? I've been reading the Core Warrior news letters and are trying too make a stone as decribed in number 11-12. But it scores badly against scissors. Why? Here's the source: ;redcode-94 ;name Hunter ;author Anders Rosendal ;strategy .75c stone ;assert CORESIZE == 8000 step1 EQU 3472 step2 EQU 8 org start bomb dat 0, step2 loop add.F addme, stone ;new position start mov.I bomb, @stone ;bomb stone mov.I last+800,@last+808 ;bomb jmz.F loop, *stone ;scan mov.I bomb, *stone ;backup a little addme spl #step1, #step1 mov.I bomb, {stone ;clear last dat 0, 0 for MAXLENGTH-CURLINE dat 0, 0 rof end What do I need to beat those sharp scissors? ----------- This is Anders Rosendal signing off homepage www.daimi.aau.dk/~qute