CSET statement

Purpose | Center a string within the space of another string or User-Defined Type.
Syntax | CSET [ABS] result_var = string_expression [USING string_expression]
Remarks | CSET centers a string into the space of another string or variable of a User-Defined Type.
ABS | If ABS is specified, or ustring_expression is null (empty), CSET leaves the padding positions unchanged from their original content, rather than replacing them with spaces.
USING | If string_expression is shorter then result_var, CSET centers string_expression within result_var, padding both sides with the first character in ustring_expression, or spaces if not specified. If string_expression is longer than result_var, CSET truncates string_expression from the right until it fits in result_var. CSET can be used to assign the content of a User-Defined Type to a User-Defined Type variable of a different class, or assign a dynamic string to a User-Defined Type. For example: CSET MyType = MyType2 CSET MyType = a$ LSET and RSET work similarly, but performs left and right-justification respectively.
See also | CSET$, GET, LET, LET (With Types), LSET, LSET$, PUT, RESET, RSET, RSET$, STRINSERT$, TYPE SET
Example | a$ = RTRIM$(REPEAT$(5,"COOL ")) CSET ABS a$ = "..PowerBASIC.." ' result: "COOL ..PowerBASIC.. COOL" CSET a$ = "PowerBASIC" USING "*" ' result: "*******PowerBASIC*******"