printing code in every forth for now