Al Voland - 2023-08-27

ok, first try to do it myself :)
works only with monospace font and is for the graphics window:

subroutine locate(x,y,textx,texty,a$)
font "courier",5,30
text x+1+textxtextwidth(a$)/length(a$),y+textytextheight,a$
end subroutine

 

Last edit: Al Voland 2023-08-27