;redcode verbose
;name TestB
;author Matt Hastings
;assert 1
; a B-scanner Darkly

mov #155-clear,clear-156
mov #-2,clear-155
add clear,1
mov <1,3
jmz -2,<1
mov sb,1801
jmp -4,0
sb spl 0,<-255
clear mov @155,<-155
jmp -1,<-1