:rm=:gd*((:r3+:r4+:r5+:c4+:c5+:c6+:l3+:l4+:l5)<9000) goto1