;new
;goto 970
;loop 185
;cng  61
;var  13
;proc 17
;circ 22
