(@upgradeitems)
[@main]
#IF
ISADMIN
#SAY
===========================================================\
<GMǼʿ̨/AUTOCOLOR=253,249,245,70,250,191,168,251>\
ʸʽΪ[X]% XΪ0-100Ȼ,\

<ҿɼ/@>\
<ʿƺ̨/@Ƽ>\
===========================================================\

<װ/@upgradeitems> <ǲϲ鿴/@鿴>\\
#ELSEACT
GOTO @
[@]
#IF
CheckJob Warrior
#ACT
MOV <$STR(Nǿ)> 8
GOTO @ʾ
break 

#IF
CheckJob Wizard
#ACT
MOV <$STR(Nǿ)> 9
GOTO @ʾ
break 

#IF
CheckJob Taoist
#ACT
MOV <$STR(Nǿ)> 10
GOTO @ʾ
break 

[@ʾ]
<ע˳Ʒȳڱٳֳǲϣмǣ/AUTOCOLOR=253,249,245,70,250,191,168,251>\
<===========================================================/FCOLOR=253>\
<ͷ˺䡻ӡ緡ӷơ˼١/FCOLOR=251>\
<ѫ¡ӷмסħ˼١Ůۡħ˼١/FCOLOR=251>\
<ǿҡָʧ/FCOLOR=251>\
<ֹҡѥӡֹʧ˺ӡ/FCOLOR=251>\
<===========================================================/FCOLOR=253>\
<ÿγǿħ10㼰Ӧ2%!ʧܽǿ۳Ӧ/AUTOCOLOR=253,249,245,70,250,191,168,251>\ 
<ʼװ/@upgradeitems>  <ǲϲ鿴/@鿴>  

[@CHANGEITEMS]
#IF
CHECKBAGITEMSTARSLEVEL < 20
#ACT
MOV <$STR(NǸ)> 0
GOTO @װ
#ELSESAY
װѾﵽ20,!

[@װ]
#IF
;10,11Ϊ·,2Ϊħ.
CHECKPUTITEMTYPE 11
#ACT
MOV <$STR(N)> 2
GOTO @
break
#IF
CHECKPUTITEMTYPE 10
#ACT
MOV <$STR(N)> 2
GOTO @
break

#IF
;7ħѪʯ(),1Ϊ.
CHECKPUTITEMTYPE 7
#ACT
MOV <$STR(N)> 1
GOTO @
break

#IF
;7ħѪʯ(),1Ϊ.
CHECKPUTITEMTYPE 63
#ACT
MOV <$STR(N)> 1
GOTO @
break


#IF
;15ͷ,4Ƿ.
CHECKPUTITEMTYPE 15
#ACT
MOV <$STR(N)> 4
GOTO @
break

#IF
;25ǻ(ӡ),3Ǻ.
CHECKPUTITEMTYPE 25
#ACT
MOV <$STR(N)> 3
GOTO @
break

#IF
;5,5ǹ.
CHECKPUTITEMTYPE 5
#ACT
MOV <$STR(N)>  5
GOTO @
break

#IF
;30(ѫ),17
CHECKPUTITEMTYPE 30
#ACT
MOV <$STR(N)> 17
GOTO @
break

#IF
;20,8,9,10,ħ.
CHECKPUTITEMTYPE 20
#ACT
MOV <$STR(N)> <$STR(Nǿ)>
GOTO @
break

#IF
;26,12
CHECKPUTITEMTYPE 26
#ACT
MOV <$STR(N)> 12
GOTO @
break

#IF
;24,12
CHECKPUTITEMTYPE 24
#ACT
MOV <$STR(N)> 12
GOTO @
break

#IF
;22ǽָ,11ʧ
CHECKPUTITEMTYPE 22
#ACT
MOV <$STR(N)> 11
GOTO @
break

#IF
;23ǽָ,11ʧ
CHECKPUTITEMTYPE 23
#ACT
MOV <$STR(N)> 11
GOTO @
break



#IF
;ѥ,ʧ
CHECKPUTITEMTYPE 62
#ACT
MOV <$STR(N)> 13
GOTO @
break

#IF
;,ٻ
CHECKPUTITEMTYPE 64
#ACT
MOV <$STR(N)> 14
GOTO @
break


[@]
#IF
CHECKBAGITEMSTARSLEVEL = <$STR(NǸ)>
#ACT
MOV <$STR(NװǼ)> <$STR(NǸ)>
GOTO @ϳʼ
#ELSEACT
INC <$STR(NǸ)> 1
GOTO @
[@ϳʼ]
#IF
LARGE <$STR(NװǼ)> 4
SMALL <$STR(NװǼ)> 10
#ACT
MOV <$STR(S)> <$STR(A101)>
GOTO @ȷ
BREAK
#IF
LARGE <$STR(NװǼ)> 9
SMALL <$STR(NװǼ)> 15
#ACT
MOV <$STR(S)> <$STR(A102)>
GOTO @ȷ
BREAK
#IF
LARGE <$STR(NװǼ)> 14
SMALL <$STR(NװǼ)> 20
#ACT
MOV <$STR(S)> <$STR(A103)>
GOTO @ȷ
BREAK

#IF
SMALL <$STR(NװǼ)> 5
#ACT
MOV <$STR(S)> <$STR(A100)>
GOTO @ȷ
BREAK
[@ȷ]
-------------------------------\ \ \
װǰǼ:<$STR(NװǼ)>\
װǲ:<$STR(S)>\
<ȷĲ뱸>\
<ʼ/@>\
-------------------------------\ \ \
[@]
#IF
CHECKITEM <$STR(S)> 1 
#ACT
GOTO @ʼɹ
#ELSESAY
ϲ޷ǣ\

[@ʼɹ]
#IF
CHECKITEM <$STR(S)> 1
#ACT
MOVR <$STR(Nɹ)> 99
MOV <$STR(Nϵͳ趨)> <$STR(G200)>
GOTO @ɹж

[@ɹж]
#IF
SMALL <$STR(Nɹ)> <$STR(Nϵͳ趨)>
#ACT
INC <$STR(NǸ)> 1
MOV <$STR(S)> ɹ
GOTO @
#ELSEACT
MOV <$STR(S)> ʧ
GOTO @ʼ
[@ʼ]
#ACT
MOVR <$STR(NǼ)> 99
MOV <$STR(NϵͳǼ)> <$STR(G201)>
GOTO @ж

[@ж]
#IF
SMALL <$STR(NǼ)> <$STR(NϵͳǼ)>
#ACT
#ACT
DEC <$STR(NǸ)> 1
MOV <$STR(S)> 
GOTO @
#ELSEACT
GOTO @
MOV <$STR(S)> ʧ
[@]
#IF
LARGE <$STR(NǸ)> 0
#ACT
TAKE <$STR(S)> 1
MOV <$STR(NԵ)> <$STR(NǸ)>
MOV <$STR(NװǼ)> <$STR(NǸ)>
MUL <$STR(NԵ)> 2
CHANGEITEMNEWADDVALUE <$STR(N)> = <$STR(NԵ)>
GOTO @ʼ
[@ʼ]
#ACT
CHANGEBAGITEMSTARSLEVEL = 0
GOTO @

[@]
#IF
LARGE <$STR(NǸ)> 0
#ACT
CHANGEBAGITEMSTARSLEVEL + 1
DEC <$STR(NǸ)> 1
GOTO @
#ELSEACT
SENDCOLORMSG 0 254 0  %sڳʦġ<$STR(S)>ǡ<$STR(S)>,ûһ<$STR(NװǼ)>װ!
GOTO @MAIN


[@Ƽ]
Ƴǳɹ.</@main>\
<óǳɹ/@@InPutIntegerɹ> [<$STR(G200)>%]\
<óǽǼ/@@InPutIntegerǼ> [<$STR(G201)>%]\
<1----5ǳ><:/@@InPutStringǲ1>[<$STR(A100)>]\
<6---10ǳ><:/@@InPutStringǲ2>[<$STR(A101)>]\
<11--15ǳ><:/@@InPutStringǲ3>[<$STR(A102)>]\
<16--20ǳ><:/@@InPutStringǲ4>[<$STR(A103)>]\
< ɹ ><:/@@InPutString>[<$STR(A104)>]\
<ע:ֻʧܲŻᴥǼ>\

[@InPutIntegerɹ]
#ACT
MOV G200 N0
sendmsg 6 óɹΪ[<$STR(G200)>]%
GOTO @Ƽ
break
[@InPutIntegerǼ]
#ACT
MOV G201 N0
sendmsg 6 ýǼΪ[<$STR(G201)>]%
GOTO @Ƽ
break
[@InPutStringǲ1]
#ACT
MOV A100 S0
sendmsg 6 1-5ǲΪ[<$STR(A100)>]
GOTO @Ƽ
break

[@InPutStringǲ2]
#ACT
MOV A101 S0
sendmsg 6 6-10ǲΪ[<$STR(A101)>]
GOTO @Ƽ
break

[@InPutStringǲ3]
#ACT
MOV A102 S0
sendmsg 6 11-15ǲΪ[<$STR(A102)>]
GOTO @Ƽ
break
[@InPutStringǲ4]
#ACT
MOV A103 S0
sendmsg 6 16-20ǲΪ[<$STR(A103)>]
GOTO @Ƽ
break
[@InPutString]
#ACT
MOV A104 S0
sendmsg 6 öΪ[<$STR(A104)>]
GOTO @Ƽ
break
[@鿴]
Ϊ:\
1--5(<$STR(A100)>)\
6-10(<$STR(A101)>)\
11-15(<$STR(A102)>)\
16-20(<$STR(A103)>)\
(<$STR(A104)>)\


[@Ϻϳ]
=======================================\\\
<ɾʯ|Ҫʯ10/@qnxt1>\ \
<ǧ|Ҫɾʯ10/@qnxt>\ \
<|Ҫǧ20/@wnhj>\ \
<ԭʯ|Ҫ30/@hdys>\\
=======================================\\\
[@qnxt1]
#if
checkitem ʯ 10
#ACT
GIVE ɾʯ 1
TAKE ʯ 10
SENDCOLORMSG 0 251 241 %sϳɾʯɾʯ1
break
#elseact
Sendmsg 7 гĳʯ
[@qnxt]
#if
checkitem ɾʯ 10
#ACT
GIVE ǧ 1
TAKE ɾʯ 10
SENDCOLORMSG 0 251 241 %sϳǧǧ1
break
#elseact
Sendmsg 7 гɾʯ
[@wnhj]
#if
checkitem ǧ 20
#ACT
GIVE  1
TAKE ǧ 20
SENDCOLORMSG 0 251 241 %sϳ𾧣1
break
#elseact
Sendmsg 7 гǧ

[@hdys]
#if
checkitem  30
#ACT
GIVE ԭʯ 1
TAKE  30
SENDCOLORMSG 0 251 241 %sϳ˻ԭʯûԭʯ1
break
#elseact
Sendmsg 7 г

