check integrals problem

[Unico]

my npc dont check if i have 1000 ints or no and give me skill up

i want my npc check my integrals and if i have 1000 he take me 1000 ints and give me skill up

i have this npc but dont work

[@main]
#SAY

<[SkillUp]/@skillup> 1000 ints\\


[@skillup]
#IF
HLSCRIPTCMD CHECKPOINT 1000
#ACT
   FormatStr "FLD_USERID='%s'" %USERID
   ReadValueSql  "TBL_RELATPOINT"  %A9  "FLD_POINT,FLD_USERID"  [@Point_Add112]

[@Point_Add112()]
 #IF  
 #ACT
   mov    D1      %ARG(1)
   mov    A0      %ARG(2)
 #IF
   Equal  A0   ""       
HLSCRIPTCMD CHECKPOINT 1000
 #ACT
   FormatStr "FLD_USERID='%s'" %USERID
   mov   A8       %A9
   DEC   D1       1000
   mov   D8       %D1
   FormatStr "FLD_POINT='%s'" %D8
   UPDATEVALUESQL "TBL_RELATPOINT" %A8 %A9
give SkillUp 1

 

[Azura]

Wouldnt this work?

#IF
HLSCRIPTCMD CHECKPOINT 1000
#ACT
HLSCRIPTCMD SETPOINT - 1000
GIVE SkillUp 1

 

[Unico]

[@main]
#SAY

<[SkillUp]/@skillup> 1000 ints\\


[@skillup]
#IF
HLSCRIPTCMD CHECKPOINT 1000
#ACT
HLSCRIPTCMD SETPOINT - 1000
GIVE SkillUp 1

dont work >.< and i have 1100 integrals.

 

[Unico]

fixed :P

here is the solution:

[@main]
#SAY

<[SkillUp]/@skillup> 1000 ints\\

[@skillup]
#IF
[COLOR="Red"]elarge D1 1000[/COLOR]
#ACT
FormatStr "FLD_USERID='%s'" %USERID
mov A6 %A9
[COLOR="Red"]DEC D1 1000[/COLOR]
mov D8 %D1
FormatStr "FLD_POINT='%s'" %D8
UPDATEVALUESQL "TBL_RELATPOINT" %A6 %A9
give SkillUp 1