GS引擎
传世版本库
星河广告代理QQ 才子: 3174586943 点击QQ自动复制 AFT引擎: 1003562644 点击QQ自动复制
您已经复制此QQ,请加好友打广告吧

随身服务

[复制链接]
查看111 | 回复0 | 2025-12-29 16:48:55 | 显示全部楼层 |阅读模式
[@随身服务]
{

#IF
check [7] 1
#ACT
MOV S1 <全屏拾取开关→开启中/@全屏开关>
#ELSEACT
MOV S1 <全屏拾取开关→关闭中/@全屏开关>

#IF
TRUE
#SAY

      目前开区第[<$STR(G2)>]天[<$STR(G1)>]分  <color=0X00FFFF 您今日充值:>[<$CustomValue(79)>]\\

      <远程仓库/@Faststorge>       <材料仓库/@材料仓库>       <自动回收/@自动化回收>\\
      <自动挂机/@挂机的令牌>       <存储金币/@kuajiejinbi>       <存储声望/@kuaijieshengwang>\\
      <天王地图/@天王图>       <主宰地图/@特权图>       <color=RED 阶段进阶/@阶段进阶>\\
      <$STR(S1)><color=GREEN ~Het需开启主宰称号!>\
<COLOR=00FFFF ---------------------------------------------------->
#act
BREAK

[@阶段进阶]
#CALL [\游戏功能\进阶突破.txt] @阶段突破


[@特权图]
#IF
EQUAL $CUSTOMVALUE(98) 1
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图1阶段/@特权宝图&ZZ-1>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 2
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图2阶段/@特权宝图&ZZ-2>  <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 3
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图3阶段/@特权宝图&ZZ-3>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 4
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图4阶段/@特权宝图&ZZ-4>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 5
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图5阶段/@特权宝图&ZZ-5>   <返回主页/@随身服务>\\

#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 6
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图6阶段/@特权宝图&ZZ-6>  <返回主页/@随身服务>\\

#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 7
#SAY
\
至尊主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <主宰专属地图7阶段/@特权宝图&ZZ-7>\\
  <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 8
#SAY
\
主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
<主宰专属地图8阶段/@特权宝图&ZZ-8>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 9
#SAY
\
主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
<主宰专属地图9阶段/@特权宝图&ZZ-9>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 10
#SAY
\
主宰特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
<主宰专属地图10阶段/@特权宝图&ZZ-10>   <返回主页/@随身服务>\\
#ACT
BREAK



[@天王图]

#IF
EQUAL $CUSTOMVALUE(98) 1
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图1阶段/@天王特权&TW-1>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 2
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
<天王专属地图2阶段/@天王特权&TW-2>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 3
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图3阶段/@天王特权&TW-3>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 4
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
<天王专属地图4阶段/@天王特权&TW-4>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 5
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
<天王专属地图5阶段/@天王特权&TW-5>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 6
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图6阶段/@天王特权&TW-6>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 7
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图7阶段/@天王特权&TW-7>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 8
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图8阶段/@天王特权&TW-8>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 9
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图9阶段/@天王特权&TW-9>   <返回主页/@随身服务>\\
#ACT
BREAK

#IF
EQUAL $CUSTOMVALUE(98) 10
#SAY
\
圣武天王特权专用BOS地图,根据阶段进入地图不同\
地图刷新3个精英和一个BOS(120分钟刷新一次)\\
<color=purple 爆:天元石(中),高级骑术丹,普通祝福石等等稀有>\\
  <天王专属地图10阶段/@天王特权&TW-10>   <返回主页/@随身服务>\\
#ACT
BREAK

[@特权宝图]

#IFONE

EQUAL $M 128

EQUAL $M xsdds
#ACT
MESSAGEBOX 本地图禁止传送
BREAK


#IF
EQUAL $DABAOLV 4
#ACT
MAPMOVE $SCRIPTPARAM(1)
break
#ELSEACT
SENDMSG 5 你不是至尊主宰,我无法送你,请小地图特字处查看


[@天王特权]
#IFONE

EQUAL $M 128

EQUAL $M xsdds
#ACT
MESSAGEBOX 本地图禁止传送
BREAK

#IF
LARGE $DABAOLV 2
#ACT
MAPMOVE $SCRIPTPARAM(1)
break
#ELSEACT
SENDMSG 5 你不是圣武天王或者至尊主宰,请小地图特字处查看










[@kuaijiebangjin]
\
  我们远道而来开设分店,还望各位英雄多多惠顾目前不收\
  保管费,绑金太多可以先放我这里,我的存取是亿为单位的!\
\
  <储存1亿绑金/@储存绑金>   <取出1亿绑金/@取款绑金>   <color=green 你目前金库绑金为:>{color=red <$CustomValue(27)>}亿\\
  <清除绑定金币/@清理绑定> <Color=00FF00 此为绑定金币过多清除掉,清完就没有了>\\
  绑定金币如果自行清除后,无法找回,请谨慎操作,后果自负!


[@清理绑定]
#IF
CHECKBINDGOLD > 999
#ACT
SENDMSG  7 清理绑定金币成功
BINDGOLD = 0
BREAK




;--存金币-----------------------------------------------------------------------

[@kuajiejinbi]
\
  我们远道而来开设分店,还望各位英雄多多惠顾目前不收\
  保管费,钱太多可以先放我这里,我的存取是亿为单位的!\
\
<储存1亿金币/@储存金币> <取出1亿金币/@取款金币>  <color=green 你目前金库金币为:>{color=red <$CustomValue(25)>}亿\\
<存1千万绑金/@储存绑金> <取1千万绑金/@取款绑金>  <color=green 存金库绑金为:>{color=red <$CustomValue(27)>}千万\\



[@储存绑金]
#IF
CHECKBINDGOLD > 9999999
#ACT
CHANGECUSTOMVALUE 27 + 1
BINDGOLD - 10000000
GOTO @kuajiejinbi
SENDMSG  7 储存1千万绑金成功,目前存款<$CustomValue(27)>千万,提醒:绑金携带过多会自动停止打怪
BREAK
#ELSEACT
SENDMSG 7 绑金不足1千万,无法储存
BREAK

[@取款绑金]
#IF
LARGE $CustomValue(27) 0
#ACT
CHANGECUSTOMVALUE 27 - 1
BINDGOLD + 10000000
GOTO @kuajiejinbi
SENDMSG  7 取款1亿绑金成功,目前存款<$CustomValue(27)>千万,提醒:绑金携带过多会自动停止打怪
BREAK
#ELSEACT
SENDMSG 7 存款不足,无法取出,
BREAK        


[@储存金币]
#IF
CHECKGOLD  100000000
#ACT
CHANGECUSTOMVALUE 25 + 1
TAKE 金币 100000000
GOTO @kuajiejinbi
SENDMSG  7 储存1亿金币成功,目前存款<$CustomValue(25)>亿,提醒:身上最高携带20亿,超出会归零
BREAK
#ELSEACT
SENDMSG 7 金币不足1亿,无法储存
BREAK

[@取款金币]
#IF
!CHECKGOLD  1900000000
LARGE $CustomValue(25) 0
#ACT
CHANGECUSTOMVALUE 25 - 1
GIVE 金币 100000000
GOTO @kuajiejinbi
SENDMSG  7 取款1亿金币成功,目前存款<$CustomValue(25)>亿,提醒:身上最高携带20亿,超出会归零
BREAK
#ELSEACT
SENDMSG 7 存款不足,无法取出,或者金币超过20亿
BREAK


;--存声望-----------------------------------------------------------------------
[@kuaijieshengwang]
\
  我们远道而来开设分店,还望各位英雄多多惠顾目前不收\
  保管费,声望太多可以先放我这里,我的存取是百万为单位的!\
\
  <储存1百万声望/@储存声望>   <取出1百万声望/@取款声望>   <color=green 你目前声望为:>{color=red <$CustomValue(26)>}百万\\
  <储存1  亿声望/@储存声望亿>   <取出1  亿声望/@取款声望亿>   <color=green 你目前声望为:>{color=red <$CustomValue(28)>}亿



[@储存声望亿]
#IF
CHECKCREDITPOINT > 99999999
#ACT
CHANGECUSTOMVALUE 28 + 1
CREDITPOINT - 100000000
GOTO @kuaijieshengwang
SENDMSG  7 成功储存1亿声望,目前存款<$CustomValue(28)>亿
BREAK
#ELSEACT
SENDMSG 7 声望不足1亿,无法储存
BREAK

[@取款声望亿]
#IF
CHECKCREDITPOINT > 1899999999
#ACT
SENDMSG 7 你身上携带的声望超过19亿
BREAK


#IF
LARGE $CustomValue(28) 0
#ACT
CHANGECUSTOMVALUE 28 - 1
CREDITPOINT + 100000000
GOTO @kuaijieshengwang
SENDMSG  7 成功取出1亿声望,目前存款<$CustomValue(28)>亿
BREAK
#ELSEACT
SENDMSG 7 存储声望不足1亿,无法取出
BREAK





[@储存声望]
#IF
CHECKCREDITPOINT > 999999
#ACT
CHANGECUSTOMVALUE 26 + 1
CREDITPOINT - 1000000
GOTO @kuaijieshengwang
SENDMSG  7 成功储存1百万声望,目前存款<$CustomValue(26)>百万
BREAK
#ELSEACT
SENDMSG 7 声望不足1百万,无法储存
BREAK

[@取款声望]
#IF
CHECKCREDITPOINT > 1899999999
#ACT
SENDMSG 7 你身上携带的声望超过19亿
BREAK


#IF
LARGE $CustomValue(26) 0
#ACT
CHANGECUSTOMVALUE 26 - 1
CREDITPOINT + 1000000
GOTO @kuaijieshengwang
SENDMSG  7 成功取出1百万声望,目前存款<$CustomValue(26)>百万
BREAK
#ELSEACT
SENDMSG 7 存储声望不足1百万,无法取出
BREAK

[@材料仓库]
#IF
TRUE
#ACT
GOTO @材料仓库显示&0

[@材料仓库显示]
#IF
TRUE
#ACT
CLEARVAR S0 99
GOTO @获取自动存仓选择&<$SCRIPTPARAM(1)>
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S1 $INC.$SCRIPTPARAM(1).0
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S2 $INC.$SCRIPTPARAM(1).1
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S3 $INC.$SCRIPTPARAM(1).2
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S4 $INC.$SCRIPTPARAM(1).3
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S5 $INC.$SCRIPTPARAM(1).4
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S6 $INC.$SCRIPTPARAM(1).5
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S7 $INC.$SCRIPTPARAM(1).6
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S8 $INC.$SCRIPTPARAM(1).7




#IF
!EQUAL S1
#ACT
SPLIT $STR(S1) - S10
#IF
!EQUAL S2
#ACT
SPLIT $STR(S2) - S20
#IF
!EQUAL S3
#ACT
SPLIT $STR(S3) - S30
#IF
!EQUAL S4
#ACT
SPLIT $STR(S4) - S40
#IF
!EQUAL S5
#ACT
SPLIT $STR(S5) - S50
#IF
!EQUAL S6
#ACT
SPLIT $STR(S6) - S60
#IF
!EQUAL S7
#ACT
SPLIT $STR(S7) - S70
#IF
!EQUAL S8
#ACT
SPLIT $STR(S8) - S80

#IF
!EQUAL S10
#ACT
FORMATSTR S201 %-16s $STR(S10)
FORMATSTR S101 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).1>
#IF
!EQUAL S20
#ACT
FORMATSTR S202 %-16s $STR(S20)
FORMATSTR S102 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).2>
#IF
!EQUAL S30
#ACT
FORMATSTR S203 %-16s $STR(S30)
FORMATSTR S103 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).3>
#IF
!EQUAL S40
#ACT
FORMATSTR S204 %-16s $STR(S40)
FORMATSTR S104 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).4>
#IF
!EQUAL S50
#ACT
FORMATSTR S205 %-16s $STR(S50)
FORMATSTR S105 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).5>
#IF
!EQUAL S60
#ACT
FORMATSTR S206 %-16s $STR(S60)
FORMATSTR S106 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).6>
#IF
!EQUAL S70
#ACT
FORMATSTR S207 %-16s $STR(S70)
FORMATSTR S107 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).7>
#IF
!EQUAL S80
#ACT
FORMATSTR S208 %-16s $STR(S80)
FORMATSTR S108 %-8s $TABLE(CLCK).CLCK_<$INC.$SCRIPTPARAM(1).8>

#IF
!EQUAL S10
#SAY
<$STR(s211)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).1>&<$SCRIPTPARAM(1)>}  <$STR(S201)>  数量:<$STR(S101)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).1>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).1>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\
#IF
!EQUAL S20
#SAY
<$STR(s212)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).2>&<$SCRIPTPARAM(1)>}  <$STR(S202)>  数量:<$STR(S102)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).2>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).2>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\
#IF
!EQUAL S30
#SAY
<$STR(s213)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).3>&<$SCRIPTPARAM(1)>}  <$STR(S203)>  数量:<$STR(S103)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).3>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).3>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\
#IF
!EQUAL S40
#ACT
#SAY
<$STR(s214)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).4>&<$SCRIPTPARAM(1)>}  <$STR(S204)>  数量:<$STR(S104)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).4>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).4>&<$SCRIPTPARAM(1)>}\
#ELSESAY
\
#IF
!EQUAL S50
#SAY
<$STR(s215)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).5>&<$SCRIPTPARAM(1)>}  <$STR(S205)>  数量:<$STR(S105)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).5>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).5>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\
#IF
!EQUAL S60
#SAY
<$STR(s216)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).6>&<$SCRIPTPARAM(1)>}  <$STR(S206)>  数量:<$STR(S106)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).6>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).6>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\
#IF
!EQUAL S70
#SAY
<$STR(s217)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).7>&<$SCRIPTPARAM(1)>}  <$STR(S207)>  数量:<$STR(S107)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).7>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).7>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\
#IF
!EQUAL S80
#SAY
<$STR(s218)>{自动存/@勾选自动存仓&<$INC.$SCRIPTPARAM(1).8>&<$SCRIPTPARAM(1)>}  <$STR(S208)>  数量:<$STR(S108)> {存入/@材料仓库存入&<$INC.$SCRIPTPARAM(1).8>&<$SCRIPTPARAM(1)>}   {取出/@材料仓库取出&<$INC.$SCRIPTPARAM(1).8>&<$SCRIPTPARAM(1)>} \
#ELSESAY
\



#IF
LARGE $SCRIPTPARAM(1) 0
#ACT
MOV S66   
INC S66 <一键勾选/@一键勾选>  {上一页/@材料仓库显示&<$DEC.$SCRIPTPARAM(1).8>}
#ELSEACT
MOV S66   
INC S66 <一键勾选/@一键勾选>  <上一页/@>

#IF
SMALL <$INC.$SCRIPTPARAM(1).8> <$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)>
EQUAL $MOD^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8 0
#ACT
INC S66     
INC S66 <$Inc.$DIV^$SCRIPTPARAM(1)^8.1>/{$INC.<$DIV^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8>.0}
INC S66     
INC S66 {下一页/@材料仓库显示&<$INC.$SCRIPTPARAM(1).8>}

#IF
SMALL <$INC.$SCRIPTPARAM(1).8> <$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)>
!EQUAL $MOD^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8 0
#ACT
INC S66     
INC S66 <$Inc.$DIV^$SCRIPTPARAM(1)^8.1>/{$INC.<$DIV^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8>.1}
INC S66     
INC S66 {下一页/@材料仓库显示&<$INC.$SCRIPTPARAM(1).8>}

#IF
!SMALL <$INC.$SCRIPTPARAM(1).8> <$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)>
EQUAL $MOD^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8 0
#ACT
INC S66  
INC S66 <$Inc.$DIV^$SCRIPTPARAM(1)^8.1>/{$INC.<$DIV^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8>.0}
INC S66     
INC S66 <下一页/@>

#IF
!SMALL <$INC.$SCRIPTPARAM(1).8> <$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)>
!EQUAL $MOD^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8 0
#ACT
INC S66     
INC S66 <$Inc.$DIV^$SCRIPTPARAM(1)^8.1>/{$INC.<$DIV^$TXTLINE(..\QuestDiary\功能杂物\材料仓库.TXT)^8>.1}
INC S66     
INC S66 <下一页/@>

#IF
TRUE
#SAY
<$STR(S66)>

[@一键勾选]
#IF
small $DEC.$LONGDATE.$STR(P89) 3
#ACT
mov P77 $DEC.3.<$DEC.$LONGDATE.$STR(P89)>
SendMsg 5 你的操作过于频繁,请<$STR(P77)>秒后再进行此操作!
break
#ELSEACT
mov P89 $LONGDATE
MOV D1 0

#IF
CHECK [261] 0
#ACT
SET [261] 1
FORLOOP D1 > 135
INC D1 1
TABLE ZDCC ZDCC_<$STR(D1)> = 1
ENDFORLOOP
SENDMSG 6 一键开启全部材料自动存仓
GOTO @材料仓库显示&0
BREAK
#ELSEACT
SET [261] 0
FORLOOP D1 > 135
INC D1 1
TABLE ZDCC ZDCC_<$STR(D1)> = 0
ENDFORLOOP
SENDMSG 6 一键关闭全部材料自动存仓
GOTO @材料仓库显示&0
BREAK



[@材料仓库存入]
#IF
TRUE
#ACT
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S1 $DEC.$SCRIPTPARAM(1).1
SPLIT $STR(S1) - S11

#IF
CHECKITEM $STR(S11) 1
#ACT
TAKE $STR(S11) 999
TABLE CLCK CLCK_<$SCRIPTPARAM(1)> + $PARAM(12)
sendmsg 6 成功存入了{$STR(S11)}*<$PARAM(12)>.
GOTO @材料仓库显示&<$SCRIPTPARAM(2)>
#ELSEACT
SENDMSG 5 你背包里没有<$STR(S11)>.
BREAK



[@材料仓库取出]
#IF
TRUE
#ACT
MOV D$临时变量 $SCRIPTPARAM(1)
QUERYVAL 1 1 5 @材料仓库取出1 请输入需要取出材料的数量
BREAK

[@材料仓库取出1]
#IF
SMALL $STR(M1) 1
#ACT
SENDMSG 5 输入错误.
BREAK

#IF
TRUE
#ACT
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S$临时取出 $DEC.$STR(D$临时变量).1
SPLIT $STR(S$临时取出) - S11
#IF
!CHECKBAGSIZE 1            ;其它材料类检测1个格子
#ACT
SENDMSG 5 背包格子不足.
BREAK

#IF
!CHECKBAGSIZE $STR(M1)      ;非材料物品需要检测对应的格子
POS -普通祝福石-太阳神水-强效太阳神水-金创药(大量)-魔法药(大量)-精力药水(大)-治疗药水-金创药(中量)-神秘灵匣-功勋宝珠(大)-功勋宝珠(小)-功勋宝珠(中)-穿透宝石三级-生命宝石三级-防御宝石三级-攻击宝石三级-韧性宝石三级-暴击宝石三级-魔防宝石三级-物透宝石三级-魔透宝石三级-祝福神油-天元石(中)-荣耀宝石1级-荣耀勋章1级-破盾斩-金刚护体-狂龙紫电-流星火雨-幽冥火咒-强化骷髅术-心灵召唤-元神破盾斩-元神金刚护体-元神狂龙紫电-元神幽冥火咒-元神强化骷髅术-移形换影-化身蝙蝠-遁地-元神移形换影-元神化身蝙蝠-元神遁地-魔王之链一级-魔王之盔一级-魔王之镯一级-魔王之戒一级-魔王之带一级-魔王之靴一级-神兵·嗜血1阶-神兵·破军1阶-神兵·狂暴1阶-神兵·天机1阶-神兵·穿杨1阶-神兵·虚空1阶-神兵·神力1阶-红莲(一级)-火纹(一级)-赤阳(一级)-六阳(一级)-水月(一级)-冰魄(一级)-寒霜(一级)-北冥(一级)-怒斩天下残章-迷光烈焰残章-天怒惊雷残章-神之召唤残章-天女散花咒残章-火毒攻心剑残章-主强化火球残章-主强化施毒残章-主强化攻杀残章-元强化火球残章-元强化施毒残章-元强化攻杀残章- -<$STR(S11)>-
#ACT
SENDMSG 5 背包格子不足<$STR(M1)>.
BREAK

#IF
!SMALL $TABLE(CLCK).CLCK_<$STR(D$临时变量)> $STR(M1)
#ACT
TABLE CLCK CLCK_<$STR(D$临时变量)> - $STR(M1)
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S1 $DEC.$STR(D$临时变量).1
SPLIT $STR(S1) - S11
GIVE $STR(S11) $STR(M1)
sendmsg 6 成功取出了<$STR(S11)>*<$STR(M1)>.
GOTO @材料仓库显示&<$SCRIPTPARAM(2)>
BREAK
#ELSEACT
SENDMSG 5 材料仓库没有<$STR(M1)>个{$STR(S11)}.
BREAK

[@获取自动存仓选择]

#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).1> 1
#act
MOV S211 <@@!PIC2#323,1202>
#ELSEACT
MOV S211 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).2> 1
#act
MOV S212 <@@!PIC2#323,1202>
#ELSEACT
MOV S212 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).3> 1
#act
MOV S213 <@@!PIC2#323,1202>
#ELSEACT
MOV S213 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).4> 1
#act
MOV S214 <@@!PIC2#323,1202>
#ELSEACT
MOV S214 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).5> 1
#act
MOV S215 <@@!PIC2#323,1202>
#ELSEACT
MOV S215 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).6> 1
#act
MOV S216 <@@!PIC2#323,1202>
#ELSEACT
MOV S216 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).7> 1
#act
MOV S217 <@@!PIC2#323,1202>
#ELSEACT
MOV S217 <@@!PIC2#323,1201>
#IF
EQUAL $TABLE(ZDCC).ZDCC_<$INC.$SCRIPTPARAM(1).8> 1
#act
MOV S218 <@@!PIC2#323,1202>
#ELSEACT
MOV S218 <@@!PIC2#323,1201>

[@勾选自动存仓]
#IF
TRUE
#ACT
ReadRandomStr ..\QuestDiary\功能杂物\材料仓库.txt S1 $DEC.$SCRIPTPARAM(1).1
SPLIT $STR(S1) - S11

#IF
EQUAL $TABLE.ZDCC.ZDCC_<$SCRIPTPARAM(1)> 1
#act
TABLE ZDCC ZDCC_<$SCRIPTPARAM(1)> = 0
SENDMSG 6 关闭了自动存仓:【<$STR(S11)>】
GOTO @材料仓库显示&<$SCRIPTPARAM(2)>
#ELSEACT
TABLE ZDCC ZDCC_<$SCRIPTPARAM(1)> = 1
SENDMSG 6 开启了自动存仓:【<$STR(S11)>】
GOTO @材料仓库显示&<$SCRIPTPARAM(2)>



[@kuaijieshengwang]
/
请至各个地图仓库管理员处存储\
中州坐标:487:237\
中州广场坐标:87:73\



[@全屏开关]
#IF
SMALL $DABAOLV 4
#ACT
messagebox \\开启主宰特权方可开启此功能!
BREAK




#IF
check [7] 0
#Act
RANGEPICK 1 0
SET [7] 1
GOTO @随身服务
messagebox 您开启了全屏拾取
break
#ELSEACT
RANGEPICK 0 0
SET [7] 0
messagebox 您关闭了全屏拾取
GOTO @随身服务

[@挂机的令牌]
#CALL [\游戏功能\挂机设置.txt] @挂机相关设置



[@开启换装====]
#IF
EQUAL $DABAOLV 4
#ACT
#ELSEACT
SENDMSG 5 你不是至尊主宰,无法使用!
#SAY
         <Color=00ff00 《· 自动换装·》>\
<Color=808080 ━━━━━━━━━━━━━━━━━━━>\

<武器换装/@ZIDCD&ZFBL_33><$TABLE(ZFBL).ZFBL_33>   <衣服换装/@ZIDCD&ZFBL_34><$TABLE(ZFBL).ZFBL_34>  <头盔换装/@ZIDCD&ZFBL_35><$TABLE(ZFBL).ZFBL_35>\
<项链换装/@ZIDCD&ZFBL_36><$TABLE(ZFBL).ZFBL_36>   <左手换装/@ZIDCD&ZFBL_37><$TABLE(ZFBL).ZFBL_37>  <右手换装/@ZIDCD&ZFBL_38><$TABLE(ZFBL).ZFBL_38>\
<左戒换装/@ZIDCD&ZFBL_39><$TABLE(ZFBL).ZFBL_39>   <右指换装/@ZIDCD&ZFBL_40><$TABLE(ZFBL).ZFBL_40>  <靴子换装/@ZIDCD&ZFBL_41><$TABLE(ZFBL).ZFBL_41>\
<腰带换装/@ZIDCD&ZFBL_42><$TABLE(ZFBL).ZFBL_42>   <龙魂换装/@ZIDCD&ZFBL_43><$TABLE(ZFBL).ZFBL_43>  <面具换装/@ZIDCD&ZFBL_49><$TABLE(ZFBL).ZFBL_49>\
<勋章换装/@ZIDCD&ZFBL_44><$TABLE(ZFBL).ZFBL_44>   <盾牌换装/@ZIDCD&ZFBL_45><$TABLE(ZFBL).ZFBL_45>  <魂珠换装/@ZIDCD&ZFBL_46><$TABLE(ZFBL).ZFBL_46>\
<宝石换装/@ZIDCD&ZFBL_47><$TABLE(ZFBL).ZFBL_47>   <护符换装/@ZIDCD&ZFBL_48><$TABLE(ZFBL).ZFBL_48>  \
<Color=808080 ━━━━━━━━━━━━━━━━━━━> <Color=00FF00 返回首页/@随身服务>\


;=============================================
[@ZIDCD]
#IF
TRUE
#ACT
MOV S2 {$TABLE(ZFBL).<$SCRIPTPARAM(1)>}

#IF
EQUAL S2 <@@!PIC2#323,1201>
#ACT
TABLE ZFBL <$SCRIPTPARAM(1)> = <@@!PIC2#323,1202>
GOTO @开启换装
#ELSEACT
TABLE ZFBL <$SCRIPTPARAM(1)> = <@@!PIC2#323,1201>
GOTO @开启换装







[@自动化回收]
   在随身包裹里面无法回收的我这里才可以回收,\
   <Color=808080 ━━━━━━━━━━━━━━━━━━━━━━━━>\
   <$TABLE(ZDHSHOU).ZDHS_2><Color=00FFFF 开关/@KAIGUAN&ZDHS_2&回收>/<Color=00ff00 普通装备类/@不绑金币回收&普通装备类>    <可以回收普通装备类名单/@装备类名单>\
   <$TABLE(ZDHSHOU).ZDHS_5><Color=00FFFF 开关/@KAIGUAN&ZDHS_5&回收>/<Color=00ff00 普通技能类/@不绑金币回收&普通技能类>    <可以回收普通技能类名单/@技能类名单>\
   <$TABLE(ZDHSHOU).ZDHS_4><Color=00FFFF 开关/@KAIGUAN&ZDHS_4&回收>/<Color=00ff00 五级技能书/@绑定金币回收&五级技能书>    <可以回收五级技能书名单/@五级技能名单>\
   <$TABLE(ZDHSHOU).ZDHS_3><Color=00FFFF 开关/@KAIGUAN&ZDHS_3&回收>/<Color=00ff00 沙城装回收/@不绑金币回收&沙城装备类>    <可以回收沙城装备类名单/@沙城装名单>\
   <$TABLE(ZDHSHOU).ZDHS_1><Color=00FFFF 开关/@KAIGUAN&ZDHS_1&回收>/<Color=00ff00 盘古装回收/@不绑金币回收&盘古剑甲类>    <可以回收盘古剑甲类名单/@盘古剑甲名单>\
                             <Color=orange 我要回收核心/@核心回收>\
   <Color=808080 ━━━━━━━━━━━━━━━━━━━━━━━━>\
#IF
EQUAL $TABLE(ZDHSHOU).ZDHS_1
#ACT
TABLE ZDHSHOU ZDHS_1   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_2   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_3   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_4   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_5   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_6   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_7   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_8   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_9   = <@@!PIC2#323,1201>
TABLE ZDHSHOU ZDHS_10   = <@@!PIC2#323,1201>



[@KAIGUAN]
#IF
EQUAL $TABLE(ZDHSHOU).<$SCRIPTPARAM(1)> <@@!PIC2#323,1201>
#ACT
TABLE ZDHSHOU <$SCRIPTPARAM(1)> = <@@!PIC2#323,1202>
GOTO @自动化回收
#ELSEACT
TABLE ZDHSHOU <$SCRIPTPARAM(1)> = <@@!PIC2#323,1201>
GOTO @自动化回收


[@核心回收]
   核心回收栏\
   <Color=808080 ━━━━━━━━━━━━━━━━━━━━━━━━>\
       手动回收<沙城套所有核心/@核心回收金币&沙城核心>      <核心名单/@核心名单>\
       手动回收<盘古套所有核心/@核心回收金币&盘古核心>      <核心名单/@核心名单>\
       手动回收<流金套所有核心/@核心回收金币&流金核心>      <核心名单/@核心名单>\
       手动回收<巅峰套所有核心/@核心回收金币&巅峰核心>      <核心名单/@核心名单>\
       手动回收<洪荒套所有核心/@核心回收金币&洪荒核心>      <核心名单/@核心名单>\
       手动回收<苍穹套所有核心/@核心回收金币&苍穹核心>      <核心名单/@核心名单>\
       一键回收<Color=RED 一键收所有核心/@核心回收金币&所有核心> <Color=RED 慎!价值超出20亿回收会清零>\
   <Color=808080 ━━━━━━━━━━━━━━━━━━━━━━━━>\

[@核心回收金币]
#IF
CHECKITEMINLIST ..\QuestDiary\回收物品\物品读取\<$SCRIPTPARAM(1)>.txt S1
PosInList $STR(S1) ..\QuestDiary\回收物品\<$SCRIPTPARAM(1)>.txt S3
#ACT
SPLIT $STR(S3) | S4
TAKE $STR(S1) 65535
GIVE 金币 $MULT.$PARAM(12).$STR(S5)
CREDITPOINT + $MULT.$PARAM(12).$STR(S7)
SENDMSG 6 回收获得获得金币:<$MULT.$PARAM(12).$STR(S5)>个,声望:<$MULT.$PARAM(12).$STR(S7)>随身回收不加特权收益。
GOTO @核心回收金币
break


[@不绑金币回收]
#IF
CHECKITEMINLIST ..\QuestDiary\回收物品\物品读取\<$SCRIPTPARAM(1)>.txt S1
PosInList $STR(S1) ..\QuestDiary\回收物品\<$SCRIPTPARAM(1)>.txt S3
#ACT
SPLIT $STR(S3) | S4
TAKE $STR(S1) 65535
GIVE 金币 $MULT.$PARAM(12).$STR(S5)
SENDMSG 6 回收获得获得金币:<$MULT.$PARAM(12).$STR(S5)>个
GOTO @自动化回收
break

[@绑定金币回收]
#IF
CHECKITEMINLIST ..\QuestDiary\回收物品\物品读取\<$SCRIPTPARAM(1)>.txt S1
PosInList $STR(S1) ..\QuestDiary\回收物品\<$SCRIPTPARAM(1)>.txt S3
#ACT
SPLIT $STR(S3) | S4
TAKE $STR(S1) 65535
BINDGOLD + $MULT.$PARAM(12).$STR(S5)
SENDMSG 6 回收获得获得绑定金币:<$MULT.$PARAM(12).$STR(S5)>个
GOTO @自动化回收
break



[@装备类名单]
<Color=00ff00 装备类回收名单,如果有不能回收请告知管理员>\
恶魔长袍(女)     恶魔长袍(男)     幽灵战甲(男)\
幽灵战甲(女)     战神(男)         战神(女)\
蟠龙金甲         蟠龙金袍\
<返回/@自动化回收>

[@技能类名单]
骷髅召唤术     火墙         困魔咒       冰龙破\
施毒术         灵魂道符     赶尸         狮子吼\
集体隐身术     灵魂墙       诅咒术       神圣战甲术\
隐身术         幽灵盾       疾光电影     替身法符\
元神攻杀剑法   元神抱月刀   元神野蛮冲撞 元神护身真气\
元神抗拒火环   元神刺杀剑术 元神雷电术   元神冰箭术\
元神神圣战甲术 元神施毒术   元神狮子吼   元神半月弯刀\
元神诅咒术     元神灵魂道符   \



[@盘古剑甲名单]
盘古开天甲   盘古开天袍    伏羲裂地甲\
伏羲裂地袍   轩辕人皇甲    轩辕人皇袍\
盘古开天刃   伏羲裂地杖    轩辕人皇剑\
<返回/@自动化回收>



[@核心名单]
沙城套武器核心  沙城套衣服核心  沙城套首饰核心\
盘古套武器核心  盘古套衣服核心  盘古套首饰核心\
流金套武器核心  流金套衣服核心  流金套首饰核心\
巅峰套武器核心  巅峰套衣服核心  巅峰套首饰核心\
洪荒套武器核心  洪荒套衣服核心  洪荒套首饰核心\
苍穹套武器核心  苍穹套衣服核心  苍穹套首饰核心\



[@沙城装名单]
战魂烈日王冠  战魂烈日吊坠  战魂烈日护腕\
战魂烈日戒指  战魂烈日长靴  战魂烈日腰带\
法魂血月王冠  法魂血月吊坠  法魂血月护腕 \
法魂血月戒指  法魂血月长靴  法魂血月腰带\
道魂辰星王冠  道魂辰星吊坠  道魂辰星护腕\
道魂辰星戒指  道魂辰星长靴  道魂辰星腰带\
战魂烈日刃    法魂血月杖    道魂辰星剑\
战魂软猬甲    战魂软猬袍    法魂软猬甲\
法魂软猬袍    道魂软猬甲    道魂软猬袍\


[@五级技能名单]
<Color=00ff00 五级技能书回收名单,如果有不能回收请告知管理员>\
五级护身真气      五级初级剑法      五级攻杀剑法 \
五级血影刀法      五级残影刀法      五级雷电术\
五级爆裂火焰      五级治疗术        五级诅咒术 \
元神五级攻杀      元神五级雷电      元神五级初级剑\
元神五级施毒      元神五级诅咒      五级烈火剑法\
五级雷霆剑        五级破击剑法      五级突斩\
五级魔法盾        五级冰咆哮        五级风影盾\
<下一页/@下技能>            <返回/@自动化回收>\
[@下技能]   
五级幽灵盾        五级狮子吼        五级神圣战甲术\
五级召唤神兽      元神五级破击      元神五级突斩\
元神五级雷霆剑    元神五级风影盾    元神五级幽灵盾\
元神五级战甲术    五级破盾斩        五级金刚护体\
五级狂龙紫电      元神五级魔法盾    五级流星火雨\
五级幽冥火咒      五级强化骷髅术    元神五级金刚护\
元神五级狂龙      元神五级火咒      元神五级强排\
五级施毒术        五级刺杀剑术      五级野蛮冲撞\
<下一页/@下技能1>            <上一页/@五级技能名单>

[@下技能1]
五级冰龙破        五级大炎刀        五级圣言术\
五级兽灵术        五级小火球        五级集体隐身术\
五级精神战法      五级神光术        法道强化骷髅术\
五级抱月刀        五级地狱雷光      五级火炎刀\
五级赶尸          五级替身法符      五级瞬间移动\
五级五雷轰        五级骷髅召唤术    五级疾光电影\
五级解毒术        五级半月弯刀      五级冰箭术\
五级地狱火焰      五级法之魄        五级风火轮\
<下一页/@下技能2>            <上一页/@下技能>

[@下技能2]
道道幽灵盾        战法雷电术        五级玄冰刃\
五级困魔咒        五级灵魂道符      五级群体治愈术\
五级心灵召唤      五级隐身术        战法风影盾\
法法爆裂火焰      法法风影盾        法法雷电术\
法道爆裂火焰      五级魔魂术        战战护身真气\
战道金刚护体      战道神圣战甲术\   五级抗拒火环\
五级灵魂墙        五级冰旋风        五级神圣战甲术\
五级小火球         五级冰龙破   \
<下一页>            <上一页/@下技能1>




}


*滑块验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则