HEROM2假人系统会跑会动会说话附加脚本

热度：

今天给大家讲解下HEROM2引擎配置添加假人的功能实现方法HEROM2假人系统会跑会动附加脚本实例，完整奉献给大家。

Mirserver\Mir200\Envir\Market_def 中 QFunction-0

;----------------------------------------------------------------------------------
;这里注意下，如果你这个文件里本来就有@PlayOffline，请把下面复制过去。不要出现两次@PlayOffline。
[@PlayOffline]
#IF
InSafeZone
#ACT
addnamelist ..\QuestDiary\固定数据\离线.txt
Offline 5 300

Mirserver\Mir200\Envir\MapQuest_def 中 QManage

----------------------------------------------------------------------------

[@Login]
#IF
CHECKLEVELEX > 0
#ACT
#CALL [\游戏登陆\脱机系统.txt] @脱机
break

;------------------------------------------------------------------------------------------------------

[@执行跟随1]
#act
GetRandomText .\QuestDiary\固定数据\行动.txt S5
GMEXECUTE 追杀 <$STR(S5)>
DelayGoto 1000 @回城
goto @随机飞啊
break

[@回城]
#IF
#act
GetRandomText .\QuestDiary\固定数据\传送数据.txt S6
mapmove <$STR(S6)>
break

[@执行跟随]
#IF
IsOnMap 3
#act
goto @随机飞啊
break
#IF
IsOnMap 001
#act
goto @随机飞啊
break
#IF
IsOnMap GA0
#act
goto @随机飞啊
break

[@随机飞啊]

#IF
random 7
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
MOVR P8 3
INC P8 333
MOVR P7 3
INC P7 266
mapmove 0 <$STR(P8)> <$STR(P7)>
GMEXECUTE 表情 <$STR(S10)>
DelayCall 6000 @5900312
BREAK

#IF
random 6
#ACT
MOVR P8 3
INC P8 649
MOVR P7 3
INC P7 629
mapmove 0 <$STR(P8)> <$STR(P7)>
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
GetRandomText .\QuestDiary\固定数据\喊话系统二.txt S99
GMEXECUTE 表情 <$STR(S10)>
GuildNoticeMsg 0 151 (!)%s:<$STR(S99)> MAP
DelayCall 7000 @5900312
BREAK

#IF
random 5
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
MOVR P8 3
INC P8 288
MOVR P7 3
INC P7 615
mapmove 0 <$STR(P8)> <$STR(P7)>
GMEXECUTE 表情 <$STR(S10)>
DelayCall 8000 @5900312
BREAK

#IF
random 4
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
MOVR P8 3
INC P8 147
MOVR P7 3
INC P7 337
mapmove 5 <$STR(P8)> <$STR(P7)>
GetRandomText .\QuestDiary\固定数据\喊话系统二.txt S99
GMEXECUTE 表情 <$STR(S10)>
GuildNoticeMsg 0 151 (!)%s:<$STR(S99)> MAP
DelayCall 9000 @5900312
BREAK

#IF
random 3
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
MOVR P8 3
INC P8 177
MOVR P7 3
INC P7 324
mapmove 11 <$STR(P8)> <$STR(P7)>
GetRandomText .\QuestDiary\固定数据\喊话系统一.txt S99
GMEXECUTE 表情 <$STR(S10)>
GuildNoticeMsg 0 151 (!)%s:<$STR(S99)> MAP
DelayCall 4000 @5900312
BREAK

#IF
random 2
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
MOVR P8 3
INC P8 242
MOVR P7 3
INC P7 202
mapmove 4 <$STR(P8)> <$STR(P7)>
GetRandomText .\QuestDiary\固定数据\喊话系统一.txt S99
GMEXECUTE 表情 <$STR(S10)>
GuildNoticeMsg 0 151 (!)%s:<$STR(S99)> MAP
DelayCall 3000 @5900312
BREAK
#IF

random 1
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
MOVR P8 3
INC P8 130
MOVR P7 3
INC P7 150
mapmove 6 <$STR(P8)> <$STR(P7)>
GetRandomText .\QuestDiary\固定数据\喊话系统二.txt S99
GMEXECUTE 表情 <$STR(S10)>
GuildNoticeMsg 0 151 (!)%s:<$STR(S99)> MAP
DelayCall 2000 @5900312
BREAK

[@5900312]
#IF
random 8
#ACT
GetRandomText .\QuestDiary\固定数据\试炼表情.txt S10
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
GetRandomText .\QuestDiary\固定数据\喊话系统.txt S99
GMEXECUTE 表情 <$STR(S10)>
GuildNoticeMsg 0 151 (!)%s:<$STR(S99)> MAP
DelayCall 286000 @随机飞啊
BREAK

#IF
random 7
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 196000 @随机飞啊
BREAK

#IF
random 6
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 176000 @随机飞啊
BREAK

#IF
random 5
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 156000 @随机飞啊
BREAK

#IF
random 4
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 146000 @随机飞啊
BREAK

#IF
random 3
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 136000 @随机飞啊
BREAK

#IF
random 2
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 126000 @随机飞啊
BREAK

#IF
random 1
#ACT
CHANGEEXP + 1000
MOVR P8 18
INC P8 321
MOVR P7 17
INC P7 323
mapmove 3 <$STR(P8)> <$STR(P7)>
DelayCall 1526000 @随机飞啊
BREAK

[顶部]