From news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!usc!chi-news.cic.net!news.wctc.net!news.new-york.net!news.stormking.com!pan0178@comune.bologna.it Fri Dec 22 11:36:50 1995 Article: 3396 of rec.games.corewar Path: news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!usc!chi-news.cic.net!news.wctc.net!news.new-york.net!news.stormking.com!pan0178@comune.bologna.it From: pan0178@comune.bologna.it (MV) Newsgroups: rec.games.corewar Subject: koth Date: 21 Dec 1995 19:23:33 -0500 Organization: Storm King Ind. Inc. Lines: 43 Sender: server@news.stormking.com Distribution: world Message-ID: <199512220005.TAA10813@valhalla.stormking.com> Reply-To: pan0178@comune.bologna.it NNTP-Posting-Host: valhalla.stormking.com Originator: corewar-l@stormking.com X-Mailer: Windows Eudora Version 1.4.4 ;redcode-94 ;name Babbo Natale ;author Maurizio Vittuari ;strategy test based on Taking Names engine ;assert CORESIZE == 8000 ;kill Babbo Natale step equ 98 soap equ 2 for 100-23 dat.f 0, 0 rof spl3 stp #soap, #0 ;era uno spl -3 clrptr dat last+2 jmp4 jmp -4, <-1 bomb dat <-2666, <2667 ;{2667 reset dat #step-4,#step spl2 spl -2, <1 spl1 spl -1, <2 attack mov jmp4, *comp compptr mov spl3, {comp mov spl2, {comp mov spl1, {comp mov spl0, {comp sub reset, @compptr scan add spl0, @compptr comp sne 2*step, 3*step add spl0, @compptr seq *comp, @comp slt #100+step,@compptr ctr djn scan, #2500 jmn attack, -1 spl0 spl.i #(2*step),#(2*step) clear mov bomb, >clrptr ;era reset last jmp -1 end comp