program position use M_attr, only : attr write(*,'(a)')attr('<clear><B><w><bo><CSI>12;36f Good Morning! ') end program position