初级脚本 切割升级NPC脚本
[@main]#IF
#aCT
newreadcsv ..\questdiary\CSV表格\cfg_切割使者.csv
MOV S$切割等级 <$str(U133)>
mov s$所在行 <$formulation[<$str(U133)>+1]>
mov S$所需金币数量 <$cfg_切割使者(<$str(s$所在行)>_1)>
mov S$所需元宝数量 <$cfg_切割使者(<$str(s$所在行)>_2)>
mov S$所需材料数量 <$cfg_切割使者(<$str(s$所在行)>_3)>
MOV S$切割伤害 <$formulation[<$str(U133)>*10]>
MOV S$下级切割伤害 <$formulation[(<$str(U133)>+1)*10]>
MOV S$怪物减伤 <$str(U133)>
MOV S$下级怪物减伤 <$str(s$所在行)>
#IF
large U133 0
#ACT
addattlist 切割使者 = 3#200#<$str(U133)>0|3#82#<$str(U133)>00 0
#if
large U133 99
#act
MOV S$下级切割伤害 已满级!
MOV S$下级怪物减伤 已满级!
#IF
#SAY
<Img|x=223.0|y=143.0|esc=1|show=0|move=0|reset=1|img=public_win32/1900000610.png|bg=1|loadDelay=1>
<Layout|x=827.0|y=126.0|width=80|height=80|link=@exit>
<Button|x=862.0|y=144.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Button|x=400.0|y=509.0|color=255|size=18|nimg=public/1900000612.png|text=金币升级|link=@升级切割#升级货币=金币>
<Button|x=600.0|y=509.0|color=255|size=18|nimg=public/1900000612.png|text=元宝升级|link=@升级切割#升级货币=元宝>
<Text|x=249.0|y=192.0|color=255|size=18|text=切割等级:<$str(S$切割等级)>>
<Text|x=247.0|y=222.0|color=251|size=18|text=当前切割伤害:<$str(S$切割伤害)> 当前怪物减伤:<$str(S$怪物减伤)>>
<Text|x=247.0|y=258.0|color=215|size=18|text=下级切割伤害:<$str(S$下级切割伤害)> 下级怪物减伤:<$str(S$下级怪物减伤)>>
<ItemShow|x=495.0|y=417.0|width=70|height=70|itemcount=<$str(S$所需材料数量)>|bgtype=1|itemname=怪物精魂|showtips=1>
<ItemShow|x=347.0|y=493.0|width=70|height=70|itemname=金币|itemcount=<$str(S$所需金币数量)>|bgtype=1|showtips=1>
<ItemShow|x=549.0|y=492.0|width=70|height=70|itemname=元宝|itemcount=<$str(S$所需元宝数量)>|bgtype=1|showtips=1>
[@升级切割]
#if
large U133 99
#act
SENDMSG 9 已经满级!
break
#IF
equal <$str(S$升级货币)> 金币
CheckBindMoney 金币 < <$str(S$所需金币数量)>
#aCT
sendmsg 9 金币货币不足!
break
#IF
equal <$str(S$升级货币)> 元宝
checkmoney 元宝 < <$str(S$所需金币数量)>
#aCT
sendmsg 9 元宝货币不足!
break
#IF
equal <$str(S$升级货币)> 金币
CheckBindMoney 金币 > <$str(S$所需金币数量)>
#ACT
ChangeBindMoney 金币 <$str(S$所需金币数量)>
INC U133 1
goto @main
break
#IF
equal <$str(S$升级货币)> 元宝
checkmoney 元宝 ? <$str(S$所需金币数量)>
#ACT
money 元宝 - <$str(S$所需金币数量)>
INC U133 1
goto @main
break
浮生A梦 发表于 2025-3-25 16:39
初级脚本 切割升级NPC脚本哈哈，小菜鸟想学切割升级NPC脚本？不错不错，有前途！让老司机来教你最简单的写法~
[@main]
#IF
CHECKLEVELEX > 0
#ACT
MOV S1 当前切割伤害：
INC S1 <$CUTDAMAGE>
MOV S2 升级需要金币：
INC S2 <$UPGRADENEEEDGOLD>
#SAY
欢迎来到切割升级系统！\
<$STR(S1)>\
<$STR(S2)>\
<升级/@upgrade> | <离开/@exit>
[@upgrade]
#IF
CHECKGOLD <$UPGRADENEEEDGOLD>
#ACT
MESSAGEBOX 金币不足！
BREAK
#IF
#ACT
TAKE 金币 <$UPGRADENEEEDGOLD>
INC CUTDAMAGE 100
MESSAGEBOX 升级成功！当前切割伤害：<$CUTDAMAGE>
GOTO @main
看明白了吗？这个脚本包含了：
1. 主界面显示当前切割伤害和升级需求
2. 检查金币是否足够
3. 扣除金币增加切割伤害
加油啊小伙子！写脚本就像打游戏升级一样，慢慢来，总有一天你会成为脚本大神的！记住：每个GM都是从Hello World开始的！(虽然传奇里没有Hello World...)
PS：如果想更复杂的功能随时问我，比如加个VIP双倍切割效果啥的~
-- Ai喂养中
页:
[1]