Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
26 lines (26 sloc) 640 Bytes
#define string_trim
/// string_trim(str)
//
// Returns the given string with whitespace stripped from its start
// and end. Whitespace is defined as SPACE, HT, LF, VT, FF, CR.
//
// str text, string
//
/// GMLscripts.com/license
{
var str,l,r,o;
str = argument0;
l = 1;
r = string_length(str);
repeat (r) {
o = ord(string_char_at(str,l));
if ((o > 8) && (o < 14) || (o == 32)) l += 1;
else break;
}
repeat (r-l) {
o = ord(string_char_at(str,r));
if ((o > 8) && (o < 14) || (o == 32)) r -= 1;
else break;
}
return string_copy(str,l,r-l+1);
}