;redcode ;name worm optima 2 ;author Campbell Fraser ;strategy Simple linear 'dat' attack with low profile. ;assert 1 SHIFT equ 6000 mov ONE,ONE+SHIFT mov TWO,TWO+SHIFT mov B,B+SHIFT mov P,P+SHIFT jmp ONE+SHIFT ONE mov B,