传奇996引擎技术论坛 - Powered by Discuz! Archiver

浮生A梦 发表于 2025-7-6 00:52:14

Txt第一届比武大赛

<p><img src="data/attachment/forum/202507/06/164951gyfmsmhmc8sbiiy6.png" alt="6cdb3c794cb825c635ff08f659ffda33_162301zpquhjqjunpjzjxx.png" title="6cdb3c794cb825c635ff08f659ffda33_162301zpquhjqjunpjzjxx.png" /></p>
<h4>1. <strong>大帅</strong> (新人加分)</h4>
<ul>
<li><strong>优点</strong>：代码执行效率高，耗时较低，小聪明写法。</li>
<li><strong>不足</strong>：
<ul>
<li>虽代码上不了台面，缺乏必要的边界条件判断和异常处理机制，程序的健壮性和稳定性欠佳。但新人值得肯定!</li>
<li>概率分配逻辑设计不合理，存在分配不均的问题，可能影响程序的准确性和公平性。</li>
</ul>
</li>
<li><strong>建议</strong>：进一步完善代码的健壮性，优化概率分配机制，提升算法设计和逻辑优化能力。</li>
</ul>
<h4>2. <strong>小明</strong></h4>
<ul>
<li><strong>优点</strong>：代码逻辑设计细致，考虑问题全面，能够充分处理各种边界条件和异常情况，代码的健壮性和稳定性较好。</li>
<li><strong>不足</strong>：代码执行效率较低，耗时较高，可能是由于算法选择不够优化。</li>
<li><strong>建议</strong>：重点优化算法，选择更高效的算法或对现有算法进行改进，以提高代码的执行效率。</li>
</ul>
<h4>3. <strong>温州—阿星</strong></h4>
<ul>
<li><strong>优点</strong>：基本功扎实，进步明显，已经具备一定的全面性思维。</li>
<li><strong>不足</strong>：
<ul>
<li>审题不够细致，需要更加注意理解任务要求。</li>
<li>在概率分配的理解上还需加强。</li>
</ul>
</li>
<li><strong>建议</strong>：注意审题，全面考虑问题，增加对概率分配的理解，继续保持良好的学习态度。</li>
</ul>
<h4>4. <strong>湖南-邦邦</strong></h4>
<ul>
<li><strong>优点</strong>：代码思路清晰，缺少一定的实战经验。</li>
<li><strong>不足</strong>：
<ul>
<li>考虑会出现的问题较少，代码的健壮性和伸展性不足。</li>
</ul>
</li>
<li><strong>建议</strong>：增加实战经验，注重代码的健壮性和伸展性，提前考虑可能出现的问题。</li>
</ul>
<h4>5. <strong>温州苍南--西</strong></h4>
<ul>
<li><strong>优点</strong>：能够认识到自身不足，态度较为谦逊。</li>
<li><strong>不足</strong>：
<ul>
<li>代码不够严谨，存在随意性（“拍脑门写法”）。</li>
</ul>
</li>
<li><strong>建议</strong>：不要对自己要求过高，但也要注重代码的严谨性，避免随意编写代码。</li>
</ul>
<h4>6. <strong>广东-当局者迷</strong></h4>
<ul>
<li><strong>优点</strong>：经验丰富，值得肯定。</li>
<li><strong>不足</strong>：
<ul>
<li>由于经验丰富，可能会对更高标准的要求有所懈怠。</li>
</ul>
</li>
<li><strong>建议</strong>：继续保持经验优势，但要对自己提出更高要求，不断提升技术水平。</li>
</ul>
<h4>7. <strong>惠州-晓满</strong></h4>
<ul>
<li><strong>优点</strong>：作为女性技术参与者，有一定的加分项。</li>
<li><strong>不足</strong>：
<ul>
<li>未完成算法任务，可能在技术深度上还有待提升。</li>
</ul>
</li>
<li><strong>建议</strong>：加强算法学习，提升技术深度，争取在后续任务中完成算法实现。</li>
</ul>
<h4>8. <strong>其他学员</strong></h4>
<ul>
<li><strong>循环上限突破100 耗时较高自动淘汰 </strong></li>
</ul>
<p>当局者迷</p>
<pre><code>[@STDMODEFUNC999]
#if
#act
mov s$概率 50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10
mov s$数量 50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10|50元宝#10
goto @使用礼包
stop
break

[@使用礼包]
#if
#say
<Img|x=1.0|y=-1.0|show=4|img=public/bg_npc_05.png|loadDelay=1|bg=1|move=0|reset=1|esc=1>
<Layout|x=220.0|y=-34.0|width=80|height=80|link=@exit>
<Button|x=239.0|y=-17.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Text|x=16.0|y=59.0|size=18|color=255|text=使用数量:>
<Img|ax=0|x=97.0|y=54.0|width=130|esc=0|img=public/1900000668.png>
<Input|x=101.0|y=57.0|width=100|height=25|type=0|inputid=1|color=255|size=16>
<Button|x=16.0|y=111.0|nimg=public/1900000612.png|size=18|color=255|text=使用1个|link=@单次使用礼包>
<Button|x=130.0|y=111.0|size=18|color=255|nimg=public/1900000612.png|submitInput=1|text=批量使用|link=@批量使用礼包>

[@单次使用礼包]
#if
#act
take 测试礼包 1
RANSJSTR <$str(s$奖励)> 1 3 s$获得的奖励 s$剩余奖励
give <$str(s$获得的奖励)> 1
close

[@批量使用礼包]
#IF
#act
PRINTUSETIME 1
GETBAGITEMCOUNT 测试礼包 n$物品数量
mov n$使用数量 <$NPCINPUT(1)>

#if
small n$物品数量 n$使用数量
#act
sendmsg 9 物品不足，使用失败！
break

#if
#act
take 测试礼包 <$str(n$使用数量)>
GETVALIDSTRSUPER <$str(s$数量)> | s$奖励_ n1
mov n0
whilen0 < <$str(n1)>
inc n0 1
GETVALIDSTRSUPER <$str(s$奖励_<$str(n0)>)> # s$单奖励
addstrvalue s$奖励表 <$str(s$单奖励1)> <$str(s$单奖励2)>
endwhile
mov n$剩余数量 <$str(n$使用数量)>
mov n0
MOV n$随机数 0
MOV s$发放奖品
whilen0 < <$str(n1)>
inc n0 1
RANSJSTR <$str(s$概率)> 1 3 s$获得的奖励 s$剩余奖励
movr n$随机数 1 <$str(n$剩余数量)>
goto @判断剩余数量
inc s$发放奖品 <$str(s$获得的奖励)>#<$formulation[<$GETSTRVALUE(s$奖励表,<$str(s$获得的奖励)>)>*<$str(n$随机数)>]>|
dec n$剩余数量 n$随机数
endwhile
gives <$str($发放奖品)>
close
PRINTUSETIME 2

[@判断剩余数量]
#or
small n$剩余数量 n$随机数
small n$随机数 1
#act
mov n$随机数 n$剩余数量
mov n0 <$str(n1)>
</code></pre>
<p>小满</p>
<pre><code>[@StdModeFunc999]
{
;礼包名称--浮生礼包Anicount-999OverLap物品叠加-1000000
; 单独开礼包
#if
CHECKITEM 浮生礼包 1
#act
MOV S$取得奖项
RANSJSTR 奖品1#1000|奖品2#200|奖品3#300|奖品4#250|奖品5#150|奖品6#90|奖品7#4|奖品8#3|奖品9#2|奖品10#1 1 3 S$取得奖项 S$无用
MailGIVE <$Str(S12)> 1 0#1#2#3#4#5#6#7#8
SendMail 1 系统奖励你好<$USERNAME>,奖励你木剑1把,请点提取!

;批量开礼包
#if
#act
GETBAGITEMCOUNT 浮生礼包 N$礼包数量

#if
large N$礼包数量 1
#say
<Img|x=34.0|y=7.0|width=600|height=400|rotate=0|show=4|reset=1|loadDelay=1|img=public/1900000610.png|esc=1|move=0|bg=1>
<Layout|x=551.0|y=27.0|width=80|height=80|link=@exit>
<Button|x=586.0|y=43.0|pimg=public/1900000511.png|nimg=public/1900000510.png|link=@exit>
<Text|x=154.0|y=26.0|size=16|color=70|text=浮生礼包>
<Slider|x=235.0|y=98.0|width=200|sliderid=N91|maxvalue=<$str(N$礼包数量)>|defvalue=<$GETSTRVALUE(T21,批量开礼包)>|link=@滑动触发>
<Img|x=86.0|y=163.0|width=510|esc=0|img=public/1900000667_1.png>
<Text|x=261.0|y=125.0|size=14|color=251|text=请选择需要打开的数量：$STM(SLIDERV_N91)>
<RText|ay=1|x=244.0|y=60.0|size=18|color=100|text=当前拥有浮生礼包:<<$str(N$礼包数量)>个/FCOLOR=250>>
<Button|x=288.0|y=175.0|nimg=public/00000361.png|pimg=public/00000362.png|size=18|color=255|mimg=public/00000363.png|text=确定打开|link=@确定批量开礼包>

[@滑动触发]
#if
#ACT
MOV N$滑动数值 <$npcparams(3,N91)>
addvarcache T21 批量开礼包 <$str(N$滑动数值)>
GOTO @StdModeFunc999

[@确定批量开礼包]
#if
checkitem 浮生礼包 <$GETSTRVALUE(T21,批量开礼包)>
#act
take 浮生礼包 <$GETSTRVALUE(T21,批量开礼包)>
MOV S$扣除礼包成功
goto @可以发放奖励

[@可以发放奖励]
#if
equal S$扣除礼包
#act
break

#if
large <$GETSTRVALUE(T21,批量开礼包)> 0
#act
MOV S$取得奖项
; RANSJSTR 奖品1#1000|奖品2#200|奖品3#300|奖品4#250|奖品5#150|奖品6#90|奖品7#4|奖品8#3|奖品9#2|奖品10#1 1 3 S$取得奖项 S$无用

;按此概率,(可能/大概/应该)可以用礼包数量计算出每个奖品的出现次数,以此得到奖励的数量
;对不住了师父,计算真不是我的强项...汗颜!~

MailGIVE <$Str(S12)> 1 0#1#2#3#4#5#6#7#8
SendMail 1 系统奖励你好<$USERNAME>,本次批量开礼包数量:<$GETSTRVALUE(T21,批量开礼包)>,获得奖励如下,请注意查收.
break
}
</code></pre>
<p>邦邦</p>
<pre><code>[@StdModeFunc700]
;--700=开启道具10元宝
#if
#act
NEWREADCSV ..\QuestDiary\功能表格csv\cfg_道具开启测试.csv
stop

#if
#say
<Img|img=public_win32/bg_npc_01.png|reset=1|loadDelay=1|esc=1|show=4|move=0|bg=1>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=546|y=0|pimg=public/1900000511.png|nimg=public/1900000510.png|link=@exit>
<Text|x=213.0|y=24.0|color=255|size=18|text=选择开启数量>
<Button|x=212.0|y=112.0|nimg=public/00000361.png|color=255|submitInput=1|size=18|link=@开启yes>
<Input|x=218.0|y=66.0|width=100|height=25|inputid=1|place=输入数量|type=0|size=16|color=255>

[@开启yes]
#if
#act
mov n$开启数量 <$NPCINPUT(1)>

#if
not CHECKITEMS 10元宝#<$NPCINPUT(1)>
#act
sendmsg 9 选择开启的道具数量不足!
break
#elseact
takes 10元宝#<$STR(n$开启数量)>
;---获取道具总权重
formulation <$cfg_道具开启测试(1_2)>+<$cfg_道具开启测试(2_2)>+<$cfg_道具开启测试(3_2)>+<$cfg_道具开启测试(4_2)>+<$cfg_道具开启测试(5_2)>+<$cfg_道具开启测试(6_2)> n$道具总权重
;-----计算道具所在开启数量的比例
formulation (<$cfg_道具开启测试(1_2)>/<$STR(n$道具总权重)>)*<$STR(n$开启数量)> n$<$cfg_道具开启测试(1_1)>
formulation (<$cfg_道具开启测试(2_2)>/<$STR(n$道具总权重)>)*<$STR(n$开启数量)> n$<$cfg_道具开启测试(2_1)>
formulation (<$cfg_道具开启测试(3_2)>/<$STR(n$道具总权重)>)*<$STR(n$开启数量)> n$<$cfg_道具开启测试(3_1)>
formulation (<$cfg_道具开启测试(4_2)>/<$STR(n$道具总权重)>)*<$STR(n$开启数量)> n$<$cfg_道具开启测试(4_1)>
formulation (<$cfg_道具开启测试(5_2)>/<$STR(n$道具总权重)>)*<$STR(n$开启数量)> n$<$cfg_道具开启测试(5_1)>
formulation (<$cfg_道具开启测试(6_2)>/<$STR(n$道具总权重)>)*<$STR(n$开启数量)> n$<$cfg_道具开启测试(6_1)>
;--------根据得到的比例给予对应数量的道具
gives <$cfg_道具开启测试(1_1)>#<$STR(n$<$cfg_道具开启测试(1_1)>)>&<$cfg_道具开启测试(2_1)>#<$STR(n$<$cfg_道具开启测试(2_1)>)>&<$cfg_道具开启测试(3_1)>#<$STR(n$<$cfg_道具开启测试(3_1)>)>&<$cfg_道具开启测试(4_1)>#<$STR(n$<$cfg_道具开启测试(4_1)>)>&<$cfg_道具开启测试(5_1)>#<$STR(n$<$cfg_道具开启测试(5_1)>)>&<$cfg_道具开启测试(6_1)>#<$STR(n$<$cfg_道具开启测试(6_1)>)>
</code></pre>
<p>西米</p>
<pre><code>[@Triggerchat]
#IF
#SAY
<Img|img=public/bg_npc_01.png|bg=1|loadDelay=1|show=0|reset=1|move=0>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=546|y=0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Button|x=247.0|y=124.0|color=249|size=16|nimg=public/1900000612.png|text=批量使用100万|link=@批量使用>
[@批量使用]
#ACT
MOV N$总数量 1000000
GETBAGITEMCOUNT 命格材料包 N$获得材料包的数量
#IF
small N$获得材料包的数量 1000000
#ACT
sendmsg 9 材料不足！
break
#IF
large N$获得材料包的数量 1000000
#act
mov S$高概率物品天命·石|三生·砂|劫命·金|无根·木|因果·丝|西游石|骷髅石|暗夜石|三国石|混沌石|篡命·钱|孽缘·血|天机·骨|命魂·玉|逆天·鳞
GETVALIDSTRSUPER <$str(S$高概率物品)> | s$物品_ N$数量
take 命格材料包 1000000
#IF
#ACT
mov n0 1
while n0 < <$str(N$数量)>
inc n0 1
goto @检测随机到的
endwhile
[@检测随机到的]
#IF
#ACT
movr N$随机值 1 11
give <$str(s$物品_<$str(n0)>)> <$formulation[<$str(N$总数量)>/<$str(N$随机值)>]>
dec N$总数量 <$formulation[<$str(N$总数量)>/<$str(N$随机值)>]>
GETBAGITEMCOUNT <$str(s$物品_<$str(n0)>)> N$获得物品的数量
sendmsg 0 获得<$str(s$物品_<$str(n0)>)>---数量<$str(N$获得物品的数量)>
</code></pre>
<p>xiaoming</p>
<pre><code>[@StdModeFunc888]
#act
getitemnamebymakeindex <$Param2>S$名字

#if
EQUAL <$str(S$名字)> 智能礼包
#act
give 智能礼包 1
mov S$奖励物品圣战戒指宝箱#2000|圣战手镯宝箱#2000|圣战项链宝箱#1000|法神戒指宝箱#1000|法神手镯宝箱#1000|法神项链宝箱#2000|天尊戒指宝箱#2000|天尊手镯宝箱#2000|天尊项链宝箱#2000|金条宝箱#2000|
#say
<Img|x=147.0|y=217.0|img=public_win32/bg_npc_01.png|show=0|bg=1|loadDelay=1|reset=1|move=0>
<Layout|x=656.0|y=199.0|width=80|height=80|link=@exit>
<Button|x=692.0|y=217.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Button|x=283.0|y=282.0|nimg=public/1900000660.png|color=255|size=18|text=单次开启|link=@开启选择#选择参数=单次>
<Button|x=483.0|y=282.0|color=255|size=18|nimg=public/1900000660.png|text=批量开启|link=@开启选择#选择参数=多次>
#elseact
give <$str(S$名字)>1
#elsesay
<Img|x=147.0|y=217.0|img=public_win32/bg_npc_01.png|move=0|bg=1|loadDelay=1|reset=1|show=0>
<Layout|x=656.0|y=199.0|width=80|height=80|link=@exit>
<Button|x=692.0|y=217.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Button|x=380|y=340|size=18|color=255|nimg=public/1900000660.png|submitInput=3|text=领取<$str(S$名字)>宝箱|link=@领取宝箱奖励#领取物品=<$str(S$名字)>>
<Img|x=380|y=276.0|width=100|height=25|esc=0|img=public/1900000676.png>
<Input|x=380|y=276|width=100|height=25|inputid=3|color=255|size=16|type=0>

[@开启选择]
#if
EQUAL S$选择参数单次
#act
take 智能礼包 1
RANSJSTR <$str(S$奖励物品)> 1 3 S0
give <$str(S0)>
close
break
#if
EQUAL S$选择参数多次
#say
<Img|x=147.0|y=217.0|img=public_win32/bg_npc_01.png|move=0|bg=1|loadDelay=1|reset=1|show=0>
<Layout|x=656.0|y=199.0|width=80|height=80|link=@exit>
<Button|x=692.0|y=217.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Button|x=380|y=340|size=18|color=255|nimg=public/1900000660.png|submitInput=2|text=开启数量|link=@提交数量>
<Img|x=380|y=276.0|width=100|height=25|esc=0|img=public/1900000676.png>
<Input|x=380|y=276|width=100|height=25|inputid=2|color=255|size=16|type=0>
[@提交数量]
#if
not checkitem 智能礼包 <$NPCINPUT(2)>
#act
sendmsg 9 智能礼包数量不足 <$NPCINPUT(2)>个！
break
#if
checkitem 智能礼包 <$NPCINPUT(2)>
NOT LARGE <$NPCINPUT(2)> 100
#act
take 智能礼包 <$NPCINPUT(2)>
mov S$最后发送奖励
mov S$奖励物品库
mov n0
while n0 < <$NPCINPUT(2)>
inc n0 1
RANSJSTR <$str(S$奖励物品)> 1 3 S0
addstrvalue S$奖励物品库 <$str(S0)> <$formulation[<$getstrvalue(S$奖励物品库,<$str(S0)>)>+1]>
endwhile
getvalidstrsuper <$str(S$奖励物品库)> , S$最终奖励物品_N$最终物品种类
mov n0
while n0 < <$str(N$最终物品种类)>
inc n0 1
getvalidstrsuper <$str(S$最终奖励物品_<$str(n0)>)> = S$最终奖励物品
INC S$最后发送奖励<$str(S$最终奖励物品1)>#<$str(S$最终奖励物品2)>&
endwhile
gives<$str(S$最后发送奖励)>
close
break

#if
checkitem 智能礼包 <$NPCINPUT(2)>
NOT SMALL <$NPCINPUT(2)> 100
#act
take 智能礼包 <$NPCINPUT(2)>
getvalidstrsuper<$str(S$奖励物品)> | S$奖励物品随机_ N$物品数量
mov N$结果
mov N$余数
FORMULATION <$NPCINPUT(2)>/100 N$结果 1
FORMULATION <$NPCINPUT(2)>%100 N$余数
mov n0
while n0 < 100
inc n0 1
RANSJSTR <$str(S$奖励物品)> 1 3 S0
addstrvalue S$奖励物品库 <$str(S0)> <$formulation[<$getstrvalue(S$奖励物品库,<$str(S0)>)>+<$str(N$结果)>]>
goto @添加余数
endwhile
getvalidstrsuper <$str(S$奖励物品库)> , S$最终奖励物品_N$最终物品种类
mov n0
while n0 < <$str(N$最终物品种类)>
inc n0 1
getvalidstrsuper <$str(S$最终奖励物品_<$str(n0)>)> = S$最终奖励物品
INC S$最后发送奖励<$str(S$最终奖励物品1)>#<$str(S$最终奖励物品2)>&
endwhile
gives<$str(S$最后发送奖励)>
close
[@添加余数]
#if
NOT LARGE <$str(N0)> <$str(N$余数)>
#act
addstrvalue S$奖励物品库 <$str(S0)> <$formulation[<$getstrvalue(S$奖励物品库,<$str(S0)>)>+1]>

[@领取宝箱奖励]
#if
checkitem <$str(S$领取物品)> <$NPCINPUT(3)>
#act
sendmsg 0 66
take <$str(S$领取物品)><$NPCINPUT(3)>
dec S$领取物品宝箱
give <$str(S$领取物品)> <$NPCINPUT(3)>
close
</code></pre>
<p>大帅</p>
<pre><code>[@stdmodefunc333]
#if
#act
stop
GETBAGITEMCOUNT 金条 N0
SENDMSG 0 你背包物品为:<$STR(N0)>个
#say
<Img|x=210.0|y=221.0|img=public_win32/bg_npc_01.png|loadDelay=1|show=0|bg=1|move=0|reset=1>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=756.0|y=221.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Button|ay=1|x=266.0|y=330.0|color=255|nimg=public/1900000611.png|size=18|text=单次使用|link=@单次使用>
<Button|ay=1|submitInput=1|x=465.0|y=332.0|color=255|nimg=public/1900000611.png|size=18|text=批量使用|link=@批量使用>
<Input|x=450.0|y=278.0|width=110|height=25|color=255|size=16|inputid=1|type=0>
<Text|x=500.0|y=310.0|color=255|size=18|text=<$STR(N0)>>
<Text|x=350.0|y=278.0|color=255|size=18|text=请输入数量:>

[@滑动触发]
#IF
#ACT
mov S$决定数量 <$NPCINPUT(1)>
goto @stdmodefunc333

[@单次使用]
#IF
#ACT
TAKE 金条 1
RANSJSTR 经验卷500W|准星物品|200W经验卷|100W经验卷|经验卷5亿|经验卷2亿|经验卷5000W|经验卷3000W|经验卷2000W|经验卷1000W|经验卷1亿 0 3 S0 S1
sendmsg 6 <$str(S0)>
give <$str(S0)>
goto @stdmodefunc333

[@批量使用]
#IF
#ACT
PRINTUSETIME 1
mov S$决定数量 <$NPCINPUT(1)>
sendmsg 6 <$str(S$决定数量)>
movr N$随机1 1 <$str(S$决定数量)>
sendmsg 6 随机1=<$str(N$随机1)>\
formulation <$str(S$决定数量)>-<$str(N$随机1)> N$随机总量1
movr N$随机2 1 <$str(N$随机总量1)>
sendmsg 6 随机2=<$str(N$随机2)>
formulation <$str(N$随机总量1)>-<$str(N$随机2)> N$随机总量2
movr N$随机3 1 <$str(N$随机总量2)>
sendmsg 6 随机3=<$str(N$随机3)>\
formulation <$str(N$随机总量2)>-<$str(N$随机3)> N$随机总量3
movr N$随机4 1 <$str(N$随机总量3)>
sendmsg 6 随机4=<$str(N$随机4)>\
formulation <$str(N$随机总量3)>-<$str(N$随机4)> N$随机总量4
movr N$随机5 1 <$str(N$随机总量4)>
sendmsg 6 随机5=<$str(N$随机5)>\
formulation <$str(N$随机总量4)>-<$str(N$随机5)> N$随机总量5
movr N$随机6 1 <$str(N$随机总量5)>
sendmsg 6 随机6=<$str(N$随机6)>\
formulation <$str(N$随机总量5)>-<$str(N$随机6)> N$随机总量6
movr N$随机7 1 <$str(N$随机总量6)>
sendmsg 6 随机7=<$str(N$随机7)>\
formulation <$str(N$随机总量6)>-<$str(N$随机7)> N$随机总量7
movr N$随机8 1 <$str(N$随机总量7)>
sendmsg 6 随机8=<$str(N$随机8)>\
formulation <$str(N$随机总量7)>-<$str(N$随机8)> N$随机总量8
movr N$随机9 1 <$str(N$随机总量8)>
sendmsg 6 随机9=<$str(N$随机9)>\
formulation <$str(N$随机总量8)>-<$str(N$随机9)> N$随机总量9
movr N$随机10 1 <$str(N$随机总量9)>
sendmsg 6 随机10=<$str(N$随机10)>\
formulation <$str(N$随机总量9)>-<$str(N$随机10)> N$随机总量10
mov N$随机11 <$str(N$随机总量10)>
sendmsg 6 随机11=<$str(N$随机11)>\
sendmsg 6 总数=<$formulation[<$str(N$随机1)>+<$str(N$随机2)>+<$str(N$随机3)>+<$str(N$随机4)>+<$str(N$随机5)>+<$str(N$随机6)>+<$str(N$随机7)>+<$str(N$随机8)>+<$str(N$随机9)>+<$str(N$随机10)>+<$str(N$随机11)>]>
RANSJSTR 经验卷500W|准星物品|200W经验卷|100W经验卷|经验卷5亿|经验卷2亿|经验卷5000W|经验卷3000W|经验卷2000W|经验卷1000W|经验卷1亿 0 3 S0 S10
RANSJSTR <$str(S10)> 0 3 S20 S11
RANSJSTR <$str(S11)> 0 3 S21 S12
RANSJSTR <$str(S12)> 0 3 S22 S13
RANSJSTR <$str(S13)> 0 3 S23 S14
RANSJSTR <$str(S14)> 0 3 S24 S15
RANSJSTR <$str(S15)> 0 3 S25 S16
RANSJSTR <$str(S16)> 0 3 S26 S17
RANSJSTR <$str(S17)> 0 3 S27 S18
RANSJSTR <$str(S18)> 0 3 S28 S19
RANSJSTR <$str(S19)> 0 3 S29 S30

GIVES <$str(S0)>#<$str(N$随机1)>#64&<$str(S20)>#<$str(N$随机2)>#64&<$str(S21)>#<$str(N$随机3)>#64&<$str(S22)>#<$str(N$随机4)>#64&<$str(S23)>#<$str(N$随机5)>#64&<$str(S24)>#<$str(N$随机6)>#64&<$str(S25)>#<$str(N$随机7)>#64&<$str(S26)>#<$str(N$随机8)>#64&<$str(S27)>#<$str(N$随机9)>#64&<$str(S28)>#<$str(N$随机10)>#64&<$str(S30)>#<$str(N$随机11)>#64
TAKE 金条 <$str(S$决定数量)>
PRINTUSETIME 2 1
goto @stdmodefunc333
</code></pre>
<p>阿星</p>
<pre><code>#if
#ACT
goto @界面
mov N$总数量

[@界面]
#IF
#say
<Img|x=358.0|y=225.0|img=public/bg_npc_01.png|bg=1|move=0|loadDelay=1|reset=1|show=0>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=906.0|y=223.0|pimg=public/1900000511.png|nimg=public/1900000510.png|link=@exit>
<Button|x=479.0|y=323.0|nimg=public/1900000611.png|size=18|color=255|text=单次|link=@打开#打开参=单次>
<Button|x=729.0|y=321.0|nimg=public/1900000611.png|size=18|color=255|text=批量|link=@打开#打开参=批量>
<Slider|x=652.0|y=288.0|width=200|sliderid=N1|defvalue=0|maxvalue=5000000|link=@滑动触发1>
<Text|x=753.0|y=286.0|color=255|size=18|text=$STM(SLIDERV_N1)>

[@滑动触发1]
#act
mov N$临时赋值变量1 <$npcparams(3,N1)>

[@打开]
#IF
equal S$批量
#ACT
mov S$礼包内容低级1|低级2|低级3|中级1|中级2|中级3|高级1|高级2|高级3
GETVALIDSTRSUPER <$STR(S$礼包内容)> | S$礼包内容_ N$数量
inc N$数量 1
mov N$总数量 <$str(N$临时赋值变量1)>

#if
#act
mov N0 1
while n0 < <$str(N$数量)>
goto @11
inc n0 1
endwhile

[@11]
#if
#act
MOVR N$随机值 1 5
sendmsg 0 <$str(S$礼包内容_<$str(N0)>)> <$formulation[<$str(N$总数量)>*0.<$str(N$随机值)>]>
;give <$str(S$礼包内容_<$str(N0)>)> <$formulation[<$str(N$总数量)>*0.<$str(N$随机值)>]>
dec N$总数量 <$formulation[<$str(N$总数量)>*0.<$str(N$随机值)>]>

#if
equal n0 <$formulation[<$str(N$数量)>-1]>
large N$总数量 0
#act
sendmsg 0 ======<$str(S$礼包内容_1)> <$str(N$总数量)>
;give <$str(S$礼包内容_1)> <$str(N$总数量)>
mov N$总数量 0
</code></pre>

页: [1]

传奇996引擎技术学习论坛's Archiver

Txt第一届比武大赛