LAN+chat 源代码
汇集 LAN+chat 相关的电路原理图、PCB工程文件、单片机/FPGA源代码、数据手册与应用设计方案。
ABORT 'BUSY' ABORT 'ERROR' ABORT 'NO CARRIER' ABORT 'NO DIALTONE' ABORT 'Invalid Login' ABORT 'Login incorrect' '' 'INIT' 'OK' 'SP…
Chat Chat
By Bill Kendrick.
#【】 sub return_message { open(DNDFILE,"$filehead$dndfile"); @lines = ; close(DNDFILE); #请勿打扰文件格式 #主用户↑user1;user2;us…
sub return_online { $usersum=0; $temp="online"; print ""; print ""; print "在线名单\n"; print "\n"; print ""; print "\n"; pri…
sub login { &send_html; print "$mytitle$myversion\n"; print
sub checknamespace { $name=$username; $length1=length($name); #去掉NAME中的空格 $name=~s/ //g; $name=~s/