;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
[@ClearBadPoint]
{
#SAY
___{FCOLOR/10}Welcome to the Integral system, you at present have {FCOLOR/10}<$OUTPUT(USERJF)> GamePoints{FCOLOR/12}\\
{FCOLOR/12}I may help you to remove your equipment weak element!  {FCOLOR/2}\
{FCOLOR/12}This Service Costs 2500 Integral Points{FCOLOR/12}\
{FCOLOR/12}You must also be wearing the Item you wish to reset the elements{FCOLOR/12}\
{FCOLOR/12}Please choose the quipment you wish to reset the Elements{FCOLOR/12}\\
<[ Clothes ]/@ClearBad(0)> \
<[ Helmet ]/@ClearBad(4)>\
<[ Bracelet(L) ]/@ClearBad(5)> \
<[ Bracelet(R) ]/@ClearBad(6)>\
<[ Shoe ]/@ClearBad(10)> \\
<[ Return ]/@main>\\
[@ClearBad()]
#ACT
    mov D0 %ARG(1)

#IF
    checklevel 40
    ACTCMD userjf 2500
    ACTCMD CHECKISTAKEITEM %D0
#ACT
    ACTCMD ITEMREMAKEEQU %D0 6 0
    ACTCMD setuserjf - 2500
#SAY
Your equipment weak element already washed off, took down may see ^_^!\
<Return/@main>
#Elsesay
Your integral is insufficient, but also remains {FCOLOR/1}<$OUTPUT(USERJF)> GamePoints{FCOLOR/12}\
Or your rank insufficient 40 levels!  Or you select the equipment  position for is Empty!\
<Exit/@exit>

}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;