[外掛]聊天室指令!

版主: 涅魂, 簫哥

samgmo
 
文章: 10
註冊時間: 2005-06-26 5:12 pm

[外掛]聊天室指令!

文章samgmo » 2005-09-01 8:06 pm

代碼: 選擇全部
本版作者:涅魂/修改:Floky

外掛名稱:聊天室常用指令!

外掛簡介:有一些年紀比較小的孩子,不是太懂得打電腦字,為了方便他們,我們並建立一些常用的文字,給他們輸入英文就可以使用了。


安裝方法:

打開wog/wog_chat.php

尋找:
代碼: 選擇全部
//switch
switch ($_POST["chat_mode"])


上他的上面加上:
代碼: 選擇全部
$word_say=str_replace("/hi",$name."向大家問好!",$word_say);
$word_say=str_replace("/sleep",$name."玩了很久WOG,有點累,要睡了!",$word_say);
$word_say=str_replace("/88",$name."各位玩家,本人先走一步,再見!",$word_say);
$word_say=str_replace("/pk",$name."有誰人願意跟我PK啊^^!",$word_say);
$word_say=str_replace("/pet",$name."萬歲,我成功捕捉了寵物!",$word_say);
$word_say=str_replace("/petdie",$name."嗚嗚,我的寵物死了!",$word_say);
$word_say=str_replace("/gm",$name."GM您好,請多多關照啊^^!",$word_say);
$word_say=str_replace("/sa",$name."系統管理員您好,請多多關照啊^^!",$word_say);
$word_say=str_replace("/money",$name."我是新手,誰人能給我錢!",$word_say);
$word_say=str_replace("/friend",$name."大家好,誰人能跟我交一個朋友!",$word_say);
$word_say=str_replace("/girl",$name."這裡有美女嗎?能和我交個朋友嗎?",$word_say);
$word_say=str_replace("/boy",$name."這裡有帥哥嗎?能和我交個朋友嗎?",$word_say);
$word_say=str_replace("/uplv",$name."萬歲,我升了級!",$word_say);


以下是幾個實例,喜歡的自己可以加上。

在適當的位置加上以下代碼
代碼: 選擇全部
$word_say=str_replace("/[color=red]輸入的英文[/color]",$name."[color=red]說明[/color]",$word_say);


解釋一下:

代碼記緊修改〔輸入的英文〕即您想使用的英文來代表〔說明〕,兩者修改,即可。 :wink:

接著就是顯示給玩家看了,下一步,懂嗎??
建立word_say.htm上載至wog目根下。


修改top.htm

尋找:
【<a href="wog_id_admin.htm" target="wog_view">帳號中心</a>】
後面加上:
【<a href="word_say.htm" target="_blank">聊天室常用指令</a>】

即可。

以下是word_say.htm的內容:
代碼: 選擇全部
<title>聊天室常用指令</title>
<body bgcolor="#000000">
<font size=5><font color=green><i><b>聊天室常用指令代碼如下:</b></i></font></font>
<br></br>
<font size=3><font color=blue><i>顯示一</i></font></font>
<br></br>
<font size=3><font color=blue><i>顯示二</i></font></font>
<br></br>
<font size=3><font color=blue><i>顯示三</i></font></font>
<br></br>
<font size=3><font color=blue><i>顯示四</i></font></font>
<br></br>
<font size=3><font color=blue><i>顯示五</i></font></font>
<br></br>
<font size=3><font color=blue><i>顯示六</i></font></font>


懂嗎???

word_say.htm可以自行使用html美化,輸入什麼?應該各位懂吧。



頭像
chuchu
 
文章: 120
註冊時間: 2005-03-24 7:15 pm
來自: HK

文章chuchu » 2005-09-01 8:26 pm

明明係我問架喎...............



頭像
chuchu
 
文章: 120
註冊時間: 2005-03-24 7:15 pm
來自: HK

文章chuchu » 2005-09-01 8:29 pm

中文都得架!!!
$word_say=str_replace("(怒火燒中)","怒火燒中,呵呵,熄左",$word_say);



頭像
chuchu
 
文章: 120
註冊時間: 2005-03-24 7:15 pm
來自: HK

文章chuchu » 2005-09-01 8:59 pm

咪住先,你都應該寫下我個名,建議者:朱仔



samgmo
 
文章: 10
註冊時間: 2005-06-26 5:12 pm

文章samgmo » 2005-09-01 9:09 pm

哦.....



頭像
chuchu
 
文章: 120
註冊時間: 2005-03-24 7:15 pm
來自: HK

文章chuchu » 2005-09-01 9:24 pm

$word_say=str_replace("/off",$name."向大家說:『我要下線了!』",$word_say);
$word_say=str_replace("/886",$name."向大家說:『拜拜各位』!",$word_say);
$word_say=str_replace("/=.=",$name."好無奈望住大家",$word_say);
$word_say=str_replace("/......",$name."無言中..........",$word_say);
$word_say=str_replace("/.......",$name."無言中..........",$word_say);
$word_say=str_replace("(怒火燒中)","怒火燒中,呵呵,熄左",$word_say);
$word_say=str_replace("/attack",$name."向大家攻擊!",$word_say);
$word_say=str_replace("/cry",$name."向大家哭!",$word_say);
$word_say=str_replace("/scream",$name."向大家驚叫!",$word_say);
$word_say=str_replace("/keke",$name."向大家奸笑!",$word_say);
$word_say=str_replace("/kiss",$name."向大家飛吻!",$word_say);
$word_say=str_replace("/bye",$name."向大家話再見!",$word_say);
$word_say=str_replace("/curse",$name."向大家咒罵!",$word_say);
$word_say=str_replace("/come on",$name."向大家說過來!",$word_say);
$word_say=str_replace("/1on1",$name."向大家挑釁!",$word_say);
$word_say=str_replace("/help",$name."向大家求救!",$word_say);
$word_say=str_replace("/die",$name."向大家說:我死了!!",$word_say);
$word_say=str_replace("/weapon",$name."向大家問:誰可以給我武器!",$word_say);
$word_say=str_replace("/money",$name."江湖救急,有沒有人可以借錢給我?",$word_say);
$word_say=str_replace("/thank",$name."向大家謝謝!",$word_say);
$word_say=str_replace("/think",$name."向大家說:我正陷入沉思中~別嘈我",$word_say);
$word_say=str_replace("/how are you?",$name."向大家問候!",$word_say);
$word_say=str_replace("/sleep",$name."向大家說:我要睡喇~繼續啦~!",$word_say);
$word_say=str_replace("/shut up",$name."唔好再洗頻喇~",$word_say);
$word_say=str_replace("/hello",$name."我是新手~請大家多多關照~",$word_say);
$word_say=str_replace("/pk",$name."有冇人敢膽同我單挑~?",$word_say);
$word_say=str_replace("/try",$name."向大家說:讓我試一試吧~!",$word_say);
$word_say=str_replace("/angry",$name."向大家發惱",$word_say);
$word_say=str_replace("/sing",$name."向大家唱歌!",$word_say);
仲有呀




涅魂
 
文章: 4463
註冊時間: 2004-01-04 11:17 am
來自: Taiwan
性別: 男生

文章涅魂 » 2005-09-01 11:01 pm

chuchu 寫:..........
..........
..........

請遵守版規。
代碼: 選擇全部
發表文章時請使用書面體、繁體中文來發表,請盡量避免使用香港口語、簡體中文、閩南語、客家語,若有困難者請說明理由。


給您兩個建議
1.有些指令並不需要顯示$name,可以把它去掉。
2.有些英文指令好像有點太直覺化了...(汗)
 可以用別的英文替換。(不用擔心大家的英文程度 :lol: )




涅魂
 
文章: 4463
註冊時間: 2004-01-04 11:17 am
來自: Taiwan
性別: 男生

文章涅魂 » 2005-10-18 11:39 pm

分享一個程式碼更為簡潔而功能卻更加強大的寫法~~~
有興趣者歡迎使用~ :)

FASTCODE+FASTCODE TABLE list

開啟檔案wog/wog_chat.php
尋找
代碼: 選擇全部
//switch
switch ($_POST["chat_mode"])

上面,加上
代碼: 選擇全部
$fastcode_table=array(
array("/hi","問好","$name 向大家問好!"),
array("/bye","再見","$name 向大家說再見!"),
array("/smile","微笑","$name 笑了一下!"));
for($replace=0;$replace < sizeof($fastcode_table);$replace++)
$word_say=eregi_replace("^".$fastcode_table[$replace][0]."$",$fastcode_table[$replace][2],$word_say);


尋找
代碼: 選擇全部
<? $tempurl = "?name=".$name."&adminid=".$adminid."&password=".$password.""; ?>

上面,加上
代碼: 選擇全部
      <select class="text" size="1" name="fastcode" onchange="parent.chat.wog_chat.bsay.value+=parent.chat.wog_chat.fastcode.value">//代碼
      <option value="" style="background:005F9F;color:#FFFFFF;" SELECTED>動作列表</option>
      <?
   for($t1=0;$t1<sizeof($fastcode_table);$t1++)
   {
      echo "<option value='".$fastcode_table[$t1][0]."'>".$fastcode_table[$t1][1]."</option>";
   }
      ?>     
  </select>

完畢。 :)


圖檔


回到 外掛區

誰在線上

正在瀏覽這個版面的使用者:沒有註冊會員 和 4 位訪客