Article 1508 of rec.games.corewar:
From: gt7804b@prism.gatech.EDU (Wayne Edward Sheppard)
Newsgroups: rec.games.corewar
Subject: Some Redcode
Message-ID: <76303@hydra.gatech.EDU>
Date: 26 Nov 92 05:52:19 GMT
Organization: Georgia Institute of Technology
Lines: 134

I would like to share some of my code.  PLASMA4a is my
first program to reach #1 on the hill.  Too bad it didn't stay
up there very long.  It can't survive with all of the imps and
scanners out there.  I'm sure someone could come up with an
improvement.

Heres an idea of how it works:  The main loop scans until
it finds something non-zero( also ignoring -1 ).  Then it
bombs up from that location, while a replicator kicks in.

The second program is where I got the inspiration for
PLASMA.  Send it in to the Hill and look at the scores.
It does amazingly well against other scanners and bombers.
(65-35-0 on average)  But against reps and imps, it loses
99 times out of a hundred.

Maybe some other people could post some code also.


;redcode verbose
;name PLASMA 4a
;author Wayne Sheppard

bomb      equ start-1
start     add #3039,loc  ;mod 1
loc       jmz start,-1
          cmp #-1,@loc   ;don't look at DJN trails
          slt #100,loc   ;program length
          jmp start
          spl rep

          spl 0
          mov bomb,<loc
          jmp -1,<loc

rep       spl rep2      ;Replicator from FlashPaper
          spl 1         ;   by Matt Hastings
          spl 1
          spl paper4
          spl paper3
          spl paper2
          mov #8,8
paper1    mov <-1,<2
          mov <-2,<1
          spl @0,-2340
          mov <-1,<1020
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
paper2    mov <-1,<2
          mov <-2,<1
          spl @0,5823
          mov <-1,<-740
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
paper3    mov <-1,<2
          mov <-2,<1
          spl @0,1000
          mov <-1,<-3690
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
paper4    mov <-1,<2
          mov <-2,<1
          spl @0,6109
          mov <-1,<1873
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
rep2      spl 1
          spl 1
          spl paper8
          spl paper7
          spl paper6
paper5    mov <-1,<2
          mov <-2,<1
          spl @0,3009
          mov <-1,<-200
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
paper6    mov <-1,<2
          mov <-2,<1
          spl @0,4832
          mov <-1,<-1830
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
paper7    mov <-1,<2
          mov <-2,<1
          spl @0,1080
          mov <-1,<4096
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1
          mov #8,8
paper8    mov <-1,<2
          mov <-2,<1
          spl @0,-3040
          mov <-1,<-195
          jmz -5,-5
          mov 0,-1
          dat #0,#1
          dat #0,#1

;redcode verbose
;name RED RAIN
;author Wayne Sheppard
;strategy Bscanner
;kill RED RAIN
add #3044,1
jmz -1,-2
mov -3,@-1
jmp -3

-- 
Wayne Edward Sheppard
Georgia Institute of Technology, Atlanta Georgia, 30332
uucp:	  ...!{decvax,hplabs,ncar,purdue,rutgers}!gatech!prism!gt7804b
Internet: gt7804b@prism.gatech.edu