|
发表于 2024-9-7 20:26:25
|
显示全部楼层
[@main]
#if
check [26] 0
#act
mov N$宝盒仓库位置 0
mov T6 宝盒仓库 位置1=0,位置2=0,位置3=0,位置4=0,位置5=0,位置6=0,位置7=0,位置8=0,位置9=0,位置10=0
set [26] 1
#if
#act
#say
<Img|x=121.0|y=120.0|esc=1|bg=1|show=0|move=1|reset=1|loadDelay=1|img=public/bg_hhjm_02.jpg>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=851.0|y=121.0|pimg=public/1900000511.png|nimg=public/1900000510.png|link=@exit>
<Img|x=201.0|y=177.0|img=public/1900000651_3.png>
<ItemShow|x=203.0|y=178.0|width=70|height=70|itemid=54|itemcount=1|showtips=1|bgtype=1>
<Img|x=288.0|y=177.0|img=public/1900000651_3.png>
<ItemShow|x=290.0|y=178.0|width=70|height=70|itemid=55|itemcount=1|showtips=1|bgtype=1>
<Img|x=373.0|y=177.0|img=public/1900000651_3.png>
<ItemShow|x=375.0|y=178.0|width=70|height=70|itemid=131|itemcount=1|showtips=1|bgtype=1>
<Img|x=201.0|y=263.0|img=public/1900000651_3.png>
<ItemShow|x=203.0|y=264.0|width=70|height=70|itemid=135|itemcount=1|showtips=1|bgtype=1>
<Img|x=289.0|y=263.0|img=public/1900000651_3.png>
<ItemShow|x=291.0|y=264.0|width=70|height=70|itemid=145|itemcount=1|showtips=1|bgtype=1>
<Img|x=375.0|y=264.0|img=public/1900000651_3.png>
<ItemShow|x=377.0|y=266.0|width=70|height=70|itemid=151|itemcount=1|showtips=1|bgtype=1>
<Img|x=201.0|y=351.0|img=public/1900000651_3.png>
<ItemShow|x=203.0|y=353.0|width=70|height=70|itemid=161|itemcount=1|showtips=1|bgtype=1>
<Img|x=289.0|y=350.0|img=public/1900000651_3.png>
<ItemShow|x=291.0|y=350.0|width=70|height=70|itemid=162|itemcount=1|showtips=1|bgtype=1>
<Img|x=375.0|y=349.0|img=public/1900000651_3.png>
<ItemShow|x=377.0|y=349.0|width=70|height=70|itemid=171|itemcount=1|showtips=1|bgtype=1>
<Button|x=168.0|y=460.0|size=18|nimg=public/1900000611.png|color=255|text=单抽|link=@单抽>
<Button|x=360.0|y=460.0|size=18|nimg=public/1900000611.png|color=255|text=十连抽|link=@十连抽>
<Button|x=147.0|y=134.0|nimg=public/1900000611.png|size=18|color=255|text=寻宝仓库|link=@宝盒仓库>
[@单抽]
#if
small <$str(N$宝盒仓库位置)> 10
#elseact
sendmsg 9 您的仓库位置不足了,请先清理您的仓库!
break
#if
checkbindmoney 元宝 > 199
#act
inc N$宝盒仓库位置 1
GETRANDOMTEXT ..\QuestDiary\抽奖功能\初级奖品.txt S1
getdbitemfieldvalue <$str(S1)> idx N$物品idx
addvarcache T6 位置<$str(N$宝盒仓库位置)> <$str(N$物品idx)>
mov S$物品<$str(N$宝盒仓库位置)> <$str(S1)>
ADDTEXTLISTEX ..\QuestDiary\抽奖功能\抽奖记录.txt <$username>在宝盒中获得了<$str(S1)>物品!
SENDMOVEMSG 0 253 255 60 1 {<$username>/FCOLOR=254}在宝盒中获得了<$str(S1)>物品!
#elseact
sendmsg 9 您的元宝不足200!不足以抽一次奖!!
[@宝盒仓库]
#if
#act
getstrvalue T6 位置1 N$仓库位置1
getstrvalue T6 位置2 N$仓库位置2
getstrvalue T6 位置3 N$仓库位置3
getstrvalue T6 位置4 N$仓库位置4
getstrvalue T6 位置5 N$仓库位置5
getstrvalue T6 位置6 N$仓库位置6
getstrvalue T6 位置7 N$仓库位置7
getstrvalue T6 位置8 N$仓库位置8
getstrvalue T6 位置9 N$仓库位置9
getstrvalue T6 位置10 N$仓库位置10
#say
<Img|x=225.0|y=123.0|show=0|bg=1|img=public/bg_npc_06.png|loadDelay=1|esc=1|move=0|reset=1>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=767.0|y=123.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<ItemShow|x=242.0|y=137.0|width=70|height=70|itemid=<$str(N$仓库位置1)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=305.0|y=137.0|width=70|height=70|itemid=<$str(N$仓库位置2)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=369.0|y=137.0|width=70|height=70|itemid=<$str(N$仓库位置3)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=433.0|y=137.0|width=70|height=70|itemid=<$str(N$仓库位置4)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=496.0|y=138.0|width=70|height=70|itemid=<$str(N$仓库位置5)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=559.0|y=137.0|width=70|height=70|itemid=<$str(N$仓库位置6)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=623.0|y=139.0|width=70|height=70|itemid=<$str(N$仓库位置7)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=683.0|y=135.0|width=70|height=70|itemid=<$str(N$仓库位置8)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=242.0|y=202.0|width=70|height=70|itemid=<$str(N$仓库位置9)>|itemcount=0|showtips=1|bgtype=1>
<ItemShow|x=306.0|y=202.0|width=70|height=70|itemid=<$str(N$仓库位置10)>|itemcount=0|showtips=1|bgtype=1>
<Button|x=677.0|y=530.0|size=18|color=255|nimg=public/1900000611.png|text=一键领取|link=@仓库一键领取>
[@仓库一键领取]
#if
#act
sendmsg 0 ---------------------<$str(U102)>
#if
equal U102 0
#act
sendmsg 0 酷酷删除<$str(U102)>
mov U102 10
set [26] 0
give <$str(S$物品1)> 1
give <$str(S$物品2)> 1
give <$str(S$物品3)> 1
give <$str(S$物品4)> 1
give <$str(S$物品5)> 1
give <$str(S$物品6)> 1
give <$str(S$物品7)> 1
give <$str(S$物品8)> 1
give <$str(S$物品9)> 1
give <$str(S$物品10)> 1
goto @清空
[@清空]
#if
not equal U102 0
#act
addvarcache T6 位置<$str(U102)> 0
mov S$物品<$str(U102)>
dec U102 1
sendmsg 0 酷酷删除<$str(U102)>
goto @清空
#elseact
goto @main
拿一堆变量尝试了一下,不会写,有没有大佬教个简单的 |
|