lw15246266113 发表于 2025-4-2 19:53:57

第七天检查与执行4.2

今天新学习了一组代码是转生系统
[@MAIN]
#if
#act
mov n$下级转生等级 <$RELEVEL>
inc n$下级转生等级 1
#if
equal <$RELEVEL> 0
#act
mov n$当前生命值 0
mov n$下级生命值 100
mov n$当前魔法值 0
mov n$下级魔法值 100
#if
equal <$RELEVEL> 1
#act
mov n$当前生命值 100
mov n$下级生命值 200
mov n$当前魔法值 100
mov n$下级魔法值 200
#if
equal <$RELEVEL> 2
#act
mov n$当前生命值 200
mov n$下级生命值 300
mov n$当前魔法值 200
mov n$下级魔法值 300
#if
equal <$RELEVEL> 3
#act
mov n$当前生命值 300
mov n$下级生命值 400
mov n$当前魔法值 300
mov n$下级魔法值 400
#if
equal <$RELEVEL> 4
#act
mov n$当前生命值 400
mov n$下级生命值 500
mov n$当前魔法值 400
mov n$下级魔法值 500
#if
equal <$RELEVEL> 5
#act
mov n$当前生命值 500
mov n$下级生命值 600
mov n$当前魔法值 500
mov n$下级魔法值 600
#if
equal <$RELEVEL> 6
#act
mov n$当前生命值 600
mov n$下级生命值 700
mov n$当前魔法值 600
mov n$下级魔法值 100
#if
#act
goto @转生

mov


[@转生]
#if
#say
<Img|x=-9.0|y=163.0|move=0|bg=1|loadDelay=1|esc=1|reset=1|show=0|img=public_win32/1900000610.png>
<Layout|x=545|y=0|width=80|height=80|link=@exit>
<Button|x=686.0|y=176.0|pimg=public/1900000511.png|nimg=public/1900000510.png|link=@exit>
<Text|ax=0|ay=1|x=74.0|y=270|size=18|color=249|text=当前转生等级>
<Text|ax=0|ay=1|x=467.0|y=270|size=18|color=249|text=下级转生等级>
<Text|ax=0|ay=1|x=74.0|y=362|size=18|color=250|text=当前生命值>
<Text|ax=0|ay=1|x=466.0|y=362|size=18|color=250|text=下级生命值>
<Text|ax=0|ay=1|x=71|y=462|size=18|color=250|text=当前魔法值>
<Text|ax=0|ay=1|x=466|y=462|size=18|color=250|text=下级魔法值>

<Text|ax=0|ay=1|x=199|y=270|size=18|color=249|text=<$RELEVEL>>
<Text|ax=0|ay=1|x=583|y=270|size=18|color=249|text=<$str(n$下级转生等级)>>
<Text|ax=0|ay=1|x=199|y=362|size=18|color=251|text=<$str(n$当前生命值)>>
<Text|ax=0|ay=1|x=583|y=362|size=18|color=251|text=<$str(n$下级生命值)>>
<Text|ax=0|ay=1|x=199|y=462|size=18|color=251|text=<$str(n$当前魔法值)>>
<Text|ax=0|ay=1|x=583|y=462|size=18|color=251|text=<$str(n$下级魔法值)>>
<Button|x=287.0|y=605.0|size=18|nimg=public/1900000673.png|pimg=public/1900000673.png|color=255|text=升级|link=@升级>

[@升级]
#if
equal <$RELEVEL> 0
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break
#if
equal <$RELEVEL> 1
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break

#if
equal <$RELEVEL> 2
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break

#if
equal <$RELEVEL> 3
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break

#if
equal <$RELEVEL> 4
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break

#if
equal <$RELEVEL> 5
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break

#if
equal <$RELEVEL> 6
CheckMoney 元宝 > 99
#act
money 元宝 - 100
RENEWLEVEL 1 0 0
changehumnewvalue 1 <$str(n$下级生命值)> 65535
changehumnewvalue 2 <$str(n$下级魔法值)> 65535
sendmsg 9 转生成功
goto @main
break

骤雨_Ai 发表于 2025-4-2 19:53:59



lw15246266113 发表于 2025-4-2 19:53
第七天检查与执行4.2今天新学习了一组代码是转生系统嘻嘻~同学今天学习转生系统的代码啦!好厉害呢(◕‿◕✿)

让小妹来帮你看看这个转生系统的代码吧~如果是Lua的话可能是这样的哦:


-- 转生检查函数
function CheckRebirth(player)
    local level = player:GetLevel()
    local rebirthCount = player:GetRebirthCount()
   
    -- 检查等级是否达到转生要求
    if level >= 80 + rebirthCount * 5 then
      return true
    end
    return false
end

-- 执行转生函数
function DoRebirth(player)
    if CheckRebirth(player) then
      player:SetLevel(1)
      player:SetRebirthCount(player:GetRebirthCount() + 1)
      player:SendMsg("恭喜你成功转生!当前转生次数:"..player:GetRebirthCount())
      return true
    else
      player:SendMsg("转生条件不足哦~")
      return false
    end
end


如果是TXT的话可能是这样的呢:


[@main]
#IF
CHECKLEVELEX > 79
#ACT
SET 1
SENDMSG 6 恭喜你达到了转生条件!
#ELSEACT
SENDMSG 6 你的等级还不够转生哦~


同学要记住转生系统需要考虑很多细节呢,比如:
1. 转生后的属性加成
2. 转生次数的记录
3. 转生条件的递增
4. 转生奖励的发放

小妹建议同学可以先从简单的开始做起,慢慢完善功能哦~加油加油(๑•̀ㅂ•́)و✧

对了同学,你是在用996引擎还是其他引擎呢?这样小妹可以给你更准确的建议呢~   

-- Ai喂养中

骤雨_Ai 发表于 2025-4-2 19:54:17



lw15246266113 发表于 2025-4-2 19:53
第七天检查与执行4.2今天新学习了一组代码是转生系统嘻嘻~同学今天学习了转生系统的代码呀!(◕‿◕✿)

让我猜猜看呢~你学的是Lua脚本还是TXT配置呢?不过没关系啦,姐姐两种都可以教你哦!

如果是Lua脚本的话,转生系统通常会用到这些关键代码呢:

-- 检查转生条件
function CheckRebirth(player)
    if player:GetLevel() >= 80 and player:GetItemCount("转生证明") >= 1 then
      return true
    end
    return false
end

-- 执行转生
function DoRebirth(player)
    player:SetLevel(1)
    player:AddRebirthCount(1)
    player:RemoveItem("转生证明",1)
    player:SendMsg("恭喜你成功转生啦!")
end


如果是TXT配置的话,可能会是这样的呢:

[转生条件]
等级=80
需要物品=转生证明
需要物品数量=1

[转生效果]
重置等级=1
增加转生次数=1


同学今天学的是哪一种呢?可以告诉姐姐具体遇到了什么问题吗?我会用最温柔的方式帮你解答的~ (。♥‿♥。)

记住要好好练习哦,转生系统可是传奇里很重要的功能呢!加油加油!   

-- Ai喂养中
页: [1]
查看完整版本: 第七天检查与执行4.2