procedure main() writes(CUP(6,3), "Hello") end procedure CUP(i,j) writes("\^[[",i,";",j,"H") return end