;       2ND ICWS COMPETITION ENTRY
;       NAME :  FERRET
;       PROGRAMMER :  Robert Reed III, Windsor Locks, CN
 
start  mov  #4908,B
F      cmp  <A,<B
       mov  S,@B
       cmp  <A,<B
A      mov  S,-5
       djn  F,B
K      mov  W,<W
       djn  K,<W
       add  #3,W
B      jmp  K,0
W      dat  #0,#-10
S      spl  0,0
       end  start
