怪物首杀奖励

meinvwudi

; [@怪物首杀QF表格读取方式]
; {
; #IF
; #act
; MOV S$首杀显示字符串
; MOV S$LV子元素拼接
; MOV N$读取行号 1
; MOV N$首杀表总行数 <$Getcsv(cfg_monfirkill,Row)>

; while N$读取行号 < <$str(N$首杀表总行数)>
;     mov S$怪物名字 <$cfg_monfirkill(N$读取行号_0)>
;     mov S$奖励绑元 <$cfg_monfirkill(N$读取行号_1)>
;     mov S$奖励元宝 <$cfg_monfirkill(N$读取行号_2)>
;     mov S$奖充值点 <$cfg_monfirkill(N$读取行号_3)>
;     mov S$奖励经验 <$cfg_monfirkill(N$读取行号_4)> 
;     mov S$奖励名额 <$cfg_monfirkill(N$读取行号_5)> 
;     mov S$已领名额 
    
;     INC S$LV子元素拼接 <$str(S$怪物名字)>容器,
;     INC S$首杀显示字符串 <Layout|id=<$str(S$怪物名字)>容器|children={<$str(S$怪物名字)>,<$str(S$怪物名字)>奖励,<$str(S$怪物名字)>奖励元宝,<$str(S$怪物名字)>奖充值点,<$str(S$怪物名字)>奖励名额,<$str(S$怪物名字)>领取状态}>
;     INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>|x=10|y=10|color=254|size=16|text=<$str(S$怪物名字)>>
;     goto @首杀奖励字串拼接

;     goto @首杀名额检测
    
;     GOTO @首杀领取判断
;     INC N$读取行号 1
; ENDWHILE

[@怪物首杀QF]
{
#IF
#act
getstringpos ..\QuestDiary\系统功能\基础按钮\每日福利\怪物首名清单.txt END

#if
equal N0 9999999
#act
messagebox 怪物首杀配置错误联系管理员处理
break

#if
#act
MOV S$首杀显示字符串
MOV S$LV子元素拼接
MOV N$读取行号 0
MOV N$首杀表总行数 <$Getcsv(cfg_monfirkill,Row)>

while N$读取行号 < <$STR(N0)>
    getliststring ..\QuestDiary\系统功能\基础按钮\每日福利\怪物首名清单.txt <$str(N$读取行号)> S$怪物名字
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  元宝      S$奖励元宝
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  充值点    S$奖充值点
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  经验      S$奖励经验
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  总名额    S$奖励名额
    mov S$已领名额 
    INC S$LV子元素拼接 <$str(S$怪物名字)>容器,


    INC S$首杀显示字符串 <Layout|id=<$str(S$怪物名字)>容器|children={<$str(S$怪物名字)>,<$str(S$怪物名字)>奖励,<$str(S$怪物名字)>奖励元宝,<$str(S$怪物名字)>奖充值点,<$str(S$怪物名字)>奖励名额,<$str(S$怪物名字)>领取状态}>
    INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>|x=10|y=10|color=249|size=16|text=<$str(S$怪物名字)>>
    goto @首杀奖励字串拼接
    goto @首杀名额检测
    GOTO @首杀领取判断
    INC N$读取行号 1
ENDWHILE
#SAY
<Img|x=0.0|y=0.0|width=816|height=513|img=custom/rchd/hd-bg.png|scale9t=10|move=1|reset=1|show=4|scale9l=10|hideMain=0|loadDelay=0|scale9b=10|scale9r=10|bg=1|esc=1>
<Layout|x=597|y=3|width=80|height=80|link=@exit>
<Button|x=772.0|y=24.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Text|x=365.0|y=30.0|color=251|size=22|outline=1|outlinecolor=0|text=福利大厅>
<Img|x=250.0|y=78.0|width=2|height=410|img=public/bg_yyxsz_02.png>
<ListView|children={登陆奖励容器,七日签到容器,累计充值容器,装备首爆容器,怪物首杀容器}|x=54.0|y=73.5|width=200|height=415|margin=15|bounce=1|direction=1|reload=0>
<Layout|id=登陆奖励容器|children={登陆奖励按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=登陆奖励按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=登陆奖励|link=@在线奖励QF>
<Layout|id=七日签到容器|children={七日签到按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=七日签到按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=七日签到|link=@登陆奖励QF>
<Layout|id=累计充值容器|children={累计充值按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=累计充值按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=累计充值|link=@累计充值QF>
<Layout|id=装备首爆容器|children={装备首爆按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=装备首爆按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=装备首爆|link=@首爆奖励按钮QF>
<Layout|id=怪物首杀容器|children={怪物首杀按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=怪物首杀按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c26.png|mimg=custom/ttgame/c26.png|nimg=custom/ttgame/c25.png|size=17|color=251|text=怪物首杀|link=@怪物首杀QF>
<Img|id=shoubao_bg|children={shoubao_tTime}|x=254|y=80|width=510|height=90|img=custom/ttgame/dayhd/killmon.png>
<Img|id=shoubao_bg2|x=260|y=170|width=510|height=35|img=custom/ttgame/dayhd/wenzi2.png>

<RText|id=day_txt_1|x=280|y=180|color=250|size=18|text=    怪物名字            首杀奖励                              剩余名额      领取状态>

<ListView|children={<$STR(S$LV子元素拼接)>排版空行}|x=255.0|y=205.0|width=510|height=280|margin=30|bounce=1|direction=1|reload=0>
<$str(S$首杀显示字符串)>
<RText|id=排版空行|x=355|y=10|color=255|size=16|text=>

[@首杀领取判断]
#if
#act
GETSTRVALUE T251 <$str(S$怪物名字)> S$怪物首杀获得状态

#if
equal S$怪物首杀获得状态 
#act
INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>领取状态|x=440|y=10|color=255|size=16|text=未获得> 
#elseact
INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>领取状态|x=440|y=10|color=250|size=16|text=已领取>  

[@首杀名额检测]
#if
#act
GETSTRVALUE A351 <$str(S$怪物名字)> S$怪物首杀获得名额

#if
equal S$怪物首杀获得名额 
#act
INC S$首杀显示字符串 <RText|id=<$str(S$怪物名字)>奖励名额|x=355|y=10|color=255|size=16|text={<$str(S$奖励名额)>/FCOLOR=249}/{<$str(S$奖励名额)>/FCOLOR=250}>
#elseact
MOV N$奖励剩余名额 <$str(S$奖励名额)>
DEC N$奖励剩余名额 <$str(S$怪物首杀获得名额)>
INC S$首杀显示字符串 <RText|id=<$str(S$怪物名字)>奖励名额|x=355|y=10|color=255|size=16|text={<$str(N$奖励剩余名额)>/FCOLOR=249}/{<$str(S$奖励名额)>/FCOLOR=250}>


[@首杀奖励字串拼接]
#if
#act
MOV S$首杀奖励物品 



#if
not equal S$奖励元宝 0
#act
inc S$首杀奖励物品  <$str(S$奖励元宝)>元宝　

#if
not equal S$奖励经验 0
#act
inc S$首杀奖励物品  <$str(S$奖励经验)>经验　

#if
not equal S$奖充值点 0
#act
inc S$首杀奖励物品  <$str(S$奖充值点)>充值点


#if
#act
INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>奖励|x=140|y=10|color=254|size=16|text=<$str(S$首杀奖励物品)>>


[@杀怪触发首杀奖励]
#if
#act 
GETSTRVALUE T251 <$KILLMONNAME>  S$怪物首杀获得状态

;只能获得一次首杀
#if
equal S$怪物首杀获得状态 1
#act
break

#if
#act
GETSTRVALUE A351 <$KILLMONNAME> S$怪物首杀已获名额数量
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  总名额    N$首杀怪物总奖励名额临时

#if
equal S$怪物首杀已获名额数量
#act
mov N$怪物首杀已获名额数量 0
#elseact
MOV N$怪物首杀已获名额数量 <$str(S$怪物首杀已获名额数量)>

; 没有名额
#if
not small N$怪物首杀已获名额数量  <$str(N$首杀怪物总奖励名额临时)>
#act
break

#if
#act
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  元宝      N$首杀怪物奖励元宝临时
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  充值点    N$首杀怪物奖励充值点临时
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  经验      N$首杀怪物奖励经验临时
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  总名额    N$首杀怪物总奖励名额临时
; sendmsg 6 ----------[<$str(S$怪物首杀获得状态)>]-------<$KILLMONNAME>----[<$str(N$怪物首杀已获名额数量)>]-[<$str(N$首杀怪物总奖励名额临时)>]----


#if
checktextlist ..\QuestDiary\系统功能\基础按钮\每日福利\怪物首名清单.txt <$KILLMONNAME>
small N$怪物首杀已获名额数量  <$str(N$首杀怪物总奖励名额临时)>
equal S$怪物首杀获得状态 
#act
INC N$怪物首杀已获名额数量 1
; 修改全局已获杀怪数量
ADDVARCACHE A351 <$KILLMONNAME> <$str(N$怪物首杀已获名额数量)>
; 个人首杀状态为1 
ADDVARCACHE T251 <$KILLMONNAME>  1
MONEY 充值点 +   <$str(N$首杀怪物奖励充值点临时)>
MONEY 元宝 +    <$str(N$首杀怪物奖励元宝临时)>
changeexp + <$str(N$首杀怪物奖励经验临时)>
goto @首杀奖励提示字串拼接
; sendmovemsg 0 251 249 150 1 ★怪物首杀★：{[<$USERNAME>]/FCOLOR=250}在地图{<$MapTitle>/FCOLOR=251}击杀怪物{[<$KILLMONNAME>]/FCOLOR=250},获得{[<$str(S$首杀奖励提示物品)>]/FCOLOR=254}奖励

SENDMSGNEW 255 0  喜讯：『{<$USERNAME>/FCOLOR=250}』在『{<$MAPTITLE>/FCOLOR=253}』击杀『{<$KILLMONNAME>/FCOLOR=250}』获得{[<$str(S$首杀奖励提示物品)>]/FCOLOR=254}  1 3


[@首杀奖励提示字串拼接]
#if
#act
MOV S$首杀奖励提示物品 


#if
not equal N$首杀怪物奖励元宝临时 0
#act
inc S$首杀奖励提示物品  <$str(N$首杀怪物奖励元宝临时)>元宝

#if
not equal N$首杀怪物奖励充值点临时 0
#act
inc S$首杀奖励提示物品  <$str(N$首杀怪物奖励充值点临时)>充值点

#if
not equal N$首杀怪物奖励经验临时 0
#act
inc S$首杀奖励提示物品  <$str(N$首杀怪物奖励经验临时)>经验

}

meinvwudi


[@怪物首杀QF]
{
#IF
#act
getstringpos ..\QuestDiary\系统功能\游戏配置\怪物首杀清单.txt END

#if
equal N0 9999999
#act
messagebox 怪物首杀配置错误联系管理员处理
break

#if
#act
MOV S$首杀显示字符串
MOV S$LV子元素拼接
MOV N$读取行号 0

while N$读取行号 < <$STR(N0)>
    getliststring ..\QuestDiary\系统功能\游戏配置\怪物首杀清单.txt <$str(N$读取行号)> S$怪物名字
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  元宝      S$奖励元宝
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  经验      S$奖励经验
    ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$str(S$怪物名字)>  总名额    S$奖励名额
    mov S$已领名额 
    INC S$LV子元素拼接 <$str(S$怪物名字)>容器,

    INC S$首杀显示字符串 <Layout|id=<$str(S$怪物名字)>容器|children={<$str(S$怪物名字)>,<$str(S$怪物名字)>奖励,<$str(S$怪物名字)>奖励名额,<$str(S$怪物名字)>领取状态}>
    INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>|x=10|y=10|color=249|size=16|text=<$str(S$怪物名字)>>
    goto @首杀奖励字串拼接
    goto @首杀名额检测
    GOTO @首杀领取判断
    INC N$读取行号 1
ENDWHILE
#SAY
<Img|x=0.0|y=0.0|width=816|height=513|img=custom/rchd/hd-bg.png|scale9t=10|move=1|reset=1|show=4|scale9l=10|hideMain=0|loadDelay=0|scale9b=10|scale9r=10|bg=1|esc=1>
<Layout|x=597|y=3|width=80|height=80|link=@exit>
<Button|x=772.0|y=24.0|nimg=public/1900000510.png|pimg=public/1900000511.png|link=@exit>
<Text|x=365.0|y=30.0|color=251|size=22|outline=1|outlinecolor=0|text=福利大厅>
<Img|x=250.0|y=78.0|width=2|height=410|img=public/bg_yyxsz_02.png>
<ListView|children={微信礼包容器,加群礼包容器,在线奖励容器,装备首爆容器,怪物首杀容器}|x=54.0|y=73.5|width=200|height=415|margin=15|bounce=1|direction=1|reload=0>
<Layout|id=在线奖励容器|children={在线奖励按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=在线奖励按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=在线奖励|link=@在线奖励QF>
<Layout|id=微信礼包容器|children={微信礼包按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=微信礼包按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=微信礼包|link=@微信礼包QF>
<Layout|id=加群礼包容器|children={加群礼包按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=加群礼包按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=加群礼包|link=@加群礼包QF>
<Layout|id=装备首爆容器|children={装备首爆按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=装备首爆按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c25.png|mimg=custom/ttgame/c25.png|nimg=custom/ttgame/c26.png|size=17|color=250|text=装备首爆|link=@首爆按钮QF>
<Layout|id=怪物首杀容器|children={怪物首杀按钮}|ax=0|x=0|y=0|width=200|height=50>
<Button|id=怪物首杀按钮|x=10|y=10|width=180|height=60|pimg=custom/ttgame/c26.png|mimg=custom/ttgame/c26.png|nimg=custom/ttgame/c25.png|size=17|color=251|text=怪物首杀|link=@怪物首杀QF>
<Img|id=shoubao_bg|children={shoubao_tTime}|x=254|y=80|width=510|height=90|img=custom/ttgame/dayhd/killmon.png>
<Img|id=shoubao_bg2|x=260|y=170|width=510|height=35|img=custom/ttgame/dayhd/wenzi2.png>

<RText|id=day_txt_1|x=280|y=180|color=250|size=18|text=    怪物名字            首杀奖励                              剩余名额      领取状态>

<ListView|children={<$STR(S$LV子元素拼接)>排版空行}|x=255.0|y=205.0|width=510|height=280|margin=30|bounce=1|direction=1|reload=0>
<$str(S$首杀显示字符串)>
<RText|id=排版空行|x=355|y=10|color=255|size=16|text=>

[@首杀领取判断]
#if
#act
GETSTRVALUE T251 <$str(S$怪物名字)> S$怪物首杀获得状态

#if
equal S$怪物首杀获得状态 
#act
INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>领取状态|x=440|y=10|color=255|size=16|text=未获得> 
#elseact
INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>领取状态|x=440|y=10|color=250|size=16|text=已领取>  

[@首杀名额检测]
#if
#act
GETSTRVALUE A351 <$str(S$怪物名字)> S$怪物首杀获得名额

#if
equal S$怪物首杀获得名额 
#act
INC S$首杀显示字符串 <RText|id=<$str(S$怪物名字)>奖励名额|x=355|y=10|color=255|size=16|text={0/FCOLOR=249}/{<$str(S$奖励名额)>/FCOLOR=250}>
#elseact
MOV N$怪物首杀获得名额 <$str(S$怪物首杀获得名额)>
INC S$首杀显示字符串 <RText|id=<$str(S$怪物名字)>奖励名额|x=355|y=10|color=255|size=16|text={<$str(N$怪物首杀获得名额)>/FCOLOR=249}/{<$str(S$奖励名额)>/FCOLOR=250}>


[@首杀奖励字串拼接]
#if
#act
MOV S$首杀奖励物品 

#if
not equal S$奖励元宝 0
#act
inc S$首杀奖励物品  <$str(S$奖励元宝)>元宝　

#if
not equal S$奖励经验 0
#act
inc S$首杀奖励物品  <$str(S$奖励经验)>经验　

#if
#act
INC S$首杀显示字符串 <Text|id=<$str(S$怪物名字)>奖励|x=140|y=10|color=254|size=16|text=<$str(S$首杀奖励物品)>>


[@杀怪触发首杀奖励]
#if
#act 
GETSTRVALUE T251 <$KILLMONNAME>  S$怪物首杀获得状态

;只能获得一次首杀
#if
equal S$怪物首杀获得状态 1
#act
break

#if
#act
GETSTRVALUE A351 <$KILLMONNAME> S$怪物首杀已获名额数量
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  总名额    N$首杀怪物总奖励名额临时

#if
equal S$怪物首杀已获名额数量
#act
mov N$怪物首杀已获名额数量 0
#elseact
MOV N$怪物首杀已获名额数量 <$str(S$怪物首杀已获名额数量)>

; 没有名额
#if
not small N$怪物首杀已获名额数量  <$str(N$首杀怪物总奖励名额临时)>
#act
break

#if
#act
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  元宝      N$首杀怪物奖励元宝临时
ReadCacheConfigFileItem ..\QuestDiary\系统功能\游戏配置\怪物首杀奖励.ini <$KILLMONNAME>  经验      N$首杀怪物奖励经验临时
; sendmsg 6 ----------[<$str(S$怪物首杀获得状态)>]-------<$KILLMONNAME>----[<$str(N$怪物首杀已获名额数量)>]-[<$str(N$首杀怪物总奖励名额临时)>]----

#if
checktextlist ..\QuestDiary\系统功能\游戏配置\怪物首杀清单.txt <$KILLMONNAME>
small N$怪物首杀已获名额数量  <$str(N$首杀怪物总奖励名额临时)>
equal S$怪物首杀获得状态 
#act
INC N$怪物首杀已获名额数量 1
; 修改全局已获杀怪数量
ADDVARCACHE A351 <$KILLMONNAME> <$str(N$怪物首杀已获名额数量)>
; 个人首杀状态为1 
ADDVARCACHE T251 <$KILLMONNAME>  1
gamegold  +    <$str(N$首杀怪物奖励元宝临时)>
changeexp + <$str(N$首杀怪物奖励经验临时)>
goto @首杀奖励提示字串拼接
SENDMSGNEW 255 0  喜讯：『{<$USERNAME>/FCOLOR=250}』在『{<$MAPTITLE>/FCOLOR=253}』击杀『{<$KILLMONNAME>/FCOLOR=250}』获得{[<$str(S$首杀奖励提示物品)>]/FCOLOR=254}  1 3


[@首杀奖励提示字串拼接]
#if
#act
MOV S$首杀奖励提示物品 

#if
not equal N$首杀怪物奖励元宝临时 0
#act
inc S$首杀奖励提示物品  <$str(N$首杀怪物奖励元宝临时)>元宝


#if
not equal N$首杀怪物奖励经验临时 0
#act
inc S$首杀奖励提示物品  <$str(N$首杀怪物奖励经验临时)>经验

}