scn testfunctionshort asciicodestring_var inputstring_var outputstring_var characterBegin Function {input} let output := "" while (index < sv_length input) let character := input[index] let asciicode := CharToASCII character let asciicode := ToLower asciicode let output := sv_Construct "%z%a" output asciicode let index += 1 loop SetFunctionValue $outputEnd