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

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

Mirserver\Mir200\Envir\Market_def中QFunction-0

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



Mirserver\Mir200\Envir\MapQuest_def中QManage

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

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


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

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

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




[@执行跟随]
#IF
IsOnMap3
#act
goto@随机飞啊
break
#IF
IsOnMap001
#act
goto@随机飞啊
break
#IF
IsOnMapGA0
#act
goto@随机飞啊
break

[@随机飞啊]

#IF
random7
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
MOVRP83
INCP8333
MOVRP73
INCP7266
mapmove0<$STR(P8)><$STR(P7)>
GMEXECUTE表情<$STR(S10)>
DelayCall6000@5900312
BREAK

#IF
random6
#ACT
MOVRP83
INCP8649
MOVRP73
INCP7629
mapmove0<$STR(P8)><$STR(P7)>
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
GetRandomText.\QuestDiary\固定数据\喊话系统二.txtS99
GMEXECUTE表情<$STR(S10)>
GuildNoticeMsg0151(!)%s:<$STR(S99)>MAP
DelayCall7000@5900312
BREAK

#IF
random5
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
MOVRP83
INCP8288
MOVRP73
INCP7615
mapmove0<$STR(P8)><$STR(P7)>
GMEXECUTE表情<$STR(S10)>
DelayCall8000@5900312
BREAK

#IF
random4
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
MOVRP83
INCP8147
MOVRP73
INCP7337
mapmove5<$STR(P8)><$STR(P7)>
GetRandomText.\QuestDiary\固定数据\喊话系统二.txtS99
GMEXECUTE表情<$STR(S10)>
GuildNoticeMsg0151(!)%s:<$STR(S99)>MAP
DelayCall9000@5900312
BREAK


#IF
random3
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
MOVRP83
INCP8177
MOVRP73
INCP7324
mapmove11<$STR(P8)><$STR(P7)>
GetRandomText.\QuestDiary\固定数据\喊话系统一.txtS99
GMEXECUTE表情<$STR(S10)>
GuildNoticeMsg0151(!)%s:<$STR(S99)>MAP
DelayCall4000@5900312
BREAK


#IF
random2
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
MOVRP83
INCP8242
MOVRP73
INCP7202
mapmove4<$STR(P8)><$STR(P7)>
GetRandomText.\QuestDiary\固定数据\喊话系统一.txtS99
GMEXECUTE表情<$STR(S10)>
GuildNoticeMsg0151(!)%s:<$STR(S99)>MAP
DelayCall3000@5900312
BREAK
#IF


random1
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
MOVRP83
INCP8130
MOVRP73
INCP7150
mapmove6<$STR(P8)><$STR(P7)>
GetRandomText.\QuestDiary\固定数据\喊话系统二.txtS99
GMEXECUTE表情<$STR(S10)>
GuildNoticeMsg0151(!)%s:<$STR(S99)>MAP
DelayCall2000@5900312
BREAK


[@5900312]
#IF
random8
#ACT
GetRandomText.\QuestDiary\固定数据\试炼表情.txtS10
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
GetRandomText.\QuestDiary\固定数据\喊话系统.txtS99
GMEXECUTE表情<$STR(S10)>
GuildNoticeMsg0151(!)%s:<$STR(S99)>MAP
DelayCall286000@随机飞啊
BREAK

#IF
random7
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall196000@随机飞啊
BREAK

#IF
random6
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall176000@随机飞啊
BREAK

#IF
random5
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall156000@随机飞啊
BREAK

#IF
random4
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall146000@随机飞啊
BREAK

#IF
random3
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall136000@随机飞啊
BREAK

#IF
random2
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall126000@随机飞啊
BREAK

#IF
random1
#ACT
CHANGEEXP+1000
MOVRP818
INCP8321
MOVRP717
INCP7323
mapmove3<$STR(P8)><$STR(P7)>
DelayCall1526000@随机飞啊
BREAK