From news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!howland.reston.ans.net!newsfeed.internetmci.com!in1.uu.net!news.new-york.net!news.stormking.com!spm@star.arm.ac.uk Wed Mar 20 16:12:14 1996 Article: 4460 of rec.games.corewar Path: news-rocq.inria.fr!jussieu.fr!math.ohio-state.edu!howland.reston.ans.net!newsfeed.internetmci.com!in1.uu.net!news.new-york.net!news.stormking.com!spm@star.arm.ac.uk From: spm@star.arm.ac.uk (Scott Manley) Newsgroups: rec.games.corewar Subject: Judge Nutmeg Date: 19 Mar 1996 18:52:19 -0500 Organization: Storm King Ind. Inc. Lines: 115 Sender: server@news.stormking.com Distribution: world Message-ID: <199603191215.MAA20978@arsun6> Reply-To: spm@star.arm.ac.uk NNTP-Posting-Host: valhalla.stormking.com Originator: corewar-l@stormking.com Judge Nutmeg (The name again comes from Vic Reeves) is another variation on Hyakutake using the same PSpace mechanismand my favourite boming engine (which could do with a bit of improvement yet). I replaced the paper with an Anti-Paper core clear since the beginner hill at the time was heading back towards paper dominance. It never performed spectacularly, hanging around the 5th-10th place for most of its life but occasionally rising above its more aggressive brethren to show that the strategy was not altogether without merit. ;redcode-b ;name Judge Nutmeg ;author Scott Manley ;strategy Bring forth the Wheel of Justice! ;strategy Same tried and tested bombing engine as Uvavu/Hyakutake ;strategy Different backup strategy strat SPL 0,0 record SPL #0,#250 last SPL #0,#7 think LDP.A #0,last LDP.A #1,record LDP.A #2,strat ADD.AB last,last JMP @last JMP boot JMP lost JMP won SLT.AB record,record JMP cs1 STP #0,#2 JMP boot,0 cs1 STP #1,#2 JMP strat1 lost ADD.A #10,record MOD.A #20,record ADD.A #-10,record MOD.A #2,strat JMZ.A ls0,strat STP #0,#2 ADD.A #1,record STP.AB record,#1 JMP boot ls0 STP #1,#2 ADD.A #-1,record STP.AB record,#1 JMP strat1 won JMZ.A ws0,strat ADD.A #-1,record STP.AB record,#1 JMP strat1 ws0 ADD.A #1,record STP.AB record,#1 boot MOV.I jmpb, -3500 MOV.I {boot,-1 SPL 0,0 STP #0,{0 SPL 0,1 SPL 0,0 STP 0,>-1 SPL 1,0 SPL 0,0 STP #0,}0 SPL 0,1 SPL 1,1 SPL 0,1 STP #0,}0 SPL 0,1 SPL 1,1 SPL 0,0 SPL #1,0 SPL 0,0 SPL 1,1 JMP -2,-2 END think Scott Manley