一.知识点
1.产生随机数
功能:
扩展MOVR使用方法。
格式:
MOVR 变量 数值1 数值2
;==========================================
MOVR G10 100 ;随机生成100以内的随机数.
MOVR G10 10 100 ;随机生成10-100之间随机数
MOVR G10 100 5000 ;随机生成100-5000之间随机数
MOVR G10 1000 9999 ;随机生成1000-9999之间随机数
;==========================================
二.配套脚本
[@血龙佩进度条升级脚本]
{
#if
#act
mov n$第一条进度条当前进度值 0
mov n$第一条进度条当前进度值 <$BOXITEM[0].PROGRESSBAR1.POSITION>
sendmsg 6 --------第一条进度条当前进度值:<$str(n$第一条进度条当前进度值)>
mov n$第二条进度条当前值 0
mov n$第二条进度条当前值 <$BOXITEM[0].PROGRESSBAR2.POSITION>
sendmsg 6 --------第二条进度条当前进度值:<$str(n$第二条进度条当前进度值)>
mov n$第二条进度条最大值 0
mov n$第二条进度条最大值 <$BOXITEM[0].PROGRESSBAR2.MAX>
sendmsg 6 --------第二条进度条最大值:<$str(n$第二条进度条最大值)>
mov n$第二条进度条升级后的值 <$str(n$第二条进度条当前值)>
inc n$第二条进度条升级后的值 <$str(n$升级每次增加点数)>
sendmsg 6 --------第二条进度条升级后的值:<$str(n$第二条进度条升级后的值)>
#or
small n$第二条进度条升级后的值 <$str(n$第二条进度条最大值)>
equal n$第二条进度条升级后的值 <$str(n$第二条进度条最大值)>
#act
inc n$第二条进度条当前值 <$str(n$升级每次增加点数)>
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 = <$str(n$第二条进度条当前值)>
#if
large n$第二条进度条升级后的值 <$str(n$第二条进度条最大值)>
#act
goto @增加第一条进度条的值
#if
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 10
not CHECKDRILLHOLE -1 0
#act
movr p67 1 101
mov p68 0
goto @随机宝石buff
break
#if
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 20
not CHECKDRILLHOLE -1 1
#act
movr p67 1 101
mov p68 1
goto @随机宝石buff
break
#if
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 29
not CHECKDRILLHOLE -1 2
#act
movr p67 1 101
mov p68 2
goto @随机宝石buff
[@随机宝石buff]
#if
large P67 0
small P67 31
#act
movr p69 1376 1378
#if
large P67 30
small P67 61
#act
movr p69 1378 1380
#if
large P67 60
small P67 101
#act
movr p69 1380 1385
#if
#act
DRILLHOLE 1 2 -1 4 5 <$str(p68)> 7 1 9 10
sendmsg 6 装备血龙佩第<$str(p68)>孔打孔成功
SOCKETABLEITEM 1 2 3 4 -1 <$str(p68)> 7 8 <$str(p69)> 10
sendmsg 6 装备血龙佩<$str(p68)>宝石镶嵌,BUFF<$str(p69)>成功
break
[@增加第一条进度条的值]
#if
large n$第二条进度条升级后的值 <$str(n$第二条进度条最大值)>
#act
inc n$第一条进度条当前进度值 1
dec n$第二条进度条升级后的值 <$str(n$第二条进度条最大值)>
inc n$第二条进度条最大值 100
goto @增加第一条进度条的值
#elseact
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = <$str(n$第一条进度条当前进度值)>
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 = <$str(n$第二条进度条升级后的值)>
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 1 = <$str(n$第二条进度条最大值)>
break
}