GOM引擎限时奖励非常简便的写法

[@PickUpItemEx]
#IF
#ACT
#CALL [\限时奖励\拾取限时奖励.txt] @拾取自动奖励

[@拾取自动奖励]
{

#IF
CHECKTEXTLIST ..\QuestDiary\限时奖励\限时元宝.txt <$CURRTEMNAME>
#act
GetStringPos ..\QuestDiary\限时奖励\限时元宝.txt <$CURRTEMNAME>
INC N0 1
GetListString ..\QuestDiary\限时奖励\限时元宝.txt <$STR(N0)> S$限时变量 N$限时元宝

#IF
CHECKTEXTLIST ..\QuestDiary\限时奖励\限时RMB.txt <$CURRTEMNAME>
#act
GetStringPos ..\QuestDiary\限时奖励\限时RMB.txt <$CURRTEMNAME>
INC N0 1
GetListString ..\QuestDiary\限时奖励\限时RMB.txt <$STR(N0)> S$限时变量1 N$限时RMB

#IF
EQUAL G<$STR(S$限时变量)> 0
#ACT
MOV G<$STR(S$限时变量)> 1
MOV A<$STR(S$限时变量)> <$USERNAME>
MUL N$真实元宝 <$STR(N$限时元宝)> 100
MUL N$真实积分 <$STR(N$限时元宝)> 1
GAMEGOLD + <$STR(N$真实元宝)>
GAMEDIAMOND + <$STR(N$真实积分)>
SENDMOVEMSG 0 253 255 100 1 <恭喜玩家[/FCOLOR=161>{<$USERNAME>/FCOLOR=253}<]在[/FCOLOR=161>{<$MapTitle>,<$X>,<$Y>/FCOLOR=250}<]处打到一个[/FCOLOR=161>{<$CURRTEMNAME>/FCOLOR=70}<]获得<$STR(N$限时元宝)>元充值(<$STR(N$真实元宝)>元宝+<$STR(N$真实积分)>积分)限时奖励/FCOLOR=161>
BREAK

#IF
EQUAL G<$STR(S$限时变量1)> 0
#ACT
MOV G<$STR(S$限时变量1)> 1
MOV A<$STR(S$限时变量1)> <$USERNAME>
GAMEPOINT + <$STR(N$限时RMB)>
SENDMOVEMSG 0 253 255 100 1 <恭喜玩家[/FCOLOR=161>{<$USERNAME>/FCOLOR=253}<]在[/FCOLOR=161>{<$MapTitle>,<$X>,<$Y>/FCOLOR=250}<]处打到一个[/FCOLOR=161>{<$CURRTEMNAME>/FCOLOR=70}<]获得<$STR(N$限时RMB)>RMB限时奖励/FCOLOR=161>
BREAK

}