Sorry for aska lot

Finally I get it ^^
And if anyone want a fp system exchanging item
here is a script
[@main]
#IF
#SAY
Hola :3\
Que pasa?\
Quieres fp?\
Si me das alguna FPBox, tal vez te los de ^^\
<FPBox por fps/@FPBox>\
<No tengo FPBox(s)/@exit>
[@FPBox]
#IF
#SAY
Cual de estas FPBox quieres cambiar?\
<FPBox(100)/@100>\
<FPBox(500)/@500>\
<FPBox(1000)/@1000>\
<FPBox(2000)/@2000>\
<FPBox(5000)/@5000>\
<FPBox(10000)/@10000>\
<FPBox(15000)/@15000>\
[@100]
#IF
checkitem FPBox(100)
checkfame
#ACT
Mov D4 %P9
Inc D4 100
setfame %D4
Take FPBox(100)
#SAY
Aqui tienes tus 100 fp ^^
#ElseSay
No tienes FPBox 100 :S
[@500]
#IF
checkitem FPBox(500)
checkfame
#ACT
Mov D4 %P9
Inc D4 500
setfame %D4
Take FPBox(500)
#SAY
Aqui tienes tus 500 fp ^^
#ElseSay
No tienes FPBox 500 :S
[@1000]
#IF
checkitem FPBox(1000)
checkfame
#ACT
Mov D4 %P9
Inc D4 1000
setfame %D4
Take FPBox(1000)
#SAY
Aqui tienes tus 1000 fp ^^
#ElseSay
No tienes FPBox 1000 :S
[@2000]
#IF
checkitem FPBox(2000)
checkfame
#ACT
Mov D4 %P9
Inc D4 2000
setfame %D4
Take FPBox(12000)
#SAY
Aqui tienes tus 2000 fp ^^
#ElseSay
No tienes FPBox 2000 :S
[@5000]
#IF
checkitem FPBox(5000)
checkfame
#ACT
Mov D4 %P9
Inc D4 5000
setfame %D4
Take FPBox(5000)
#SAY
Aqui tienes tus 5000 fp ^^
#ElseSay
No tienes FPBox 5000 :S
[@10000]
#IF
checkitem FPBox(10000)
checkfame
#ACT
Mov D4 %P9
Inc D4 10000
setfame %D4
Take FPBox(10000)
#SAY
Aqui tienes tus 10000 fp ^^
#ElseSay
No tienes FPBox 10000 :S
[@15000]
#IF
checkitem FPBox(15000)
checkfame
#ACT
Mov D4 %P9
Inc D4 15000
setfame %D4
Take FPBox(15000)
#SAY
Aqui tienes tus 15000 fp ^^
#ElseSay
No tienes FPBox 15000 :S