;redcode-94 ;name D:inky clear ;author David Houston ;assert 1 org clear wptr: dat 1, 40 jmp #2, 40 dat 2, 40 for 25 dat 0, 0 rof clear mov *wptr, >wptr jmp -1, <1000