a=4000
:w9=:gd*((:c2+:c3+:c5+:c6)<a) :w0=:gd*((:c1+:c2+:c4+:c5)<a) goto2