home *** CD-ROM | disk | FTP | other *** search
/ Practical Internet Web Designer 86 / PIWD86.iso / pc / contents / flash / utilities / setupanimfx.exe / #setuppath# / calling.swf / scripts / frame_8 / DoAction.as
Encoding:
Text File  |  2003-09-12  |  1.1 KB  |  37 lines
  1. kerning = kerningbasis * (s1 / 100);
  2. kerningvar = s1 / 100;
  3. if(1 < line1.length)
  4. {
  5.    gotoAndPlay(8);
  6. }
  7. else
  8. {
  9.    gotoAndPlay(7);
  10. }
  11. setProperty("letter", _Y, yposstart);
  12. setProperty("letter", _yscale, s1);
  13. setProperty("letter", _xscale, s1);
  14. setProperty("letter", _visible, false);
  15. if(playsound eq "")
  16. {
  17.    soundholder.gotoAndPlay(2);
  18.    setProperty("fade", _Y, yposstart);
  19.    playsound = "1";
  20. }
  21. if(i == af or i == int(line1.length / 2) + af or i == line1.length - af or line1.substr(i,1) eq "a" or line1.substr(i,1) eq "e" or line1.substr(i,1) eq " ")
  22. {
  23.    duplicateMovieClip("fade","fade" add i,16384 + (200 - i));
  24.    setProperty("fade" add i, _Y, yposstart);
  25.    setProperty("fade" add i, _X, xposstart + i * kerning);
  26.    setProperty("fade" add i, _yscale, s1);
  27.    setProperty("fade" add i, _xscale, s1);
  28. }
  29. duplicateMovieClip("letter","lettera" add i,16384 + i);
  30. set("lettera" add i add ".font.letterfield",line1.substr(i,1));
  31. setProperty("lettera" add i, _X, xposstart + i * kerning);
  32. i += 1;
  33. if(line1.length + 1 < i and eval("lettera" + line1.length)._currentframe == 90)
  34. {
  35.    gotoAndPlay(10);
  36. }
  37.