清爽老师的文本效果.doc

清爽老师的文本效果i = 1;_root.onLoad = function() onEnterFrame = function () a = 北风卷地白草折，胡天八月即飞雪。n忽如一夜春风来，千树万树梨花开。n散入珠帘湿罗幕，狐裘不暖锦衾薄。n将军角弓不得控，都护铁衣冷难着。n瀚海阑干百丈冰，愁云惨淡万里凝。n中军置酒饮归客，胡琴琵琶与羌笛。n纷纷暮雪下辕门，风掣红旗冻不翻。n轮台东门送君去，去时雪满天去时雪满天山路。n山回路转不见君，雪上空留马行处。;len = a.length;if (i=len) _root.my_txt.text = a.substr(0, i);i+;建立动态文本，大小为490*300，名为my_txt乘法口诀：var s = 0;for (var i = 1; i10; i+) for (var j = 1; j=i; j+) this.createTextField(texts+s, s, 0, 0, 50, 25);thistexts+s._y = i*25+50;thistexts+s._x = j*50;thistexts+s.border = true;thistexts+s.background = true;thistexts+s.backgroundColor = 0x00ff00;thistexts+s.borderColor = 0x0000ff;var my_fmt:TextFormat = new TextFormat();my_fmt.color = 0xff0000;my_fmt.size = 15;my_fmt.align = center;thistexts+s.text = j+i+=+i*j;thistexts+s.setTextFormat(my_fmt);s+;_root.createTextField(my_txt, 100, 80, 320, 480, 100);var ma_fmt:TextFormat = new TextFormat();ma_fmt.color = 0xFF0000;ma_fmt.size = 30;ma_fmt.underline = true;ma_fmt.bold = true;ma_fmt.italic = true;my_txt.text = 乘法口诀表;my_txt.setTextFormat(ma_fmt);女大十八变：thispic+i.gotoAndStop(40-i);让美女变的更漂亮了奥pic._visible = false;pic.stop();for (i=0;i41;i+) duplicateMovieClip(pic, pic+i, 40-i);thispic+i.gotoAndStop(40-i);_root.onEnterFrame = function() for (i=0; i41; i+) _rootpic+(i+1)._x += (_rootpic+i._x-_rootpic+(i+1)._x)/1.6;_rootpic+(i+1)._y += (_rootpic+i._y-_rootpic+(i+1)._y)/1.6;_rootpic+0._x = _xmouse;_rootpic+0._y = _ymouse;此贴子已经被作者于2007-1-30 16:17:58编辑过影片播放：stop();to = /+_totalframes;function page(UporDown) /定义一个函数，变量为 UporDown var newframe = _currentframe+UporDown;/定义变量，让其值为当前帧加上参数 if (UporDown) curr_txt.text = newframe; else curr_txt.text = 1;/以上的意思是如果 UporDown为真，文本显示 newframe，否则显示 1 gotoAndStop(newframe);/跳转到 newframe帧 if (_currentframe = 1) /以下为判断第 1 张图片而让回退按钮失效 up_btn._alpha = 50;/回退按钮透明度为 25up_btn.enabled = false;/按钮失效 else /否则一切正常 up_btn._alpha = 100;up_btn.enabled = true;if (_currentframe = _totalframes) /以下为判断最后 1张图片而让前进按钮失效 down_btn._alpha = 50;down_btn.enabled = false; else down_btn._alpha = 100;down_btn.enabled = true;page();/调用函数 up_btn.onRelease = function() /按钮事件处理函数，Release事件 page(-1);/单击按钮，回退到当前帧的前一帧 ;down_btn.onRelease = function() page(1);/单击按钮，前进到当前帧的下一帧 ;btn2.onRelease = function() play();up_btn._alpha = 100up_btn.enabled = false;down_btn.enabled = false;onEnterFrame = function () curr_txt.text = _currentframe;变换曲线：mc._visible = false;var j = 1;wen_txt.text=播放btn1.onRelease = function() if (j%2 = 1) var i = 1;onEnterFrame = function () duplicateMovieClip(mc, mc+i, i);thismc+i._alpha = 210-i*2;thismc+i._xscale = thismc+i._yscale += i*1.5;thismc+i._rotation = i*3;mycolor = new Color(_rootmc+i);tt = new Object();tt.rb = Math.random()*510-250;tt.gb = Math.random()*510-250;tt.bb = Math.random()*510-250;mycolor.setTransform(tt);if (i105) i+; else delete onEnterFrame;wen_txt.text=清除if (j%2 = 0) for (i=1; i106; i+) removeMovieClip(mc+i);delete onEnterFrame;wen_txt.text=播放j+;让小球动起来还比较简单，可让小球来回动还真试了几次才出来，看来还的多练习法一m = 1;onEnterFrame = function () if (mc._x=500 | mc._x500) k = 1;if (this.my_mc._x=Stage.width-_width/2 | _x=(Stage.height-20)-_height/2 | _y_height/2) vy = vy*-1;setInterval(ballgo, 10);棋盘：on (press) for (i=0; i5; i+) for (j=0; j8; j+) duplicateMovieClip(mc, mc+i+j, 10*i+j);a = Math.pow(-1, j);thismc+i+j._x = 2*mc._width*i+a*mc._width/2;thismc+i+j._y = mc._width*j;on (release) for (i=0; i5; i+) for (j=0; j8; j+) thismc+i+j.removeMovieClip();用二维数组和for循环做的仿吉人老师贴瓷砖效果mc._visible = false;var zu = new Array();for (i=0; i=9; i+) for (j=0; j100) /如果i大于100i = 0;/i等于0;多边形和圆：根据清茶老师脚本修改var R:Number = 80;lineStyle(1, 0xffff00, 100);beginFill(0xff0000);moveTo(395, 200);for (var i = 1; i=360; i+) /x2 = (R*Math.cos(i-1)*(Math.PI/180)+275;/y2 = (R*Math.sin(i-1)*(Math.PI/180)+200;/moveTo(x2, y2);x1 = (R*Math.cos(i*(Math.PI/180)+315;y1 = (R*Math.sin(i*(Math.PI/180)+200;lineTo(x1, y1);endFill();btn.onPress = function() i = 0;createEmptyMovieClip(_mc, this.getNextHighestDepth();_mc.lineStyle(2, 0xff00ff, 100);_mc.beginFill(0x3333ff);_mc.moveTo(395, 200);a = r;b = 360/r;onEnterFrame = function () if (i=a) x1 = (R*Math.cos(b*i*(Math.PI/180)+315;y1 = (R*Math.sin(b*i*(Math.PI/180)+200;_mc.lineTo(x1, y1);i+; else delete onEnterFrame;endFill();k = Math.PI/180;bian_text.text = 2*a*R*Math.sin(k*180/a);yuan_text.text = 2*R*Math.PI;btn2.onRelease = function() _mc.clear();bian_text.text = yuan_text.text=r=;此贴子已经被作者于2007-2-15 23:26:21编辑过鼠标跟随：this.attachMovie(mc, cursor_mc, 1);/Mouse.hide();cursor_mc.onMouseMove = function() this._x = this._parent._xmouse;this._y = this._parent._ymouse;/this._x = _xmouse;/this._y = _ymouse;updateAfterEvent();使用updateAfterEvent()后继续刷新舞台以使光标的移动看起来顺畅鼠标跟随this.attachMovie(mc, cursor_mc, 1);/Mouse.hide();cursor_mc.onMouseMove = function() this._x = this._parent._xmouse;this._y = this._parent._ymouse;/this._x = _xmouse;/this._y = _ymouse;updateAfterEvent();使用updateAfterEvent()后继续刷新舞台以使光标的移动看起来顺畅比较大小：function max_min(x, y, z) /*if (x=y) lmax = y;lmin = x; else lmax = x;lmin = y;if (lmaxz) lmin = z;*/lmax = Math.max(x, y);lmin = Math.min(x, y);lmax = Math.max(lmax, z);lmin = Math.min(lmin, z);i = 1;wen_text.text=比较btn.onRelease = function() if (i%2 = 1) max_min(s1, s2, s3);aa = lmax;bb = lmin;wen_text.text=清空 else if (i%2 = 0) s1 = s2=s3=aa=bb=;wen_text.text=比较i+;质数：function zhishu(n) for (i=2; i=Math.sqrt(n); i+) if (n%i = 0) return (false);return (true);btn.onRelease = function() k = 0;for (j=2; j=aa; j+) if (zhishu(j) /调用函数zhishu,并使实际参数为/下面的代码是为了显示文本和trace(j)k+;_root.createTextField(txt+j, j, 130+30*(k%10), 50+Math.floor(k/10)*30, 25, 25);_roottxt+j.textColor = 0xff0000;_roottxt+j.text = j;/trace(j=+j);btn1.onRelease = function() for (j=2; j=aa; j+) _roottxt+j.text = ;aa = ;