模仿乌鸦说话的triggers

[f_lilin]

#CLASS {chatrobot}
#TRIGGER {【%x】(%x)~(*~)：(*)} {#t- chatrobot;target=%1;msg=%2;tempchat=%eval( %pos( "琳儿", @target));#if (@tempchat=0) {panduan1};#t+ chatrobot}
#TRIGGER {【%x】(%x)：(*)} {#t- chatrobot;target=%1;msg=%2;tempchat=%eval( %pos( "琳儿", @target));#if (@tempchat=0) {panduan};#t+ chatrobot}
#CLASS 0
#ALIAS sa1 {#case (%random( 1, 14)) {#sh 1;chatmsg=%concat( "chat ", @target, "为什么说", @msg, "？")} {#sh 2;chatmsg=%concat( "chat ", @target, "说的", @msg, " 是什么意思？")} {#sh 3;chatmsg=%concat( "chat ", @msg, "？")} {#sh 4;chatmsg="chat* hehe"} {#sh 5;chatmsg="chat* sister"} {#sh 6;chatmsg="chat* ?"} {#sh 7;chatmsg="chat ......."} {#sh 8;chatmsg="chat* hmm"} {#sh 9;chatmsg=%concat( "chat ", @target, "你怎么知道", @msg, "？")} {#sh 10;chatmsg=%concat( "chat 刚刚", @target, "不是说了，", @msg)} {#sh 11;chatmsg=%concat( "chat 我当然知道", @msg)} {#sh 12;chatmsg="chat 然后呢？"} {#sh 13;chatmsg="chat 真的吗？"} {#sh 14;chatmsg="chat 我不这么认为。"}}
#ALIAS sa2 {#wa %random( 100, 1000);#case (%random( 1, 7)) {#sh 1;chatmsg=%concat( "chat ", @target, "，", "你是在问我吗？")} {#sh 2;chatmsg=%concat( "chat 关于", @msg, "....")} {#sh 3;chatmsg="chat 呃……"} {#sh 4;chatmsg="chat 这个问题嘛……"} {#sh 5;chatmsg=%concat( "chat ", @target, "，知道这个问题的答案对你那么重要吗？")} {#sh 6;chatmsg=%concat( "chat ", @target, "，你能不能说清楚一点？")} {#sh 7;chatmsg=%concat( "chat ", @target, "，我不懂你问的问题。")}}
#ALIAS sa3 {#wa %random( 100, 1000);msg=%replace( @msg, "你", "我");#case (%random( 1, 10)) {chatmsg=%concat( "chat ", @target, "，", "你是说", @msg, "吗？")} {chatmsg=%concat( "chat 你确定", @msg, "？")} {chatmsg=%concat( "chat ", @msg, "跟你有什么关系")} {chatmsg=%concat( "chat 嗯……", @target, "说得好！")} {chatmsg=%concat( "chat ", @target, "你为什么对", @msg, "这么有兴趣？")} {chatmsg=%concat( "chat 为什么你认为", @msg, "？")} {chatmsg="chat 换个话题吧。"} {chatmsg="chat 才怪！"} {chatmsg="chat 不一定吧"} {chatmsg="chat 有这个可能。。。"}}
#ALIAS sa4 {#wa %random( 100, 1000);msg=%replace( @msg, "我", "你");#case (%random( 1, 8)) {chatmsg=%concat( "chat ", @target, "你是说", @msg, "吗？")} {chatmsg=%concat( "chat 真的？", @msg, "？")} {chatmsg=%concat( "chat 如果", @msg, "，我能帮你什么忙吗？")} {chatmsg="chat* hmm"} {chatmsg=%concat( "chat 你认为", @msg, "？")} {chatmsg="chat 我有同感。"} {chatmsg=%concat( "chat 你说的 ", @msg, " ，我不能苟同！")} {chatmsg=%concat( "chat 有关 ", @msg, " 的话题到此为止好吗？")}}
#ALIAS sa5 {#case (%random( 1, 8)) {chatmsg="chat 不许拍！再拍你爷爷我把你的爪子剁下来"} {chatmsg="chat 狗腿又发痒了..."} {chatmsg="chat 你们都要好好练功！不要辜负了我的一片苦心"} {chatmsg="chat 「嘎～～嘎～～」"} {chatmsg="chat 我真是神勇无比，天下无敌"} {chatmsg="chat 杀入大雷音寺，抢了他的莲花宝座！"} {chatmsg="chat 大家好!"} {chatmsg="chat 我杀人都杀的手软了。"}}
#ALIAS tsay {@chatmsg}
#ALIAS panduan1 {msg=%replace( @msg, "~", "");chatpd=%eval( %pos( "为什么", @msg)+%pos( "你", @msg)+%pos( "我", @msg));#if (@chatpd=0) {sa1;#sh say1};chatpd=%pos( "为什么", @msg);#if (@chatpd>0) {sa2;#sh say2};chatpd=%begins( @msg, "你");#if (@chatpd>0) {sa3;#sh say3};chatpd=%begins( @msg, "我");#if (@chatpd>0) {sa4;#sh say4};#wa %random( 1000, 3000);tsay}
#ALIAS panduan {chatpd=%eval( %pos( "为什么", @msg)+%pos( "你", @msg)+%pos( "我", @msg));#if (@chatpd=0) {sa1;#sh say1};chatpd=%pos( "为什么", @msg);#if (@chatpd>0) {sa2;#sh say2};chatpd=%begins( @msg, "你");#if (@chatpd>0) {sa3;#sh say3};chatpd=%begins( @msg, "我");#if (@chatpd>0) {sa4;#sh say4};#wa %random( 1000, 3000);tsay}
#VAR chatpd {0}
#VAR msg {听说龙少的镇元神功又有所进境了！？}
#VAR target {琳儿(Lilin)}
#VAR chatmsg {chat 听说龙少的镇元神功又有所进境了！？}
#VAR tempchat {1}



说明，把要屏蔽的id名字和自己的名字写在tempchat=%eval( %pos( "琳儿", @target))里，这里是琳儿说话不触发，否则自己说话也会触发。在7.21下通过，4.62下随机函数有问题，%random(1,14)时，好象只能给出1-5，不知道怎么回事

[onlyhero]

看看,都有什么啊,学习学习

[sailorxu]

回复: 模仿乌鸦说话的triggers
看看,都有什么啊,学习学习

[bcc]

只能小小的顶一下下了!!!!

[hero5d]

我也下个试试！
谢谢楼主！

[lys76]

不明白你说的啥？

[xmw]

顶一下哦。

[yjrgmud]

来看看 来看看 好不好

[bter]

看看从下面的列表中选择信息图

[hids]

什么东西，看看。