聊天系統2問

傲殺

-    script    聊天系統    -1,{

OnInit:
setarray $@cc[1],    0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;
setarray $@cc2[1],    0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0;
end;
OnPCLoginEvent:
set cs,1;
for(set .@val,1;.@val<128;set .@val,.@val+1)
{
if($@cc[.@val]==getcharid(3))
{
dispbottom " ";
dispbottom "[聊天系統資訊]  密 [NPC:聊天系統]即可在聊天室發言";
callfunc "lcs";
end;
}
if($@cc[.@val]==0)
{
set $@cc[.@val],getcharid(3);
dispbottom " ";
dispbottom "[聊天系統資訊]  密 [NPC:聊天系統]即可在聊天室發言!!";
callfunc "lcs";
end;
}
if(.@val==127)
{
for(set .@val2,1;.@val2<128;set .@val2,.@val2+1)
{
if($@cc2[.@val2]==0)
{
set $@cc2[.@val2],getcharid(3);
dispbottom " ";
dispbottom "[聊天系統資訊]  密 [NPC:聊天系統]即可在聊天室發言!!";
callfunc "lcs";
end;
}
if(.@val2==127)
{
dispbottom " ";
dispbottom "[聊天系統資訊] 聊天系統人數已滿!!";
set cs,0;
end;
}
}
}
}
end;

OnPCLogoutEvent:
if(cs==0)end;
for(set .@val3,1;.@val3<128;set .@val3,.@val3+1)
{
if($@cc[.@val3]==getcharid(3))
{
set $@cc[.@val3],0;
callfunc "locs";
for(set .@val6,1;.@val6<128;set .@val6,.@val6+1)
{
if($@cc[.@val6]==getcharid(3))
{
set $@cc[.@val6],0;
}
}
end;
}
if($@cc2[.@val3]==getcharid(3))
{
set $@cc2[.@val3],0;
callfunc "locs";
end;
}
}
end;


OnWhisperGlobal:

if(@whispervar0$=="開啟" && cs==1)
{
dispbottom "[聊天系統資訊]  您已經開啟聊天系統!!";
end;
}

else if(@whispervar0$=="關閉" && cs==0)
{
dispbottom "[聊天系統資訊]  您已經關閉聊天系統!!";
end;
}

else if(@whispervar0$=="關閉")
{
dispbottom "[聊天系統資訊]  您離開了聊天系統!!";
set cs,0;
for(set .@val3,1;.@val3<128;set .@val3,.@val3+1)
{
if($@cc[.@val3]==getcharid(3))
{
set $@cc[.@val3],0;
callfunc "locs";
break;
}
if($@cc2[.@val3]==getcharid(3))
{
set $@cc2[.@val3],0;
callfunc "locs";
break;
}
}
end;
}


else if(@whispervar0$=="開啟")
{
dispbottom " ";
dispbottom "[聊天系統資訊]  您已開啟系統,要關閉請輸入. 關閉 .";
set cs,1;
for(set .@val,1;.@val<128;set .@val,.@val+1)
{
if($@cc[.@val]==0)
{
set $@cc[.@val],getcharid(3);
dispbottom " ";
dispbottom "[聊天系統資訊] 您成功登入了聊天系統!!";
callfunc "lcs";
break;
}
if(.@val==127)
{
for(set .@val2,1;.@val2<128;set .@val2,.@val2+1)
{
if($@cc2[.@val2]==0)
{
set $@cc2[.@val2],getcharid(3);
dispbottom " ";
dispbottom "[聊天系統資訊] 您成功登入了聊天系統!!";
callfunc "lcs";
break;
}
if(.@val2==127)
{
dispbottom " ";
dispbottom "[聊天系統資訊] 聊天系統人數已滿!!關閉系統,請重新嘗試!!";
mes "人數過多,登入系統失敗";
set cs,0;
break;
}
}
}
}
end;
}


else if(cs<1)
{
dispbottom " ";
dispbottom "[聊天系統資訊]  您並沒有加入聊天系統!!";
dispbottom "[聊天系統資訊]  請輸入' 開啟 '啟用系統!!";
end;
}


else
{
set .@cssay$,strcharinfo(0);
set .@csmessage$,@whispervar0$;
for(set .@var5,1;.@var5<128;set .@var5,.@var5+1)
{
if($@cc2[.@var5]==0)goto Ns;
attachrid($@cc2[.@var5]);
announce "[聊天系統] "+.@cssay$+" : "+.@csmessage$+"",0x03,16761035;
detachrid;
Ns:
if($@cc[.@var5]==0)
continue;
attachrid($@cc[.@var5]);
announce "[聊天系統] "+.@cssay$+" : "+.@csmessage$+"",0x03,16761035;
detachrid;
}


有幾個問題
1.好像不用加入所有玩家都會看到
2怎設只有GM可看見

sinya

你的二個 function  lcs  跟locs 在那?

傲殺

拿掉了
我是指放上來這裡