• 空间首页
• 空间管理
• 闪吧新社区
• 站点论坛
• 添加我的日志

我的最新日志

• 比较无聊，做个FLASH改变网页的背景颜色。

  2008-5-04

  [code]import fl.controls.ColorPicker;
  import fl.events.ColorPickerEvent;
  import flash.external.ExternalInterface;
  back_colorpicker.addEventListener("change",onColorChange);
  function onColorChange(_evt:ColorPickerEvent) {
  ExternalInterface.call("setColor",_evt.target.hexValue );
  }[/code]主要还是用到JS来具体完成[code]<scrīpt>
  function setColor(_color){
    document.body.style.backgroundColor=_color;
  }
  </scrīpt>[/code]观看效果 http://www.flash023.cn/bbs/setHtmlBackColor

  源文件http://space.flash8.net/bbs/attachment.php?aid=343556

   

  查看(2161) 评论(14)

• CS3 与后台交互的小例子，菜鸟狂入，老鸟请狂踩!吐我口水

  2008-5-04

  CS3 与后台交互的小例子，菜鸟狂入，老鸟请狂踩!吐我口水

  代码:

  //----------------------URLRequest--------------------
var send_urlrequest:URLRequest =new URLRequest();
send_urlrequest.url="flash023.asp";
send_urlrequest.method=URLRequestMethod.POST ;
//----------------------Data载体---------------------
var data_urlvariables:URLVariables =new URLVariables;
data_urlvariables["a"]=26;
data_urlvariables["b"]=100;
send_urlrequest.data=data_urlvariables;
//-----------------------XML------------------------
var load_xml:XML;
//----------------------URLLoader--------------------
var handler_loader:URLLoader =new URLLoader;
handler_loader.addEventListener(Event.COMPLETE ,onLoadCompleteHandler);
function onLoadCompleteHandler(_evt:Event):void {
load_xml=XML(_evt.target.data);
show_txt.text =load_xml;
show_txt.appendText("其中返回的得数是："+load_xml.ans);
}
try {
handler_loader.load(send_urlrequest);
} catch (_err:Error) {
trace(_err);
}
//--------------------创建一个用于显示的TextField----------------
var show_txt:TextField =new TextField;
show_txt.multiline =show_txt.wordWrap =true;
show_txt.width =show_txt.height =400;
show_txt.x=75;
addChild(show_txt);

  后台：

  复制内容到剪贴板

  代码:

  <%@LANGUAGE="VBscrīpt" CODEPAGE="65001"%>
<%
Dim a,b,ans
a=Cint(Request.Form("a"))
b=Cint(Request.Form("b"))
ans=a+b
Response.write("<?xml version=""1.0"" encoding=""utf-8""?>")
Response.ContentType = "text/XML"
Response.Write("<math>")
Response.Write("<a>"&a&"</a>")
Response.Write("<b>"&b&"</b>")
Response.Write("<ans>"&ans&"</ans>")
Response.Write("</math>")
Response.End()
%>

  后台是ASP写的，需要在IIS环境下测试。在IED环境下硬整肯定是没有效果的(把后台拿来直接干的朋友点多，哈哈，所以提前说一下。 )
  今天实在无聊啊!
  谢谢春叶大虾指正!谢谢!
  
  

  附件

  test.rar (6 KB)

   

  查看(1735) 评论(21)

• 没得卵事，练习3.0，随便回2.0区的一个帖子。做了个图片加载效果。

  2008-5-04

  没得卵事，练习3.0，随便回2.0区的一个帖子。做了个图片加载效果。

  
  完全是星期天无聊，做的。
  没得缩略图，直接加载大图，所以就用Bitmap来显示大图了，大图不需要再次加载的。
  另外发现Tween类，如果用秒来计时，确实有问题，没运行完就停了，用帧，暂时未发现。

  复制内容到剪贴板

  代码:

  package {
import flash.display.Sprite;
import flash.events.Event;
import flash.events.MouseEvent;
import flash.events.ProgressEvent;
import flash.display.Bitmap;
import flash.display.BitmapData;
import flash.display.SimpleButton;
import flash.display.Loader;
import flash.net.URLLoader;
import flash.net.URLRequest;
import fl.transitions.Tween;
import fl.transitions.easing.Elastic;
public class SampleShowPic extends Sprite {
  private var page:uint;
  private var size:uint;
  private var total:uint;
  private var posX:Number;
  private var posY:Number;
  private var pos_sprite:Sprite;
  private var thuns_sprite:Sprite;
  private var show_bitmap:Bitmap;
  private var list_xml:XML;
  private var xml_loader:URLLoader;
  private var start_b:Boolean;
  public function SampleShowPic():void {
   init();
  }
  private function init():void {
   page=1;
   size=4;
   show_bitmap=new Bitmap  ;
   xml_loader=new URLLoader  ;
   thuns_sprite=new Sprite  ;
   addChild(thuns_sprite);
   xml_loader.addEventListener(Event.COMPLETE,onXmlLoadComplete);
   xml_loader.load(new URLRequest("teamshow.xml"));
   prev_btn.addEventListener(MouseEvent.CLICK,onBtnClick);
   next_btn.addEventListener(MouseEvent.CLICK,onBtnClick);
  }
  private function onXmlLoadComplete(_evt:Event):void {
   list_xml=XML(_evt.target.data);
   total=list_xml.children().length();
   show_func();
  }
  private function show_func():void {
   removeChild(thuns_sprite);
   thuns_sprite=new Sprite  ;
   addChild(thuns_sprite);
   for (var p:uint=0; p < size; p++) {
    var _p:uint=(page - 1) * size + p;
    if (_p >= total) {
     return;
    }
    var _info:InfoSprite=new InfoSprite  ;
    _info.x=442,_info.y=p * 110 + 80;
    _info.time_txt.text=list_xml.content[_p].time;
    _info.titl_txt.text=list_xml.content[_p].casetitle;
    loadPic_func(list_xml.content[_p].url,String(p));
    thuns_sprite.addChild(_info);
   }
  }
  private function loadPic_func(_str:String,_n:String):void {
   var _loaderoader=new Loader  ;
   _loader.contentLoaderInfo.addEventListener(Event.COMPLETE,onPicLoadComplete);
   _loader.contentLoaderInfo.addEventListener(ProgressEvent.PROGRESS,onPicLoadProgress);
   _loader.load(new URLRequest(_str));
   _loader.name=_n;
  }
  private function onPicLoadProgress(_evtrogressEvent):void {
   trace("pro=" + _evt.bytesLoaded/ _evt.bytesTotal*100);
  }
  private function onPicLoadComplete(_evt:Event):void {
   var _n:uint=uint(_evt.target.loader.name);
   var _pic:Bitmap=_evt.target.content  as  Bitmap;
   _pic.width=96;
   _pic.height=56;
   var _sprite:Sprite=new Sprite  ;
   _sprite.x=442;
   _sprite.y=_n * 110 + 80;
   _sprite.addChild(_pic);
   _sprite.buttonMode=true;
   _sprite.addEventListener(MouseEvent.CLICK,onPicClick);
   ! start_b && (start_b=true) && _sprite.dispatchEvent(new MouseEvent(MouseEvent.CLICK));
   thuns_sprite.addChild(_sprite);
  }
  private function onPicClick(_evt:MouseEvent):void {
   var _sprite:Sprite=_evt.target  as  Sprite;
   var _pic:Bitmap=_sprite.getChildAt(0)  as  Bitmap;
   show_bitmap.bitmapData=_pic.bitmapData.clone();
   if (pos_sprite) {
    var _tweenPX:Tween=new Tween(pos_sprite,"x",Elastic.easeOut,pos_sprite.x,posX,18,false);
    var _tweenPY:Tween=new Tween(pos_sprite,"y",Elastic.easeOut,pos_sprite.y,posY,18,false);
   }
   posX=_sprite.x,posY=_sprite.y,pos_sprite=_sprite;
   var _tweenX:Tween=new Tween(_sprite,"x",Elastic.easeOut,posX,217,18,false);
   var _tweenY:Tween=new Tween(_sprite,"y",Elastic.easeOut,posY,245,18,false);
   var x_tween:Tween=new Tween(show_bitmap,"x",Elastic.easeOut,217,22,18,false);
   var y_tween:Tween=new Tween(show_bitmap,"y",Elastic.easeOut,245,20,18,false);
   var w_tween:Tween=new Tween(show_bitmap,"width",Elastic.easeOut,96,390,18,false);
   var h_tween:Tween=new Tween(show_bitmap,"height",Elastic.easeOut,56,470,18,false);
   addChild(show_bitmap);
  }
  private function onBtnClick(_evt:MouseEvent):void {
   var _btn:SimpleButton=_evt.target  as  SimpleButton;
   switch (_btn) {
    case prev_btn :
     if (page > 0) {
      page--;
      show_func();
     }
     break;
    case next_btn :
     if (page < Math.ceil(total / size)) {
      page++;
      show_func();
     }
     break;
   }
  }
}
}

  源文件下载
  

  查看(942) 评论(6)

• AS3做的涂丫板，上一步，回放，保存数据到XML，保存图片等功能

  2008-5-04

  学习AS3做的涂丫板，上一步，回放，保存数据到XML，保存图片等功能
  
  保存成XML配置文件是ASP的。
  保存图片是PHP的，需要GD库支持。另外生成图片仍然是用的setPixl方法，这个对于大图来说是不实用的，有时间改二进制传送的会好很多。
  其中代码有些需要优化的调整的地方，初学的朋友一起来交流一下吧。
  

  AS3涂丫板.rar
  (2008-04-16 13:04:17, Size: 447 kB, Downloads: 185)

  查看(1770) 评论(18)

• FLAHS＋ASP扫描文件夹展示图片，自由添加

  2007-9-12

  刚才没事干，来试试这个功能的实现。
  思路：
  用ASP的FSO（这个思路是刚才一位朋友在回贴中提到的，所以我才想起要做这个东东，呵呵）对象来扫描同文件夹下的JPG图片，并输出文件名
  这里用ASP输出XML格式让FLASH加载，虽然不不太喜欢XML，但大家都觉得它规范一些，就输出它吧。
  先看演示地址：
  http://www.flash023.cn/test/jpg/jpg.swf
  我的文件夹中只放了9个图片，但无论添加还是减少都直接上传或者删除就行了，不需要去改FLASH也不需要修改ASP
  费话少说，代码＋注释＋源文件如下（IIS环境测试才有效）：
  FLASH中的代码：

  CODE:

  import flash.filters.BlurFilter;
import flash.filters.DropShadowFilter;
////============初始化===========
var b_filters:BlurFilter = new BlurFilter(5, 5, 1);
var d_filters:DropShadowFilter = new DropShadowFilter(5, 45, 0, 80, 10, 10);
var n:Number = new Number();
var url_array = new Array();
//这里是设置SWF与ASP的相对路径，虽然可以在ASP中比较得出，但感觉没有必要
var path_str:String = "images/";
function go_func() {
if (n<url_array.length-1) {
  n++;
  load_func();
} else {
  trace("加载完成!");
}
}
//============MCL类===========
var _mcl:MovieClipLoader = new MovieClipLoader();
this.onLoadInit = function(_mc:MovieClip) {
_mc._txt.removeTextField();
_mc._width = 80;
_mc._height = 80;
_mc.filters = [b_filters, d_filters];
//============这里设置鼠标动作===========
_mc.onRollOver = function() {
  this.filters = null;
};
_mc.onRollOut = function() {
  this.filters = [b_filters, d_filters];
};
go_func();
};
//如果没有下面的代码，就会一个加载出错，导致后面的都不能加载，用这个可以出错时继续向下加载,源文件中我故意少了一个图片，让它出错
this.onLoadError = function(_mc:MovieClip) {
_mc.createTextField("_txt", 200, 20, 10, 60, 30);
_mc._txt.textColor = 0xff0000;
_mc._txt.text = "加载失败!";
go_func();
};
//=========加载进度显示==============
this.onLoadProgress = function(_mc:MovieClip, bytesLoaded:Number, bytesTotal:Number) {
_mc.createTextField("_txt", 200, 20, 10, 60, 30);
_mc._txt.textColor = 0xff0000;
_mc._txt.text = Math.floor((bytesLoaded/bytesTotal*10000)/100)+"%";
};
_mcl.addListener(this);
//=================load函数========
function load_func() {
this.createEmptyMovieClip("pic_mc"+n, n+100);
//如果要改成竖向加载，只需把下面的_x _y换一下就行了
this["pic_mc"+n]._y = 30+Math.floor(n/3)*100;
this["pic_mc"+n]._x = 100+n%3*100;
_mcl.loadClip(path_str+url_array[n], this["pic_mc"+n]);
}
//===========XML文件加载=========
var url_xml = new XML();
url_xml.ignoreWhite = true;
url_xml.onLoad = function(suc) {
if (suc) {
  for (var d:Number = 0; d<this.firstChild.childNodes.length; d++) {
   url_array.push(this.firstChild.childNodes[d].firstChild.nodeValue);
  }
  load_func();
} else {
  trace("XML文件加载失败!");
}
};
url_xml.load(path_str+"showjpg.asp");ASP:

  CODE:

  <%@LANGUAGE="VBscrīpt" CODEPAGE="65001"%>
<%
Dim thisPath,FSO,fileItem,allFolder
thisPath = Server.MapPath(Request.ServerVariables("scrīpt_NAME")) '得到ASP文件的路径
Set FSO = createobject("scrīpting.filesystemobject")'创建FSO对像
Set allFolder = FSO.GetFile(thisPath).parentfolder.files '得到ASP所在目录的父级对像，它就包括了这个ASP和我们放的图片
Response.write("<?xml version=""1.0"" encoding=""utf-8""?>")'开始输出XML
Response.ContentType = "text/XML"
Response.Write("<path>")
For Each fileItem In allFolder '想当于FLASH中的遍历，遍历整个对像中的元素
  If lcase(right(fileItem.name,4))=".jpg" Then '如果后缀是JPG
  Response.Write("<url>"+fileItem.name+"</url>")'就把它的文件名输出为XML的一个新节点
  End If
Next
Response.Write("</path>")
Response.End()
%>
  

  FLASH+ASP显示图片.rar
  (2007-09-12 19:44:27, Size: 140 kB, Downloads: 0)

  查看(3639) 评论(27)

• 多选题的示例!

  2007-8-04

  今天在闪吧和经典都有朋友问到 选择题的制作，所以刚才花时候做了个
  多顶选择题的简单示例

  CODE:

  //============================================================
//多项选择题回贴示例，经典论坛 终极讨厌 原创，欢迎使用，随便修改
//=============================================================
//
//==========题干==========
ti_txt.text = "我们经典论坛有几个版块？ A 2个  B 3个  C  4个  D N个，嘿嘿\n\n\n正确答案是ABC";
//==========答案==========
var daan_str:String = "ABC";
//==========提交==========
tijiao_btn.enabled = false;
tijiao_btn.onRelease = function() {
if (daan_str.length == daan_txt.text.length) {
  for (var d:Number = 0; d<daan_str.length; d++) {
   //字符串对比
   if (daan_txt.text.indexOf(daan_str.charAt(d)) == -1) {
    attachMovie("x_mc",x_mc,2008,{_x:256, _y:169});
    trace("错了!");
    break;
   }
  }
  if (d == daan_str.length) {
   attachMovie("g_mc",g_mc,2008,{_x:256, _y:169});
   trace("正确!");
  }
} else {
  trace("错了!");
  attachMovie("x_mc",x_mc,2008,{_x:256, _y:169});
}
};
//==========单选按钮初始化==========
var fuwei_array:Array = [A, B, C, D];
function fuwei_func() {
for (var h:Number = fuwei_array.length-1; h>=0; h--) {
  fuwei_array[h].selected = false;
  fuwei_array[h].addEventListener("click",this);
}
}
this.click = daan_func;
fuwei_func();
//==========显示已选答案==========
function daan_func() {
daan_txt.text = "";
tijiao_btn.enabled = true;
for (var h:Number = 0; h<fuwei_array.length; h++) {
  if (fuwei_array[h].selected) {
   daan_txt.text += fuwei_array[h]._name;
  }
}
}
stop();
  

  多选题示例-终极讨厌.swf
  (2007-08-04 20:13:25, Size: 68.3 kB, Downloads: 0)

  
  

  多选题示例-终极讨厌.fla
  (2007-08-04 20:13:25, Size: 1.19 MB, Downloads: 0)

  查看(1387) 评论(7)

• 学习数据库，做了个没道理的东西！

  2007-7-24

  
  
  无聊的中午，练习ASP操作数据库，不会PHP，就用数据库保存图片。
  
  http://www.flash023.cn/bmp/test.html这是效果
  
  自我感觉实在没什么意思，呵呵。如果万一有朋友感兴趣，可以PM我发源文件。
  
  源文件在6楼
  
  欢迎大家P砖

  CODE:

  System.useCodepage = true;
import flash.display.BitmapData;
//============摄像头初始化=============
var _cam:Camera = Camera.get();
_cam.setMode(160, 120, 12, true);
_video.attachVideo(_cam);
//==========收集图像数据并显示========
var photo_mc:MovieClip = this.createEmptyMovieClip("photo_mc", 2);
photo_mc._x = 200;
photo_mc._y = 10;
var _BMP:BitmapData = new BitmapData(160, 120, true, 0xfff000);
var cam_func:Function = function () {
_BMP.draw(_video);
photo_mc.attachBitmap(_BMP, 3, "always", true);
};
Camera_btn.onRelease = cam_func;
//================输出图像==============
var out_mc:MovieClip = this.createEmptyMovieClip("out_mc", 10);
out_mc._x = 380;
out_mc._y = 130;
out_mc._yscale = -100;
this.createTextField("_txt", 22, out_mc._x+10, out_mc._y-25, 100, 20);
this._txt.textColor = 0xffffff;
var out_func:Function = function (_array:Array, name_str:String) {
var out_bmp:BitmapData = new BitmapData(160, 120, true);
for (var x:Number = _array.length-1; x>=0; x--) {
  for (var y:Number = _array[x].length-1; y>=0; y--) {
   out_bmp.setPixel(x, y, Number("0x"+_array[x][y]));
  }
}
out_mc.attachBitmap(out_bmp, 11, "always", true);
this._txt.text = name_str;
};
//===================接收图片数据========
var bmpdatashow_func:Function = function (_lvoadVars) {
var out_array:Array = new Array();
var temp_array:Array = new Array();
temp_array = _lv.data_asp.split("|");
for (var d:Number = temp_array.length-2; d>=0; d--) {
  var temp2_array:Array = new Array();
  temp2_array = temp_array[d].split(",");
  out_array.push(temp2_array);
}
out_func(out_array, _lv.name_asp);
};
//============发送图像数据并接收========
var bmp_lvoadVars = new LoadVars();
bmp_lv.onLoad = function(success:Boolean):Void  {
if (success && this.suc_asp == "刷新成功！") {
  bmpdatashow_func(this);
  show_txt.text = "数据发送成功！";
  nameshow_func();
}
};
var bmp_func:Function = function () {
var bmp_array:Array = new Array();
for (var x:Number = 159; x>=0; x--) {
  var bmpy_array:Array = new Array();
  for (var y:Number = 119; y>=0; y--) {
   bmpy_array.push(_BMP.getPixel(x, y).toString(16));
  }
  bmp_array.push(bmpy_array+"|");
}
bmp_lv.name = in_txt.text;
bmp_lv.bmp_data = bmp_array;
show_txt.text = "正在发送数据，请稍等......";
bmp_lv.sendAndLoad("asp/bmp.asp?id="+Math.random(), bmp_lv, "post");
};
send_btn.onRelease = function() {
if (in_txt.text != "") {
  bmp_func();
} else {
  show_txt.text = "请输入您的姓名！";
  setTimeout(function () {
   show_txt.text = "";
  }, 2000);
}
};
//=============列表添加=========
var addItem_func:Function = function (_array:Array) {
name_list.removeAll();
for (var d:Number = 0; d<_array.length-1; d++) {
  name_list.addItem((d+1)+":"+_array[d]);
}
};
name_list.addEventListener("change", this);
this.change = function(evt) {
//trace(evt.target.selectedIndex);
select_func(name_array[evt.target.selectedIndex]);
};
//===============名字显示================
var name_lvoadVars = new LoadVars();
var name_array:Array = new Array();
name_lv.onLoad = function(success) {
trace(success);
if (success) {
  name_array = [];
  name_array = this.name_asp.split("|");
  addItem_func(name_array);
  setTimeout(function () {
   in_txt.text = "";
   show_txt.text = "";
  }, 1000);
}
};
var nameshow_func:Function = function () {
name_lv.load("asp/showname.asp?id="+Math.random());
};
nameshow_func();
//===============图像查询===================
var showbmp_lv:LoadVars = new LoadVars();
showbmp_lv.onLoad = function(success) {
if (success) {
  bmpdatashow_func(this);
  show_txt.text = "数据接收成功！";
  nameshow_func();
}
};
var select_func:Function = function (name_str:String) {
showbmp_lv.name = name_str;
showbmp_lv.sendAndLoad("asp/selectbmp.asp?id="+Math.random(), showbmp_lv, "post");
show_txt.text = "正在接收数据，请稍等......";
};
select_btn.onRelease = function() {
select_func(in_txt.text);
};
//============删除===================
var delete_lv:LoadVars = new LoadVars();
delete_lv.onLoad = function(success) {
if (success) {
  show_txt.text = this.suc_asp;
  _txt.text = "";
  nameshow_func();
} else {
  show_txt.text = "删除失败！";
}
};
var delete_func:Function = function () {
if (_txt.text != undefined) {
  show_txt.text = "正在删除图片，请稍等......";
  delete_lv.name = _txt.text;
  delete_lv.sendAndLoad("asp/delete.asp?id="+Math.random(), delete_lv, "post");
} else {
  show_txt.text = "请选中要删除的图片。";
  setTimeout(function () {
   show_txt.text = "";
  }, 3000);
}
};
delete_btn.onRelease = delete_func;
//==============进入管理=====================
delete_btn.enabled = false;
this.onKeyDown = function() {
if (Key.getCode() == 13 && in_txt.text == "ING") {
  delete_btn.enabled = true;
}
};
in_txt.onSetFocus = function() {
Key.addListener(this._parent);
};
in_txt.onKillFocus = function() {
Key.removeListener(this._parent);
};[ 本帖最后由 终极讨厌 于 2007-7-24 22:32 编辑 ]

  查看(1556) 评论(19)

• 交作业!!一个取颜色的东东。

  2007-7-24

  无聊当中，顶出一个03年的帖子。http://space.flash8.net/bbs/thread-97143-1-1.html
  特别感谢 AIYI2003 大虾!!
  
  由于当中的源文件已经无法下载，激发了我也跟着做一做的兴趣。根据大虾谈到的思路做了一遍。在此沾沾自喜一下，欢迎大家B4!

  CODE:

  var d:Number = 215;
for (var r:Number = 255; r>=0; r -= 51) {
for (var g:Number = 255; g>=0; g -= 51) {
  for (var b:Number = 255; b>=0; b -= 51) {
   attachMovie("color_mc", "color_mc"+d, d, {_x:Math.floor(d/12)*12, _y:d%12*12});
   this["color_mc"+d].color_num = r << 16 | g << 8 | b;
   var color:Color = new Color(this["color_mc"+d]);
   color.setRGB(this["color_mc"+d].color_num);
   this["color_mc"+d].onRollOver = function() {
    _txt.text = "0x0000000".substr(0, 8-this.color_num.toString(16).length)+this.color_num.toString(16);
   };
   this["color_mc"+d].onRelease = function() {
    var color:Color = new Color(this._parent._parent.p_mc);
    color.setRGB(this.color_num);
    _txt2.text = "你已经选中：0x0000000".substr(0, 14-this.color_num.toString(16).length)+this.color_num.toString(16);
   };
   d--;
  }
}
}我把它做成了MC，考虑到使用方便，复制过去就可以用了。
  

  取色.fla
  (2007-06-23 21:06:15, Size: 48 kB, Downloads: 40)

  
  

  取色.swf
  (2007-06-23 21:06:15, Size: 755 B , Downloads: 57)

  查看(2415) 评论(8)

• 一个XML加载图片的遮罩效果，研究好半天呢!

  2007-7-24

  不是我的创意，是仿造人家的作品做的。
  

  CODE:

  var list_array:Array = new Array();
var list_xml:XML = new XML();
list_xml.ignoreWhite = true;
list_xml.onLoad = function(success:Boolean) {
if (success) {
  for (var aNode:XMLNode = list_xml.firstChild.childNodes[0]; aNode != null; aNode=aNode.nextSibling) {
   list_array.push(aNode.firstChild.firstChild.nodeValue);
  }
  loadpic_func();
} else {
  trace("加载失败!");
}
};
list_xml.load("pic_list.xml");
///////////////
var pic_mcl:MovieClipLoader = new MovieClipLoader();
this.onLoadInit = function(_mc:MovieClip) {
_mc._width = Stage.width;
_mc._height = Stage.height;
mask_func(_mc);
};
pic_mcl.addListener(this);
var i:Number = 0;
function loadpic_func() {
i++;
i %= list_array.length;
var pic_mc:MovieClip = this.createEmptyMovieClip("pic_mc"+this.getNextHighestDepth(), this.getNextHighestDepth());
pic_mcl.loadClip(list_array[i], pic_mc);
/*
this.pic_mc._x = Stage.width/2;
this.pic_mc._y = Stage.height/2;
this.pic_mc.createEmptyMovieClip("img_mc", 3);
this.pic_mc.img_mc._x = -Stage.width/2;
this.pic_mc.img_mc._y = -Stage.height/2;
*/
}
var mask_num:Number = new Number();
var xmax:Number = Math.ceil(Stage.width/40);
var ymax:Number = Math.ceil(Stage.height/40);
function mask_func(_mc:MovieClip) {
var depth:Number = xmax*ymax;
var mask_mc:MovieClip = this.createEmptyMovieClip("mask_mc"+this.getNextHighestDepth(), this.getNextHighestDepth());
_mc.setMask(mask_mc);
mask_num = Math.floor(Math.random()*6);
for (var x_num:Number = xmax; x_num>=0; x_num--) {
  for (var y_num:Number = ymax; y_num>=0; y_num--) {
   mask_mc.attachMovie("mask_mc"+mask_num, "mask"+depth, depth+100, {_x:x_num*50-150, _y:y_num*50-100, _xscale:250, _yscale:250});
   depth--;
  }
}
texiao_func(mask_mc);
}
////////////////////////////////////////////
function texiao_func(_mc:MovieClip) {
var texiao_array:Array = new Array();
var max_num:Number = new Number();
var temp_num:Number = new Number();
var zhu_num:Number = Math.floor(Math.random()*6);
trace(zhu_num);
if (zhu_num == 0) {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   var xn_array:Array = new Array();
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    xn_array.push(x_n+y_n);
   }
   texiao_array.push(xn_array);
  }
  max_num = xmax+ymax+2;
} else if (zhu_num == 1) {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   var xn_array:Array = new Array();
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    xn_array.push(xmax+ymax-x_n-y_n+1);
   }
   texiao_array.push(xn_array);
  }
  max_num = xmax+ymax+2;
} else if (zhu_num == 2) {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   var xn_array:Array = new Array();
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    xn_array.push(ymax-x_n+y_n);
   }
   texiao_array.push(xn_array);
  }
  max_num = xmax+ymax+2;
} else if (zhu_num == 3) {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   var xn_array:Array = new Array();
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    xn_array.push(xmax+x_n-y_n);
   }
   texiao_array.push(xn_array);
  }
  max_num = xmax+ymax+2;
} else if (zhu_num == 4) {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   var xn_array:Array = new Array();
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    xn_array.push(x_n);
   }
   texiao_array.push(xn_array);
  }
  max_num = ymax+2;
} else if (zhu_num == 5) {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   var xn_array:Array = new Array();
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    xn_array.push(y_n);
   }
   texiao_array.push(xn_array);
  }
  max_num = xmax+2;
}
function fan_func() {
  for (var x_n:Number = 0; x_n<=ymax; x_n++) {
   for (var y_n:Number = 0; y_n<=xmax; y_n++) {
    if (texiao_array[x_n][y_n] == temp_num) {
     var xu:Number = x_n*xmax+y_n;
     _mc["mask"+xu].play();
     //trace(xu);
    }
   }
  }
  temp_num++;
  if (temp_num>max_num) {
   clearInterval(id);
  }
}
fan_func();
clearInterval(id);
id = setInterval(fan_func, 80);
this["mask_mc"+(_mc.getDepth()-4)].removeMovieClip();
this["pic_mc"+(_mc.getDepth()-5)].removeMovieClip();
setTimeout(function () {
  loadpic_func();
}, 3000);
}
  

  mytest.rar
  (2007-06-30 21:51:20, Size: 830 kB, Downloads: 252)

  查看(2878) 评论(35)

• 用FLASH做的不加好友，直接聊QQ装备

  2007-7-24

  直接复制以下代码，场景大小设置成80＊22
  只访问网络，就可以输入对方QQ号回车之后，直接聊天了。

  CODE:

  //===========屏闭菜单============
fscommand("showmenu", false);
//===========创建文本格式======
var txt_fmt:TextFormat = new TextFormat();
txt_fmt.size = 16;
txt_fmt.bold = true;
txt_fmt.color = Math.random()*0xffffff;
//===========创建输入QQ号的文本======
var QQ_txt:TextField = this.createTextField("QQ_txt", 2, 0, 0, 80, 22);
QQ_txt.border = true;
QQ_txt.type = "input";
QQ_txt.restrict = "0-9";
QQ_txt.maxChars = 9;
//===========创建输入QQ号的文本======
QQ_txt.setNewTextFormat(txt_fmt);
//===========回车动作设置======
this.onKeyDown = function() {
//======如果回车时QQ号大于5位就打开面板======
if (Key.getCode() == 13 && QQ_txt.text.length>=5) {
  getURL("tencent://message/?uin="+QQ_txt.text);
}
};
//======QQ输入文本框得到焦点时，注册键盘帧听======
QQ_txt.onSetFocus = function() {
Key.addListener(this._parent);
};
//======QQ输入文本框失去焦点时，卸载键盘帧听======
QQ_txt.onKillFocus = function() {
Key.removeListener(this._parent);
};[ 本帖最后由 终极讨厌 于 2007-7-16 13:11 编辑 ]

  查看(6575) 评论(63)

我的主题

• 发个包包，回论坛比较常见的问题时做的示

我的最新图片

• 

  快乐成长