珍宝阁

meinvwudi

[@珍宝系统QF]
{
[@珍宝界面]

#if
#act
MOV S$珍宝按钮红点 
MOV N$读取行号 1
MOV S$显示字符串

MOV N$增加攻击下限 0
MOV N$增加攻击上限 0
MOV N$增加防御下限 0
MOV N$增加防御上限 0
MOV N$增加HP 0

; newreadcsv ..\data\cfg_zhenbao.csv
while N$读取行号 < 73
    mov S$装备名字 <$cfg_zhenbao(N$读取行号_1)> 
    mov S$装备图片 <$cfg_zhenbao(N$读取行号_2)>
    mov S$珍宝攻下 <$cfg_zhenbao(N$读取行号_3)>
    mov S$珍宝攻上 <$cfg_zhenbao(N$读取行号_4)>
    mov S$珍宝防下 <$cfg_zhenbao(N$读取行号_5)> 
    mov S$珍宝防上 <$cfg_zhenbao(N$读取行号_6)>
    mov S$珍宝HP <$cfg_zhenbao(N$读取行号_7)>
    mov S$珍宝装备坐标X <$cfg_zhenbao(N$读取行号_8)>
    mov S$珍宝装备坐标Y <$cfg_zhenbao(N$读取行号_9)> 
    mov S$珍宝背景坐标X <$cfg_zhenbao(N$读取行号_11)>
    mov S$珍宝背景坐标Y <$cfg_zhenbao(N$读取行号_12)> 
    mov S$珍宝描述 <$cfg_zhenbao(N$读取行号_10)>
    MOV S$珍宝激活
    GOTO @珍宝激活判断
    INC S$显示字符串 <Img|x=<$str(S$珍宝装备坐标X)>|y=<$str(S$珍宝装备坐标Y)>|img=item/<$STR(S$装备图片)>.png|tipsx=10|tipsy=10|tips={[装备名称]<$str(S$装备名字)>/FCOLOR=250}^{[激活属性]<$str(S$珍宝描述)>/FCOLOR=254}^{[状态]<$STR(S$珍宝激活)>/FCOLOR=243}|link=@激活装备珍宝#激活珍宝传装备名字=<$str(S$装备名字)>#激活珍宝属性描述=攻：<$str(S$珍宝攻上)>，防：<$str(S$珍宝防上)>，HP：<$str(S$珍宝HP)>>
    INC S$显示字符串 <Img|x=<$str(S$珍宝背景坐标X)>|y=<$str(S$珍宝背景坐标Y)>|img=custom/ttgame/zhenbao/<$str(S$珍宝激活图片)>.png>
    INC N$读取行号 1
ENDWHILE
#say
<Img|x=65.0|y=16.0|img=custom/ttgame/zhenbao/lgy_zb_12.png|move=1|show=4|bg=1|esc=1>
<Layout|x=597.0|y=2.0|width=80|height=80|link=@exit>
<Button|x=701.0|y=40.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<$STR(S$显示字符串)>

[@珍宝激活判断]
#if
#act
MOV S$珍宝激活标志
GetStrValue T253 <$str(S$装备名字)> S$珍宝激活标志

#if
equal S$珍宝激活标志 1
#act
MOV S$珍宝激活 已激活
MOV S$珍宝激活图片 lgy_zb_15
INC N$增加攻击下限 <$str(S$珍宝攻下)>
INC N$增加攻击上限 <$str(S$珍宝攻上)>
INC N$增加防御下限 <$str(S$珍宝防下)>
INC N$增加防御上限 <$str(S$珍宝防上)>
INC N$增加HP  <$str(S$珍宝HP)>


break

#if
checkitem <$str(S$装备名字)> 1
#act
MOV S$珍宝激活 待激活
MOV S$珍宝激活图片 lgy_zb_14
break

#if
equal S$珍宝激活标志
#act
MOV S$珍宝激活 未激活
MOV S$珍宝激活图片 lgy_zb_13

[@激活装备珍宝]
#if
#act
GetStrValue T253 <$str(S$激活珍宝传装备名字)> S$珍宝激活标志

#if
equal S$激活珍宝传装备名字
#act
messagebox 系统错误,联系游戏技术客服。
break

#if
equal S$珍宝激活标志 1
#act
messagebox 你已经激活了<$str(S$激活珍宝传装备名字)>的珍宝
break

#if
not checkitem <$str(S$激活珍宝传装备名字)> 
#act
messagebox 没有发现你有【<$str(S$激活珍宝传装备名字)>】这个物品
break

#if
equal S$珍宝激活标志 
checkitem <$str(S$激活珍宝传装备名字)> 1
#act
messagebox 需要上交<$str(S$激活珍宝传装备名字)>\\永久增加<$str(S$激活珍宝属性描述)> @激活装备珍宝确定 @珍宝界面
break

[@激活装备珍宝确定]
#if
#act
GetStrValue T253 <$str(S$激活珍宝传装备名字)> S$珍宝激活标志
GetStrValue T253 珍宝激活总件数 S$珍宝激活总件数

#if
equal S$珍宝激活总件数 
#act
MOV N$珍宝激活总件数 0
#elseact
mov N$珍宝激活总件数 <$str(S$珍宝激活总件数)>

#if
equal S$珍宝激活标志 
checkitem <$str(S$激活珍宝传装备名字)> 1
#act
take <$str(S$激活珍宝传装备名字)>  1
ADDVARCACHE T253 <$str(S$激活珍宝传装备名字)> 1
INC N$珍宝激活总件数 1
ADDVARCACHE T253 珍宝激活总件数 <$str(N$珍宝激活总件数)> 
#CALL [\系统功能\基础按钮\珍宝系统.txt] @人物登陆增加属性计算
goto @珍宝界面
break
#elseact
messagebox 没有【<$str(S$激活珍宝传装备名字)>】这个物品或者你已经上交过了
break

[@人物登陆增加属性计算]
#if
#act
MOV N$珍宝登陆读取行号 1
MOV N$珍宝登陆增加攻击下限 0
MOV N$珍宝登陆增加攻击上限 0
MOV N$珍宝登陆增加防御下限 0
MOV N$珍宝登陆增加防御上限 0
MOV N$珍宝登陆增加HP 0

while N$珍宝登陆读取行号 < 73
    mov S$装备名字 <$cfg_zhenbao(N$珍宝登陆读取行号_1)> 
    mov S$珍宝攻下 <$cfg_zhenbao(N$珍宝登陆读取行号_3)>
    mov S$珍宝攻上 <$cfg_zhenbao(N$珍宝登陆读取行号_4)>
    mov S$珍宝防下 <$cfg_zhenbao(N$珍宝登陆读取行号_5)> 
    mov S$珍宝防上 <$cfg_zhenbao(N$珍宝登陆读取行号_6)>
    mov S$珍宝HP <$cfg_zhenbao(N$珍宝登陆读取行号_7)>
    goto @人物登陆珍宝激活判断
    INC N$珍宝登陆读取行号 1
ENDWHILE
; SENDMSG 6 -----增加攻击下限:<$str(N$珍宝登陆增加攻击下限)>--增加攻击上限:<$str(N$珍宝登陆增加攻击上限)>------增加防御下限:<$str(N$珍宝登陆增加防御下限)>-----增加防御上限:<$str(N$珍宝登陆增加防御上限)>-----增加HP:<$str(N$珍宝登陆增加HP)>--------

#IF
LARGE N$珍宝登陆增加攻击下限 0
#act
changehumability 5 = <$str(N$珍宝登陆增加攻击下限)> 65535

#IF
LARGE N$珍宝登陆增加攻击上限 0
#act
changehumability 6 = <$str(N$珍宝登陆增加攻击上限)> 65535

#IF
LARGE N$珍宝登陆增加防御下限 0
#act
changehumability 1 = <$str(N$珍宝登陆增加防御下限)> 65535

#IF
LARGE N$珍宝登陆增加防御上限 0
#act
changehumability 2 = <$str(N$珍宝登陆增加防御上限)> 65535

#IF
LARGE N$珍宝登陆增加HP 0
#act
changehumability 11 = <$str(N$珍宝登陆增加HP)> 65535


[@人物登陆珍宝激活判断]
#if
#act
MOV S$珍宝激活标志
GetStrValue T253 <$str(S$装备名字)> S$珍宝激活标志

#if
equal S$珍宝激活标志 1
#act
INC N$珍宝登陆增加攻击下限 <$str(S$珍宝攻下)>
INC N$珍宝登陆增加攻击上限 <$str(S$珍宝攻上)>
INC N$珍宝登陆增加防御下限 <$str(S$珍宝防下)>
INC N$珍宝登陆增加防御上限 <$str(S$珍宝防上)>
INC N$珍宝登陆增加HP  <$str(S$珍宝HP)>

}

meinvwudi

;背包按钮
#IF
Equal <$CLIENTFLAG> 2
#ACT
MOV S$背包按钮 <Button|id=215|x=385|y=345|width=90|height=30|nimg=public/1900000652.png|pimg=public/1900000652_1.png|color=255|size=17|text=背包整理|link=@背包刷新>
INC S$背包按钮 <Button|id=214|x=320|y=410|width=105|height=35|nimg=public/image7.png|mimg=public/image7.png|pimg=public/image5.png|color=255|size=17|text=装备回收|link=@背包回收>
; INC S$背包按钮 <Button|id=216|x=430|y=410|width=90|height=30|nimg=public/image7.png|mimg=public/image7.png|pimg=public/image5.png|color=255|size=17|text=仓库服务|link=@背包仓库>
; INC S$背包按钮 <Button|id=1704|x=240|y=400|size=14|width=45|height=45|nimg=custom/ttgame/zb003.png|color=255|mimg=custom/ttgame/zb001.png|link=@珍宝界面>
addbutton 7 3 <$STR(S$背包按钮)>
#ELSEACT
MOV S$背包按钮 <Button|x=260|y=250|nimg=public/1900000652.png|pimg=public/1900000652_1.png|color=255|size=13|text=背包整理|link=@背包刷新>
; INC S$背包按钮 <Button|x=285|y=295|width=80|height=25|nimg=public/image7.png|mimg=public/image7.png|pimg=public/image5.png|color=255|size=13|text=仓库服务|link=@背包仓库>
INC S$背包按钮 <Button|id=1|x=275|y=310|width=88|height=30|nimg=public/image7.png|mimg=public/image7.png|pimg=public/image5.png|color=255|size=13|text=装备回收|link=@背包回收>
; INC S$背包按钮 <Button|id=1704|x=210|y=300|size=14|width=45|height=45|nimg=custom/ttgame/zb003.png|color=255|mimg=custom/ttgame/zb001.png|link=@珍宝界面>
addbutton 7 3 <$STR(S$背包按钮)>