[@MAin]
★┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉★\
┇露天比武舞台激情刺激，你可以邀请你想要比武的玩家┇\
┇上台与你比武，谁赢了谁就获得所押的元宝．比武中不┇\
┇允许使用药品以及任何作弊行为，比武时间:大须在<5分>┇\
┇<钟内完成>，如果5分钟内不分胜负，所押的元宝将会<归>,┇\
┇<还给双方>.<为保证PK公平性,比武地图不允许使用魔血石/FCOLOR=151>┇\
┇<佩带魔血石后系统将自动收缴,不予返还./FCOLOR=151> ┇\
╠┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉╣\
┇ <开设擂台比武/@1> <观战/@2> ┇\
╚┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉╝\
[@1]
\ \
这是一个强者的游戏,如果你想名动四方,这将是一个\ \
不错的选择!\ \
<邀请玩家打擂/@@InPutString1( 请输入你要挑战的玩家名)>
[@2]
#ACT
MAPMOVE dns001 39 24
SETONTIMER 13 1
[@InPutString1]
#IF
CheckRangeHumCount dns001 36 28 2 > 0
#act
messagebox 对不起当有挑战地图有玩家在挑战
BREAK
#if
NOT S1.checkonline
#ACT
messagebox 对不起,你邀请的玩家没有在线,无法比武
BREAK #IF
EQUAL S1 <$USERNAME>
#ACT
MESSAGEBOX 对不起,你不能邀请自己比武!
BREAK #if
S1.checkonline
#ACT
MOV A15 <$USERNAME>
GOTO @3 [@3]
\ \
请先输入你要押多少元宝打擂?\ \
如果你邀请的玩家没有这么多元宝 ,他将无法应战.\ \
<请输入元宝数量/@@InPutInteger1( 请输入你要押注的元宝)>\
[@InPutInteger1]
#IF
CheckRangeHumCount dns001 36 28 2 > 0
#act
messagebox 对不起当有挑战地图有玩家在挑战
BREAK #IF
CHECKGAMEGOLD < <$STR(N1)>
#act
CLOSE
MESSAGEBOX \ \你身上的元宝数量不足,请备好赌资再来\ \
BREAK #IF
SMALL N1 3000
#ACT
CLOSE
MESSAGEBOX 对不起输入的元宝少于3000
BREAK #IF
LARGE N1 200000
#act
CLOSE
messagebox 对不起你输入的元宝大于20W
BREAK #IF
S1.checkonline
#act
MOV G6 <$STR(N1)>
S1.messagebox 有玩家邀请你打擂,押金为[<$STR(G6)>]个元宝,确定参加吗? @确定 @取消
BREAK [@确定]
#IF
CheckRangeHumCount dns001 36 28 2 > 1
#act
messagebox 对不起当有挑战地图有玩家在挑战
A15.messagebox 对不起当有挑战地图有玩家在挑战
BREAK #IF
CheckRangeHumCount dns001 36 28 2 < 1
CHECKGAMEGOLD < <$STR(G6)>
#act
MESSAGEBOX 对不起你的元宝不够[<$STR(G6)>]个
A15.MESSAGEBOX 对不起<$STR(S1)>的元宝不够[<$STR(G6)>]个
BREAK #IF
CHECKGAMEGOLD > <$STR(G6)>
#ACT
MAPMOVE dns001 34 27
A15.MAPMOVE dns001 37 30
MOV N$挑战时间 300
A15.MOV N$挑战时间 300
SETONTIMER 12 1
A15.SETONTIMER 12 1
SENDMSG 0 挑战:玩家<$USERNAME>接受了<$STR(A15)>的押金为:<$STR(G6)>个元宝的挑战,去单挑了
SENDMSG 0 挑战:玩家<$USERNAME>接受了<$STR(A15)>的押金为:<$STR(G6)>个元宝的挑战,去单挑了
SENDMSG 0 挑战:玩家<$USERNAME>接受了<$STR(A15)>的押金为:<$STR(G6)>个元宝的挑战,去单挑了 |
