OpenEuphoria

Re: centering display

• Posted by Senator Mar 23, 2019
• 1412 views

Quick and Dirty:

-- add this at the end of std/console.e 
public sequence CS --Center text string  
public function CenterString(integer RM) 
--returns center string for the display routine, 
--given RM, the margin width 
return "[c:" & sprint(RM) & "]" 
end function 
----------------------------------------------------- 
-- test 
sequence text = "this is a test" 
CS = CenterString(25) 
display(CS,{text})