substr & negative start position
git-svn-id: svn://svn.code.sf.net/p/actiongame/code/trunk/ac@6362 e016b1c5-ed68-44aa-a2f7-31cac88cffde
This commit is contained in:
@@ -1266,15 +1266,19 @@ void timestring_()
|
||||
|
||||
int millis_() { extern int totalmillis; return totalmillis; }
|
||||
void strlen_(char *s) { string r; formatstring(r)("%d", strlen(s)); result(r); }
|
||||
|
||||
void substr_(char *fs, char *pa, char *len)
|
||||
{
|
||||
int ia = atoi(pa);
|
||||
int ilen = atoi(len);
|
||||
if(ia>(int)strlen(fs) || ia < 0 || ilen < 0) return;
|
||||
int fslen = (int)strlen(fs);
|
||||
if(ia<0) ia += fslen;
|
||||
if(ia>fslen || ia < 0 || ilen < 0) return;
|
||||
|
||||
if(!ilen) ilen = strlen(fs)-ia;
|
||||
if(!ilen) ilen = fslen-ia;
|
||||
result(newstring(fs + ia, ilen));
|
||||
}
|
||||
|
||||
void l0(int p, int v) { string f; string r; formatstring(f)("%%0%dd", p); formatstring(r)(f, v); result(r); }
|
||||
|
||||
COMMANDN(millis, millis_, ARG_IVAL);
|
||||
|
||||
Reference in New Issue
Block a user