PK赌元宝

传奇私服

	[@main] 欢迎使用自由PK擂台！\ 请选择你要用于挑战赛的赌注类型？\\ 使用<金币进行/@金币>挑战.\ 使用<元宝进行/@元宝>挑战.\ 使用<经验进行/@经验>挑战.\ 使用<声望进行/@声望>挑战.\ [@金币] #IF #ACT MOV P9 1 MOV S29 金币 goto @开始挑战 break [@元宝] #IF #ACT MOV P9 2 MOV S29 元宝 goto @开始挑战 break [@经验] #IF #ACT MOV P9 3 MOV S29 经验值 goto @开始挑战 break [@声望] #IF #ACT MOV P9 4 MOV S29 声望点 goto @开始挑战 break [@开始挑战] #if checkhum F019 1 #aCT SENDMSG 4 [失败:]当前PK擂台已经有人在进行打擂，请稍后再试！\ break #IF EQUAL G10 0 #ACT queryvalue 请输入你要下的赌注数量 2 8 30 #ELSEACT SENDMSG 4 [失败:]刚才有人使用了挑战功能！你需要在10秒后才能使用！\ break [@getstring30] #ACT Getstring s30 goto @检查数量 [@检查数量] #IF EQUAL P9 1 #ACT goto @检查金币 break #IF EQUAL P9 2 #ACT goto @检查元宝 break #IF EQUAL P9 3 #ACT goto @检查经验 break #IF EQUAL P9 4 #ACT goto @检查声望 break [@检查金币] #IF CHECKGOLD $STR(S30) #ACT goto @输入名字 #ELSEACT SENDMSG 4 [失败:]你当前所拥有的金币数量没有你输入的那么多！\ break [@检查元宝] #IF CHECKGAMEGOLD > $STR(S30) #ACT goto @输入名字 #ELSEACT SENDMSG 4 [失败:]你当前所拥有的元宝数量没有你输入的那么多！\ break [@检查经验] #IF CHECKEXP > $STR(S30) #ACT goto @输入名字 #ELSEACT SENDMSG 4 [失败:]你当前所拥有的经验数量没有你输入的那么多！\ break [@检查声望] #IF CHECKCREDITPOINT > $STR(S30) #ACT goto @输入名字 #ELSEACT SENDMSG 4 [失败:]你当前所拥有的声望数量没有你输入的那么多！\ break [@输入名字] #IF EQUAL G10 0 #ACT queryvalue 请输入你要挑战玩家的名字 2 50 31 #ELSEACT SENDMSG 4 [失败:]刚才有人使用了挑战功能！你需要在10秒后才能使用！\ break [@getstring31] #ACT Getstring s31 goto @检查在线否 [@检查在线否] #IF CHECKONLINE $STR(s31) #ACT MOV S32 $USERNAME MOV G10 1 MOV G9 P9 hcall $STR(s31) @ttt1 delay 10 @结束 #SAY 你已经成功的向: <$STR(s31)> 发出了挑战要求！\ 本次挑战活动所下赌注类型是:<$STR(S29)>:数量:<$STR(S30)>点.\ 如果挑战开始后你战胜了对方.你将获得以上数量的赌注.\ 如果挑战开始后你失败给对方.你将损失以上数量的赌注.\\ 本挑战页面将在10秒后失效！请等待对方的同意...\ #ELSESAY <$STR(s31)>当前不在线！\ 挑战不能进行！\ [@结束] #IF #SAY 　\ #ACT MOV G10 0 close ;================================================================== [@ttt1] #IF #ACT delay 10 @结束 #SAY PK挑战台通知:\ 侠客: <$STR(s32)> 向你提出了单挑PK挑战要求！\ 本次挑战活动对方所下赌注类型是:<$STR(S29)>:数量:<$STR(S30)>点.\ 如果接受挑战并战胜了对方.你将获得以上数量的赌注.\ 如果接受挑战并失败给对方.你将损失以上数量的赌注.\\ <我接受挑战/@我接受>. <我拒绝挑战/@结束>.\ 本挑战通知将在10秒后失效！请尽快做出决定！\ [@结束] #IF #SAY 　\ #ACT MOV G10 0 close [@我接受] #IF CHECKONLINE $STR(s32) #ACT goto @检查类型 #ELSEACT SENDMSG 4 [失败:]挑战者已经自行放弃挑战！已经离线！\ break close [@检查类型] #IF EQUAL G9 1 #ACT goto @检查金币1 break #IF EQUAL G9 2 #ACT goto @检查元宝1 break #IF EQUAL G9 3 #ACT goto @检查经验1 break #IF EQUAL G9 4 #ACT goto @检查声望1 break [@检查金币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 [@检查元宝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 [@检查经验1] #IF CHECKEXP > $STR(S30) #ACT CHANLeg引擎XP - $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 [@ttt2] #IF EQUAL G9 1 #ACT goto @检查金币2 break #IF EQUAL G9 2 #ACT goto @检查元宝2 break #IF EQUAL G9 3 #ACT goto @检查经验2 break #IF EQUAL G9 4 #ACT goto @检查声望2 break [@检查金币2] #IF CHECKGOLD $STR(S30) #ACT TAKE 金币 $STR(S30) mapmove F019 #ELSEACT hcall $STR(s31) @ttt4 MOV G10 0 SENDMSG 4 [失败:]你当前所拥有的金币数量没有挑战所下赌注那么多！\ break close [@检查元宝2] #IF CHECKGAMEGOLD > $STR(S30) #ACT GAMEGOLD - $STR(S30) mapmove F019 #ELSEACT hcall $STR(s31) @ttt4 MOV G10 0 SENDMSG 4 [失败:]你当前所拥有的元宝数量没有挑战所下赌注那么多！\ break close [@检查经验2] #IF CHECKEXP > $STR(S30) #ACT CHANLeg引擎XP - $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] 　\ 对不起！<$STR(s31)>.当前的:<$STR(S29)>:不够:<$STR(S30)>点.\ 挑战活动失败！\ [[@ttt4] #IF EQUAL G9 1 #ACT goto @检查金币3 break #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 [@检查经验3] #IF #ACT mapmove 0 471 215 CHANLeg引擎XP + $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

hgfdhgkfh

	学习下

少年梦达

	路过。支持围观。。。

lfwilqskxk

	支持你哈...................................

socceradznh

	前排顶，很好！