Issue 71 8 March, 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:
ftp://rtfm.mit.edu/pub/usenet/news.answers/games/corewar-faq.Z
http://www.koth.org/corewar-faq.html
The ftp site and 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.html ;Stormking
http://www.ncs.infi.net/~wtnewton/corewar ;Terry's web page
ftp://members.aol.com/ofechner/corewar ;Fechner ftp site
Web pages are at:
http://www.koth.org/ ;Stormking
http://www.ecst.csuchico.edu/~pizza/koth ;Pizza
http://para.inria.fr/~doligez/corewar ;Planar
Newbies should check the Stormking page for the FAQ, language specification,
guides, and tutorials. Post questions to rec.games.corewar. All new players
are infinitely welcome!
A collection of Bezzi's hints in the first issues is available at:
ftp://ftp.volftp.vol.it/pub/pc/msdos/games/solutions/bbhints.zip
_______________________________________________________________________________
Welcome...
Everything has been very quiet since last issue, with the exception of
some late activity on the Multi-Warrior hill. Kline has published a new
scanner concept, Moore has retired and the tournament is drawing to a
close, with just one more round to play.
No hint this issue, forgive me ;-). However, I hope you are happy with
the long-awaited code to Fixed and also an improved Q^2.
-- 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.0/ 26.8/ 31.3 Fixed Ken Espiritu 157.2 3
2 45.7/ 34.3/ 20.0 Recycled Bits David Moore 157.1 3
3 39.1/ 23.6/ 37.2 Spooky Wench John Metcalf 154.6 3
4 42.6/ 31.6/ 25.7 The Conqueror Christian Schmidt 153.6 3
5 45.4/ 37.6/ 17.1 Pattel's Virus Ben Ford 153.2 3
6 39.4/ 27.7/ 32.9 The Stormbringer Christian Schmidt 151.2 3
7 32.0/ 15.8/ 52.2 The Fugitive David Moore 148.3 3
8 39.7/ 32.7/ 27.6 Fragility John Metcalf 146.6 3
9 37.6/ 28.8/ 33.6 Freight Train v0.2 David Moore 146.4 3
10 39.7/ 33.0/ 27.3 Digital Dragon Christian Schmidt 146.3 3
11 43.1/ 39.9/ 17.0 Silver Talon 1.2 Edgar 146.2 4
12 38.3/ 32.2/ 29.6 Twin Christian Schmidt 144.4 3
13 36.4/ 28.7/ 34.9 Shadow Christian Schmidt 144.1 3
14 32.2/ 20.6/ 47.1 Innocuous John Metcalf 143.9 1
15 39.3/ 36.5/ 24.2 trefoil 23 226 Steve Gunnell 142.1 13
16 40.5/ 39.1/ 20.4 Galatea Ben Ford 142.0 3
17 36.9/ 34.4/ 28.7 Strange Variations John Metcalf 139.5 3
18 32.3/ 27.9/ 39.9 delay 0.02b 50 bjoern guenzel 136.7 3
19 41.8/ 47.7/ 10.6 Silccon M. J. Pihlaja 135.8 13
20 40.1/ 46.9/ 13.0 Lost Again! David Moore 133.3 3
21 37.0/ 41.0/ 22.0 trefoil 28 558 Steve Gunnell 133.0 3
22 40.1/ 51.9/ 8.1 Boing! John Metcalf 128.3 3
23 36.1/ 44.3/ 19.5 Ice Pick Willie Ben Ford 128.0 3
24 36.7/ 46.4/ 16.8 Reconnaissance Ben Ford 127.1 3
25 31.2/ 36.0/ 32.8 Bond, James Bond Ben Ford 126.3 2
Age since last issue: 69 ( 33 last issue, 13 the issue before )
New warriors: 25 Turnover/age rate 36%
Average age: 3 ( 46 last issue, 36 the issue before )
Average score: 143 ( 140 last issue, 138 the issue before )
The top 25 warriors are represented by just 9 independent authors: Schmidt,
Ford and Moore with 5 each, Metcalf with 4, Gunnell with 2 and the rest with
just one warrior each.
What can I say? The hill as it was has been destroyed, every one of our
ancient adversaries unjustly deprived of everything it has achieved. It
seems too, some of the most innovative and respected competitors have
lost interest in Corewar as a result :-(
_______________________________________________________________________________
94 - What's New (Sorted by rank and score)
Considering the unusual circumstances and events since issue #70, the details
normally collated in this section would be neither interesting or informative.
This hill of Saturday, 6th February helps indicates what has taken place...
# %W / %L / %T Name Author Score Age
1 49.3/ 45.5/ 5.2 Twenty-fiveZestyZenZebras HotPinkMonopolyMoney 153.2 2
2 49.1/ 45.2/ 5.7 Twenty-fiveMisfitMuskrats HoneydewHand-Grenade 153.1 6
3 48.9/ 45.0/ 6.1 Twenty5PuffyPlushPenguins DodgerBlueWaterMelon 152.8 10
4 48.5/ 45.6/ 5.9 Twenty-fiveMadMightyMoose LavenderBlushPerfume 151.5 23
5 48.0/ 45.0/ 7.0 TwentyfiveShortShadySheep PeachPuffEveningGown 151.0 21
6 47.8/ 45.6/ 6.7 Twenty-fiveAlienAardvarks ChartreuseEmbroidery 149.9 11
7 48.2/ 46.8/ 5.1 20+5BashfulBulliedBeavers RosyBrownBakeryTruck 149.5 4
8 47.5/ 45.6/ 6.9 25ObnoxiousOrOldOstriches FireBrickFireHydrant 149.5 9
9 47.4/ 45.6/ 7.0 25EcstaticEastEstonianEmu GainsboroExpressRail 149.1 7
10 47.9/ 46.8/ 5.3 Twenty-fiveWetWileyWolves BisqueWoodenSombrero 149.1 8
11 47.1/ 45.5/ 7.4 Twenty-fiveSlipperySnakes CornSilkWoodenNickel 148.7 5
12 47.2/ 45.8/ 7.1 25TinyTeflonTyrannosaurus OldLaceFancyFrippery 148.6 1
13 46.6/ 44.8/ 8..6 20+5FlyingFightingFerrets MediumSeaGreenFrames 148.3 15
14 46.8/ 45.3/ 7.9 Twenty-fiveDarkDrabDingos MintCreamBoxerShorts 148.2 3
15 47.9/ 48.0/ 4.1 20+5FlyingFightingFerrets MediumSeaGreenFrames 147.8 16
16 48.4/ 49.2/ 2.4 25MushyMid-MorningMaggots LemonChiffonDentures 147.6 20
17 47.3/ 47.2/ 5.5 TwentyfiveSadSickSeagulls SaddleBrownPantyhose 147.3 14
18 48.1/ 50.1/ 1.9 25AdvancedAerodynamicAnts PapayaWhipAftershave 146.0 25
19 47.8/ 50.1/ 2.1 Twenty5LustfulLatexLlamas ForestGreenLongJohns 145.5 18
20 47.0/ 48.8/ 4.2 25GorgeousGanglyGuerillas LightGoldenrodTuxedo 145.3 19
21 46.6/ 48.0/ 5.4 20+5RotatingRubberRabbits DarkSalmonNinjaBlade 145.3 17
22 37.1/ 37.8/ 25.1 Win! David Moore 136.3 41
23 44.4/ 53.7/ 1.9 25GiantGyroscopicGiraffes BurlyRoadKitchenSink 135.1 12
24 44.4/ 53.9/ 1.6 Twenty-fiveJuicyJellyfish FloralWhiteShrubbery 135.0 13
25 44.3/ 53.9/ 1.8 TwentyfiveWashed-upWhales CornflowerBlueFrames 134.7 22
David Moore wipes the hill with his handshaking warriors prior to announcing
his retirement from Corewar. Fixed, Vigor and Recovery were the last to be
pushed from the hill.
_______________________________________________________________________________
94 - What's No More (Sorted by age)
# %W / %L / %T Name Author Score Age
26 23.0/ 23.3/ 53.7 Newt Ian Oversby 122.8 216
26 23.2/ 20.3/ 56.5 Vain Ian Oversby 126.1 147
26 ??.?/ ??.?/ ??.? Vigor Ken Espiritu ???.? 138
26 24.0/ 18.7/ 57.3 Fixed Ken Espiritu 129.3 135
26 ??.?/ ??.?/ ??.? Fugitive David Moore ???.? 102
26 30.0/ 34.9/ 35.1 Fire and Ice David Moore 125.0 100
26 26.8/ 28.5/ 44.8 Tuesday Afternoon John K W 125.1 58
26 35.0/ 45.0/ 20.1 Blurstone M. J. Pihlaja 124.9 58
26 ??.?/ ??.?/ ??.? Recycled Bits David Moore ???.? 58
26 ??.?/ ??.?/ ??.? The Stormbringer Christian Schmidt ???.? 51
26 27.3/ 27.5/ 45.3 Shadow Christian Schmidt 127.1 46
26 ??.?/ ??.?/ ??.? Recovery Ian Oversby ???.? 45
26 ??.?/ ??.?/ ??.? Benj's Revenge 1.0 Robert Macrae ???.? 45
26 21.0/ 18.1/ 60.9 Three Men in a Boat M Joonas Pihlaja 123.9 42
26 30.7/ 37.1/ 32.2 Defender Ian Oversby 124.2 39
26 32.7/ 40.7/ 26.5 myVamp v3.7 Paulsson 124.7 37
26 33.4/ 40.5/ 26.0 Zooom... John Metcalf 126.4 34
26 26.0/ 26.0/ 48.0 Brigadeer M Joonas Pihlaja 126.0 34
26 ??.?/ ??.?/ ??.? Diamonds and more Rust Christian Schmidt ???.? 23
26 27.1/ 28.9/ 44.0 Three Queens and a King Christian Schmidt 125.3 15
26 31.6/ 38.2/ 30.2 Trefoil Steve Gunnell 125..0 12
26 24.2/ 24.2/ 51.6 Fragility John Metcalf 124.2 12
26 38.8/ 52.7/ 8.6 He Scans Anew P.Kline 124.9 10
26 34.7/ 44.0/ 21.3 Bee/7i John Metcalf 125.4 4
:-(
_______________________________________________________________________________
94 - What's Old
# %W / %L / %T Name Author Score Age
Nothing old.
_______________________________________________________________________________
OLD HALL OF FAME
* means the warrior is still active.
Pos Name Author Age Strategy
1 Thermite II Robert Macrae 2262 Qscan -> Bomber
2 Impfinity v4g1 Planar 1993 Stone/imp
3 Jack in the box Beppe Bezzi 1620 P-warrior
4 Tornado 3.0 Beppe Bezzi 1567 Bomber
5 Torch t18 P.Kline 1539 Bomber
6 Chameleon Myer R Bremer 1437 P-warrior
7 Frontwards v2 Steven Morrell 1420 Oneshot
8 Evol Cap 6.6 John Wilkinson 1299 Stone/imp
9 quiz Schitzo 1262 Scanner/bomber
10 T.N.T. Maurizio Vittuari 1204 Bomber
11 Grilled Octopus v0.5 David Boeren 1154 P-warrior
12 Hazy Shade II John Wilkinson 1102 P-warrior
13 Stepping Stone Kurt Franke 1049 Qscan -> Vampire
14 Rosebud Beppe Bezzi 993 Stone/imp
15 Iron Gate 1.5 Wayne Sheppard 926 Scanner
16 T.N.T. pro Maurizio Vittuari 925 Bomber
17 Agony II Stefan Strack 912 Scanner
18 Barrage Anton Marsden 876 Qscan -> Paper
19 Blue Funk Steven Morrell 869 Stone/imp
20 Flurry Anton Marsden 835 Qscan -> P-warrior
21 Thermite 1.0 Robert Macrae 802 Qscan -> Bomber
22 Blue Funk 3 Steven Morrell 766 Stone/imp
23 Night Train Karl Lewin 755 Paper
24 Mirage 1.5 Anton Marsden 736 Scanner/bomber
25 Blizzard Anton Marsden 713 Qscan -> Paper
_______________________________________________________________________________
NEW HALL OF FAME
* means 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
Newt climbs a couple of places and halts at 11th. Vain climbs to 21st place
before it too loses it's *. New entries Vigor and Fixed claim ranks 24 and
25, shortly before they are forced off the hill... For the first time there
are no active warriors in the new HoF.
_______________________________________________________________________________
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 54.5/ 30.8/ 14.6 Pattel's Virus Ben Ford 178.2 5
2 48.3/ 38.5/ 13.2 redcode ragamuffin Simon Wainwright 158.2 1
3 46.8/ 36.2/ 17.0 Spat the dummy. Steve Gunnell (oh ye 157.3 63
4 43.5/ 35.3/ 21.2 Ice Pick Willie Ben Ford 151.6 46
5 44.3/ 39.8/ 15.8 Reconnaissance v0.3 Ben Ford 148.9 6
6 41.1/ 33.8/ 25.1 Arsonic C P._V._K. 148.4 80
7 44.1/ 41.3/ 14.6 Fat Man A.S. Mehlos 146.9 77
8 42.6/ 41.0/ 16.5 Sticky taped together 1.2 Steve Gunnell 144.1 74
9 36.5/ 29.3/ 34.2 A man with a Gun Ben Ford 143.6 48
10 40.9/ 38.6/ 20.6 No Time To Think A. S. Mehlos 143.2 64
11 42.2/ 41.2/ 16.7 Scanzonato Franco Solerio 143.2 98
12 30.7/ 18.5/ 50.8 Redemption John Metcalf 142.9 39
13 34.2/ 28.2/ 37.6 ModerationRevisited A. S. Mehlos 140.1 83
14 36.0/ 31.9/ 32.1 of mirth and merriment Simon Wainwright 140.1 9
15 42.1/ 44.6/ 13.3 Hunter Ben Ford 139.7 51
16 30.2/ 21.8/ 48.0 HardCore v0.2b Simon Duff 138.6 3
17 40.1/ 42.1/ 17.8 Security Purge Ben Ford 138.1 17
18 39.3/ 41.1/ 19.5 Reconnaissance Ben Ford 137.5 14
19 33.0/ 28.9/ 38.0 Frusteration II A. S. Mehlos 137.1 67
20 28.5/ 22.6/ 48.9 Quick Zeta Leonardo Humberto 134.3 2
21 40.3/ 48.4/ 11.4 fatal lure of pMars Simon Wainwright 132.1 7
22 26.7/ 23.4/ 49.9 H-Bomb 9 Josh Yeager 130.0 61
23 31.0/ 32.1/ 36.9 Rocking-Chair 94 v0.33 Leonardo Humberto 129.9 11
24 26.5/ 23.5/ 50.0 H-Bomb 9k Josh Yeager 129.5 60
25 37.0/ 47.3/ 15.7 Death kiss with a dash of Anders Rosendal 126.7 23
The beginners' hill has been pretty quiet since last issue, with only 13
successful challenges. IWeasel was the only warrior to have died of old
age. Ford's new P^3 warrior dominates the hill with a 20 point lead.
_______________________________________________________________________________
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 38/ 27/ 35 The Stormbringer Christian Schmidt 148 109
2 37/ 28/ 35 Baseline Plus Ken Espiritu 146 156
3 37/ 29/ 34 Fixed Ken Espiritu 146 158
4 37/ 28/ 35 Blacken Ian Oversby 145 85
5 36/ 26/ 38 Vain Ian Oversby 145 175
6 46/ 48/ 6 He Scans Alone P.Kline 145 21
7 42/ 39/ 19 Boys are Back in Town 1.1 Philip Kendall 144 100
8 36/ 28/ 36 Recovery Ian Oversby 144 98
9 43/ 44/ 12 Win! David Moore 142 73
10 28/ 14/ 58 _romanian_killah_ Costin Bontas rulez 142 67
11 38/ 35/ 27 BiShot v1.0 Christian Schmidt 141 7
12 38/ 35/ 27 Liquid Fire Christian Schmidt 140 71
13 27/ 14/ 59 The Fugitive David Moore 140 177
14 42/ 45/ 13 Red Carpet David Moore 140 116
15 44/ 49/ 8 He Scans Anew P.Kline 139 26
16 38/ 38/ 24 Floody River P.Kline 137 124
17 32/ 27/ 41 Brigadeer M Joonas Pihlaja 137 94
18 34/ 32/ 34 Head or Tail Christian Schmidt 136 146
19 29/ 23/ 48 Innocuous John Metcalf 134 1
20 31/ 29/ 40 Gemini Dream John K Wilkinson 133 181
Old KoTH Zooom was ;killed and the hilltop is now held by The Stormbringer
closely followed by four more Q^2 warriors. Quite a difference from last
issue where 4 of the top 5 were scanners - all with but 3 new warriors on
the hill.
_______________________________________________________________________________
Current Standings of the Oversby Autumn Corewar Tournament:
: '94 Tiny Grey Build Multi Primo rDist : Total
Schmidt : 99.46 70.55 75.41 77.34 50.26 100.00 92.84 : 515.60
Macrae : 87.63 69.55 74.28 100.00 74.87 95.32 54.47 : 501.65
Pihlaja : 98.66 100.00 100.00 x 84.82 87.48 x : 470.96
.WFB : 91.10 22.42 49.35 56.28 100.00 56.47 x : 375.62
.Khuong : 75.82 60.37 65.86 63.96 x x 42.71 : 308.72
.Gunnell : 72.82 46.50 19.46 x 47.12 87.95 x : 273.85
.Mehlos : 71.22 29.45 76.11 76.23 x x x : 253.01
Hale : 99.12 66.52 18.68 60.92 x x x : 245.24
Moore : 100.00 63.67 62.29 x x x x : 225.96
.Yeager : x 24.93 44.22 60.03 34.55 x x : 163.73
Metcalf : x x x x x 39.96 100.00 : 139.96
Kendall : 90.04 35.48 3.21 x x x x : 128.73
.Duff : 23.05 30.67 10.51 x x x x : 64.23
First place in the primordial round was claimed by Schmidt with Pizza
Vulcano, then Metcalf (better late than never) took first place in the
penultimate round - restricted distance.
The final round will be similar to the typical '94 draft rules, with an
interesting twist. The coresize will be 8001 and the process limit 64.
The deadline is Thursday 11th March, 23:59:59. Good luck!
Check the tournament's home page for more details:
http://www.geocities.com/TimesSquare/Realm/2443/
_______________________________________________________________________________
The Hint -
_______________________________________________________________________________
Extra Extra -
Fixed by Ken Espiritu
Among the warriors which have created much curiousity in the redcoding
community are Ken Espiritu's mystery papers, Vigor and Fixed. While
some of us pondered the strange scores these alleged papers attained
and suspected the strategy to be somewhat different, Espiritu was in
possession of the secret of paper longevity.
Fixed is a warrior of two parts. First, a qscan which splits to two
parallel attacks similar to Retro-Q^2, followed by a robust paper with
silk-imps. In contrast to warriors using similar qscans, Fixed only
launches one of the two papers it contains. However, this seems no
less effective, and may introduce advantages against some scanners.
The paper is made up of three silk modules followed by silk-imps of
the form mov.i #xxxx,}yyyy. The behaviour of these can be very
interesting! Consider for example what happens when you overwrite an
area of core where you have proccesses stunned by an opponent's spl
carpet. The initial results differ with the type of spl carpet. Is it
spl 0,0 or spl #0,0 or spl #1,1?
Now, lets see how effective a few scanners are against the paper from
Fixed. I removed the qscan from Fixed and decoys from the scanners to
ensure a fair fight ;-)
WARRIOR : %W %L %T : Scan Fixed WARRIOR : %W %L %T : Scan Fixed
HeScans T : 61 27 12 : 195 93 HAL 9000 : 39 37 24 : 141 135
Tom Tack : 52 37 11 : 167 122 Blur 2 : 36 35 29 : 137 134
Mini-HSA : 52 38 10 : 166 124 HSA : 39 45 16 : 133 151
Mirage 1.5 : 49 32 19 : 166 115 Win! : 35 40 25 : 130 145
Tim Tack : 48 38 14 : 158 128 Zooom... : 35 45 20 : 125 155
7-11 : 45 38 17 : 152 131 Harmony : 26 30 44 : 122 134
Syzygy 1.3 : 40 34 26 : 146 128 One Shot : 26 39 35 : 113 152
Warriors with HSA-like carpet attacks perform well. Booting your
scanner leaving a large spl decoy is another effective technique.
;redcode-94
;name Fixed
;author Ken Espiritu
;strategy qscan -> paper
;assert 1
org start
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
fixed1:spl 1, }qb+qs*31
spl 1, }qb+qs*32
spl 1, }qb+qs*33
silk1a:spl @0, <131
mov.i }silk1a, >silk1a
silk1b:spl @0, }7502
mov.i }silk1b, >silk1b
silk1c:spl @0, }2430
mov.i }silk1c, >silk1c
mov.i #3555, }-3190
mov.i #1832, }1398
mov.i #-2840, }570
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
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
fixed2:spl 1, }qb+qs*31
spl 1, }qb+qs*32
spl 1, }qb+qs*33
silk2a:spl @0, <131
mov.i }silk2a, >silk2a
silk2b:spl @0, }7502
mov.i }silk2b, >silk2b
silk2c:spl @0, }2430
mov.i }silk2c, >silk2c
mov.i #3555, }-3190
mov.i #1832, }1398
mov.i #-2840, }570
dat }1, >1
dat }1, >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 fixed2, >flag ; set flag
end
______________________________________________________________________________
Extra Extra Extra -
Innocuous by John Metcalf
After fiercely resisting the temptation to join the authors of Q^2
warriors I finally yielded on the provision I didn't re-use someone
else's code. At first I settled for a mini-Q^2 which scanned 13*2
locations. Since it seemed my warriors were (in my opinion) taking
premature retirement, it became inevitable I would eventually have
to write a full Q^2.
>From writing the mini-Q^2 I learnt how it is possible for more scan
locations to be decoded in a faster time and how to remove a now
unwanted add.ab fnd,fnd. Over the 24*2 scans of the new and improved
Q^2 this results in an average speed increase of 1.2 cycles :-)
Since my testing has been somewhat curtailed by events which created
some uncertainty over the level of the hill, I present the improved
Q^2 here with only a simple, harmless paper - hence the name...
Anyway, here's the code ready for you to use, abuse and improve
as you wish:
;redcode-94
;name Innocuous
;author John Metcalf
;strategy Improved Q^2 -> Harmless Paper
;assert CORESIZE==8000
org qGo
pstep1 equ 220 ; 1700
pstep2 equ 6172 ; 4388
pstep3 equ 3060 ; 4924
pGo: spl 1, {qf+qs*3 ; harmless paper!
spl 1, {qf+qs*9
pap1:spl @0, {pstep1
mov }pap1, >pap1
mov }pap1, >pap1
pap2:spl @0, {pstep2
mov }pap2, >pap2
mov {pap2, {pap3
pap3:jmp pstep3+1,>pstep3-3
dat >1, }1
for 23
dat 0,0
rof
qf equ (pGo-200) ; qscan constants
qd equ (-101)
qs equ (-201)
qi equ (11) ; qbomber constants
qr equ (9)
nop {q_B, {q_E
qP: add q_D, q_B ; decoder
qSlo:add @qP, @qLoo-1
qFas:add *qP, @qLoo-1
qSki:sne >qf+qs*20,@qKil
add qDis, qKil
qLoo:mov qInc, *qKil ; .5c dat bomber
qKil:mov qf, @qf+5
add.x qInc, @qLoo-1
djn qLoo, #qr
jmp pGo, {qf+qs*27
qDis:dat qd, qd
qInc:dat {qi, {-qi
q_A: dat 10*qs, 10*qs ; Can get 23 values from this
q_B: dat 13*qs, 13*qs ; table and can also use the
q_C: dat 6*qs, 6*qs ; initial value of qKil.
q_D: dat 1*qs, 1*qs ; (Traditional Q^2 comment!)
q_E: dat 4*qs, 4*qs
; [0/1 cycles]
qGo: seq qf, qd+qf ; 0
jmp qSki, {qd+qf-2
seq qf+qs*10, qd+qf+qs*10 ; A
djn.a qFas, {qFas
seq qf+qs*13, qd+qf+qs*13 ; B
jmp qFas, {qFas
seq qf+qs*6, qd+qf+qs*6 ; C
jmp qFas, {qP
seq qf+qs, qd+qf+qs ; D
jmp qFas, {qd+qf+qs-2
seq qf+qs*4, qd+qf+qs*4 ; E
jmp qFas, }qP
; [2 cycles]
seq qf+qs*14, qd+qf+qs*14 ; DB
jmp qSlo, {qd+qf+qs*4-2
seq qf+qs*19, qd+qf+qs*19 ; CB
jmp qSlo, {qP
seq qf+qs*17, qd+qf+qs*17 ; EB
jmp qSlo, }qP
seq qf+qs*11, qd+qf+qs*11 ; DA
jmp qSlo, <qP
seq qf+qs*7, qd+qf+qs*7 ; DC
jmp qSlo, >qP
seq qf+qs*26, qd+qf+qs*26 ; BB
jmp qSlo, {qFas
seq qf+qs*5, qd+qf+qs*5 ; DE
jmp qSlo, {qSlo
seq qf+qs*16, qd+qf+qs*16 ; CA
djn.f qSlo, qP
seq qf+qs*23, qd+qf+qs*23 ; BA
djn.a qSlo, {qFas
seq qf+qs*2, qd+qf+qs*2 ; DD
djn.b qSlo, {qSlo
; [3 cycles]
seq qf+qs*15, qd+qf+qs*15 ; DDB
jmp qP, {qd+qf+qs*4-2
seq qf+qs*12, qd+qf+qs*12 ; DDA
jmp qP, <qP
seq qf+qs*8, qd+qf+qs*8 ; DDC
jmp qP, >qP
seq qf+qs*25, qd+qf+qs*25 ; CCB
jmp qP, {qP
seq qf+qs*21, qd+qf+qs*21 ; EEB
jmp qP, }qP
seq qf+qs*28, qd+qf+qs*28 ; DDBB
jmp qP, {qFas
seq qf+qs*24, qd+qf+qs*24 ; DAB
djn.a qP, {qFas
seq qf+qs*22, qd+qf+qs*22 ; CCA
djn.f qP, qP
jmp pGo, {qf+qs*27
end
_______________________________________________________________________________
. .
,---. /(/\_/\)\
__ | | ( )
<oo> ,---' `---. | N.E.W.T | ___
[''] | Brigadeer | /~~~~\ | | _< + >_
,-""---. `---. ,---' (Shadow) | May97 | [ Vigor ] ,-------.
| Tues | | | | | | - | [ & ] | Zooom | ,
| PM | | | * | | | Feb99 | [ Fixed ] | | ;O:
__|_.___.|_,(._|__.|_\)/_|__.___|_(.|___,._.__|._,[____.__]_),|___,.__|___")/__
Questions? Concerns? Comments? Complaints? Mail them to people who care.
Authors: Beppe Bezzi <giuseppe.bezzi@galactica.it>, Anton Marsden
<amarsden@mcs.vuw.ac.nz>, Christian Schmidt <schmc003@goofy.zdv.Uni-Mainz.de>,
Philip Kendall <pak21@cam.ac.uk> and John Metcalf <grumpy@digitald.uk.com>
|
