RosettaCodeData/Task/String-case/Liberty-BASIC/string-case.basic

input$ ="alphaBETA"

print input$
print upper$( input$)
print lower$( input$)

end