home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2000 July / macformat-092.iso / Macromedia Flash 4 / Sample Pages / Objects / objects.swf / scripts / DefineSprite_27 / frame_5 / DoAction.as
Encoding:
Text File  |  1999-05-28  |  228 b   |  17 lines
  1. v = "";
  2. k = "1";
  3. while(k and "0" < length(state))
  4. {
  5.    c = state.substr("1","1");
  6.    state = state.substr("2","-1");
  7.    if(c eq chr("1"))
  8.    {
  9.       k = "0";
  10.    }
  11.    else
  12.    {
  13.       v = v add c;
  14.    }
  15. }
  16. trace(v);
  17.