传奇私服PK赌元宝脚本

admin

[@main]
欢迎使用自由PK擂台！
请选择你要用于挑战赛的赌注类型？\
使用挑战.
使用挑战.
使用挑战.
使用挑战. 内容来自dedecms

[@金币]
#IF
#ACT
MOV P9 1
MOV S29 金币
goto @开始挑战
break copyright dedecms

[@元宝]
#IF
#ACT
MOV P9 2
MOV S29 元宝
goto @开始挑战
break 本文来自织梦
[@经验]
#IF
#ACT
MOV P9 3
MOV S29 经验值
goto @开始挑战
break copyright dedecms

[@声望]
#IF
#ACT
MOV P9 4
MOV S29 声望点
goto @开始挑战
break dedecms.com


[@开始挑战]
#if
checkhum F019 1
#aCT
SENDMSG 4 [失败:]当前PK擂台已经有人在进行打擂，请稍后再试！
break dedecms.com
#IF
EQUAL G10 0
#ACT
queryvalue 请输入你要下的赌注数量 2 8 30
#ELSEACT
SENDMSG 4 [失败:]刚才有人使用了挑战功能！你需要在10秒后才能使用！
break 织梦好，好织梦

[@getstring30]
#ACT
Getstring s30
goto @检查数量 dedecms.com
[@检查数量]
#IF
EQUAL P9 1
#ACT
goto @检查金币
break 织梦内容管理系统
#IF
EQUAL P9 2
#ACT
goto @检查元宝
break 织梦内容管理系统

#IF
EQUAL P9 3
#ACT
goto @检查经验
break 内容来自dedecms

#IF
EQUAL P9 4
#ACT
goto @检查声望
break copyright dedecms

[@检查金币]
#IF
CHECKGOLD $STR(S30)
#ACT
goto @输入名字
#ELSEACT
SENDMSG 4 [失败:]你当前所拥有的金币数量没有你输入的那么多！
break copyright dedecms

[@检查元宝]
#IF
CHECKGAMEGOLD > $STR(S30)
#ACT
goto @输入名字
#ELSEACT
SENDMSG 4 [失败:]你当前所拥有的元宝数量没有你输入的那么多！
break copyright dedecms

[@检查经验]
#IF
CHECKEXP > $STR(S30)
#ACT
goto @输入名字
#ELSEACT
SENDMSG 4 [失败:]你当前所拥有的经验数量没有你输入的那么多！
break dedecms.com

[@检查声望]
#IF
CHECKCREDITPOINT > $STR(S30)
#ACT
goto @输入名字
#ELSEACT
SENDMSG 4 [失败:]你当前所拥有的声望数量没有你输入的那么多！
break dedecms.com

[@输入名字]
#IF
EQUAL G10 0
#ACT
queryvalue 请输入你要挑战玩家的名字 2 50 31
#ELSEACT
SENDMSG 4 [失败:]刚才有人使用了挑战功能！你需要在10秒后才能使用！
break copyright dedecms
[@getstring31]
#ACT
Getstring s31
goto @检查在线否 dedecms.com


[@检查在线否]
#IF
CHECKONLINE $STR(s31)
#ACT
MOV S32 $USERNAME
MOV G10 1
MOV G9 P9
hcall $STR(s31) @ttt1
delay 10 @结束
#SAY
你已经成功的向:  发出了挑战要求！
本次挑战活动所下赌注类型是::数量:点.
如果挑战开始后你战胜了对方.你将获得以上数量的赌注.
如果挑战开始后你失败给对方.你将损失以上数量的赌注.\
本挑战页面将在10秒后失效！请等待对方的同意...
#ELSESAY
当前不在线！
挑战不能进行！ dedecms.com

[@结束]
#IF
#SAY
　
#ACT
MOV G10 0
close 内容来自dedecms

;================================================================== dedecms.com

本文来自织梦

[@ttt1]
#IF
#ACT
delay 10 @结束
#SAY
PK挑战台通知:
侠客:  向你提出了单挑PK挑战要求！
本次挑战活动对方所下赌注类型是::数量:点.
如果接受挑战并战胜了对方.你将获得以上数量的赌注.
如果接受挑战并失败给对方.你将损失以上数量的赌注.\
. .
本挑战通知将在10秒后失效！请尽快做出决定！ copyright dedecms
[@结束]
#IF
#SAY
　
#ACT
MOV G10 0
close dedecms.com

[@我接受]
#IF
CHECKONLINE $STR(s32)
#ACT
goto @检查类型
#ELSEACT
SENDMSG 4 [失败:]挑战者已经自行放弃挑战！已经离线！
break
close dedecms.com

[@检查类型]
#IF
EQUAL G9 1
#ACT
goto @检查金币1
break 本文来自织梦
#IF
EQUAL G9 2
#ACT
goto @检查元宝1
break copyright dedecms

#IF
EQUAL G9 3
#ACT
goto @检查经验1
break copyright dedecms

#IF
EQUAL G9 4
#ACT
goto @检查声望1
break copyright dedecms

[@检查金币1]
#IF
CHECKGOLD $STR(S30)
#ACT
TAKE 金币 $STR(S30)
hcall $STR(s32) @ttt2
mapmove F019
#ELSEACT
hcall $STR(s32) @ttt3
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的金币数量没有挑战所下赌注那么多！
break
close copyright dedecms
[@检查元宝1]
#IF
CHECKGAMEGOLD > $STR(S30)
#ACT
GAMEGOLD - $STR(S30)
hcall $STR(s32) @ttt2
mapmove F019
#ELSEACT
hcall $STR(s32) @ttt3
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的元宝数量没有挑战所下赌注那么多！
break
close copyright dedecms
[@检查经验1]
#IF
CHECKEXP > $STR(S30)
#ACT
CHANGEEXP - $STR(S30)
hcall $STR(s32) @ttt2
mapmove F019
#ELSEACT
hcall $STR(s32) @ttt3
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的经验数量没有挑战所下赌注那么多！
break
close 织梦好，好织梦
[@检查声望1]
#IF
CHECKCREDITPOINT > $STR(S30)
#ACT
CREDITPOINT - $STR(S30)
hcall $STR(s32) @ttt2
mapmove F019
#ELSEACT
hcall $STR(s32) @ttt3
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的声望数量没有挑战所下赌注那么多！
break
close 内容来自dedecms


[@ttt2]
#IF
EQUAL G9 1
#ACT
goto @检查金币2
break 内容来自dedecms
#IF
EQUAL G9 2
#ACT
goto @检查元宝2
break copyright dedecms
#IF
EQUAL G9 3
#ACT
goto @检查经验2
break dedecms.com

#IF
EQUAL G9 4
#ACT
goto @检查声望2
break 内容来自dedecms
[@检查金币2]
#IF
CHECKGOLD $STR(S30)
#ACT
TAKE 金币 $STR(S30)
mapmove F019
#ELSEACT
hcall $STR(s31) @ttt4
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的金币数量没有挑战所下赌注那么多！
break
close 内容来自dedecms
[@检查元宝2]
#IF
CHECKGAMEGOLD > $STR(S30)
#ACT
GAMEGOLD - $STR(S30)
mapmove F019
#ELSEACT
hcall $STR(s31) @ttt4
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的元宝数量没有挑战所下赌注那么多！
break
close 内容来自dedecms

[@检查经验2]
#IF
CHECKEXP > $STR(S30)
#ACT
CHANGEEXP - $STR(S30)
mapmove F019
#ELSEACT
hcall $STR(s31) @ttt4
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的经验数量没有挑战所下赌注那么多！
break
close 织梦好，好织梦

[@检查声望2]
#IF
CHECKCREDITPOINT > $STR(S30)
#ACT
CREDITPOINT - $STR(S30)
mapmove F019
#ELSEACT
hcall $STR(s31) @ttt4
MOV G10 0
SENDMSG 4 [失败:]你当前所拥有的声望数量没有挑战所下赌注那么多！
break
close 织梦好，好织梦

[@ttt3]
　
对不起！.当前的::不够:点.
挑战活动失败！ copyright dedecms

[[@ttt4]
#IF
EQUAL G9 1
#ACT
goto @检查金币3
break dedecms.com
#IF
EQUAL G9 2
#ACT
goto @检查元宝3
break 本文来自织梦
#IF
EQUAL G9 3
#ACT
goto @检查经验3
break 织梦好，好织梦

#IF
EQUAL G9 4
#ACT
goto @检查声望3
break 织梦好，好织梦

[@检查金币3]
#IF
#ACT
mapmove 0 471 215
give 金币 $STR(S30)
MOV G10 0
SENDMSG 4 [失败:]挑战方下赌注数量不够了！挑战提前结束！
break
close 织梦好，好织梦

[@检查元宝3]
#IF
#ACT
mapmove 0 471 215
GAMEGOLD + $STR(S30)
MOV G10 0
SENDMSG 4 [失败:]挑战方下赌注数量不够了！挑战提前结束！
break
close 内容来自dedecms
[@检查经验3]
#IF
#ACT
mapmove 0 471 215
CHANGEEXP + $STR(S30)
MOV G10 0
SENDMSG 4 [失败:]挑战方下赌注数量不够了！挑战提前结束！
break
close 织梦内容管理系统
[@检查声望3]
#IF
#ACT
mapmove 0 471 215
CREDITPOINT + $STR(S30)
MOV G10 0
SENDMSG 4 [失败:]挑战方下赌注数量不够了！挑战提前结束！
break
close  织梦内容管理系统