[@main]
<ȡ޸ʾ/@GetEquipProps> \ \
<ر/@exit>




[@GetEquipProps]
; ·
#if
CheckUseItem 0 
#act
;װ͡ȡͨԵֵʲô
Mov Sװ DRESS
;Ա
Mov SͨԱ ""
Mov Sͨ ""
Mov Sؼ ""
Mov MԱ 0
Mov MԱ 0
Mov M 0
GetEquipProps 0
[@OnGetEquipProps]
#iF
True
#Act
;ȡͨԵ  SͨԱ  "0=<$STR(M_EQUIP[0]_NORM_PROPS{0})>," <$STR(M_EQUIP[0]_NORM_PROPS{0})>  [0]Ϊװλ · {0}Ϊ0λõļƷ
Inc SͨԱ 0=<$STR(M_EQUIP[0]_NORM_PROPS{0})>,
Inc SͨԱ 1=<$STR(M_EQUIP[0]_NORM_PROPS{1})>,
Inc SͨԱ 2=<$STR(M_EQUIP[0]_NORM_PROPS{2})>,
Inc SͨԱ 3=<$STR(M_EQUIP[0]_NORM_PROPS{3})>,
Inc SͨԱ 4=<$STR(M_EQUIP[0]_NORM_PROPS{4})>,
Inc SͨԱ 5=<$STR(M_EQUIP[0]_NORM_PROPS{5})>,
Inc SͨԱ 6=<$STR(M_EQUIP[0]_NORM_PROPS{6})>,
Inc SͨԱ 7=<$STR(M_EQUIP[0]_NORM_PROPS{7})>,
Inc SͨԱ 8=<$STR(M_EQUIP[0]_NORM_PROPS{8})>,
Inc SͨԱ 9=<$STR(M_EQUIP[0]_NORM_PROPS{9})>,
Inc SͨԱ 10=<$STR(M_EQUIP[0]_NORM_PROPS{10})>,
Inc SͨԱ 11=<$STR(M_EQUIP[0]_NORM_PROPS{11})>,
Inc SͨԱ 12=<$STR(M_EQUIP[0]_NORM_PROPS{12})>,
Inc SͨԱ 13=<$STR(M_EQUIP[0]_NORM_PROPS{13})>,
Inc SͨԱ 14=<$STR(M_EQUIP[0]_NORM_PROPS{14})>,
Inc SͨԱ 15=<$STR(M_EQUIP[0]_NORM_PROPS{15})>,
Inc SͨԱ 16=<$STR(M_EQUIP[0]_NORM_PROPS{16})>,
Inc SͨԱ 17=<$STR(M_EQUIP[0]_NORM_PROPS{17})>,
Inc SͨԱ 18=<$STR(M_EQUIP[0]_NORM_PROPS{18})>,
Inc SͨԱ 19=<$STR(M_EQUIP[0]_NORM_PROPS{19})>,
Inc SͨԱ 20=<$STR(M_EQUIP[0]_NORM_PROPS{20})>,
Inc SͨԱ 21=<$STR(M_EQUIP[0]_NORM_PROPS{21})>,
Inc SͨԱ 22=<$STR(M_EQUIP[0]_NORM_PROPS{22})>,
Inc SͨԱ 23=<$STR(M_EQUIP[0]_NORM_PROPS{23})>

;ֱȡЧͨ.־ó⣩
Mov SͨԱ <$Str(S_EQUIP[0]_NORM_PROPS)>

;ȡͨԵ  Sͨ  "<$STR(S_EQUIP[0]_EVAL_BASE_PROPS)>"   [0]Ϊװλ ·
;4һ
Mov Sͨ <$STR(S_EQUIP[0]_EVAL_BASE_PROPS)>
Mov Sؼ <$STR(S_EQUIP[0]_EVAL_MYST_PROPS)>
Mov MԱ <$STR(M_EQUIP[0]_EVAL_SPEC_PROPS)>
Mov MԱ <$STR(M_EQUIP[0]_EVAL_SKILL_PROPS)>
Mov M <$STR(M_EQUIP[0]_EVAL_TIMES_PROPS)>
Sendmsg 7 ͨ:<$STR(SͨԱ)>|ԣ<$STR(Sͨ)>|ԣ<$STR(Sؼ)>|ԣ<$STR(MԱ)>|:<$STR(MԱ)>|<$STR(M)>
ResetLoopCounter
;Ϊչʾ
Mov S12 <$STR(SͨԱ)>
Mov Sͨ
Goto @Norm_Prop_Show
Mov S12 <$STR(Sͨ)>
Mov Sͨ
Goto @EVAL_Base_Show
Mov S12 <$STR(Sؼ)>
Mov Sؼ
Goto @Eval_Myst_Show
Mov S
Goto @EVAL_SPEC_Show
Mov S̶
Goto @EVAL_SKILL_Show
Sendmsg 7 ͨ:<$STR(Sͨ)>|ͨ:<$STR(Sͨ)>|ؼԣ<$STR(Sؼ)>|:<$STR(S)>|̶:<$STR(S̶)>|:<$STR(M)>
;һµװ
GiveEx () 1 <$STR(SͨԱ)>  <$STR(Sͨ)>|<$STR(Sؼ)>|<$STR(MԱ)>|<$STR(MԱ)>|<$STR(M)>
;ѳͨмתƵѫ 
UPGRADEITEMEX 2 0 0 0 99 "" 1 <$STR(Sͨ)>|<$STR(Sؼ)>|<$STR(MԱ)>|<$STR(MԱ)>|<$STR(M)>



[@EVAL_SKILL_Show]
#if
IsBitSet MԱ 0
#act
Inc S̶ ؼ\


#if
IsBitSet MԱ 1
#act
Inc S̶ ٻħؼ\


#if
IsBitSet MԱ 2
#act
Inc S̶ ؼ\


#if
IsBitSet MԱ 3
#act
Inc S̶ ؼ\



;ɾΪ "UnSetBit MԱ n" nϼı
;ɾٵؼ
#If
IsBitSet MԱ 3
#Act
UnSetBit MԱ 3

  
;輼Ϊ "SetBit MԱ n" nϼı 
;ûٵءȻٵؼ
#If
!IsBitSet MԱ 3
#Act
SetBit MԱ 3


[@EVAL_SPEC_Show]
#if
IsBitSet MԱ 0
#Act
Inc S Ի\

#if
IsBitSet MԱ 1
#Act
Inc S ս\

#if
IsBitSet MԱ 2
#Act
Inc S \

#if
IsBitSet MԱ 3
#Act
Inc S ̽\

#if
IsBitSet MԱ 4
#Act
Inc S \


#if
IsBitSet MԱ 5
#Act
Inc S \

#if
IsBitSet MԱ 6
#Act
Inc S ħ\



;ɾΪ "UnSetBit MԱ n" nϼı  
;ɾħ

#If
IsBitSet MԱ 6
#Act
UnSetBit MԱ 6



;Ϊ "SetBit MԱ n" nϼı 
;ûħ񼼡Ȼħ
#If
!IsBitSet MԱ 6
#Act
SetBit MԱ 6

[@EVAL_Myst_Show]
#if
Equal S12
#Act
Break



#If
True
#Act
Mov S21
Mov S22
Mov S23
Mov S20 <$STR(S12)>


#If
CheckContainsText <$STR(S20)> ,
#Act
STRTok S20 S21 ,
Mov S12 <$STR(S20)>
STRTok S21 S23 =
#ElseAct
Mov S21 <$STR(S20)>
Mov S12
STRTok S21 S23 =



#if
Compval <$STR(S21)> > 0
#Act
Ini_Read_STRing ..\QuestDiary\ȫļ\װԶ.ini EVAL_PROPS <$STR(S23)> S22
Inc Sؼ <$STR(S22)>+<$STR(S21)>\
Goto @EVAL_Myst_Show
#ElseAct
Goto @EVAL_Myst_Show



[@EVAL_Base_Show]
#if
Equal S12
#Act
Break



#If
True
#Act
Mov S21
Mov S22
Mov S23
Mov S20 <$STR(S12)>


#If
CheckContainsText <$STR(S20)> ,
#Act
STRTok S20 S21 ,
Mov S12 <$STR(S20)>
STRTok S21 S23 =
#ElseAct
Mov S21 <$STR(S20)>
Mov S12
STRTok S21 S23 =



#if
Compval <$STR(S21)> > 0
#Act
Ini_Read_STRing ..\QuestDiary\ȫļ\װԶ.ini EVAL_PROPS <$STR(S23)> S22
Inc Sͨ <$STR(S22)>+<$STR(S21)>\
Goto @EVAL_Base_Show
#ElseAct
Goto @EVAL_Base_Show


[@Norm_Prop_Show]
#if
Equal S12
#Act
Break



#If
True
#Act
Mov S21
Mov S22
Mov S23
Mov S20 <$STR(S12)>


#If
CheckContainsText <$STR(S20)> ,
#Act
STRTok S20 S21 ,
Mov S12 <$STR(S20)>
STRTok S21 S23 =
#ElseAct
Mov S21 <$STR(S20)>
Mov S12
STRTok S21 S23 =



#if
Compval <$STR(S21)> > 0
#Act
Ini_Read_STRing ..\QuestDiary\ȫļ\װԶ.ini <$STR(Sװ)> <$STR(S23)> S22
Inc Sͨ <$STR(S22)>+<$STR(S21)>\
Goto @Norm_Prop_Show
#ElseAct
Goto @Norm_Prop_Show


