Sections
Home
Hills
Infinite Hills
Tournaments
Software
Evolving
Optimizer
Community
Newsletter
Discussion
History
Sections
 
For Beginners
First Steps
FAQ
Guides
Lexicon
Benchmarks
For Beginners
> Home > The Corewar Newsletters > Core Warrior > Issue #1

Issue 74                                                          27 July, 1999
_______________________________________________________________________________
Core Warrior is a newsletter promoting the game of corewar. Emphasis is placed
on the most active hills - currently the '94 draft hill, the beginner hill and
the '94 no-pspace hill. Coverage will follow where ever the action is. If you
haven't a clue what I'm talking about then check out these five-star internet
locals for more information:

FAQs are available from:
  http://www.koth.org/corewar-faq.html
  http://homepages.paradise.net.nz/~anton/cw/corewar-faq.html

The ftp site and it's mirrors are at:
  ftp://ftp.csua.berkeley.edu/pub/corewar
  ftp://ftp.inria.fr/INRIA/Projects/para/doligez/cw/mirror
  ftp://www.koth.org/corewar

pMARS itself is also available from:
  http://www.koth.org/pmars                  ;pMARS home page
  ftp://members.aol.com/ofechner/corewar     ;Fechner ftp site

Web pages are at:
  http://www.koth.org/                       ;KOTH
  http://www.ecst.csuchico.edu/~pizza/koth   ;Pizza
  http://para.inria.fr/~doligez/corewar      ;Planar

Newbies should check the above pages for the FAQ, language specification,
guides, and tutorials. Post questions to rec.games.corewar. All new players
are infinitely welcome!
_______________________________________________________________________________
Greetings...

A timely flurry of activity has occurred since last issue, with even the
alternative (and secret) hills receiving at least a successful submission
or two.

The '94 hill has been the scene of many a battle for control, whether
you perceive the opponents to be veterans and new players, p-spacers
and pure warriors, or even magic age warriors and recent submissions.

The deadline for the IWT has been extended, so if you haven't done so
already, find out how to enter at the tournament's home page:

  http://www.concentric.net/~liminal/IWT/index.html

A guide from getting started through to submitting a warrior to one of
the hills is now available on Philip Kendall's corewar page:

  http://www.kendalls.demon.co.uk/pak21/corewar/index.html

This issue - Ben Ford shares his code for WingShot, and Ken Espiritu
reveals his stone/imp Baseline Plus.

-- John Metcalf
_______________________________________________________________________________
Current Status of the Internet Pizza Server ICWS '94 Draft Hill:

Hill Specs:
         coresize: 8000
   max. processes: 8000
         duration: after 80,000 cycles, a tie is declared.
max. entry length: 100
 minimum distance: 100
    rounds fought: 200
  instruction set: ICWS '94 Draft

 #   %W /  %L /  %T                       Name               Author Score  Age
 1  42.5/ 34.7/ 22.8               Digitalis 5    Christian Schmidt 150.2   15
 2  41.4/ 35.0/ 23.6       Self-Modifying Code             Ben Ford 147.8   18
 3  36.1/ 26.7/ 37.2                      Vain          Ian Oversby 145.4   19
 4  36.3/ 27.5/ 36.3          The Stormbringer    Christian Schmidt 145.1   72
 5  37.4/ 29.8/ 32.8               Stonewashed    Christian Schmidt 145.0   12
 6  34.5/ 24.2/ 41.3           One Step Beyond         John Metcalf 144.8   33
 7  39.6/ 36.5/ 23.9             Recycled Bits          David Moore 142.7   72
 8  32.4/ 22.4/ 45.2                     Glass             Ben Ford 142.4   11
 9  40.5/ 39.1/ 20.4                  Stranger         John Metcalf 142.0   29
10  40.8/ 40.0/ 19.2                   Snowman         John Metcalf 141.6   16
11  42.9/ 44.2/ 13.0                     Qshot    Christian Schmidt 141.5    2
12  36.8/ 33.3/ 29.9              The Outsider     Simon Wainwright 140.2   36
13  39.4/ 39.1/ 21.5                    Rubble              P.Kline 139.7    7
14  39.3/ 39.0/ 21.8          death by redcode     Simon Wainwright 139.6   51
15  31.7/ 24.2/ 44.1 Alive and K(qu)icking Zet Leonardo H. Liporati 139.2   28
16  32.0/ 24.8/ 43.2             Slippery Eels             Ben Ford 139.1   14
17  34.2/ 29.7/ 36.1                   Icepick             Ben Ford 138.7   13
18  38.6/ 38.7/ 22.7               Draken Fire             Ben Ford 138.6   30
19  37.1/ 35.9/ 26.9             Pitch Shifter    Christian Schmidt 138.3   26
20  28.2/ 18.3/ 53.5         No More Innocuous Leonardo H. Liporati 138.2    4
21  36.9/ 36.0/ 27.1      Serenade to a Cuckoo                  WFB 137.7    1
22  32.9/ 28.2/ 38.9                      Icen             Ben Ford 137.6   20
23  36.5/ 36.3/ 27.1                        PC                  WFB 136.7    2
24  38.1/ 39.5/ 22.4                  WingShot             Ben Ford 136.6   40
25  38.4/ 41.2/ 20.4            Circle of Fire         John Metcalf 135.6   43

Age since last issue: 43 ( 16 last issue, 10 the issue before )
Days since last issue: 61 ( 44 last issue, 36 the issue before )
Average age: 24 ( 19 last issue, 8 the issue before )
Average score: 141 ( 145 last issue, 138 the issue before )

The top 25 warriors are represented by just 9 independent authors: Ford
with 7, Schmidt with 5, Metcalf with 4, Wainwright, Liporati and WFB with
2 and the remainder with a single warrior each. ( 11 authors last issue,
10 the issue before )

Only four warriors survive since last issue as some powerful warriors are
unleashed and the hill stabilises.  Three authors have been either using
or testing Q^4 scans using sne/seq/jmp technology.  The full implications
of this remains to be seen.

Perhaps, the Q^4 will cause the demise of the q-scan!  Afterall they are
smaller than older qscans, and will gradually push them from the hill.
However, their advantage also works against them - having a smaller
memory footprint means a Q^4 battling another Q^4 will score less hits
and consequently less points.  The hill will be held in the icy grasp of
p-spacers and scanners once again :-)
_______________________________________________________________________________
94 - What's New (Sorted by rank and score)

 #   %W /  %L /  %T                       Name               Author Score  Age
 1  46.9/ 35.2/ 17.9                      Toki    Christian Schmidt 158.7    1
 1  42.5/ 32.8/ 24.6               Digitalis 5    Christian Schmidt 152.2    1
 1  41.8/ 35.0/ 23.2       Self-Modifying Code             Ben Ford 148.6    1
 1  34.2/ 22.3/ 43.5           One Step Beyond         John Metcalf 146.1    0
 1  39.2/ 33.0/ 27.8              The Outsider     Simon Wainwright 145.4    0
 1  32.6/ 20.0/ 47.4 Alive and K(qu)icking Zet Leonardo H. Liporati 145.1    1
 1  34.0/ 25.1/ 40.9                      Vain          Ian Oversby 143.0    1
 1  40.1/ 37.3/ 22.6                    Rubble              P.Kline 142.9    0
 2  42.4/ 43.2/ 14.4              Shapechanger    Christian Schmidt 141.6    1
 3  46.4/ 41.7/ 11.9 +,_,+'~'+,_,+'~'+,_,+'~'+         John Metcalf 151.1    0
 3  35.1/ 29.1/ 35.8               Stonewashed    Christian Schmidt 141.1    1
 4  38.4/ 38.4/ 23.3                  Stranger         John Metcalf 138.3    1
 5  39.2/ 40.9/ 20.0                   Snowman         John Metcalf 137.5    1
 5  35.6/ 35.6/ 28.8             Pitch Shifter    Christian Schmidt 135.5    1
 6  28.7/ 21.3/ 50.0                     Glass             Ben Ford 136.2    1
 7  35.7/ 35.2/ 29.1              Dry Ice v0.1             Ben Ford 136.2    1
 8  41.4/ 38.4/ 20.1                  WingShot             Ben Ford 144.5    1
 8  33.5/ 29.8/ 36.7               Ant Factory    Christian Schmidt 137.3    1
 8  41.5/ 45.6/ 12.9                     Qshot    Christian Schmidt 137.3    0
 8  30.4/ 24.4/ 45.2             Slippery Eels             Ben Ford 136.4    1
 9  27.3/ 19.9/ 52.9                Redemption         John Metcalf 134.7    0
11  34.0/ 34.1/ 31.9        Codename: Veronica             Ben Ford 134.0    1
11  25.8/ 17.9/ 56.3         No More Innocuous Leonardo H. Liporati 133.6    1
12  32.1/ 30.2/ 37.8                   Icepick             Ben Ford 134.0    1
12  42.4/ 52.2/  5.3                  Whooops!         John Metcalf 132.6    1
13  22.8/ 14.0/ 63.2                Reepicheep         John Metcalf 131.7    1
14  36.1/ 38.4/ 25.5               Draken Fire             Ben Ford 133.7    1
16  40.4/ 45.1/ 14.6                       C^3    Christian Schmidt 135.6    1
16  28.4/ 27.2/ 44.4                      Icen             Ben Ford 129.5    1
17  35.6/ 41.3/ 23.2  Goidaskilernian Bleatons         John Metcalf 129.9    0
18  36.9/ 43.0/ 20.0       Security Purge v0.3             Ben Ford 130.9    1
18  29.8/ 30.4/ 39.9                  Recovery          Ian Oversby 129.2    1
19  32.3/ 31.8/ 35.9                  PlumBoom    Christian Schmidt 132.8    1
20  28.8/ 28.5/ 42.6                Methuselah     Simon Wainwright 129.1    0
22  33.9/ 37.4/ 28.7             Root Vegtable         John Metcalf 130.4    1
23  34.7/ 38.0/ 27.2      Serenade to a Cuckoo                  WFB 131.4    1
24  34.8/ 38.7/ 26.5                        PC                  WFB 130.9    1

Players entering hill since last issue: 8 ( 6 last issue, 7 the issue before )
Average rank of new entries: 9 ( 14 last issue, 14 the issue before )

Almost every participant since last issue has had a warrior enter as KoTH,
though the congratulations are reserved for WFB who has just this week
moved up from the beginners' hill.
_______________________________________________________________________________
94 - What's No More (Sorted by age)

 #   %W /  %L /  %T                       Name               Author Score  Age
26  23.1/ 19.0/ 57.9              The Fugitive          David Moore 127.3   70
26  30.1/ 35.2/ 34.7                     Fixed         Ken Espiritu 125.0   54
26  34.2/ 43.8/ 22.0            Pattel's Virus             Ben Ford 124.6   52
26  34.0/ 41.9/ 24.2                   Galatea             Ben Ford 126.0   51
26  35.4/ 43.6/ 21.0          Silver Talon 1.2                Edgar 127.1   50
26  30.7/ 35.1/ 34.2                Puddleglum         John Metcalf 126.4   49
26  32.3/ 39.6/ 28.1            trefoil 23 226        Steve Gunnell 125.0   49
26  30.1/ 32.9/ 37.0                    Shadow    Christian Schmidt 127.4   45
26  32.4/ 36.4/ 31.2                      Twin    Christian Schmidt 128.3   44
26  29.7/ 34.4/ 35.9              Spooky Wench         John Metcalf 124.9   42
26  24.7/ 27.9/ 47.4       Even Less Innocuous               TeamQ3 121.5   42
26  27.1/ 29.6/ 43.3        Freight Train v0.2          David Moore 124.6   40
26  26.2/ 27.7/ 46.1     chained to the system     Simon Wainwright 124.7   33
26  33.1/ 42.1/ 24.8                    BiShot    Christian Schmidt 124.2   26
26  37.2/ 49.4/ 13.3                  Zooom...         John Metcalf 125.1   24
26  26.3/ 30.0/ 43.7                Methuselah     Simon Wainwright 122.6   24
26  30.9/ 36.7/ 32.4        Codename: Veronica             Ben Ford 125.1   21
26  37.7/ 47.3/ 15.0 +,_,+'~'+,_,+'~'+,_,+'~'+         John Metcalf 128.0   20
26  35.5/ 48.6/ 15.9 Boys are Back in Town 1.1       Philip Kendall 122.4   20
26  38.7/ 55.1/  6.2               Neon Spring         John Metcalf 122.3   20
26  33.0/ 42.9/ 24.1                      Toki    Christian Schmidt 123.1   12
26   1.7/  1.9/  0.5          Nuke it! (V 0.4)     Silvio Sampietro   5.5   12
26  38.3/ 49.5/ 12.2              Shapechanger    Christian Schmidt 127.0   11
26  29.4/ 32.3/ 38.4                  PlumBoom    Christian Schmidt 126.4   11
26  38.3/ 54.2/  7.5       fatal lure of pMars     Simon Wainwright 122.4   10
26  35.6/ 49.5/ 15.0                       C^3    Christian Schmidt 121.7   10
26  39.3/ 52.5/  8.2 .sS$Ss.sS$Ss.sS$Ss.sS$Ss.     Simon Wainwright 126.2    9
26  28.9/ 31.7/ 39.4                  Recovery          Ian Oversby 126.1    9
26   1.3/  1.6/  1.1                Redemption         John Metcalf   4.9    9
26  41.3/ 52.8/  5.9                  Whooops!         John Metcalf 129.9    8
26  31.9/ 38.4/ 29.7              Dry Ice v0.1             Ben Ford 125.4    8
26  34.5/ 43.3/ 22.1  Goidaskilernian Bleatons         John Metcalf 125.8    7
26  21.1/ 17.9/ 61.1                Reepicheep         John Metcalf 124.2    6
26   1.7/  1.6/  0.7             The Pendragon    Christian Schmidt   5.8    5
26  34.5/ 44.7/ 20.8       Security Purge v0.3             Ben Ford 124.4    4
26  30.5/ 36.9/ 32.6             Root Vegtable         John Metcalf 124.2    4
26  36.7/ 46.2/ 17.0                    myBlur     Simon Wainwright 127.3    3

The scanners were amoung the first to go, causing Toki to drop off the hill
from KoTH within 12 challenges.
_______________________________________________________________________________
94 - What's Old

 #   %W /  %L /  %T                       Name               Author Score  Age
 4  36.3/ 27.5/ 36.3          The Stormbringer    Christian Schmidt 145.1   72
 7  39.6/ 36.5/ 23.9             Recycled Bits          David Moore 142.7   72
14  39.3/ 39.0/ 21.8          death by redcode     Simon Wainwright 139.6   51

The Stormbringer and Recycled Bits are still going strong, though RB has
slipped down several ranks since last issue.
_______________________________________________________________________________
The Extended New Hall of Fame:
* indicates the warrior is still active.

Pos Name                   Author             Age    Strategy
 1  Probe                  Anton Marsden      403    Q^2 -> Bomber
 2  Blur 2                 Anton Marsden      396    Scanner
 3  Damage Incorporated    Anton Marsden      373    Q^2 -> Bomber
 4  Return Of The Jedimp   John K W           357    Q^2 -> Stone/imp
 5  unrequited love        kafka              346    Q^2 -> Paper
 6  Impish v0.2            Ian Oversby        345    Stone/imp
 7  Gigolo                 Core Warrior staff 332    Q^2 -> Stone/imp
 8  Falcon v0.3            Ian Oversby        275    P-warrior
 9  Nine Seven Six         M R Bremer         232    Q^2 -> Stone/imp
10  Rosebud                Beppe              218    Stone/imp
11  Newt                   Ian Oversby        216    Q^2 -> Stone/imp
12  Q^2 Miro               Anders Ivner       214    Q^2 -> Scanner/bomber
13  Instant Wolf 3.4       Edgar              205    P-warrior
14  Goldfinch              P.Kline            201    P-warrior
15  Simple v0.4b           Ian Oversby        197    QScan -> Stone/imp
16  Trident^2              John K W           195    Q^2 -> Stone/imp
17  ompega                 Steven Morrell     189    Stone/imp
18  Frogz                  Franz              172    Q^2 -> Paper
19  The Machine            Anton Marsden      164    Scanner
20  Memories               Beppe              152    Scanner
21  Vain                   Ian Oversby        147    Q^2 -> Stone/imp
22  Head or Tail           Christian Schmidt  142    Q^2 -> Paper
23  Electric Head          Anton Marsden      140    P-warrior
24  Vigor                  Ken Espiritu       138    Q^2 -> Paper
25  Fixed                  Ken Espiritu       135    Q^2 -> Paper
26  Tiberius 3.1           Franz              130    Q^2 -> Paper
27  Ultraviolet-B          Ken Espiritu       120    Q^2 -> Paper
28  obvious to those who k Robert Macrae      117    Q^2 -> Paper
29  Solomon v0.8           Ian Oversby        116    Stone and scanner
30  CC Paper 3.3           Franz              107    Q^2 -> Paper
31  mrb-test               M R Bremer         106    *Unknown*
32= T.N.T. pro             Maurizio Vittuari  105    Bomber
32= Pulp v0.5              Ian Oversby        105    Q^2 -> Paper
34  Fugitive               David Moore        102    Q^2 -> Paper/imp
35  Vengeance              Robert Hale        101    Q^2 -> Stone/imp
36= Jack in the box II     Beppe Bezzi        100    P-warrior
36= Fire and Ice           David Moore        100    P-warrior
38  Oblivion               Ian Sutton          99    P-warrior
39  Silver Talon 1.2       Edgar               93    Scanner
40  Bodge 1                Robert Macrae       85    Q^2 -> Scanner
41  Inferno 2.4            Philip Kendall      84    Qscan -> Bomber
42= Test                   Anton Marsden       83    *Unknown*
42= NCC-1701-A             Philip Kendall      83    P-warrior
44  RetroQ                 Paul Kline          82    Q^2 -> Paper
45  Tornado 4              Beppe Bezzi         78    Bomber
46  He Scans Again         Paul Kline          76    Scanner
47  Digitalis 4            Christian Schmidt   73    Q^2 -> Clear/imp
48= The Stormbringer       Christian Schmidt   72*   Q^2 -> Stone/imp
48= Recycled Bits          David Moore         72*   P-warrior
50  Taking Names           Paul Kline          68    Scanner

Recycled Bits and The Stormbringer enter the ENHoF at last :-) Neither
Shadow or Puddleglum survived long enough - who will write the first
stone/paper to make it into the Hall?
_______________________________________________________________________________
Current Status of the Internet Pizza Server Beginner Hill:

Hill Specs:
         coresize: 8000
   max. processes: 8000
         duration: after 80,000 cycles, a tie is declared.
max. entry length: 100
 minimum distance: 100
      maximum age: At age 100, warriors are retired.
    rounds fought: 200
  instruction set: ICWS '94 Draft

 #   %W /  %L /  %T                       Name               Author Score  Age
 1  57.9/ 31.3/ 10.7                  Nuke it!     Silvio Sampietro 184.5   30
 2  44.1/ 26.6/ 29.3                        PC                  WFB 161.5    2
 3  47.3/ 36.6/ 16.1              Neverland II         John Metcalf 158.1    1
 4  37.4/ 18.5/ 44.1             Quickest Zeta    Leonardo Humberto 156.4   33
 5  40.9/ 29.5/ 29.6     Silken Half Life v4.0            Dale Neal 152.3   38
 6  41.5/ 30.8/ 27.8          Silken Half Life            Dale Neal 152.1   41
 7  45.2/ 38.7/ 16.1                 da mutant        Paul-V Khuong 151.7   11
 8  34.3/ 18.6/ 47.1              Quicker Zeta    Leonardo Humberto 150.0   55
 9  45.6/ 41.3/ 13.1          Nuke it! (V 0.2)     Silvio Sampietro 149.8   37
10  33.4/ 18.4/ 48.2                Redemption         John Metcalf 148.3   97
11  32.5/ 19.7/ 47.9                Quick Zeta    Leonardo Humberto 145.2   60
12  40.7/ 37.6/ 21.7              FireMaster 2             P._V._K. 143.8    7
13  38.7/ 35.1/ 26.1                 Arsonic C             P._V._K. 142.4    9
14  31.9/ 21.9/ 46.2            HardCore v0.2b           Simon Duff 141.9   61
15  40.6/ 40.0/ 19.4               Fire Master             P_.V_.K. 141.2   45
16  39.9/ 39.0/ 21.2         1 shot bomber 0.1             P._V._K. 140.8   10
17  41.2/ 42.1/ 16.8                 Wild-Fire P_.V_.K./John Metcal 140.3   12
18  39.5/ 40.7/ 19.8             Mel the Great          Ken Hubbard 138.3   13
19  37.6/ 38.2/ 24.2                  Red Sand          Ken Hubbard 136.9   44
20  31.2/ 30.7/ 38.1               Radio Flyer          Ken Hubbard 131.7   16
21  31.0/ 33.0/ 36.0            quatrefoil 133        Steve Gunnell 128.9   31
22  39.8/ 50.6/  9.6                UltiBomber             P._V._K. 128.9    8
23  36.8/ 46.9/ 16.2 Death kiss with a dash of      Anders Rosendal 126.8   81
24  27.6/ 45.5/ 26.9                 RedRace 1          Dave Hillis 109.7   24
25  30.7/ 55.9/ 13.4                      QaMa            Anonymous 105.6    6

Frusteration II, No Time To Think, Spat the Dummy and H-Bomb 9 all achieved
retirement, the hill having aged 30 since last issue.  Wainwright and Ford
killed off their warriors making life for beginners a little easier...
_______________________________________________________________________________
Current Status of the KOTH.ORG '94 No Pspace Hill:

Hill Specs:
         coresize: 8000
   max. processes: 8000
         duration: after 80,000 cycles, a tie is declared.
max. entry length: 100
 minimum distance: 100
    rounds fought: 250
  instruction set: ICWS '94 Draft, excluding ldp and stp

 #  %W/ %L/ %T                      Name               Author   Score     Age
 1  42/ 35/ 23                  WingShot             Ben Ford     149      17
 2  36/ 26/ 38                      Vain          Ian Oversby     145     252
 3  36/ 27/ 38          The Stormbringer    Christian Schmidt     144     186
 4  42/ 41/ 17                  Zooom...         John Metcalf     143      51
 5  35/ 28/ 36                   Blacken          Ian Oversby     142     162
 6  42/ 42/ 17 Boys are Back in Town 1.1       Philip Kendall     142     177
 7  27/ 13/ 60         _romanian_killah_  Costin Bontas rulez     142     144
 8  34/ 28/ 38               Ant Factory    Christian Schmidt     141      10
 9  45/ 50/  5               Neon Spring         John Metcalf     141      34
10  43/ 45/ 12                      Win!          David Moore     141     150
11  36/ 32/ 32              The Outsider     Simon Wainwright     141      15
12  33/ 26/ 42                      Icen             Ben Ford     140       9
13  38/ 38/ 24               myVamp v3.7             Paulsson     139       4
14  33/ 28/ 39                  Recovery          Ian Oversby     138     175
15  34/ 30/ 36                   Icepick             Ben Ford     138       8
16  26/ 14/ 60              The Fugitive          David Moore     138     254
17  40/ 43/ 16                     Qshot    Christian Schmidt     138       2
18  37/ 36/ 27                        PC                  WFB     137       1
19  28/ 20/ 52                Redemption         John Metcalf     137      14
20  29/ 22/ 49               Fourth Step Leonardo H. Liporati     136       3

An age of 19 since last issue brings about the demise of four aged warriors,
Liquid Fire (age 140), Brigadeer (169), Baseline Plus (232) and Fixed (235).
Once again a balance of scanners and stone/imps possess the top few ranks.
_______________________________________________________________________________
Extra Extra -
WingShot by Ben Ford

Currently King of both the no-pspace and tiny hills, and recently atop
Pizza's 94 hill, clearly WingShot is a warrior currently out-performing
other warriors of it's type.  The combination of a Bi-Shot style clear
and a .8c scan proves effective in several environments, though like
most oneshots it suffers against CLP-type components such as the one
used in Kline's Rubble.

;redcode-94
;name WingShot
;author Ben Ford
;strategy 0.80c BiShot-style oneshot
;assert !(CORESIZE%10) && (MAXLENGTH>=20)

start   equ     oscn
oinc    equ     10
omod    equ     10
oset    equ     (omod*((MAXLENGTH+MINDISTANCE)/omod)-1)
odif    equ     (omod*((CORESIZE/2)/omod))
otic    equ     (CORESIZE/omod)

optr    spl     {oset,  >odif+oset-3
        dat     {10,    >odif
ospl    spl     #10,    <-MINDISTANCE
oclr    mov     ospl,   }optr
        mov     ospl,   >optr
obmb    djn.a   oclr,   <ospl

        dat     0,      0       ; scanned hi
        dat     0,      0
        dat     0,      0
        dat     0,      0       ; scanned lo

ofnd    sub.f   #-oinc,  optr
oscn    sne.i   *optr,  @optr
        sub.x    ofnd,  @ofnd
        sne.i   *optr,  @optr
        djn      ofnd,  #otic
        djn.f    ospl,  @oscn

end     start
_______________________________________________________________________________
Extra Extra Extra -
Baseline Plus by Ken Espiritu

Until the recent rise of a more powerful Q^3 and Q^4 scanners, Baseline
had enjoyed a strong position on the '94nop hill along with Espiritu's
Fixed.  Both warriors were finally pushed off, aged 232 (Baseline) and
235 (Fixed) two or three days ago, victims of the the eternal stuggle
to produce stronger, faster and smaller code.

However, despite not containing the latest in q-scanning technology,
Baseline is certainly not out of date, as evidenced in the body of the
warrior - the stone/imp.

The imp launcher is re-worked to damage as much core as possible as it
goes about it's duties.  A simple improvement perhaps, but one which
I've seldom seen used.

st     equ    (2667)
spin:  spl.b  #0,      >prime
       sub.f  #-st-1,  jump
prime: mov.i  impy,    impy
jump:  djn.f  impy-st-1,<-100
impy:  mov.i  #st,     *0

The four line stone is one of the most unique I have seen.  It's bombs
via indirection, and sptr combines with pt to further increase core
colouring.  Finally, as an added bonus a simple core-clear takes place.

stepa  equ    (214)
inc:   spl    #stepa,  >-stepa
pt:    mov.i  {stepa,  {1-stepa
       add.f  inc,     pt
sptr:  djn.f  @sptr,   {pt

Without further ado, here below lies the complete code...

;redcode-94
;name Baseline Plus
;author Ken Espiritu
;strategy qscan -> imp/stone
;strategy re-worked imp launcher code
;assert 1

org start

sdist  equ    (-2321)
idist  equ    (1500)
gap    equ    (6)
rep    equ    (17)
rep2   equ    (13)
qd     equ    (100)
qs     equ    (-200)
qb     equ    (start-700)
flag   equ    (qbomb-100)
datz   equ    (start-200)

qbomb: dat    }gap,    }-gap
tab:   add.a  table,   table
slow:  add.ab @tab,    fnd
fast:  add.b  *tab,    @slow
which: sne.f  }datz,   @fnd
       add.ab #qd,     fnd
       spl    bmber2,  }qs*13   ; start primary bomber

bmber1:add.b  fnd,     fnd2     ; redundant bomber
loop1: mov.i  qbomb,   @fnd2    ; .5c, forward only
fnd2:  mov.i  qbomb,   >fnd-(gap*rep)/2+1
       add    #2*gap,  fnd2
       djn    loop1,   #rep
       jmn.b  qbomb,   flag     ; check flag
       jmp    sboot,    }-2000

stepa  equ    (214)
st     equ    (2667)

spin:  spl.b  #0,      >prime
       sub.f  #-st-1,  jump
prime: mov.i  impy,    impy
jump:  djn.f  impy-st-1,<-100
impy:  mov.i  #st,     *0

iboot: mov.i  <idest,  {idest
       for 4
       mov.i  <idest,  {idest
       rof
       spl    *idest,  >1000+qs*2
idest: div.x  #idist,  #impy-idest+1

       dat    }10*qs,  >2*qs    ; can get 21 values from this table
table: dat    >4*qs,   }1*qs    ; and can also use the initial value
       dat    }23*qs,  >3*qs    ; of fnd

stone: spl    #0,      #0
inc:   spl    #stepa,  >-stepa
pt:    mov.i  {stepa,  {1-stepa
       add.f  inc,     pt
sptr:  djn.f  @sptr,   {pt

start: seq.i  qb+qs*0, qb+qs*0+qd
       jmp    which,   }qb+qd/2
       seq.i  qb+qs*2, qb+qs*2+qd
       jmp    fast,    {tab
       seq.i  qb+qs*13,qb+qs*13+qd
       jmp    fast,    {fast
       seq.i  qb+qs*1, qb+qs*1+qd
       jmp    fast,    }qb+qs*1+qd/2
       seq.i  qb+qs*3, qb+qs*3+qd
       jmp    fast,    }tab

       seq.i  qb+qs*17,qb+qs*17+qd
       jmp    slow,    {fast
       seq.i  qb+qs*7, qb+qs*7+qd
       jmp    slow,    }tab
       seq.i  qb+qs*11,qb+qs*11+qd
       jmp    slow,    <tab
       seq.i  qb+qs*5, qb+qs*5+qd
       jmp    slow,    }qb+qs*5+qd/2
       seq.i  qb+qs*24,qb+qs*24+qd
       jmp    slow,    >tab
       seq.i  qb+qs*4, qb+qs*4+qd
       jmp    >fast,   }qb+qs*4+qd/2
       seq.i  qb+qs*10,qb+qs*10+qd
       jmp    >fast,   <tab
       seq.i  qb+qs*23,qb+qs*23+qd
       jmp    >fast,   >tab
       seq.i  qb+qs*6, qb+qs*6+qd
       jmp    slow,    {tab
       seq.i  qb+qs*12,qb+qs*12+qd
       djn.f  slow,    tab

       seq.i  qb+qs*28,qb+qs*28+qd
       jmp    tab,     >tab
       seq.i  qb+qs*9, qb+qs*9+qd
       jmp    tab,     }qb+qs*9+qd/2
       seq.i  qb+qs*20,qb+qs*20+qd
       djn.f  <fast,   tab
       seq.i  qb+qs*8, qb+qs*8+qd
       jmp    <fast,   }qb+qs*8+qd/2
       seq.i  qb+qs*21,qb+qs*21+qd
       jmp    tab,     {fast
       seq.i  qb+qs*15,qb+qs*15+qd
       jmp    tab,     <tab
       seq.i  qb+qs*27,qb+qs*27+qd
       jmp    <fast,   >tab
       seq.i  qb+qs*16,qb+qs*16+qd
       jmp    tab,     {tab
       seq.i  qb+qs*22,qb+qs*22+qd
       djn.f  tab,     tab
       seq.i  qb+qs*30,qb+qs*30+qd
       jmp    tab,     }tab

sboot: spl    iboot,   >1000+qs*9
       for 5
       mov.i  <bdest,  {bdest
       rof
       spl    *bdest,  >1000+qs*10
bdest: div.x  #sdist,  #sptr-bdest+1
qincr: dat    }-gap,   >2*gap

bmber2:add.ba fnd,     fnd
loop2: mov.i  qincr,   *fnd     ; primary bomber
       mov.i  qincr,   @fnd     ; .66c, bi-directional
fnd:   mov.i  2*-gap,  }qb
       add    qincr,   fnd
       djn    loop2,   #rep2
       jmp    sboot,   >flag    ; set flag
       end
_______________________________________________________________________________
Questions?  Concerns?  Comments?  Complaints?  Mail them to people who care.
Beppe Bezzi <giuseppe.bezzi@galactica.it>, Philip Kendall <pak21@cam.ac.uk>,
Anton Marsden <anton@paradise.net.nz>, John Metcalf <grumpy@digitald.uk.com>
and Christian Schmidt <schmidt@chiral.apchem.nagoya-u.ac.jp>
2002-2005 corewar.info. Logo C. Schmidt