home *** CD-ROM | disk | FTP | other *** search
/ 600 Games / 600games.iso / Puzzle / frog_day.swf / scripts / DefineSprite_377 / frame_16 / DoAction.as
Encoding:
Text File  |  2007-03-20  |  853 b   |  42 lines
  1. r = "1";
  2. output = "";
  3. while(length(input) >= r)
  4. {
  5.    character = input.substr(r,"1");
  6.    if(ord(character) >= ord("A") and ord("Z") >= ord(character))
  7.    {
  8.       character = chr(ord(character) + "32");
  9.    }
  10.    if(ord(" ") < ord(character) and ord(character) < ord("0"))
  11.    {
  12.       character = "";
  13.    }
  14.    else if(ord("9") < ord(character) and ord(character) < ord("a"))
  15.    {
  16.       character = "";
  17.    }
  18.    else if(ord("z") < ord(character))
  19.    {
  20.       character = "";
  21.    }
  22.    r += "1";
  23.    output = output add character;
  24. }
  25. r = "1";
  26. i = "1";
  27. text = "";
  28. t1 = "";
  29. while(length(output) >= r)
  30. {
  31.    character = output.substr(r,"1");
  32.    if(ord(character) == ord(" "))
  33.    {
  34.       character = "";
  35.       i += "1";
  36.       set("t" add i,"");
  37.    }
  38.    text = eval("t" add i);
  39.    set("a" add i,text add character);
  40.    r += "1";
  41. }
  42.