From news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!cs.utexas.edu!www.nntp.primenet.com!nntp.primenet.com!news.texas.net!news.kei.com!newsfeed.internetmci.com!in1.uu.net!insync!news.azstarnet.com!news Tue Oct 22 11:21:53 1996 Article: 6334 of rec.games.corewar Path: news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!cs.utexas.edu!www.nntp.primenet.com!nntp.primenet.com!news.texas.net!news.kei.com!newsfeed.internetmci.com!in1.uu.net!insync!news.azstarnet.com!news From: Franz Newsgroups: rec.games.corewar Subject: Re: Help again: fix/speed up this vamp Date: Tue, 22 Oct 1996 00:21:36 -0700 Organization: Starnet Lines: 61 Message-ID: <326C7600.1193BC4@azstarnet.com> References: <54gugr$gc1@news2.texas.net> <326C67DB.2D84A32A@azstarnet.com> <326C72BF.28DC2792@azstarnet.com> NNTP-Posting-Host: usr6ip44.azstarnet.com Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-Mailer: Mozilla 3.0 (X11; I; Linux 1.2.13 i586) > > ;redcode-94 > > ;name MoreVamp > > ;author Franz > > ;start vampire > > ;assert (CORESIZE%5)==0 > > > > org incr > > whoops should have been or vamp that version tied all the time by trapping itself ... oh well ... here's a fix this is MoreVamp v2 the actually functioning warrior ;redcode-94 ;name MoreVamp v2 ;author Franz ;start vampire ;assert (CORESIZE%5)==0 org vamp ;lets start at 2000 since that should be covered with the pit ccp dat cc,2000 dat 0,0 gate dat 0,0 dat 0,0 fang jmp pit-100, #100 dat 0,0 ;i'll ad self splitting to enhance the durability ; vamp spl #0,>gate incr add.f pit, fang mov.i fang, @fang ;this will give us not only detection of our fangs ;coming in but also of imps! and the clear is fairly anti imp ;not the best but worth the effort:) jmz.f incr, fang-100 mov 20,vamp ;standard spl/dat coreclear cc spl #2, #30 mov *ccp, >ccp jmp -1,>gate ;lets put the pit on the bottom so we can have it carpet bomb ;and to optimize a bit we'll put the stepsize on the first spl ;to avoid the dat for 50 dat 0,0 rof pit spl #-5, #5 mov -1,<2000 spl -2, >gate jmp -3, >gate end