[@ڼ4]
{
#ACT
MOV S$ <$G_WEAPON>
MOV S$1 <$WEAPON>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 1 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 1 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 1 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 1 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 1 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 1 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 1 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 1 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 1 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 89
CHANGECUSTOMITEMABIL 1 0 2 0
CHANGECUSTOMITEMABIL 1 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 1 8 0 255
CHANGECUSTOMITEMABIL 1 8 1 6
CHANGECUSTOMITEMABIL 1 8 2 1
CHANGECUSTOMITEMVALUE 1 8 + 15
UpDateBoxItem 1

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 1 8 0 255
CHANGECUSTOMITEMABIL 1 8 1 7
CHANGECUSTOMITEMABIL 1 8 2 1
CHANGECUSTOMITEMVALUE 1 8 + 10
UpDateBoxItem 1

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 1 10 0 255
CHANGECUSTOMITEMABIL 1 10 1 10
CHANGECUSTOMITEMABIL 1 10 2 1
CHANGECUSTOMITEMVALUE 1 10 + <$STR(N$)>
UpDateBoxItem 1

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 1 11 0 255
CHANGECUSTOMITEMABIL 1 11 1 11
CHANGECUSTOMITEMABIL 1 11 2 1
CHANGECUSTOMITEMVALUE 1 11 + <$STR(N$)>
UpDateBoxItem 1
}

[@ڼ4a]
{
#ACT
MOV S$· <$G_DRESS>
MOV S$·1 <$DRESS>
DEC S$· <$STR(S$·1)>
DEC S$· Ʒ
DEC S$· 
DEC S$· ʷʫ

#IF
EQUAL S$· ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 0 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 0 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 0 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 0 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 0 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 0 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 0 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 0 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 0 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 0 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 0 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 0 1 2 89
CHANGECUSTOMITEMABIL 0 0 2 0
CHANGECUSTOMITEMABIL 0 1 2 0

#IF
EQUAL S$· ǻ۵
#ACT
CHANGECUSTOMITEMABIL 0 8 0 255
CHANGECUSTOMITEMABIL 0 8 1 6
CHANGECUSTOMITEMABIL 0 8 2 1
CHANGECUSTOMITEMVALUE 0 8 + 15
UpDateBoxItem 0

#IF
EQUAL S$· 
#ACT
CHANGECUSTOMITEMABIL 0 8 0 255
CHANGECUSTOMITEMABIL 0 8 1 7
CHANGECUSTOMITEMABIL 0 8 2 1
CHANGECUSTOMITEMVALUE 0 8 + 10
UpDateBoxItem 0

#IF
EQUAL S$· ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 0 10 0 255
CHANGECUSTOMITEMABIL 0 10 1 10
CHANGECUSTOMITEMABIL 0 10 2 1
CHANGECUSTOMITEMVALUE 0 10 + <$STR(N$)>
UpDateBoxItem 0

#IF
EQUAL S$· ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 0 11 0 255
CHANGECUSTOMITEMABIL 0 11 1 11
CHANGECUSTOMITEMABIL 0 11 2 1
CHANGECUSTOMITEMVALUE 0 11 + <$STR(N$)>
UpDateBoxItem 0
}

[@ڼ4b]
{
#ACT
MOV S$ѫ <$G_RIGHTHAND>
MOV S$ѫ1 <$RIGHTHAND>
DEC S$ѫ <$STR(S$ѫ1)>
DEC S$ѫ Ʒ
DEC S$ѫ 
DEC S$ѫ ʷʫ

#IF
EQUAL S$ѫ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 2 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 2 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 2 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 2 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 2 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 2 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 2 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 2 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 2 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 2 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 2 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 2 1 2 89
CHANGECUSTOMITEMABIL 2 0 2 0
CHANGECUSTOMITEMABIL 2 1 2 0

#IF
EQUAL S$ѫ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 2 8 0 255
CHANGECUSTOMITEMABIL 2 8 1 6
CHANGECUSTOMITEMABIL 2 8 2 1
CHANGECUSTOMITEMVALUE 2 8 + 15
UpDateBoxItem 2

#IF
EQUAL S$ѫ 
#ACT
CHANGECUSTOMITEMABIL 2 8 0 255
CHANGECUSTOMITEMABIL 2 8 1 7
CHANGECUSTOMITEMABIL 2 8 2 1
CHANGECUSTOMITEMVALUE 2 8 + 10
UpDateBoxItem 2

#IF
EQUAL S$ѫ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 2 10 0 255
CHANGECUSTOMITEMABIL 2 10 1 10
CHANGECUSTOMITEMABIL 2 10 2 1
CHANGECUSTOMITEMVALUE 2 10 + <$STR(N$)>
UpDateBoxItem 2

#IF
EQUAL S$ѫ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 2 11 0 255
CHANGECUSTOMITEMABIL 2 11 1 11
CHANGECUSTOMITEMABIL 2 11 2 1
CHANGECUSTOMITEMVALUE 2 11 + <$STR(N$)>
UpDateBoxItem 2
}

[@ڼ4c]
{
#ACT
MOV S$ͷ <$G_HELMET>
MOV S$ͷ1 <$HELMET>
DEC S$ͷ <$STR(S$ͷ1)>
DEC S$ͷ Ʒ
DEC S$ͷ 
DEC S$ͷ ʷʫ

#IF
EQUAL S$ͷ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 4 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 4 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 4 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 4 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 4 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 4 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 4 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 4 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 4 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 4 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 4 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 4 1 2 89
CHANGECUSTOMITEMABIL 4 0 2 0
CHANGECUSTOMITEMABIL 4 1 2 0

#IF
EQUAL S$ͷ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 4 8 0 255
CHANGECUSTOMITEMABIL 4 8 1 6
CHANGECUSTOMITEMABIL 4 8 2 1
CHANGECUSTOMITEMVALUE 4 8 + 15
UpDateBoxItem 4

#IF
EQUAL S$ͷ 
#ACT
CHANGECUSTOMITEMABIL 4 8 0 255
CHANGECUSTOMITEMABIL 4 8 1 7
CHANGECUSTOMITEMABIL 4 8 2 1
CHANGECUSTOMITEMVALUE 4 8 + 10
UpDateBoxItem 4

#IF
EQUAL S$ͷ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 4 10 0 255
CHANGECUSTOMITEMABIL 4 10 1 10
CHANGECUSTOMITEMABIL 4 10 2 1
CHANGECUSTOMITEMVALUE 4 10 + <$STR(N$)>
UpDateBoxItem 4

#IF
EQUAL S$ͷ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 4 11 0 255
CHANGECUSTOMITEMABIL 4 11 1 11
CHANGECUSTOMITEMABIL 4 11 2 1
CHANGECUSTOMITEMVALUE 4 11 + <$STR(N$)>
UpDateBoxItem 4
}

[@ڼ4d]
{
#ACT
MOV S$ <$G_NECKLACE>
MOV S$1 <$NECKLACE>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 3 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 3 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 3 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 3 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 3 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 3 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 3 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 3 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 3 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 3 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 3 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 3 1 2 89
CHANGECUSTOMITEMABIL 3 0 2 0
CHANGECUSTOMITEMABIL 3 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 3 8 0 255
CHANGECUSTOMITEMABIL 3 8 1 6
CHANGECUSTOMITEMABIL 3 8 2 1
CHANGECUSTOMITEMVALUE 3 8 + 15
UpDateBoxItem 3

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 3 8 0 255
CHANGECUSTOMITEMABIL 3 8 1 7
CHANGECUSTOMITEMABIL 3 8 2 1
CHANGECUSTOMITEMVALUE 3 8 + 10
UpDateBoxItem 3

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 3 10 0 255
CHANGECUSTOMITEMABIL 3 10 1 10
CHANGECUSTOMITEMABIL 3 10 2 1
CHANGECUSTOMITEMVALUE 3 10 + <$STR(N$)>
UpDateBoxItem 3

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 3 11 0 255
CHANGECUSTOMITEMABIL 3 11 1 11
CHANGECUSTOMITEMABIL 3 11 2 1
CHANGECUSTOMITEMVALUE 3 11 + <$STR(N$)>
UpDateBoxItem 3
}

[@ڼ4e]
{
#ACT
MOV S$ָ <$G_RING_L>
MOV S$ָ1 <$RING_L>
DEC S$ָ <$STR(S$ָ1)>
DEC S$ָ Ʒ
DEC S$ָ 
DEC S$ָ ʷʫ

#IF
EQUAL S$ָ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 8 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 8 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 8 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 8 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 8 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 8 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 8 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 8 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 8 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 8 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 8 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 8 1 2 89
CHANGECUSTOMITEMABIL 8 0 2 0
CHANGECUSTOMITEMABIL 8 1 2 0

#IF
EQUAL S$ָ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 8 8 0 255
CHANGECUSTOMITEMABIL 8 8 1 6
CHANGECUSTOMITEMABIL 8 8 2 1
CHANGECUSTOMITEMVALUE 8 8 + 15
UpDateBoxItem 8

#IF
EQUAL S$ָ 
#ACT
CHANGECUSTOMITEMABIL 8 8 0 255
CHANGECUSTOMITEMABIL 8 8 1 7
CHANGECUSTOMITEMABIL 8 8 2 1
CHANGECUSTOMITEMVALUE 8 8 + 10
UpDateBoxItem 8

#IF
EQUAL S$ָ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 8 10 0 255
CHANGECUSTOMITEMABIL 8 10 1 10
CHANGECUSTOMITEMABIL 8 10 2 1
CHANGECUSTOMITEMVALUE 8 10 + <$STR(N$)>
UpDateBoxItem 8

#IF
EQUAL S$ָ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 8 11 0 255
CHANGECUSTOMITEMABIL 8 11 1 11
CHANGECUSTOMITEMABIL 8 11 2 1
CHANGECUSTOMITEMVALUE 8 11 + <$STR(N$)>
UpDateBoxItem 8
}

[@ڼ4f]
{
#ACT
MOV S$ҽָ <$G_RING_R>
MOV S$ҽָ1 <$RING_R>
DEC S$ҽָ <$STR(S$ҽָ1)>
DEC S$ҽָ Ʒ
DEC S$ҽָ 
DEC S$ҽָ ʷʫ

#IF
EQUAL S$ҽָ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 7 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 7 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 7 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 7 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 7 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 7 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 7 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 7 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 7 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 7 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 7 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 7 1 2 89
CHANGECUSTOMITEMABIL 7 0 2 0
CHANGECUSTOMITEMABIL 7 1 2 0

#IF
EQUAL S$ҽָ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 7 8 0 255
CHANGECUSTOMITEMABIL 7 8 1 6
CHANGECUSTOMITEMABIL 7 8 2 1
CHANGECUSTOMITEMVALUE 7 8 + 15
UpDateBoxItem 7

#IF
EQUAL S$ҽָ 
#ACT
CHANGECUSTOMITEMABIL 7 8 0 255
CHANGECUSTOMITEMABIL 7 8 1 7
CHANGECUSTOMITEMABIL 7 8 2 1
CHANGECUSTOMITEMVALUE 7 8 + 10
UpDateBoxItem 7

#IF
EQUAL S$ҽָ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 7 10 0 255
CHANGECUSTOMITEMABIL 7 10 1 10
CHANGECUSTOMITEMABIL 7 10 2 1
CHANGECUSTOMITEMVALUE 7 10 + <$STR(N$)>
UpDateBoxItem 7

#IF
EQUAL S$ҽָ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 7 11 0 255
CHANGECUSTOMITEMABIL 7 11 1 11
CHANGECUSTOMITEMABIL 7 11 2 1
CHANGECUSTOMITEMVALUE 7 11 + <$STR(N$)>
UpDateBoxItem 7
}

[@ڼ4g]
{
#ACT
MOV S$ <$G_ARMRING_L>
MOV S$1 <$ARMRING_L>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 6 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 6 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 6 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 6 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 6 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 6 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 6 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 6 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 6 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 6 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 6 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 6 1 2 89
CHANGECUSTOMITEMABIL 6 0 2 0
CHANGECUSTOMITEMABIL 6 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 6 8 0 255
CHANGECUSTOMITEMABIL 6 8 1 6
CHANGECUSTOMITEMABIL 6 8 2 1
CHANGECUSTOMITEMVALUE 6 8 + 15
UpDateBoxItem 6

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 6 8 0 255
CHANGECUSTOMITEMABIL 6 8 1 7
CHANGECUSTOMITEMABIL 6 8 2 1
CHANGECUSTOMITEMVALUE 6 8 + 10
UpDateBoxItem 6

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 6 10 0 255
CHANGECUSTOMITEMABIL 6 10 1 10
CHANGECUSTOMITEMABIL 6 10 2 1
CHANGECUSTOMITEMVALUE 6 10 + <$STR(N$)>
UpDateBoxItem 6

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 6 11 0 255
CHANGECUSTOMITEMABIL 6 11 1 11
CHANGECUSTOMITEMABIL 6 11 2 1
CHANGECUSTOMITEMVALUE 6 11 + <$STR(N$)>
UpDateBoxItem 6
}

[@ڼ4h]
{
#ACT
MOV S$ <$G_ARMRING_R>
MOV S$1 <$ARMRING_R>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 5 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 5 0 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 5 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 5 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 5 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 5 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 5 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 5 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 5 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 5 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 5 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 5 1 2 89
CHANGECUSTOMITEMABIL 5 0 2 0
CHANGECUSTOMITEMABIL 5 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 5 8 0 255
CHANGECUSTOMITEMABIL 5 8 1 6
CHANGECUSTOMITEMABIL 5 8 2 1
CHANGECUSTOMITEMVALUE 5 8 + 15
UpDateBoxItem 0

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 5 8 0 255
CHANGECUSTOMITEMABIL 5 8 1 7
CHANGECUSTOMITEMABIL 5 8 2 1
CHANGECUSTOMITEMVALUE 5 8 + 10
UpDateBoxItem 5

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 5 10 0 255
CHANGECUSTOMITEMABIL 5 10 1 10
CHANGECUSTOMITEMABIL 5 10 2 1
CHANGECUSTOMITEMVALUE 5 10 + <$STR(N$)>
UpDateBoxItem 5

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 5 11 0 255
CHANGECUSTOMITEMABIL 5 11 1 11
CHANGECUSTOMITEMABIL 5 11 2 1
CHANGECUSTOMITEMVALUE 5 11 + <$STR(N$)>
UpDateBoxItem 5
}

[@ڼ4i]
{
#ACT
MOV S$ <$G_BELT>
MOV S$1 <$BELT>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 10 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 10 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 10 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 10 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 10 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 10 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 10 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 10 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 10 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 10 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 10 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 10 1 2 89
CHANGECUSTOMITEMABIL 10 0 2 0
CHANGECUSTOMITEMABIL 10 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 10 8 0 255
CHANGECUSTOMITEMABIL 10 8 1 6
CHANGECUSTOMITEMABIL 10 8 2 1
CHANGECUSTOMITEMVALUE 10 8 + 15
UpDateBoxItem 10

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 10 8 0 255
CHANGECUSTOMITEMABIL 10 8 1 7
CHANGECUSTOMITEMABIL 10 8 2 1
CHANGECUSTOMITEMVALUE 10 8 + 10
UpDateBoxItem 10

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 10 10 0 255
CHANGECUSTOMITEMABIL 10 10 1 10
CHANGECUSTOMITEMABIL 10 10 2 1
CHANGECUSTOMITEMVALUE 10 10 + <$STR(N$)>
UpDateBoxItem 10

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 10 11 0 255
CHANGECUSTOMITEMABIL 10 11 1 11
CHANGECUSTOMITEMABIL 10 11 2 1
CHANGECUSTOMITEMVALUE 10 11 + <$STR(N$)>
UpDateBoxItem 10
}

[@ڼ4j]
{
#ACT
MOV S$Ь <$G_BOOTS>
MOV S$Ь1 <$BOOTS>
DEC S$Ь <$STR(S$Ь1)>
DEC S$Ь Ʒ
DEC S$Ь 
DEC S$Ь ʷʫ

#IF
EQUAL S$Ь ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 11 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 11 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 11 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 11 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 11 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 11 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 11 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 11 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 11 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 11 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 11 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 11 1 2 89
CHANGECUSTOMITEMABIL 11 0 2 0
CHANGECUSTOMITEMABIL 11 1 2 0

#IF
EQUAL S$Ь ǻ۵
#ACT
CHANGECUSTOMITEMABIL 11 8 0 255
CHANGECUSTOMITEMABIL 11 8 1 6
CHANGECUSTOMITEMABIL 11 8 2 1
CHANGECUSTOMITEMVALUE 11 8 + 15
UpDateBoxItem 11

#IF
EQUAL S$Ь 
#ACT
CHANGECUSTOMITEMABIL 11 8 0 255
CHANGECUSTOMITEMABIL 11 8 1 7
CHANGECUSTOMITEMABIL 11 8 2 1
CHANGECUSTOMITEMVALUE 11 8 + 10
UpDateBoxItem 11

#IF
EQUAL S$Ь ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 11 10 0 255
CHANGECUSTOMITEMABIL 11 10 1 10
CHANGECUSTOMITEMABIL 11 10 2 1
CHANGECUSTOMITEMVALUE 11 10 + <$STR(N$)>
UpDateBoxItem 11

#IF
EQUAL S$Ь ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 11 11 0 255
CHANGECUSTOMITEMABIL 11 11 1 11
CHANGECUSTOMITEMABIL 11 11 2 1
CHANGECUSTOMITEMVALUE 11 11 + <$STR(N$)>
UpDateBoxItem 11
}

[@ڼ4k]
{
#ACT
MOV S$ʯ <$G_CHARM>
MOV S$ʯ1 <$CHARM>
DEC S$ʯ <$STR(S$ʯ1)>
DEC S$ʯ Ʒ
DEC S$ʯ 
DEC S$ʯ ʷʫ

#IF
EQUAL S$ʯ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 12 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 12 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 12 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 12 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 12 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 12 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 12 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 12 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 12 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 12 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 12 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 12 1 2 89
CHANGECUSTOMITEMABIL 12 0 2 0
CHANGECUSTOMITEMABIL 12 1 2 0

#IF
EQUAL S$ʯ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 12 8 0 255
CHANGECUSTOMITEMABIL 12 8 1 6
CHANGECUSTOMITEMABIL 12 8 2 1
CHANGECUSTOMITEMVALUE 12 8 + 30
UpDateBoxItem 12

#IF
EQUAL S$ʯ 
#ACT
CHANGECUSTOMITEMABIL 12 8 0 255
CHANGECUSTOMITEMABIL 12 8 1 7
CHANGECUSTOMITEMABIL 12 8 2 1
CHANGECUSTOMITEMVALUE 12 8 + 30
UpDateBoxItem 12

#IF
EQUAL S$ʯ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 12 10 0 255
CHANGECUSTOMITEMABIL 12 10 1 10
CHANGECUSTOMITEMABIL 12 10 2 1
CHANGECUSTOMITEMVALUE 12 10 + <$STR(N$)>
UpDateBoxItem 12

#IF
EQUAL S$ʯ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 12 11 0 255
CHANGECUSTOMITEMABIL 12 11 1 11
CHANGECUSTOMITEMABIL 12 11 2 1
CHANGECUSTOMITEMVALUE 12 11 + <$STR(N$)>
UpDateBoxItem 12
}

[@ڼ4l]
{
#ACT
MOV S$ <$G_HAT>
MOV S$1 <$HAT>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 13 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 13 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 13 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 13 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 13 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 13 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 13 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 13 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 13 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 13 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 13 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 13 1 2 89
CHANGECUSTOMITEMABIL 13 0 2 0
CHANGECUSTOMITEMABIL 13 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 13 8 0 255
CHANGECUSTOMITEMABIL 13 8 1 6
CHANGECUSTOMITEMABIL 13 8 2 1
CHANGECUSTOMITEMVALUE 13 8 + 30
UpDateBoxItem 13

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 13 8 0 255
CHANGECUSTOMITEMABIL 13 8 1 7
CHANGECUSTOMITEMABIL 13 8 2 1
CHANGECUSTOMITEMVALUE 13 8 + 30
UpDateBoxItem 13

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 13 10 0 255
CHANGECUSTOMITEMABIL 13 10 1 10
CHANGECUSTOMITEMABIL 13 10 2 1
CHANGECUSTOMITEMVALUE 13 10 + <$STR(N$)>
UpDateBoxItem 13

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 13 11 0 255
CHANGECUSTOMITEMABIL 13 11 1 11
CHANGECUSTOMITEMABIL 13 11 2 1
CHANGECUSTOMITEMVALUE 13 11 + <$STR(N$)>
UpDateBoxItem 13
}

[@ڼ4m]
{
#ACT
MOV S$ <$G_SHIELD>
MOV S$1 <$SHIELD>
DEC S$ <$STR(S$1)>
DEC S$ Ʒ
DEC S$ 
DEC S$ ʷʫ

#IF
EQUAL S$ ѵ
#ACT
CHANGECUSTOMITEMPROGRESSBAR 16 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 16 1 <Img:182:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 16 0 0 = 3
CHANGECUSTOMITEMPROGRESSBAR 16 0 3 1
CHANGECUSTOMITEMPROGRESSBAR 16 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 16 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 16 1 1 <Img:183:6:-2:1>
CHANGECUSTOMITEMPROGRESSBARVALUE 16 1 0 = 500
CHANGECUSTOMITEMPROGRESSBAR 16 1 3 1
CHANGECUSTOMITEMPROGRESSBAR 16 1 4 1
CHANGECUSTOMITEMPROGRESSBAR 16 0 2 89
CHANGECUSTOMITEMPROGRESSBAR 16 1 2 89
CHANGECUSTOMITEMABIL 16 0 2 0
CHANGECUSTOMITEMABIL 16 1 2 0

#IF
EQUAL S$ ǻ۵
#ACT
CHANGECUSTOMITEMABIL 16 8 0 255
CHANGECUSTOMITEMABIL 16 8 1 6
CHANGECUSTOMITEMABIL 16 8 2 1
CHANGECUSTOMITEMVALUE 16 8 + 30
UpDateBoxItem 16

#IF
EQUAL S$ 
#ACT
CHANGECUSTOMITEMABIL 16 8 0 255
CHANGECUSTOMITEMABIL 16 8 1 7
CHANGECUSTOMITEMABIL 16 8 2 1
CHANGECUSTOMITEMVALUE 16 8 + 30
UpDateBoxItem 16

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 16 10 0 255
CHANGECUSTOMITEMABIL 16 10 1 10
CHANGECUSTOMITEMABIL 16 10 2 1
CHANGECUSTOMITEMVALUE 16 10 + <$STR(N$)>
UpDateBoxItem 16

#IF
EQUAL S$ ̵
#ACT
MOV N$ <$MAXMAC>
DIV N$ 100
MUL N$ 30
CHANGECUSTOMITEMABIL 16 11 0 255
CHANGECUSTOMITEMABIL 16 11 1 11
CHANGECUSTOMITEMABIL 16 11 2 1
CHANGECUSTOMITEMVALUE 16 11 + <$STR(N$)>
UpDateBoxItem 16
}











