27 lines
719 B
Plaintext
27 lines
719 B
Plaintext
|
|
FUNCTION sus_caracter(cadena STRING)
|
|
|
|
DEFINE buf base.StringBuffer
|
|
LET buf = base.StringBuffer.create()
|
|
|
|
CALL buf.append(cadena)
|
|
|
|
CALL buf.replace(" ", "%20;", 0)
|
|
CALL buf.replace("!", "%21", 0)
|
|
CALL buf.replace("#", "%23", 0)
|
|
CALL buf.replace("$", "%24", 0)
|
|
CALL buf.replace("&", "%26", 0)
|
|
CALL buf.replace("'", "%27", 0)
|
|
CALL buf.replace("(", "%28", 0)
|
|
CALL buf.replace(")", "%29", 0)
|
|
CALL buf.replace("*", "%2A", 0)
|
|
CALL buf.replace("+", "%2B", 0)
|
|
CALL buf.replace(",", "%2C", 0)
|
|
CALL buf.replace("/", "%2F", 0)
|
|
CALL buf.replace(":", "%3A", 0)
|
|
CALL buf.replace(";", "%3B", 0)
|
|
|
|
RETURN buf.toString()
|
|
|
|
END FUNCTION
|