?? 中州_消息樹(shù)-0.txt
字號(hào):
[@main]
<$STR(T0)>\\
<滿(mǎn)足要求摘取征婚啟示,嫁給他!/@摘取> <查看征婚啟示介紹/@查看> <離開(kāi)/@exit>
[@摘取]
#IF
gender MAN
#ACT
SENDMSG 5 抱歉,目前暫時(shí)不受理人妖業(yè)務(wù)!你還是一邊去涼快!
break
close
#IF
checkmarry
#ACT
SENDMSG 5 你都結(jié)婚過(guò)了的還來(lái)摘取征婚啟示?
break
#IF
EQUAL T1 無(wú)人
#ACT
SENDMSG 5 今天的的征婚廣告位還沒(méi)有人租用!!你要嫁給誰(shuí)?難道是GM嗎?
break
close
#IF
CHECKLEVELEX < $STR(T2)
#ACT
SENDMSG 5 抱歉!你當(dāng)前的年齡不滿(mǎn)足本次征婚者的要求[<$STR(T2)>]級(jí)!
break
close
#IF
CHECKONLINE $STR(T1)
#ACT
MOV T3 $USERNAME
hcall $STR(T1) @JIEHUNTLSDHI
break
close
#ELSEACT
SENDMSG 5 抱歉!當(dāng)前本次征婚者,俊男[<$STR(T1)>]不在線,你還是等他在線的時(shí)候再來(lái)摘取嫁給他吧!
break
close
[@查看]
是不是為沒(méi)有老婆,找不到對(duì)象而苦惱?沒(méi)有關(guān)系,現(xiàn)在我們給\
你創(chuàng)造找老婆的機(jī)會(huì)!<color=purple 只要你支付1個(gè)元寶,就可以在我這里發(fā)>\
<color=purple 布一次征婚廣告!征婚廣告可以在這里刊登12個(gè)小時(shí)!>只要有滿(mǎn)\
足你條件的女性摘取了你的征婚啟示,那么你們就可以成為夫妻\
了?。?!趕快行動(dòng)吧!!\
\
<我要出錢(qián)做征婚廣告!/@做廣告> <到姻緣神殿辦理離婚/@yinsk>\\
<隨便看看/@exit>
[@yinsk]
#ACT
MAPMOVE SH030 6 20
break
[@做廣告]
#IF
gender MAN
#ELSEACT
SENDMSG 5 抱歉,目前暫時(shí)不受理人妖業(yè)務(wù)!女性還是去找人嫁吧!
break
close
#IF
checkmarry
#ACT
SENDMSG 5 你都結(jié)婚過(guò)了的還做什么廣告?
break
#ELSEACT
queryvalue 請(qǐng)輸入你想給女方的嫁妝名字[漢字?jǐn)⑹?5字內(nèi)] 2 50 5
[@getstring5]
#ACT
Getstring S0
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL s0 <
#ELSEACT
SENDMSG 7 抱歉,你所輸入的內(nèi)容里有服務(wù)器禁止輸入的字符!請(qǐng)重新輸入!
break
#ACT
SENDMSG 7 你設(shè)置的給女方的嫁妝是:[<$STR(S0)>]
DELAY 0 @要求
break
[@要求]
#IF
checkmarry
#ACT
break
#ELSEACT
queryvalue 請(qǐng)輸入你對(duì)女方的等級(jí)要求[數(shù)字50以上] 2 2 6
[@getstring6]
#ACT
Getstring S1
CALCVAR HUMAN SCL = $STR(S1)
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL s1 <
#ELSEACT
SENDMSG 7 抱歉,你所輸入的內(nèi)容里有服務(wù)器禁止輸入的字符!請(qǐng)重新輸入!
break
#IF
CHECKVAR HUMAN SCL < 50
#ACT
MessageBox 對(duì)不起,你輸入等級(jí)要求錯(cuò)誤!請(qǐng)重新輸入!\ \女方最低等級(jí)設(shè)置需要為50級(jí)!
break
close
#ELSEACT
SENDMSG 7 你設(shè)置的對(duì)女方的等級(jí)要求是:[<$STR(S1)>]
DELAY 0 @宣言
break
[@宣言]
#IF
checkmarry
#ACT
break
#ELSEACT
queryvalue 請(qǐng)輸入你對(duì)愛(ài)情的宣言![漢字?jǐn)⑹?0字內(nèi)] 2 60 7
[@getstring7]
#ACT
Getstring S2
#IF
CHECKLEVELEX > 0
#ACT
#ELSEACT
break
#IF
SMALL s2 <
#ELSEACT
SENDMSG 7 抱歉,你所輸入的內(nèi)容里有服務(wù)器禁止輸入的字符!請(qǐng)重新輸入!
break
#ACT
SENDMSG 7 你設(shè)置的你對(duì)愛(ài)情的宣言是:[<$STR(S2)>]
GOTO @顯示
[@顯示]
#ACT
MOV S3 <color=purple[]征婚啟示:>\\姓名:<color=red[]
INC S3 $USERNAME
INC S3 > 性別:男 年齡:
INC S3 $LEVEL
INC S3 級(jí)\家產(chǎn):金幣[
INC S3 $GOLDCOUNT
INC S3 ],元寶[
INC S3 $GAMEGOLD
INC S3 ]個(gè)\<color=purple[]嫁妝>:
INC S3 $STR(S0)
INC S3 \要求:年齡[
INC S3 $STR(S1)
INC S3 ]級(jí)以上無(wú)婚配女性!\<color=purple[]宣言>:
INC S3 $STR(S2)
#SAY
<$STR(S3)>\\
<是否確認(rèn)輸入信息正確?/@正式發(fā)布> <重新修改/@做廣告>
[@正式發(fā)布]
#IF
CHECKLEVELEX < 50
#ACT
SENDMSG 5 發(fā)布征婚廣告需要至少等級(jí)50級(jí)才可以!
break
close
#IF
EQUAL T1 無(wú)人
#ELSEACT
SENDMSG 5 今天的的征婚廣告位已經(jīng)被人租用了!你可以中午12點(diǎn)或者晚上12點(diǎn)再來(lái)發(fā)布!
break
close
#IF
checkmarry
#ACT
SENDMSG 7 結(jié)婚過(guò)了就不要再來(lái)發(fā)布了!
break
#IF
CHECKGAMEGOLD > 0
#ACT
MOV T0 $STR(S3)
MOV T1 $USERNAME
MOV T2 $STR(S1)
GAMEGOLD - 1
CALCVAR HUMAN 消費(fèi) + 1
SAVEVAR HUMAN 消費(fèi) ..\QuestDiary\數(shù)據(jù)文件\消費(fèi).txt
SENDMSG 7 你花費(fèi)了1個(gè)元寶發(fā)布了你的征婚啟示!本次廣告有效時(shí)間12個(gè)小時(shí)!
SENDMSG 0 (☆)俊男[<$USERNAME>]在中州真愛(ài)之樹(shù)處發(fā)布了他的征婚啟示!歡迎全服無(wú)婚配單身美女前往查看!
SENDMSG 8 (☆)俊男[<$USERNAME>]在中州真愛(ài)之樹(shù)處發(fā)布了他的征婚啟示!歡迎全服無(wú)婚配單身美女前往查看!
SENDMSG 10 (☆)俊男[<$USERNAME>]在中州真愛(ài)之樹(shù)處發(fā)布了他的征婚啟示!歡迎全服無(wú)婚配單身美女前往查看!
break
close
#ELSEACT
SENDMSG 7 發(fā)布征婚啟示需要支付1個(gè)元寶!
break
close
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -