传奇版本踢足球脚本

gmbbs醉后知酒浓

传奇版本踢足球脚本
适用于传奇一条龙开区
AutoRunRobot.txt;足球赛
#AutoRun NPC RUNONWEEK 7:13:15 @开始足球
#AutoRun NPC RUNONWEEK 7:13:25 @开始刷球
#AutoRun NPC RUNONWEEK 7:14:55 @宣布赛况
RobotManage.txt
[@开始足球]
#IF
#ACT
MOV G0 0
MOV G1 0
MOV G2 0
CLEARMAPMON G008
GMEXECUTE 集体传送 G008 0159
CLEARNAMELIST ..\QuestDiary\足球赛\名单.txt
CLEARNAMELIST ..\QuestDiary\足球赛\名单1.txt
CLEARNAMELIST ..\QuestDiary\足球赛\名单2.txt
SENDMSG 0 [传奇足球赛]现在开始报名，报名时间五分钟，参赛者请到“盟重省-竞技师”处报名(国足水平勿扰)！
[@开始刷球]
#IF
checkhum Q001 5
checkhum Q002 5
#ACT
SENDMSG 0 足球比赛现在开始，双方球员入场，大家鼓掌！
GMEXECUTE 集体传送 Q001 G008
GMEXECUTE 集体传送 Q002 G008
MISSION G008 39 39
PARAM1 39
PARAM2 39
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 39 40
PARAM1 39
PARAM2 40
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 39 41
PARAM1 39
PARAM2 41
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 40 39
PARAM1 40
PARAM2 39
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 40 40
PARAM1 40
PARAM2 40
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 40 41
PARAM1 40
PARAM2 41
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 41 39
PARAM1 41
PARAM2 39
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 41 40
PARAM1 41
PARAM2 40
PARAM3 1
PARAM4 0
MOBPLACE 足球
MISSION G008 41 41
PARAM1 41
PARAM2 41
PARAM3 1
PARAM4 0
MOBPLACE 足球
#ELSEACT
mov G0 5
SENDMSG 0 参赛人数不足，本次比赛宣告结束！
GMEXECUTE 集体传送 Q001 0159
GMEXECUTE 集体传送 Q001 0159
break
[@宣布赛况]
#IF
EQUAL G0 5
#ACT
break
#IF
CheckRangeMonCount G008 8 40 4 = 9
#ACT
mov G1 9
SENDMSG 0 <裁判员>：白方进了九个球。
#IF
CheckRangeMonCount G008 8 40 4 = 8
#ACT
mov G1 8
SENDMSG 0 <裁判员>：白方进了八个球。
#IF
CheckRangeMonCount G008 8 40 4 = 7
#ACT
mov G1 7
SENDMSG 0 <裁判员>：白方进了七个球。
#IF
CheckRangeMonCount G008 8 40 4 = 6
#ACT
mov G1 6
SENDMSG 0 <裁判员>：白方进了六个球。
#IF
CheckRangeMonCount G008 8 40 4 = 5
#ACT
mov G1 5
SENDMSG 0 <裁判员>：白方进了五个球。
#IF
CheckRangeMonCount G008 8 40 4 = 4
#ACT
mov G1 4
SENDMSG 0 <裁判员>：白方进了四个球。
#IF
CheckRangeMonCount G008 8 40 4 = 3
#ACT
mov G1 3
SENDMSG 0 <裁判员>：白方进了三个球。
#IF
CheckRangeMonCount G008 8 40 4 = 2
#ACT
mov G1 2
SENDMSG 0 <裁判员>：白方进了二个球。
#IF
CheckRangeMonCount G008 8 40 4 = 1
#ACT
mov G1 1
SENDMSG 0 <裁判员>：白方进了一个球。
#IF
CheckRangeMonCount G008 8 40 4 = 0
#ACT
mov G1 0
SENDMSG 0 <裁判员>：白方没有进球。
#IF
CheckRangeMonCount G008 69 40 4 = 9
#ACT
mov G2 9
SENDMSG 0 <裁判员>：红方进了九个球。
#IF
CheckRangeMonCount G008 69 40 4 = 8
#ACT
mov G2 8
SENDMSG 0 <裁判员>：红方进了八个球。
#IF
CheckRangeMonCount G008 69 40 4 = 7
#ACT
mov G2 7
SENDMSG 0 <裁判员>：红方进了七个球。
#IF
CheckRangeMonCount G008 69 40 4 = 6
#ACT
mov G2 6
SENDMSG 0 <裁判员>：红方进了六个球。
#IF
CheckRangeMonCount G008 69 40 4 = 5
#ACT
mov G2 5
SENDMSG 0 <裁判员>：红方进了五个球。
#IF
CheckRangeMonCount G008 69 40 4 = 4
#ACT
mov G2 4
SENDMSG 0 <裁判员>：红方进了四个球。
#IF
CheckRangeMonCount G008 69 40 4 = 3
#ACT
mov G2 3
SENDMSG 0 <裁判员>：红方进了三个球。
#IF
CheckRangeMonCount G008 69 40 4 = 2
#ACT
mov G2 2
SENDMSG 0 <裁判员>：红方进了二个球。
#IF
CheckRangeMonCount G008 69 40 4 = 1
#ACT
mov G2 1
SENDMSG 0 <裁判员>：红方进了一个球。
#IF
CheckRangeMonCount G008 69 40 4 = 0
#ACT
mov G2 0
SENDMSG 0 <裁判员>：红方没有进球。
#IF
EQUAL G1 0
EQUAL G2 0
#ACT
MOV G0 4
SENDMSG 0 <足球赛裁判员>：我公布此次球赛双方战平。
break
#IF
EQUAL G1 1
EQUAL G2 1
#ACT
MOV G0 4
SENDMSG 0 <足球赛裁判员>：我公布此次球赛双方战平。
break
#IF
EQUAL G1 2
EQUAL G2 2
#ACT
MOV G0 4
SENDMSG 0 <足球赛裁判员>：我公布此次球赛双方战平。
break
#IF
EQUAL G1 3
EQUAL G2 3
#ACT
MOV G0 4
SENDMSG 0 <足球赛裁判员>：我公布此次球赛双方战平。
break
#IF
EQUAL G1 4
EQUAL G2 4
#ACT
MOV G0 4
SENDMSG 0 <足球赛裁判员>：我公布此次球赛双方战平。
break
#IF
LARGE G1 4
#ACT
MOV G0 1
SENDMSG 0 <球赛裁判员>：我公布此次球赛白方胜利，白方支持者可以尽情的欢呼了。
break
#IF
LARGE G2 4
#ACT
MOV G0 2
SENDMSG 0 <球赛裁判员>：我公布此次球赛红方胜利，红方支持者可以尽情的欢呼了。
break
#IF
EQUAL G1 4
SMALL G2 4
#ACT
MOV G0 1
SENDMSG 0 <球赛裁判员>：我公布此次球赛白方胜利，白方支持者可以尽情的欢呼了。
break
#IF
EQUAL G1 3
SMALL G2 3
#ACT
MOV G0 1
SENDMSG 0 <球赛裁判员>：我公布此次球赛白方胜利，白方支持者可以尽情的欢呼了。
break
#IF
EQUAL G1 2
SMALL G2 2
#ACT
MOV G0 1
SENDMSG 0 <球赛裁判员>：我公布此次球赛白方胜利，白方支持者可以尽情的欢呼了。
break
#IF
EQUAL G1 1
SMALL G2 1
#ACT
MOV G0 1
SENDMSG 0 <球赛裁判员>：我公布此次球赛白方胜利，白方支持者可以尽情的欢呼了。
break
#IF
EQUAL G2 4
SMALL G1 4
#ACT
MOV G0 2
SENDMSG 0 <球赛裁判员>：我公布此次球赛红方胜利，红方支持者可以尽情的欢呼了。
break
#IF
EQUAL G2 3
SMALL G1 3
#ACT
MOV G0 2
SENDMSG 0 <球赛裁判员>：我公布此次球赛红方胜利，红方支持者可以尽情的欢呼了。
break
#IF
EQUAL G2 2
SMALL G1 2
#ACT
MOV G0 2
SENDMSG 0 <球赛裁判员>：我公布此次球赛红方胜利，红方支持者可以尽情的欢呼了。
break
#IF
EQUAL G2 1
SMALL G1 1
#ACT
MOV G0 2
SENDMSG 0 <球赛裁判员>：我公布此次球赛红方胜利，红方支持者可以尽情的欢呼了。
break
mapinfof文件：
[Q001 白方入场室] NORECONNECT(0159) NORECALL NODEARRECALL NOGUILDRECALL NOMasterRECALL SAFE
[Q002 红方入场室] NORECONNECT(0159) NORECALL NODEARRECALL NOGUILDRECALL NOMasterRECALL SAFE
[G008 足球竞技场] NORECALL NODEARRECALL NOGUILDRECALL NOMasterRECALL FIGHT
NPC：
盟重省\竞技师 0 3 335 328 0 16
[@main]
欢迎参加组队竞技比赛！\
假如要进行个人竞技比赛，请找比奇省竞技师参加。\
目前的组队竞技比赛分二种，以后将不断增加新的竞技项目。\
请选择你要参加的组队竞技项目：\ \
1、<足球竞技大赛[url=]/@1[/url]> \
2、<杀怪计时大赛[url=]/@2[/url]> \
3、<其他竞技比赛> \
<离开[url=]/@exit[/url]>
[@1]
足球竞技，共二个小组参加，每组成员5-10人，职业不限。\
比赛计时90分钟，球场中央共放置九个球，球进入球门底线为进球。\
野蛮抵触触犯、抗拒火环、气功波技能是推动足球的独一办法。\
<白队攻击球场左侧球门，红队攻击右侧球门，队员可任意封堵足球。>\
比赛结束，各队员与“裁判员”会谈退场，胜者同时颁奖。\ \
<申请参加比赛/@开始报名> \ \
<返回[url=]/@main[/url]>
[@开始报名]
#IF
dayofweek sun
hour 13
min 15
#ACT
set [10] 1
SENDMSG 01 传奇足球比赛正在进行报名，请选手及时参加！
goto @比赛开始
break
#IF
dayofweek sun
hour 13
min 16
#ACT
set [10] 1
SENDMSG 0 传奇足球比赛正在进行报名，请选手及时参加！
goto @比赛开始
break
#IF
dayofweek sun
hour 13
min 17
#ACT
set [10] 1
SENDMSG 0 传奇足球比赛正在进行报名，请选手及时参加！
goto @比赛开始
break
#IF
dayofweek sun
hour 13
min 18
#ACT
set [10] 1
SENDMSG 0 传奇足球比赛正在进行报名，请选手及时参加！
goto @比赛开始
break
#IF
dayofweek sun
hour 13
min 19
#ACT
set [10] 1
SENDMSG 0 传奇足球比赛正在进行报名，请选手及时参加！
goto @比赛开始
break
#ELSEACT
set [10] 0
messagebox 请礼拜天下战书13:15至13:20准时参加！[@比赛开始]
#IF
CHECK [10] 0
#ACT
SENDMSG 0 %s使用外挂非法操纵，现对其处以绞刑！
KILL 1
#IF
#SAY
参赛须知：\
1、自由选择需加入的战队；\
2、每个战队最多10名队员，起码5名队名。\
3、参赛前请购置好药品和穿着必要的装备。\
4、进入战队休息室后，五分钟内做好组队等比赛预备。\
5、进入足球赛场后，所有队员90分钟内无法离场。\
6、比赛结束后到30:30处找球场裁判员离场，胜者同时颁奖。\
<申请加入白方战队[url=]/@11[/url]>   <申请加入红方战队[url=]/@12[/url]>
<返回[url=]/@1[/url]>
[@11]
#IF
CHECK [10] 0
#ACT
SENDMSG 0 %s使用外挂非法操纵，现对其处以绞刑！
KILL 1
#IF
checkhum Q001 10
#ACT
SENDMSG 6 白队人数已满，请选择其他战队。
goto @比赛开始
break
#IF
#ACT
addnamelist ..\QuestDiary\足球赛\名单.txt
addnamelist ..\QuestDiary\足球赛\名单1.txt
SENDMSG 0 球员“%s"加入了白方战队！
map Q001
break
[@12]
#IF
CHECK [10] 0
#ACT
SENDMSG 0 %s使用外挂非法操纵，现对其处以绞刑！
KILL 1
#IF
checkhum Q002 10
#ACT
SENDMSG 6 红队人数已满，请选择其他战队。
goto @比赛开始
break
#IF
#ACT
addnamelist ..\QuestDiary\足球赛\名单.txt
addnamelist ..\QuestDiary\足球赛\名单2.txt
SENDMSG 0 球员“%s"加入了红方战队！
map Q002
break
[@2]
杀怪计时大赛尚未开放，敬请关注！\ \ \ \ \ \ \ \
<返回[url=]/@main[/url]>
竞技场\裁判员 0 G008 30 30 0 8
[@main]
#IF
equal G0 0
#ACT
SENDMSG 6 <裁判员>：比赛尚未结束。
#ELSEACT
set [10] 0
goto @end
break
[@end]
#IF
#ACT
delnamelist ..\QuestDiary\足球赛\名单.txt
#IF
checknamelist ..\QuestDiary\足球赛\名单1.txt
#ACT
delnamelist ..\QuestDiary\足球赛\名单1.txt
goto @1
#ELSEACT
delnamelist ..\QuestDiary\足球赛\名单2.txt
goto @2
[@1]
#IF
CHECK [10] 1
#ACT
SENDMSG 0 %s使用外挂非法操纵，现对其处以绞刑！
KILL 1
#IF
equal G0 1
#ACT
SENDMSG 0 <足坛讯>：恭喜白队球员“%s"载誉而归！
;得奖语句
mapmove 3 330 330
break
#ELSEACT
SENDMSG 6 不要灰心，继承努力！
mapmove 3 330 330
break
[@2]
#IF
CHECK [10] 1
#ACT
SENDMSG 0 %s使用外挂非法操纵，现对其处以绞刑！
KILL 1
#IF
equal G0 2
#ACT
SENDMSG 0 <足坛讯>：恭喜红队球员“%s"载誉而归！
;得奖语句
mapmove 3 330 330
break
#ELSEACT
SENDMSG 6 不要灰心，继承努力！
mapmove 3 330 330
breakStartPoint.txt文件（目的是死后继承上线踢球）
G008 40 40
MON数据库：
足球 1209  3 1 0 1 1 9999 0 100 100 0 0 0 0 10 10 400 1 0 0
全局变量分配表
G0 0:比赛未结束;1:白胜;2:红胜;4:战平;5:未比赛 作弊检测：[10]
G1 白方进球数   作弊检测：[10]
G2 红方进球数   作弊检测：[10]
QManage.txt文件中请加入以脚本，用于球场安全区上下线判定是否在比赛中，如赛后送回盟重。
#IF
checknamelist ..\QuestDiary\足球赛\名单.txt
#ACT
break

岑海之

锄禾日当午，发帖真辛苦。谁知坛中餐，帖帖皆辛苦！

饺痔

纯粹路过，没任何兴趣，仅仅是看在老用户份上回复一下

溴仕藷

支持支持再支持

胥流逸

very good

嘉茄鸣

专业抢沙发的！哈哈

瓜筏糕

小白一个 顶一下

雍思萌

顶顶更健康

坪亥

沙发？？？

石襞

鼎力支持！！