据说是Flash的视频聊天代码

天云上人

只是把以前做的单个的功能整合了一下,本来还想弄个FMS的视频聊天,不过虚拟空间没办法..
http://www.iphper.com/copstr
1 n0 I) B3 q& Q' B  q光是留言板+在线涂鸦就几百行代码(看来效率低了点)


5 q# r# V% M8 c5 \+ |$ v- V" P( QFMS服务器的设置简单的仿照(一)就可以了,这段代码延续(一),加上了视频和语音发布,主要用到netstream.publish()方法,该方法也可以用于视频在线录制,除了检测摄相头和MIC状态的代码外，就增加了十几行的视频发布代码,有关摄相头和MIC的详细设置我并没有写,只是让大家看清楚它的工作原理,没有摄相头的朋友(我就没有摄相头)可以这样测试:打开麦克风说话,如果能听到回音就说明发布成功了

/ z) \( P$ v; u* n1 t
1 I- _8 s& u, F: p8 \
% R+ m$ d* }& v: E7 v//建立与服务器的连接.
2 J; ^4 m1 ?( q7 _& ~( A0 uvar sv_uri:String = "rtmp:/recordstream";
$ i# o9 F, n6 vvar my_nc:NetConnection = new NetConnection ();
my_nc.connect (sv_uri);
//新建共享对象;
my_nc.onStatus = function (thisObj:Object){
        if (thisObj.code == "NetConnection.Connect.Success"){
' `! ]0 I, Q! P" U5 {$ i1 t  A7 I$ H* \5 }                info_txt.text = "连接服务器成功!!";
. f# x' m1 V# q; ]/ I; |                info_txt.textColor = 0x66CC00;
% S3 H" S% n$ e2 c) P# y8 {8 J) d        }
        else{
" T) j% t1 X+ B8 `" O3 s                info_txt.text = "连接服务器失败!!"
                info_txt.textColor = 0xFF0000;
! ^# m/ B- b, X( C# g+ S5 E        }
3 U3 P0 P0 Z$ B+ D0 G}
" x1 Z3 O. e; v; N4 ^var user_rso:SharedObject = SharedObject.getRemote ("chat_rso", my_nc.uri, true);
user_rso.connect (my_nc);
//建立摄相头和麦克风对象
6 P6 q( z1 t2 Y! |' J  Rthis.cam = Camera.get();
2 C# W/ O; O* L* i5 zthis.mic = Microphone.get();
& s, X8 l2 {4 m, nvideobox.attachVideo(this.cam);
videobox.attachAudio(this.mic);
3 l/ ?0 H" E$ Isend_ns = new NetStream(my_nc);
send_ns.attachVideo(this.cam);
+ b3 o, j) M3 S# V. m1 a- z0 Csend_ns.attachAudio(this.mic);
9 ?" ~0 t! g( `1 k) ~8 asend_ns.publish("humorguy");
7 N4 z6 M+ d) @get_ns = new NetStream(my_nc);
get_ns.play("humorguy");
videobox2.attachVideo(get_ns);
//更新聊天内容
user_rso.onSync = function (){
6 R* |% N- D' ~, e4 o4 A                chatOutput_txt.text += newline+this.data.chatname +":" + this.data.chatcontent;
                chatOutput_txt.scroll = chatOutput_txt.maxscroll+1;//确保最新消息能显示在输出框里
}
//回车键发送聊天内容
4 A& H  O% f* t/ Q4 W0 c/ j4 [function myOnKeyDown() {
+ S( W( g5 l/ r2 S$ G1 r    if (Key.getCode() == 13) {
                if(chatInput_txt.text != undefined && chatInput_txt.text != user_rso.data.chatcontent){
& y" J7 Q( M) y                    Selection.setFocus(chatInput_txt);
                        user_rso.data.chatcontent = chatInput_txt.text;
3 f; s8 M  w7 m, Z( P; X                        if(name_txt.text != "" && name_txt.text != user_rso.data.chatname){
                                user_rso.data.chatname = name_txt.text;
                                }
                }
    }
}
var myListener:Object = new Object();
  J1 ~0 b& [( R& S; YmyListener.onKeyDown = myOnKeyDown;
Key.addListener(myListener);
//构造检测摄相头和麦克风状态的函数
9 r) _" H, k" d( C6 @3 jfunction checkforCam_Mic() {
: P/ }% O+ Q' }" @$ J7 q% Q        camArray = Camera.names;
        micArray = Microphone.names;
; G! j( V7 Y: o# f        if (camArray.length>=1) {
                temp_cam = Camera.get();
$ m, R7 m# ^2 V! ^/ v                if (temp_cam == -1) {
1 g# J7 E- ?* b( a! Z                        camInfo_txt.text = '视频设备正忙!';
                        camInfo_txt.textColor = 0xFFCC00;
                } else {
                        camInfo_txt.text = '视频设备可用!';
                        camInfo_txt.textColor = 0x66CC00;
                }
                delete temp_cam;
        } else if (camArray.length == 0) {
7 w! ^& e- X0 l, I' {5 n: z                camInfo_txt.text = '没有视频设备!';
                camInfo_txt.textColor = 0xFF0000;
# E! }1 O; x% S$ H2 M" R7 |        }
% C# G% ?# I! t* K5 \) V        //检测麦克风状态
        if (micArray.length>=1) {
' x6 y; R' U5 S. ~: Y8 k; t  a5 |$ b( W/ \                temp_mic = Microphone.get();
                if (temp_mic == -1) {
                        camInfo_txt2.text = '麦克风正忙!';
  U1 G$ o8 ~& i& H3 W& y3 {                        camInfo_tx2t.textColor = 0xFFCC00;
                } else {
                        camInfo_txt2.text = '麦克风可用!';
                        camInfo_txt2.textColor = 0x66CC00;
                }
                delete mic_cam;
% o% Q! k7 ?1 a9 L# h, q        } else if (micArray.length == 0) {
8 U; g9 h' F* m# y# [5 M8 m9 y, E% J" \                camInfo_txt2.text = '没有麦克风!';
- R0 X, X2 ^1 S. x* i9 r                camInfo_txt2.textColor = 0xFF0000;
        }
0 l: R  ~- R8 g. I6 v}
checkforCam_Mic();