BLUE引擎人民币回收脚本，传奇一条龙合击版本开区时怎么...

[@main]
#say
<COLOR=clLime 您当前的人民币为>:<$HUMAN(人民币)>元   <COLOR=clLime 您当前的殺神币为>:<$HUMAN(殺神币)>殺神币  \
<COLOR=clLime 日月星辰首饰> =<COLOR=clRed 5元RMB  武器=25元RMB 衣服=15元RMB> <一键回收/@aa5>\
<COLOR=clLime 屠神灭佛首饰> =<COLOR=clRed 1元RMB  武器=10元RMB  衣服=5元RMB> <一键回收/@aa1>\
<COLOR=clLime [殺神]日月星辰※神章> =<COLOR=clRed  30元RMB>                      <一键回收/@aa6>\
<COLOR=clLime [殺神]日月星辰※神笠> =<COLOR=clRed  30元RMB>                      <一键回收/@aa7>\  
<提取RMB卷/@10> \
[@aa5]
#if
checkitem [殺神]日月星辰※圣甲 1
#act
TAKE [殺神]日月星辰※圣甲 1
CALCVAR HUMAN 人民币 + 15
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]日月星辰※圣甲〕\

#if
checkitem [殺神]日月星辰※圣衣 1
#act
TAKE [殺神]日月星辰※圣衣 1
CALCVAR HUMAN 人民币 + 15
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]日月星辰※圣衣〕\

#if
checkitem [殺神]日月星辰※圣盔 1
#act
TAKE [殺神]日月星辰※圣盔 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[斩天]霸王Max★神盔〕\

#if
checkitem [殺神]日月星辰※圣链 1
#act
TAKE [殺神]日月星辰※圣链 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[斩天]霸王Max★神链〕\

#if
checkitem [殺神]日月星辰※圣镯 1
#act
TAKE [殺神]日月星辰※圣镯 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[斩天]霸王Max★神镯〕\

#if
checkitem [殺神]日月星辰※圣戒 1
#act
TAKE [殺神]日月星辰※圣戒 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[斩天]霸王Max★神戒〕\

#if
checkitem [殺神]日月星辰※圣带 1
#act
TAKE [殺神]日月星辰※圣带 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[斩天]霸王Max★神带〕\

#if
checkitem [殺神]日月星辰※圣靴 1
#act
TAKE [殺神]日月星辰※圣靴 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[斩天]霸王Max★神靴〕\

#if
checkitem [殺神]日月星辰※圣斩 1
#act
TAKE [殺神]日月星辰※圣斩 1
CALCVAR HUMAN 人民币 + 25
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]日月星辰※圣斩〕\
goto @main
#elseact
messagebox 您没有此类装备.
break


[@aa1]
#if
checkitem [殺神]屠神灭佛※神甲 1
#act
TAKE [殺神]屠神灭佛※神甲 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神甲〕\

#if
checkitem [殺神]屠神灭佛※神衣 1
#act
TAKE [殺神]屠神灭佛※神衣 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神衣〕\

#if
checkitem [殺神]屠神灭佛※神盔 1
#act
TAKE [殺神]屠神灭佛※神盔 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神盔〕\

#if
checkitem [殺神]屠神灭佛※神链 1
#act
TAKE [殺神]屠神灭佛※神链 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神链〕\

#if
checkitem [殺神]屠神灭佛※神镯 1
#act
TAKE [殺神]屠神灭佛※神镯 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神镯〕\

#if
checkitem [殺神]屠神灭佛※神戒 1
#act
TAKE [殺神]屠神灭佛※神戒 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神戒〕\

#if
checkitem [殺神]屠神灭佛※神带 1
#act
TAKE [殺神]屠神灭佛※神带 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神带〕\

#if
checkitem [殺神]屠神灭佛※神靴 1
#act
TAKE [殺神]屠神灭佛※神靴 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神靴〕\

#if
checkitem [殺神]屠神灭佛※神斩 1
#act
TAKE [殺神]屠神灭佛※神斩 1
CALCVAR HUMAN 人民币 + 10
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]屠神灭佛※神斩〕\
goto @main
#elseact
messagebox 您没有此类装备.
break
;=====================================================================
[@aa6]
#if
checkitem [殺神]日月星辰※圣章 1
#act
TAKE [殺神]日月星辰※圣章 1
CALCVAR HUMAN 人民币 + 30
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]日月星辰※圣章〕\
goto @main
#elseact
messagebox 您没有此类装备.
break

;=====================================================================

[@aa7]
#if
checkitem [殺神]日月星辰※圣笠 1
#act
TAKE [殺神]日月星辰※圣笠 1
CALCVAR HUMAN 人民币 + 30
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[殺神]日月星辰※圣笠〕\
goto @main
#elseact
messagebox 您没有此类装备.
break

;=====================================================================

[@aa2]
#if
checkitem [仙甲]十殿阎罗 1
#act
TAKE [仙甲]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[仙甲]十殿阎罗〕\

#if
checkitem [仙衣]十殿阎罗 1
#act
TAKE [仙衣]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[仙衣]十殿阎罗〕\

#if
checkitem [仙盔]十殿阎罗 1
#act
TAKE [仙盔]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔十殿阎罗首饰〕\


#if
checkitem [仙镯]十殿阎罗 1
#act
TAKE [仙镯]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔十殿阎罗首饰〕\

#if
checkitem [仙戒]十殿阎罗 1
#act
TAKE [仙戒]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔十殿阎罗首饰〕\

#if
checkitem [仙带]十殿阎罗 1
#act
TAKE [仙带]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔十殿阎罗首饰〕\

#if
checkitem [仙靴]十殿阎罗 1
#act
TAKE [仙靴]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔十殿阎罗首饰〕\

#if
checkitem [仙链]十殿阎罗 1
#act
TAKE [仙链]十殿阎罗 1
CALCVAR HUMAN 人民币 + 2
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔十殿阎罗首饰〕\

#if
checkitem [魔斩]十殿阎罗 1
#act
TAKE [魔斩]十殿阎罗 1
CALCVAR HUMAN 人民币 + 20
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[魔斩]十殿阎罗〕\
goto @main
#elseact
messagebox 您没有此类装备.
break



;=====================================================================
[@aa3]
#if
checkitem [仙甲]九幽地狱 1
#act
TAKE [仙甲]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[仙甲]九幽地狱〕\

#if
checkitem [仙衣]九幽地狱 1
#act
TAKE [仙衣]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[仙衣]九幽地狱〕\

#if
checkitem [仙盔]九幽地狱 1
#act
TAKE [仙盔]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔九幽地狱首饰〕\

#if
checkitem [仙链]九幽地狱 1
#act
TAKE [仙链]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔九幽地狱首饰〕\

#if
checkitem [仙镯]九幽地狱 1
#act
TAKE [仙镯]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔九幽地狱首饰〕\

#if
checkitem [仙戒]九幽地狱 1
#act
TAKE [仙戒]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔九幽地狱首饰〕\

#if
checkitem [仙带]九幽地狱 1
#act
TAKE [仙带]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔九幽地狱首饰〕\

#if
checkitem [仙靴]九幽地狱 1
#act
TAKE [仙靴]九幽地狱 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔九幽地狱首饰〕\

#if
checkitem [魔斩]九幽地狱 1
#act
TAKE [魔斩]九幽地狱 1
CALCVAR HUMAN 人民币 + 5
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔『仙斩』九幽地狱〕\
goto @main
#elseact
messagebox 您没有此类装备.
break

;==================================================================
[@aa4]
#if
checkitem [仙甲]罪恶滔天 1
#act
TAKE [仙甲]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔[仙甲]罪恶滔天〕\

#if
checkitem [仙衣]罪恶滔天 1
#act
TAKE [仙衣]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔[仙衣]罪恶滔天〕\

#if
checkitem [仙盔]罪恶滔天 1
#act
TAKE [仙盔]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔罪恶滔天首饰〕\

#if
checkitem [仙链]罪恶滔天 1
#act
TAKE [仙链]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔罪恶滔天首饰〕\

#if
checkitem [仙镯]罪恶滔天 1
#act
TAKE [仙镯]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔罪恶滔天首饰〕\

#if
checkitem [仙戒]罪恶滔天 1
#act
TAKE [仙戒]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔罪恶滔天首饰〕\

#if
checkitem [仙带]罪恶滔天 1
#act
TAKE [仙带]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔罪恶滔天首饰〕\

#if
checkitem [仙靴]罪恶滔天 1
#act
TAKE [仙靴]罪恶滔天 1
CALCVAR HUMAN 殺神币 + 100
SAVEVAR HUMAN 殺神币 ..\QuestDiary\数据文件\殺神币Save.txt
SENDMSG 5  恭喜您回收了〔罪恶滔天首饰〕\



#if
checkitem [魔斩]罪恶滔天 1
#act
TAKE [魔斩]罪恶滔天 1
CALCVAR HUMAN 人民币 + 1
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  恭喜您回收了〔[魔斩]罪恶滔天〕\
goto @main
#elseact
messagebox 您没有此类装备.
break

;==================================================================


[@10]
#if
#say
您当前的人民币为:<$HUMAN(人民币)>.\
------------------------------------------\
〔<提取100元人民币/@R11>〕　 〔<提取50元人民币/@R12>〕\ \
〔<提取10元人民币/@R13>〕　  〔<提取20元人民币/@R14>〕\ \
------------------------------------------\
〔<点击返回主页/@main>〕\


[@R11]
#IF
CHECKVAR HUMAN 人民币 > 99
#ACT
give 一百元人民币 1
CALCVAR HUMAN 人民币 - 100
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  您成功提取100人民币.
#elseact
messagebox 您的人民币不足.
break

[@R12]
#IF
CHECKVAR HUMAN 人民币 > 49
#ACT
give 五十元人民币 1
CALCVAR HUMAN 人民币 - 50
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  您成功提取50人民币.
#elseact
messagebox 您的人民币不足.
break


[@R13]
#IF
CHECKVAR HUMAN 人民币 > 9
#ACT
give 十元人民币 1
CALCVAR HUMAN 人民币 - 10
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  您成功提取10人民币.
#elseact
messagebox 您的人民币不足.
break


[@R14]
#IF
CHECKVAR HUMAN 人民币 > 19
#ACT
give 二十元人民币 1
CALCVAR HUMAN 人民币 - 20
SAVEVAR HUMAN 人民币 ..\QuestDiary\数据文件\人民币Save.txt
SENDMSG 5  您成功提取20人民币.
#elseact
messagebox 您的人民币不足.
break