趣游论坛

免费列表
搜索
网络广告 风险自担
网络广告 风险自担
查看: 327|回复: 107

[GOM引擎] GOM引擎特殊鉴定脚本怎么写?单职业传奇版本清除当前装备星星星教程。

  [复制链接]

8560

主题

8842

帖子

6万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
64909

灌水之王活跃会员突出贡献优秀版主荣誉管理论坛元老

发表于 2019-10-24 11:35:33 | 显示全部楼层 |阅读模式
20191022093437.png

(@ReclaimItem)
[@main]
#if
#act
OPENMERCHANTBIGDLG 0 596 1 4 1 -70 0 0 0 1
MOV N$时装页面 0
goto @main22
#say
  <Img:599:0:-13:75>\
<ITEMBOX:3:-1:211:191:155:40:40:15,19,20,21,22,23,24,26,62,64:146#请放入要鉴定的首饰!^-^70#每次鉴定需要:特殊鉴定石一个>\

 \
  <ImgEx:0:648:649:648:80:280|253#鉴定说明:^-^70#一:鉴定一次需要特殊鉴定石一个+150荣誉点!!^-^70#二:每鉴定一次星星增加一个^-^70#每次鉴定最高可获得3%属性!!^-^70#三:星星最高可以增加到六级^-^242#星星六级以后可归零星级再鉴定!/@品级鉴定aaa> <ImgEx:0:775:776:775:70:280|150#星级归零一次需要5个金刚石^-^242#只要星星大于一个就可重置/@星级归零> <ImgEx:0:718:719:718:60:280/@exit>\
 \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
          {如果对当前属性不满意可以/scolor=250}{『归零星级』/scolor=253}{再鉴定/scolor=250}


[@星级归零]
#if
#act
SetUpgradeItem 3

#if
equal <$BOXITEM[3].NAME>
#act
messagebox 请先放入首饰再执行当前操作!!
break

#if
equal <$BOXITEM[3].UPGRADECOUNT> 0
#act
messagebox 你当前装备都没有星星,清除什么!!
break

#if
CHECKGAMEDIAMOND < 5
#act
messagebox 你当前RMB不足,无法执行当前操作!!
break
#elseact
messagebox 你确定要清除当前装备所有星星吗?? @别废话
break

[@别废话]
#if
#act
SetUpgradeItem 3

#if
NOT equal <$BOXITEM[3].NAME>
large <$BOXITEM[3].UPGRADECOUNT> 0
CHECKGAMEDIAMOND > 4
#act
GAMEDIAMOND - 5
CHANGEITEMUPGRADECOUNT -1 = 0
UpDateBoxItem 3
messagebox 你已经成功的清除了当前装备的星星!!\ \可以再次去鉴定特殊属性了!!
break

[@品级鉴定aaa]
#if
#act
SetUpgradeItem 3

#if
equal <$BOXITEM[3].NAME>
#act
messagebox 请先放入首饰再鉴定属性!!
break

#if
checkitem 特殊鉴定石 1
#elseact
ReturnBoxItem 3
messagebox 你没有特殊鉴定石!!
break

#if
checkGameGird < 150
#act
messagebox 荣誉不足,无法鉴定!!
break


#if
large <$BOXITEM[3].UPGRADECOUNT> 5
#act
;ReturnBoxItem 3
messagebox 当前装备星级已经超过6级,不可再鉴定!!\ \你可以选择重置后再鉴定哦!!
break

#if
#act
;关联到OK框物品 所有操作或检测自定义OK框的脚本命令才能正常使用
SetUpgradeItem 3
SetNewItemValue -1 0 = 0
SetNewItemValue -1 1 = 0
SetNewItemValue -1 2 = 0
SetNewItemValue -1 3 = 0
SetNewItemValue -1 4 = 0
SetNewItemValue -1 5 = 0
SetNewItemValue -1 6 = 0
SetNewItemValue -1 7 = 0
SetNewItemValue -1 8 = 0
CHANGECUSTOMITEMVALUE -1 0 = 0
CHANGECUSTOMITEMVALUE -1 1 = 0
CHANGECUSTOMITEMVALUE -1 2 = 0
CHANGECUSTOMITEMVALUE -1 3 = 0
CHANGECUSTOMITEMVALUE -1 4 = 0
CHANGECUSTOMITEMVALUE -1 5 = 0
CHANGECUSTOMITEMVALUE -1 6 = 0
CHANGECUSTOMITEMVALUE -1 7 = 0

;===========================================================加攻击

;===========================================================加血量
#if
Random 7
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 5 1 6
CHANGECUSTOMITEMVALUE -1 5 = <$STR(P8)>
CHANGECUSTOMITEMABIL -1 5 0 254
CHANGECUSTOMITEMABIL -1 5 2 6
CHANGECUSTOMITEMABIL -1 5 3 1

;===========================================================加防御
#if
Random 7
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 0 1 1
CHANGECUSTOMITEMVALUE -1 0 = <$STR(P8)>
CHANGECUSTOMITEMABIL -1 0 0 254
CHANGECUSTOMITEMABIL -1 0 2 1
CHANGECUSTOMITEMABIL -1 0 3 1

;===========================================================加魔防
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 1 1 2
CHANGECUSTOMITEMVALUE -1 1 = <$STR(P8)>
CHANGECUSTOMITEMABIL -1 1 0 254
CHANGECUSTOMITEMABIL -1 1 2 2
CHANGECUSTOMITEMABIL -1 1 3 1

;===========================================================加魔法
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 3 1 4
CHANGECUSTOMITEMVALUE -1 3 = <$STR(P8)>
CHANGECUSTOMITEMABIL -1 3 0 254
CHANGECUSTOMITEMABIL -1 3 2 4
CHANGECUSTOMITEMABIL -1 3 3 1

;===========================================================加道术
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 2 1 3
CHANGECUSTOMITEMVALUE -1 4 = <$STR(P8)>
CHANGECUSTOMITEMABIL -1 2 0 254
CHANGECUSTOMITEMABIL -1 2 2 3
CHANGECUSTOMITEMABIL -1 2 3 1

;===========================================================加MP
#if
Random 4
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
small P55 5
#act
inc P55 1
MOVR P8 1 4
CHANGECUSTOMITEMABIL -1 6 1 7
CHANGECUSTOMITEMVALUE -1 6 = <$STR(P8)>
CHANGECUSTOMITEMABIL -1 6 0 254
CHANGECUSTOMITEMABIL -1 6 2 7
CHANGECUSTOMITEMABIL -1 6 3 1


#if
random 50
small P55 5
NOT equal <$BOXITEM[3].NAME>
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
#act
MOVR P8 1 4
SetNewItemValue -1 2 = <$STR(P8)>
INC P55 1

#if
Random 7
small P55 5
NOT equal <$BOXITEM[3].NAME>
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
#act
MOVR P8 1 4
SetNewItemValue -1 0 = <$STR(P8)>
INC P55 1

#if
Random 7
small P55 5
NOT equal <$BOXITEM[3].NAME>
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
#act
MOVR P8 1 4
SetNewItemValue -1 4 = <$STR(P8)>
INC P55 1

#if
random 4
small P55 5
NOT equal <$BOXITEM[3].NAME>
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
#act
MOVR P8 1 4
SetNewItemValue -1 4 = <$STR(P8)>
INC P55 1

#if
random 4
small P55 5
NOT equal <$BOXITEM[3].NAME>
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
#act
MOVR P8 1 4
SetNewItemValue -1 3 = <$STR(P8)>
INC P55 1

#if
random 3
small P55 5
NOT equal <$BOXITEM[3].NAME>
checkitem 特殊鉴定石 1
checkGameGird > 149
small <$BOXITEM[3].UPGRADECOUNT> 10
#act
SetNewItemValue -1 6 = 1
INC P55 1

#if
#act
CHANGEITEMUPGRADECOUNT -1 + 1
GameGird - 150
take 特殊鉴定石 1
UpDateBoxItem 3

回复

使用道具 举报

0

主题

6655

帖子

6110

积分

论坛元老

Rank: 8Rank: 8

积分
6110
发表于 2019-10-24 11:35:35 | 显示全部楼层
沙发怎么能少了我?!
回复 支持 反对

使用道具 举报

0

主题

6600

帖子

6041

积分

论坛元老

Rank: 8Rank: 8

积分
6041
发表于 2019-10-24 11:37:25 | 显示全部楼层
我是个凑数的。。。
回复 支持 反对

使用道具 举报

0

主题

6740

帖子

6364

积分

论坛元老

Rank: 8Rank: 8

积分
6364
发表于 2019-10-24 14:22:47 | 显示全部楼层
LZ帖子不给力,勉强给回复下吧
回复 支持 反对

使用道具 举报

0

主题

6692

帖子

6135

积分

论坛元老

Rank: 8Rank: 8

积分
6135
发表于 2019-10-24 14:36:28 | 显示全部楼层
我是个凑数的。。。
回复 支持 反对

使用道具 举报

0

主题

6705

帖子

6320

积分

论坛元老

Rank: 8Rank: 8

积分
6320
发表于 2019-10-24 14:58:49 | 显示全部楼层
路过的帮顶
回复 支持 反对

使用道具 举报

0

主题

6674

帖子

6123

积分

论坛元老

Rank: 8Rank: 8

积分
6123
发表于 2019-10-24 15:38:57 | 显示全部楼层
路过
回复 支持 反对

使用道具 举报

0

主题

6666

帖子

6158

积分

论坛元老

Rank: 8Rank: 8

积分
6158
发表于 2019-10-24 15:48:07 | 显示全部楼层
我是个凑数的。。。
回复 支持 反对

使用道具 举报

0

主题

6643

帖子

6122

积分

论坛元老

Rank: 8Rank: 8

积分
6122
发表于 2019-10-24 16:49:05 | 显示全部楼层
路过
回复 支持 反对

使用道具 举报

0

主题

6703

帖子

6152

积分

论坛元老

Rank: 8Rank: 8

积分
6152
发表于 2019-10-24 17:02:17 | 显示全部楼层
路过的帮顶
回复 支持 反对

使用道具 举报

*滑块验证:
懒得打字嘛,点击右侧快捷回复 【右侧内容,后台自定义】
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|关于我们|广告合作|会员加入|帮助中心|( 晋ICP备19010065号-43 )

GMT+8, 2019-11-19 02:35 , Processed in 0.142098 second(s), 49 queries . QuYouBBS Inc.最大的GM论坛交流基地