据说是Flash的视频聊天代码

天云上人

只是把以前做的单个的功能整合了一下,本来还想弄个FMS的视频聊天,不过虚拟空间没办法..
2 _" d  @% G  j) S8 thttp://www.iphper.com/copstr
9 z: o- x$ F% G1 v+ W光是留言板+在线涂鸦就几百行代码(看来效率低了点)


+ S+ [. o# B2 AFMS服务器的设置简单的仿照(一)就可以了,这段代码延续(一),加上了视频和语音发布,主要用到netstream.publish()方法,该方法也可以用于视频在线录制,除了检测摄相头和MIC状态的代码外，就增加了十几行的视频发布代码,有关摄相头和MIC的详细设置我并没有写,只是让大家看清楚它的工作原理,没有摄相头的朋友(我就没有摄相头)可以这样测试:打开麦克风说话,如果能听到回音就说明发布成功了
* u, T. Y* r# c* f$ d
8 H, y- M4 a0 y
; @/ G* J4 ~# {$ B7 _, m2 J) h
' U, ^) {  J. Y% ^" k+ q" I//建立与服务器的连接.
7 u( o( H4 n0 U  W% qvar sv_uri:String = "rtmp:/recordstream";
var my_nc:NetConnection = new NetConnection ();
9 [; ?, E7 u# ~  q3 Zmy_nc.connect (sv_uri);
//新建共享对象;
) _$ b' o/ ]5 V3 I; J5 \2 x7 fmy_nc.onStatus = function (thisObj:Object){
8 F7 d' H2 A+ L. L        if (thisObj.code == "NetConnection.Connect.Success"){
                info_txt.text = "连接服务器成功!!";
                info_txt.textColor = 0x66CC00;
( c: Y) R+ ^  H* H  Z* X        }
# ?9 X6 f+ v& f( T9 s! {        else{
: g4 u; A) q- Q! R% u. q+ k$ L2 P                info_txt.text = "连接服务器失败!!"
1 u& o4 j" m; K" T5 \* k: L                info_txt.textColor = 0xFF0000;
- d* e2 q; z! d9 O' b- w        }
1 o5 X$ {& S% k9 y1 z2 D1 B}
var user_rso:SharedObject = SharedObject.getRemote ("chat_rso", my_nc.uri, true);
user_rso.connect (my_nc);
8 f4 x7 K3 |$ }) L& K$ E//建立摄相头和麦克风对象
this.cam = Camera.get();
  a9 D; L( W7 mthis.mic = Microphone.get();
5 g- v& X/ R. J" Qvideobox.attachVideo(this.cam);
videobox.attachAudio(this.mic);
4 {- o: S9 V% o! F% {# csend_ns = new NetStream(my_nc);
send_ns.attachVideo(this.cam);
send_ns.attachAudio(this.mic);
/ c# [% k4 m; |+ g4 r/ w& Wsend_ns.publish("humorguy");
get_ns = new NetStream(my_nc);
  i5 c" @! ?2 o" X4 `get_ns.play("humorguy");
videobox2.attachVideo(get_ns);
" k; W4 Q( m+ k" L0 Z2 C" U) F) S//更新聊天内容
& p: ?2 ]+ b6 b/ ^! i6 Cuser_rso.onSync = function (){
                chatOutput_txt.text += newline+this.data.chatname +":" + this.data.chatcontent;
                chatOutput_txt.scroll = chatOutput_txt.maxscroll+1;//确保最新消息能显示在输出框里
8 |4 I7 F( @8 t6 R$ x$ L}
//回车键发送聊天内容
function myOnKeyDown() {
    if (Key.getCode() == 13) {
( \1 D0 w$ a; \8 _, N                if(chatInput_txt.text != undefined && chatInput_txt.text != user_rso.data.chatcontent){
                    Selection.setFocus(chatInput_txt);
                        user_rso.data.chatcontent = chatInput_txt.text;
                        if(name_txt.text != "" && name_txt.text != user_rso.data.chatname){
2 |' P5 ^5 v2 p5 A5 D7 U5 y                                user_rso.data.chatname = name_txt.text;
                                }
6 c; K; J2 l) u, t  u                }
+ j: b+ |# \0 ~5 U    }
( E% r/ Z/ K, s% g$ K4 w, ]$ q}
2 `3 v) C' v4 Z" I2 mvar myListener:Object = new Object();
myListener.onKeyDown = myOnKeyDown;
) R) u0 I0 G4 K+ o* j6 S* z- uKey.addListener(myListener);
//构造检测摄相头和麦克风状态的函数
  P: z! t4 B) v; v* Yfunction checkforCam_Mic() {
        camArray = Camera.names;
        micArray = Microphone.names;
        if (camArray.length>=1) {
                temp_cam = Camera.get();
0 z3 Q; B2 V, s1 C: e" O                if (temp_cam == -1) {
                        camInfo_txt.text = '视频设备正忙!';
( `: b# w3 m3 }2 T5 Q& T                        camInfo_txt.textColor = 0xFFCC00;
                } else {
1 x. i; V7 l- W6 g, n* ~* E  _                        camInfo_txt.text = '视频设备可用!';
                        camInfo_txt.textColor = 0x66CC00;
5 w; m& \' n5 q2 A" w0 j                }
/ \. {/ a$ c, E                delete temp_cam;
" F) A( J4 {& b' {. U        } else if (camArray.length == 0) {
                camInfo_txt.text = '没有视频设备!';
7 I) f- C2 v3 D, s; B' \                camInfo_txt.textColor = 0xFF0000;
! D. x' u7 j1 Y        }
& z+ `3 t% b! }6 _9 x* G5 x, }        //检测麦克风状态
& W( X7 T. a8 q( e        if (micArray.length>=1) {
6 F% U2 x  [0 h1 y( R  A                temp_mic = Microphone.get();
: Y# K' [3 H, d1 ?                if (temp_mic == -1) {
                        camInfo_txt2.text = '麦克风正忙!';
* ?$ c9 S0 f* B: G                        camInfo_tx2t.textColor = 0xFFCC00;
                } else {
                        camInfo_txt2.text = '麦克风可用!';
1 s; a/ @5 d: K3 R" R! y* L                        camInfo_txt2.textColor = 0x66CC00;
                }
                delete mic_cam;
        } else if (micArray.length == 0) {
  a9 C2 V4 _: N6 N6 U' B: \) X. w                camInfo_txt2.text = '没有麦克风!';
                camInfo_txt2.textColor = 0xFF0000;
        }
; ~9 X+ m7 s' _1 V$ u7 T}
5 o% N7 o& O9 g( _+ F, echeckforCam_Mic();