以下是一些适合GOM引擎架设传奇的脚本范例:
### 假人脚本
```ini
(GLOBAL)
假人_自动上线开关=开启
假人_人数上限=50
假人_上线间隔=10
假人_新手地图=newren
假人_新手地图X左=16
假人_新手地图X右=21
假人_新手地图Y左=14
假人_新手地图Y右=22
假人_盟重地图号=3
假人_回城坐标X左=322
假人_回城坐标X右=340
假人_回城坐标Y左=322
假人_回城坐标Y右=340
假人_背包剩几格回收=10
假人_指定下图号=3
假人_被人打血低百分之多少反击=99
假人_下图几率=60
假人_能升最高等级=500
假人_活动频率快=10
假人_活动频率慢=20
假人_土城走动几率=50
假人_补伤害开关=开启
假人_补伤害最低值=10
假人_补伤害最高值=100
假人_血低百分之多少回城=20
假人_血低于多少值回城=100
假人_使用施毒术=关闭
假人_攻击吸血开关=开启
假人_攻击吸血最少值=10
假人_攻击吸血最高值=100
假人_杀怪快速升级开关=开启
假人_杀怪补经验最低=20000
假人_杀怪补经验最高=20100
假人_手动加经验=280000
假人_最低下图等级=22
假人_下图几率=100
;下图几率100 为100%下图
假人_装备自补男甲=布衣(男)
假人_装备自补女衣=布衣(女)
假人_装备自补武器=木剑
假人_打怪回城时间为秒=600
假人_入会开关=开启
假人_最低入会等级=50
假人_入会等级几率=200
; 入会等级几率 越大越难
```
此脚本用于控制假人的各种行为和属性,如自动上线、在不同地图的活动、升级方式、装备补充等.
### 怪物召唤卷脚本
```ini
(@StdModeFunc741)
#if
ISONMAP 3
#act
give BOSS召唤证明
MESSAGEBOX 使用失败了,土城无法召唤!
#ELSEACT
goto @在检测
(@在检测)
#if
ISONMAP 0150
#act
give BOSS召唤证明
MESSAGEBOX 使用失败了,皇宫无法召唤!
#ELSEACT
GetRandomText..\QuestDiary\修真\全部怪物.txt S6
MonGenEx <$MAP> <$X> <$Y> <$STR(S6)> 1 1 0 215
SendCenterMsg 191 233 恭喜(<$USERNAME>)打开【BOSS召唤证明】随机召唤【<$STR(S6)>】 1 10 1
GuildNoticeMsg 56 161 恭喜(<$USERNAME>)打开【BOSS召唤证明】随机召唤【<$STR(S6)>】....
GuildNoticeMsg 57 161 恭喜(<$USERNAME>)打开【BOSS召唤证明】随机召唤【<$STR(S6)>】....
(@StdModeFunc849)
#if
ISONMAP 3
#act
give 上古BOSS召唤证明
MESSAGEBOX 使用失败了,土城无法召唤!
#ELSEACT
goto @在检测阿
(@在检测阿)
#if
ISONMAP 0150
#act
give 上古BOSS召唤证明
MESSAGEBOX 使用失败了,皇宫无法召唤!
#ELSEACT
GetRandomText..\QuestDiary\修真\大圣全部怪物.txt S7
MonGenEx <$MAP> <$X> <$Y> <$STR(S7)> 1 1 0 215
SendCenterMsg 191 233 恭喜(<$USERNAME>)打开【上古BOSS召唤证明】随机召唤【<$STR(S7)>】 1 10 1
GuildNoticeMsg 56 161 恭喜(<$USERNAME>)打开【上古BOSS召唤证明】随机召唤【<$STR(S7)>】....
GuildNoticeMsg 57 161 恭喜(<$USERNAME>)打开【上古BOSS召唤证明】随机召唤【<$STR(S7)>】....
(@StdModeFunc604)
#if
ISONMAP 3
#act
give 天魔单职业BOSS召唤证明
MESSAGEBOX 使用失败了,土城无法召唤!
#ELSEACT
goto @在检测阿阿
(@在检测阿阿)
#if
ISONMAP 0150
#act
give 天魔单职业BOSS召唤证明
MESSAGEBOX 使用失败了,皇宫无法召唤!
#ELSEACT
GetRandomText..\QuestDiary\修真\传奇永恒全部BOSS.txt S8
MonGenEx <$MAP> <$X> <$Y> <$STR(S8)> 1 1 0 215
SendCenterMsg 191 233 恭喜(<$USERNAME>)打开【天魔单职业BOSS召唤证明】随机召唤【<$STR(S8)>】 1 10 1
GuildNoticeMsg 56 161 恭喜(<$USERNAME>)打开【天魔单职业BOSS召唤证明】随机召唤【<$STR(S8)>】....
GuildNoticeMsg 57 161 恭喜(<$USERNAME>)打开【天魔单职业BOSS召唤证明】随机召唤【<$STR(S8)>】....
```
这段脚本实现了怪物召唤卷的功能,根据不同的召唤卷类型和地图限制,在合适的地点召唤相应的怪物.
### 宝石镶嵌脚本
```ini
(@main)
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
#SAY
\
<放入所需/FCOLOR=250> <放入所需/FCOLOR=250> \
<镶嵌装备/FCOLOR=250> <镶嵌材料/FCOLOR=250> <蓝宝石:镶嵌后减少伤害/FCOLOR=252>\
<↓↓↓↓/FCOLOR=249> <↓↓↓↓/FCOLOR=249> <红宝石:镶嵌后增加目标暴率/FCOLOR=249>\
<绿宝石:镶嵌后增加攻魔道倍数/FCOLOR=250>\
<开始/@开始镶嵌>\
<ITEMBOX:0:8:883:43:-2:45:45:5,10,11,63,28,62,16,48,15,19,51,30,26,22,64,65,52,20,21,7,53:254#请放入需要镶嵌装备> <ITEMBOX:1:8:883:83:-2:45:45:44:254#请放入所需镶嵌材料> \\
<每件装备可同时镶嵌1种宝石/FCOLOR=254>\
(@ItemIntoBox0)
#if
#act
SetUpgradeItem 0
DRILLHOLE * * -1 * * 0 * 1 * *
DRILLHOLE * * -1 * * 1 * 1 * *
DRILLHOLE * * -1 * * 2 * 1 * *
UpDateBoxItem 0
(@ItemIntoBox1)
#if
EQUAL <$BOXITEM(1).NAME> 红宝石
#act
MOV <$STR(N$宝石序号)> 478
#if
EQUAL <$BOXITEM(1).NAME> 蓝宝石
#act
MOV <$STR(N$宝石序号)> 479
#if
EQUAL <$BOXITEM(1).NAME> 绿宝石
#act
MOV <$STR(N$宝石序号)> 480
(@开始镶嵌)
#if
Equal <$BOXITEM(1).NAME>
#act
MESSAGEBOX 当前没有放入镶嵌的宝石!无法提升
#elseact
GOTO @检测OK0
(@检测OK0)
#IF
Equal <$BOXITEM(0).NAME>
#ACT
MESSAGEBOX 当前没有放入镶嵌的装备!无法提升
break
#elseact
SetUpgradeItem 0
DRILLHOLE * * -1 * * 0 * 1 * *
DRILLHOLE * * -1 * * 1 * 1 * *
DRILLHOLE * * -1 * * 2 * 1 * *
UpDateBoxItem 0
GOTO @镶嵌第一个
(@镶嵌第一个)
#ACT
SetUpgradeItem 0 \\关联OK框
#IF
NOT CHECKSOCKETABLEITEM -1 0 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
GOTO @镶嵌第一个A
#elseact
GOTO @镶嵌第二个
(@镶嵌第一个A)
#IF
NOT CHECKSOCKETABLEITEM -1 0 <$STR(N$镶嵌序号)> <$STR(N$镶嵌名字)>
#ACT
DELBOXITEM 1
SOCKETABLEITEM * * * * -1 0 * * <$STR(N$宝石序号)> *
UpDateBoxItem 0
SENDMSG 6 装备第一个控镶嵌成功
BREAK
(@镶嵌第二个)
#if
equal <$BOXITEM(0).GNAME1> <$BOXITEM(1).NAME>
#act
SENDMSG 6 您的装备已镶嵌了一颗相同的宝石,不能再次镶嵌
break
#IF
NOT CHECKSOCKETABLEITEM -1 1 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
GOTO @镶嵌第二个A
#elseact
GOTO @镶嵌第三个
(@镶嵌第二个A)
#IF
NOT CHECKSOCKETABLEITEM -1 1 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
DELBOXITEM 1
SOCKETABLEITEM * * * * -1 1 * * <$STR(N$宝石序号)> *
UpDateBoxItem 0
SENDMSG 6 装备第二个控镶嵌成功
BREAK
(@镶嵌第三个)
#if
equal <$BOXITEM(0).GNAME1> <$BOXITEM(1).NAME>
#act
SENDMSG 6 您的装备已镶嵌了一颗相同的宝石,不能再次镶嵌
break
#if
equal <$BOXITEM(0).GNAME2> <$BOXITEM(1).NAME>
#act
SENDMSG 6 您的装备已镶嵌了一颗相同的宝石,不能再次镶嵌
break
#IF
NOT CHECKSOCKETABLEITEM -1 2 <$STR(N$镶嵌序号)> <$STR(能N$镶嵌名字)>
#ACT
GOTO @镶嵌第三个A
#elseact
GOTO @镶嵌第四个
(@镶嵌第三个A)
#IF
NOT CHECKSOCKETABLEITEM -1 2 <$STR(N$镶嵌序号)> <$STR(N$镶嵌名字)>
#ACT
DELBOXITEM 1
SOCKETABLEITEM * * * * -1 2 * * <$STR(N$宝石序号)> *
UpDateBoxItem 0
SENDMSG 6 装备第三个控镶嵌成功
BREAK
```
该脚本实现了宝石镶嵌的功能,包括玩家放入镶嵌装备和宝石、检测装备和宝石是否符合要求、镶嵌成功后的属性加成及提示等.
### 封挂脚本
```ini
(@useplugin)
#if
#act
changemodeex 95
sendmsg 7 (提示):由于您使用外挂程序已被限制卡位5秒,已被系统记录,再次使用将被封号处理!
```
此脚本用于检测玩家是否使用外挂,当检测到使用外挂时,会对玩家进行卡位限制,并给予相应的提示信息.
在传奇游戏中,GOM 引擎有着广泛的应用。以下为大家提供一些适合 GOM 引擎架设传奇的脚本范例。
在怪物触发方面,可通过在“D:\\mirserver\\Mir200\\Envir\\MapQuest.txt”文本里按照特定格式设置,例如怪物的名字是【火龙神】:huolong01 (001) 0 【火龙神】 * Q001。只有杀死特定地图的怪物才会触发相应脚本,如杀死地图“huolong01”的【火龙神】会触发“D:\\mirserver\\Mir200\\Envir\\MapQuest_def\\Q001.txt”这个脚本。触发的脚本内容可根据需要随意编写,比如全服提示:(@main) #if #act sendmsg 0 火龙神殿的【火龙神】被高手%s杀掉了!取出魔王之骨眼看就要领取国王的嘉奖了!赶紧杀他夺宝啊!sendmsg 0 火龙神殿的【火龙神】被高手%s杀掉了!
加星强化方面,有(GOM/GEE 脚本) GOM 引擎传奇加星强化脚本示例,只有带阶级的套装才能强化 (@main)#ACT OPENMERCHANTBIGDLG 192 92 1 4 10 -70 1 321 17 MOV S$条件 MOV S$显示1 MOV S$显示2 MOV S$显示3 MOV S$显示4 MOV S$显示5 MOV...
打开 OK 对话框方面,传奇版本 Gom 引擎打开 OK 对话框脚本范例,格式为 OPENUPGRADEDLG 显示的名称,例:(@main) #ACT OPENUPGRADEDLG 装备升级(显示的名称);点击 OK 键后触发字段(@UpgradeDlgItem),(@UpgradeDlgItem) #SAY OK 框中物品的名称:<$DLGITEM.NAME>\\OK 框中物品的 StdMode:<$DLGITEM.STDMODE>\\OK 框中物品的持久:<$DLGITEM.DURA>\\OK 框中物品的最大持久:<$DLGITEM.DURAMAX>\\<升级/@升级>\\(@升级) #ACT SetNewItemValue -1 0 + 10 RECLAIMITEM SetNewItemValue 位置(-1 时是 OK 框中的装备,0 - 12 时是穿在身上的装备) 属性(0 - 10) 操作符(+,-,=) 值(1 - 100)。
星级转移方面,(GOM/GEE 脚本) GOM 引擎的传奇一条龙开区版本星级转移脚本教程说明和范例使用 (@main) #IF #ACT OPENMERCHANTBIGDLG 36 69 1 4 -30 -100 0 455 30 #say <ImgEx:36:19:20:21:270:-12/@EXIT>\\<勇士,这里可以把你鉴定的高星装备转移到新的装备上/AUTOCOLOR=151>\\<接受转移的装备将会重新定义属性,高级属性几率加强/AUTOCOLOR=70>\\<转移条件 1:需要转移的装备必须大于四星以上/AUTOCOLOR=253>\\<转移条件 2:(转星神水只能转移九星)/AUTOCOLOR=250>\\<转移方式 1:需要 2RMB 点/AUTOCOLOR=146> <RMB 点转移/@转移>\\<转移方式 2:需要转星神水*1/AUTOCOLOR=146> <神水 转移/@转移2>\\<> <↓放入主装备↓/AUTOCOLOR=253> <↓放入副装备↓/AUTOCOLOR=253> \\<ITEMBOX:2:-1:127:35:-22:90:90:10,5,15,26,19,22,64,62:254#请放入主装备>\\<ITEMBOX:3:-1:127:176:-38:90:90:10,5,15,26,19,22,64,62:254#请放入接受转移的装备>\\。
怪物召唤方面,(数据库里没有的道具自己根据脚本添加即可)(@StdModeFunc741)#if ISONMAP 3 #act give BOSS 召唤证明 MESSAGEBOX 使用失败了,土城无法召唤!#ELSEACT goto @在检测 QFunction-0.txt 添加内容如下:(数据库里没有的道具自己根据脚本添加即可) (@StdModeFunc741) #if ISONMAP 3 #act give BOSS 召唤证明 MESSAGEBOX 使用失败了,土城无法召唤!#ELSEACT goto @在检测 (@在检测) #if ISONMAP 0150 #act give BOSS 召唤证明 MESSAGEBOX 使用失败了,皇宫无法召唤!#ELSEACT GetRandomText..\\QuestDiary\\修真\\全部怪物.txt S6 MonGenEx <$MAP> <$X> <$Y> <$STR(S6)>1 1 0 215 SendCenterMsg 191 233 恭喜(<$USERNAME>)打开【BOSS 召唤证明】随机召唤【<$STR(S6)>】1 10 1 GuildNoticeMsg 56 161 恭喜(<$USERNAME>)打开【BOSS 召唤证明】随机召唤【<$STR(S6)>】....GuildNoticeMsg 57 161 恭喜(<$USERNAME>)打开【BOSS 召唤证明】随机召唤【<$STR(S6)>】....(@StdModeFunc849) #if ISONMAP 3 #act give 上古 BOSS 召唤证明 MESSAGEBOX 使用失败了,土城无法召唤!#ELSEACT goto @在检测阿 (@在检测阿) #if ISONMAP 0150 #act give 上古 BOSS 召唤证明 MESSAGEBOX 使用失败了,皇宫无法召唤!
擂台裁判方面,GOM 引擎擂台裁判脚本,传奇私人服务器一条龙设置全服邀请命令和范例 (@MAIN) #IF CHECKLEVELEX > 0 #ACT #SAY \\擂台信息:\\<擂主名字/SCOLOR=116>:<$STR(A1)>\\<摆擂龙币/SCOLOR=116>:<$STR(G1)>\\\\<取回摆擂龙币/@取回摆擂龙币> <全服邀请/@全服邀请>\\<挑战擂主/@挑战擂主>\\<回城/@回城>\\(@全服邀请) #if checkcastlewar #say \\\\攻城期间,禁止使用此功能!!!!\\#elseact goto @MAINxx7 (@MAINxx7) #IF CHECKGAMEGIRD > 999 #ACT GAMEGIRD - 1000 Gmexecute 开始提问 @全服擂台令 MESSAGEBOX 全服邀请发送消耗龙币 1000 个!!SENDMSG 7 全服激情令已放出,请等待激情的降临!SENDMSG 7 全服激情令已放出,请等待激情的降临!SENDMSG 7 全服激情令已放出,请等待激情的降临!#elsesay \\\\发送全服通告要 1000 龙币!(@取回摆擂龙币) #IF LARGE G2 1 #ACT MESSAGEBOX 擂台比武还没结束,先一决胜负吧!Break #IF EQUAL A1 <$USERNAME> #ACT ;SENDMSG 6 G1=<$STR(G1)>,G2=<$STR(G2)> #ELSEACT MESSAGEBOX 你不是擂主,没有资格取回擂台龙币!
宝石镶嵌方面,(@main)#ACTReturnBoxItem 0ReturnBoxItem 1#SAY\\<放入所需/FCOLOR=250> <放入所需/FCOLOR=250> \\<镶嵌装备/FCOLOR=250> <镶嵌材料/FCOLOR=250> <蓝宝石:镶嵌后减少伤害/FCOLOR=252>\\<↓↓↓↓/FCOLOR=249> <↓↓↓↓/FCOLOR=249> <红宝石:镶嵌后增加目标暴率/FCOLOR=249>\\<绿宝石:镶嵌后增加攻魔道倍数/FCOLOR=250>\\<开始/@开始镶嵌>\\<ITEMBOX:0:8:883:43:-2:45:45:5,10,11,63,28,62,16,48,15,19,51,30,26,22,64,65,52,20,21,7,53:254#请放入需要镶嵌装备> <ITEMBOX:1:8:883:83:-2:45:45:44:254#请放入所需镶嵌材料> \\<每件装备可同时镶嵌 1 种宝石/FCOLOR=254>\\\\ \\。
头顶称号方面,格式为 SetIcon 位置(0 - 9) WIL 文件序号 图片序号(0 - 65535) X(为空时默认 X=0) Y(为空时默认 Y=0) 播放张数(为空时默认张数=1) 播放效果(0 普通 1...。
定时回血方面,QF 文本添加:(@TakeOn2) #if checkitemw 天圣极品挂坠 1 #act SetOnTimer 138 3 SendCenterMsg 255 253 恭喜【<$username>】佩戴天圣极品挂坠,获得每三秒+40000 万血量!!! 15 break (@TakeOff2) #if #act SETOFFTIMER 138 #elsea QM 文本添加:(@login) #if checklevelex > 0 #act DelayCall 4000 @勋章激活 (@勋章激活) #if checkitemw 天圣极品挂坠 1 #act SetOnTimer 138 3 SendCenterMsg 255 253 恭喜【<$username>】佩戴天圣极品挂坠,获得每三秒+40000 万血量!!! 15 break (@ontimer138) #if #act HUMANHP + 400000000 HUMANMP + 400000000 SendCenterMsg 255 253 恭喜【<$username>】佩戴天圣极品挂坠,获得每三秒+40000 万血量!!! 15 break。这些脚本范例为使用 GOM 引擎架设传奇游戏提供了丰富的参考和创意。
### GOM 引擎怪物触发脚本范例
在 GOM 引擎中,怪物触发脚本可以为游戏增加更多的趣味性和互动性。例如,当怪物死亡时,可以触发全服公告,让所有玩家都知道有重要的怪物被击败。这样不仅能增加杀死怪物的玩家的成就感,还能调动其他玩家的游戏积极性。
具体实现方式如下:在 D:\\gshlfg\\Mirserver\\Mir200\\Envir\\Market_Def\\QFunction.txt 文件中设置怪物死亡时触发的脚本。首先判断爆的物品是否在可提醒装备中,如果存在,则发送滚动屏幕,通知大家。比如“<【喜讯】/SCOLOR=249>玩家{『<$USERNAME>』/SCOLOR=250}{刚刚在(%m)/SCOLOR=146}地图的{(<$KILLMONNAME>)/SCOLOR=242}怪物爆出:{【<$SCATTERITEMNAME>】/SCOLOR=253}”。这种怪物死亡触发的脚本可以根据自己的需求进行调整,比如可以触发额外奖励赠送物品,或者触发传送到更高级的地图等。
### GOM 引擎加星强化脚本范例
GOM 引擎的传奇加星强化脚本可以让玩家的装备变得更强大。例如,在脚本中可以设置只有带阶级的套装才能强化。玩家将装备放入指定的框内,系统会根据条件进行判断。如果满足强化条件,装备可以成功升级,增加一颗星并提升相对应的属性。
同时,神估宝石可以配合升级宝石使用,增加强化的成功率。宝石最多升级到九星,届时玩家将拥有强大的装备,在游戏中更具竞争力。比如“(GOM/GEE 脚本) GOM 引擎传奇加星强化脚本示例,只有带阶级的套装才能强化 (@main) #ACT OPENMERCHANTBIGDLG 192 92 1 4 10 -70 1 321 17 MOV S$条件 MOV S$显示 1 MOV S$显示 2 MOV S$显示 3 MOV S$显示 4 MOV S$显示 5 MOV S$显示 6 MOV S$提示 请在框内放入需要强化的装备 MOV S$类型 1 MOV S$类型 2 MOV S$类型 3 MOV S$跳转 UpDateBoxItem 1 UpDateBoxItem 2 UpDateBoxItem 3 ReturnBoxItem 1 ReturnBoxItem 2 ReturnBoxItem 3 goto @界面”。
### GOM 引擎打开 OK 对话框脚本范例
传奇版本 Gom 引擎打开 OK 对话框脚本可以实现特定的功能。格式为 OPENUPGRADEDLG 显示的名称。例如,“(@main) #ACT OPENUPGRADEDLG 装备升级(显示的名称);打开可以放物品的对话框,也就是装备修理或出售物品的那个对话框”。
点击 OK 键后可以触发特定的字段,比如“(@UpgradeDlgItem) (@UpgradeDlgItem) #SAY OK 框中物品的名称:<$DLGITEM.NAME>\\OK 框中物品的 StdMode:<$DLGITEM.STDMODE>\\OK 框中物品的持久:<$DLGITEM.DURA>\\OK 框中物品的最大持久:<$DLGITEM.DURAMAX>\\<升级/@升级>\\(@升级) #ACT SetNewItemValue -1 0 + 10 RECLAIMITEM SetNewItemValue 位置(-1 时是 OK 框中的装备,0 - 12 时是穿在身上的装备) 属性(0 - 10) 操作符(+,-,=) 值(1 - 100)”。
### GOM 引擎星级转移脚本范例
GOM 引擎的传奇一条龙开区版本星级转移脚本可以让玩家将高星装备的星级转移到新的装备上。转移条件有一定要求,比如需要转移的装备必须大于四星以上,且“转星神水只能转移九星”。
转移方式有两种,一种是需要 2RMB 点,另一种是需要转星神水*1。玩家将主装备和副装备放入指定的框内,系统会根据条件进行转移。例如“<勇士,这里可以把你鉴定的高星装备转移到新的装备上/AUTOCOLOR=151>\\<接受转移的装备将会重新定义属性,高级属性几率加强/AUTOCOLOR=70>\\<转移条件 1:需要转移的装备必须大于四星以上/AUTOCOLOR=253>\\<转移条件 2:(转星神水只能转移九星)/AUTOCOLOR=250>\\<转移方式 1:需要 2RMB 点/AUTOCOLOR=146> <RMB 点转移/@转移>\\<转移方式 2:需要转星神水*1/AUTOCOLOR=146> <神水转移/@转移 2>\\<ITEMBOX:2:-1:127:35:-22:90:90:10,5,15,26,19,22,64,62:254#请放入主装备>\\<ITEMBOX:3:-1:127:176:-38:90:90:10,5,15,26,19,22,64,62:254#请放入接受转移的装备>”。
### GOM 引擎怪物召唤脚本范例
在 GOM 引擎中,怪物召唤脚本可以为玩家提供更多的挑战和乐趣。比如“(数据库里没有的道具自己根据脚本添加即可)(@StdModeFunc741)#if ISONMAP 3 #act give BOSS 召唤证明 MESSAGEBOX 使用失败了,土城无法召唤!#ELSEACT goto @在检测 QFunction - 0.txt 添加内容如下:(数据库里没有的道具自己根据脚本添加即可) (@StdModeFunc741) #if ISONMAP 3 #act give BOSS 召唤证明 MESSAGEBOX 使用失败了,土城无法召唤!#ELSEACT goto @在检测 (@在检测) #if ISONMAP 0150 #act give BOSS 召唤证明 MESSAGEBOX 使用失败了,皇宫无法召唤!#ELSEACT GetRandomText..\\QuestDiary\\修真\\全部怪物.txt S6 MonGenEx <$MAP> <$X> <$Y> <$STR(S6)>1 1 0 215 SendCenterMsg 191 233 恭喜(<$USERNAME>)打开【BOSS 召唤证明】随机召唤【<$STR(S6)>】1 10 1 GuildNoticeMsg 56 161 恭喜(<$USERNAME>)打开【BOSS 召唤证明】随机召唤【<$STR(S6)>】....(@StdModeFunc849) #if ISONMAP 3 #act give 上古 BOSS 召唤证明 MESSAGEBOX 使用失败了,土城无法召唤!#ELSEACT goto @在检测阿 (@在检测阿) #if ISONMAP 0150 #act give 上古 BOSS 召唤证明 MESSAGEBOX 使用失败了,皇宫无法召唤!”。
### GOM 引擎擂台裁判脚本范例
GOM 引擎擂台裁判脚本可以为游戏增加竞技性和趣味性。例如“(@MAIN)#IF CHECKLEVELEX > 0 #ACT #SAY \\\\擂台信息:\\<擂主名字/SCOLOR=116>:<$STR(A1)>\\<摆擂龙币/SCOLOR=116>:<$STR(G1)>\\\\<取回摆擂龙币/@取回摆擂龙币> <全服邀请/@全服邀请>\\<挑战擂主/@挑战擂主>\\<回城/@回城>\\(@全服邀请) #if checkcastlewar #say \\\\攻城期间,禁止使用此功能!!!!\\#elseact goto @MAINxx7 (@MAINxx7) #IF CHECKGAMEGIRD > 999 #ACT GAMEGIRD - 1000 Gmexecute 开始提问 @全服擂台令 MESSAGEBOX 全服邀请发送消耗龙币 1000 个!!SENDMSG 7 全服激情令已放出,请等待激情的降临!SENDMSG 7 全服激情令已放出,请等待激情的降临!SENDMSG 7 全服激情令已放出,请等待激情的降临!#elsesay \\\\发送全服通告要 1000 龙币!(@取回摆擂龙币) #IF LARGE G2 1 #ACT MESSAGEBOX 擂台比武还没结束,先一决胜负吧!Break #IF EQUAL A1 <$USERNAME> #ACT ;SENDMSG 6 G1=<$STR(G1)>,G2=<$STR(G2)> #ELSEACT MESSAGEBOX 你不是擂主,没有资格取回擂台龙币!”。
### GOM 引擎宝石镶嵌脚本范例
GOM 引擎的宝石镶嵌脚本可以让玩家的装备获得额外的属性。比如在数据库中增加宝石的 DB,宝石的 Shape 值(0 - 4)可以显示出不同颜色的镶嵌宝石。在必备补丁 NewopUI.PAK 的 301 - 305,宝石的 Shape 值如果设置为 255,镶嵌后会显示宝石 DB 的 Looks 的,也就是 DnItems 里面的素材。
宝石 DB 库的 Reserved = 0 时,Ac2Mac2DC2MC2SC2 HP MP 字段的值是增加的对应的 7 个基本属性的值;Reserved > 0 时,Ac2Mac2DC2MC2SC2 HP MP 字段的值除以 100,为各属性的倍数。例如 Ac2 设置为 110,人物的防御为 200,人物实际防御 = 110/100*200 = 220。Value1 - Value11 是增加的元素属性。其他字段没有特别要求。具体实现方式如下:“(@main)#ACTReturnBoxItem 0ReturnBoxItem 1#SAY\\<放入所需/FCOLOR=250> <放入所需/FCOLOR=250> \\<镶嵌装备/FCOLOR=250> <镶嵌材料/FCOLOR=250> <蓝宝石:镶嵌后减少伤害/FCOLOR=252>\\<↓↓↓↓/FCOLOR=249> <↓↓↓↓/FCOLOR=249> <红宝石:镶嵌后增加目标暴率/FCOLOR=249>\\<绿宝石:镶嵌后增加攻魔道倍数/FCOLOR=250>\\<开始/@开始镶嵌>\\<ITEMBOX:0:8:883:43:-2:45:45:5,10,11,63,28,62,16,48,15,19,51,30,26,22,64,65,52,20,21,7,53:254#请放入需要镶嵌装备> <ITEMBOX:1:8:883:83:-2:45:45:44:254#请放入所需镶嵌材料> \\\\<每件装备可同时镶嵌 1 种宝石/FCOLOR=254>\\\\ \\ \\(@ItemIntoBox0)#if#actSetUpgradeItem 0DRILLHOLE * * -1 * *0 * 1 * *DRILLHOLE * * -1 * *1 * 1 * * \nDRILLHOLE * * -1 * *2 * \n1 * * \nUpDateBoxItem 0 \n(@ItemIntoBox1) \n#if \nEQUAL <$BOXITEM(1).NAME> 红宝石 \n#act \nMOV <$STR(N$宝石序号)> 478 \n#if \nEQUAL <$BOXITEM(1).NAME> 蓝宝石 \n#act \nMOV <$STR(N$宝石序号)> 479 \n#if \nEQUAL <$BOXITEM(1).NAME> 绿宝石 \n#act \nMOV <$STR(N$宝石序号)> 480 \n;#if \n;EQUAL <$BOXITEM(1).NAME> 紫宝石 \n;#act \n;MOV <$STR(N$宝石序号)> 481 \n;break \n(@开始镶嵌) \n#if \nEqual <$BOXITEM(1).NAME> \n#act \nMESSAGEBOX 当前没有放入镶嵌的宝石!无法提升 \n#elseact \nGOTO @检测 OK0 \n(@检测 OK0) \n#IF \nEqual <$BOXITEM(0).NAME> \n#ACT \nMESSAGEBOX 当前没有放入镶嵌的装备!无法提升 \nbreak \n#elseact \nSetUpgradeItem 0 \nDRILLHOLE * * -1 * *0 * 1 * * \nDRILLHOLE * * -1 * *1 * 1 * * \nDRILLHOLE * * -1 * *2 * \n1 * * \nUpDateBoxItem 0 \nGOTO @镶嵌第一个 \n(@镶嵌第一个) \n#ACT \nSetUpgradeItem 0\\\\关联 OK 框 \n#IF \nNOT CHECKSOCKETABLEITEM -1 0 <$STR(N$镶嵌序号)> <$STR(能 N$镶嵌名字)> \n#ACT \nGOTO @镶嵌第一个 A \n#elseact \nGOTO @镶嵌第二个 \n(@镶嵌第一个 A) \n#IF \nNOT CHECKSOCKETABLEITEM -1 0 <$STR(N$镶嵌序号)> <$STR(N$镶嵌名字)>”。
### GOM 引擎头顶称号脚本范例
GOM 引擎可以通过特定的脚本来实现人物头顶称号的功能。格式为“SetIcon 位置(0 - 9) WIL 文件序号 图片序号(0 - 65535) X(为空时默认 X = 0) Y(为空时默认 Y = 0) 播放张数(为空时默认张数 = 1) 播放效果(0 普通 1 特效) 播放速度(毫秒,为空时速度为 300 毫秒) 是否只有自己看见(0 = 所有人都可以看见 1 = 仅仅自己可以看见)”。
例如“(@main)#ACT SETICON 0 3 1 30 -30 SETICON 1 3 2 -30 -30 SETICON 2 3 3 -60 -30 3 SETICON 3 3 7;如果要清除,WIL 文件序号设置为 - 1 即可 (@main)SE...”。这种头顶称号的功能可以让玩家在游戏中更加个性化,也能让其他玩家更容易识别不同的角色。
### GOM 引擎定时回血脚本范例
在 GOM 引擎中,可以通过设置定时回血脚本来为玩家提供持续的生命恢复。比如“Gom 引擎版本中非常流行的“定时回血”脚本实例分享 只看楼主 QF 文本添加:(@TakeOn2) #if checkitemw 天圣极品挂坠 1 #act SetOnTimer 138 3 SendCenterMsg 255 253 恭喜【<$username>】佩戴天圣极品挂坠,获得每三秒 + 40000 万血量!!! 15 break (@TakeOff2) #if #act SETOFFTIMER 138 #elsea QM 文本添加:(@login) #if checklevelex > 0 #act DelayCall 4000 @勋章激活 (@勋章激活) #if checkitemw 天圣极品挂坠 1 #act SetOnTimer 138 3 SendCenterMsg 255 253 恭喜【<$username>】佩戴天圣极品挂坠,获得每三秒 + 40000 万血量!!! 15 break (@ontimer138) #if #act HUMANHP + 400000000 HUMANMP + 400000000 SendCenterMsg 255 253 恭喜【<$username>】佩戴天圣极品挂坠,获得每三秒 + 40000 万血量!!! 15 break”。
结论:GOM 引擎为传奇游戏的架设提供了丰富的脚本功能。从怪物触发脚本到加星强化脚本,从打开 OK 对话框脚本到星级转移脚本,从怪物召唤脚本到擂台裁判脚本,从宝石镶嵌脚本到头顶称号脚本,再到定时回血脚本,这些范例为传奇游戏的开发者和玩家带来了更多的可能性和乐趣。开发者可以根据自己的需求选择合适的脚本进行定制化开发,为玩家打造一个独特而精彩的传奇游戏世界。玩家也可以在这些丰富的脚本功能中体验到更加刺激和有趣的游戏玩法。

