Article 2106 of rec.games.corewar: Newsgroups: rec.games.corewar Path: hellgate.utah.edu!dog.ee.lbl.gov!agate!howland.reston.ans.net!vixen.cso.uiuc.edu!newsrelay.iastate.edu!dunix.drake.edu!acad.drake.edu!pk6811s From: pk6811s@acad.drake.edu Subject: Keystone source Message-ID: <1993Oct12.100504.1@acad.drake.edu> Lines: 112 Sender: news@dunix.drake.edu (USENET News System) Nntp-Posting-Host: acad.drake.edu Organization: Drake University, Des Moines, Iowa, USA Date: Tue, 12 Oct 1993 16:05:04 GMT ;redcode ;name Keystone t13 ;kill Keystone ;author P.Kline ;strategy upgraded Emerald 4 ;strategy stone + better anti-vamp ;strategy antivamp is converted by stone into core-clear/gate ;strategy if antivamp is dead, stone converts self into gate ;strategy if stone detects paper launches long 3-point imps spacing equ 2517 ; mod-1, but approximates a mod-4 step while ; avoiding mod-4 collisions with opponent's step dat #-start,#1 ; long decoy to delay scanners dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 dat #-start,#1 m0 spl mimp+5334,<-10 spl -1,<-11 ; continuous imp-ring launcher spl mimp+2667,<-12 ; stays here, activated by stone mimp mov 0,2667 ; if necessary mov 1,2666 ; backup in case mimp gets decremented mov 0,2667 emerald spl 0,<-25 stone mov