From news-rocq.inria.fr!jussieu.fr!oleane!news.maxwell.syr.edu!news.new-york.net!news.stormking.com!badavies@socs.uts.EDU.AU Thu Mar 12 13:22:23 1998 Article: 8555 of rec.games.corewar Path: news-rocq.inria.fr!jussieu.fr!oleane!news.maxwell.syr.edu!news.new-york.net!news.stormking.com!badavies@socs.uts.EDU.AU From: Bryn Alan Davies Newsgroups: rec.games.corewar Subject: My new warrior. Anyone for an autopsy? Date: 11 Mar 1998 20:13:33 -0500 Organization: Storm King Ind. Inc. Lines: 43 Sender: server@news.stormking.com Distribution: world Message-ID: Reply-To: badavies@socs.uts.EDU.AU NNTP-Posting-Host: valhalla.stormking.com Mime-Version: 1.0 Originator: corewar-l@stormking.com ---------- Forwarded message ---------- Date: Wed, 11 Mar 1998 10:43:57 +1100 (EST) From: Bryn Alan Davies To: pizza@ecst.csuchico.edu Subject: koth ;redcode-b verbose ;name Sunstone I ;kill Sunstone I ;author Bryn A Davies ;strategy "Air of salt, bare feet, around the rocks to the next beach, ;strategy Corrugated grooves, witness ugly truths. Sunstone, sunstone ;strategy warm my blood..." ;strategy - Skunkhour, "Sunstone" ;strategy ;strategy Just another mod-5 stone. This is my second warrior. I dedicate ;strategy Comments REQUIRED! ;assert CORESIZE == 8000 ;-Equates------- opst equ #3315 opit equ #1600 gate equ (wipe-30) ;-Main---------- bomb dat opit, opst start mov bomb, @bomb add opst, bomb djn.a start, bomb jmp 2 dat 0, 0 wipe spl #0, #1 mov.i gbomb, >gate djn.f -1, >gate gbomb dat.f >5335, #40 for (MAXLENGTH-CURLINE-40) dat 0, 0 rof for 40 dat @86, }69 rof end start