From news-rocq.inria.fr!jussieu.fr!univ-lyon1.fr!in2p3.fr!oleane!tank.news.pipex.net!pipex!howland.reston.ans.net!nntp.coast.net!fu-berlin.de!cs.tu-berlin.de!uni-erlangen.de!lrz-muenchen.de!news Tue Mar 5 20:10:11 1996 Article: 4179 of rec.games.corewar Path: news-rocq.inria.fr!jussieu.fr!univ-lyon1.fr!in2p3.fr!oleane!tank.news.pipex.net!pipex!howland.reston.ans.net!nntp.coast.net!fu-berlin.de!cs.tu-berlin.de!uni-erlangen.de!lrz-muenchen.de!news From: guenzel@extern.lrz-muenchen.de (Bjoern Guenzel) Newsgroups: rec.games.corewar Subject: help on beginner warrior: Alien Kiss Date: Tue, 05 Mar 1996 14:13:02 GMT Organization: Tichy Works Lines: 81 Distribution: world Message-ID: <4hhhnn$cda@sparcserver.lrz-muenchen.de> NNTP-Posting-Host: line53.ppp.lrz-muenchen.de X-Newsreader: Forte Free Agent 1.0.82 Here's my latest warrior, made it to pos. 20 on the b-hill. Any suggestions for improvement would be great. I'd like to promote the strategy a bit: It throws info-bombs, which means a hit programm will send a message that states it's position, so enforced attack on this place begins. I guess the strategy should not be that bad, it's slower than scanners, but immune against decoys on the other hand. Perhaps CIA does something like that? I saw that CIA throws "intelligence bombs"? Thanks a lot for any help Bjoern P.S.:I hope it isn't too long! ;redcode-b quiet ;name Alien Kiss V1.1 ;author bjoern guenzel ;strategy 0.5c stone, throwing info-bombs ;strategy V1.1: a little better against imps ;assert CORESIZE==8000 org boot size equ 22 ;size of programm shift equ 4000 ;distance for booting cycles equ 6 bombsize equ 6 inbox equ info-1 attack equ info+bombsize+1 info equ first-25 mov.f #2936,(-2936-1) first mov.i info,*info ;throw info-bomb mov.i stun,@info ;throw stun bomb, just for better bombing speed add.f step,info jmz.a -3,inbox ;continue as long as inbox is empy mov.f inbox,attack ;prepare attack jmp 3,#0 dat 0,0 ;bombed dat 0,0 mov.f #0,inbox ;reset inbox, with much luck kill an imp... mov.i stun,{attack ;attack count djn -1,#bombsize ;this comes from auntie mov.ab #bombsize,count djn first,#cycles jmp clear stun spl #-1000,#0 ;bombed dat 0,0 clptr dat #clear,clear+3 clbomb dat #1,6 step dat #2936,-2936 clear spl #1,6 mov *clptr,>clptr ;kind of Boeren-clear last jmp -1,<-7 ;booting section bootptr dat #50,#0 boot mov.i first-1,info+shift-1 mov.ab #1+last+shift,boot for size mov