a=8000 :rd=:gd*((:r8+:r9+:r0+:c5+:c6+:l8+:l9+:l0)<a) goto1