;redcode-94 ;name Bunker t3 ;author P.Kline ;strategy self-repair pair ;assert 1 space equ 4000 step equ 13 copyf dat #fin copyt dat #fin+space start mov -20 ; slow core-clear loop jmp chk,{fix ; go again, reset pointer kill mov d4,{fix ; zap partner's code spl rset,1000 ; reset self while partner dies fix mov