;-----------------
 ; INTEGER
 mov eax,[#vv]
 inc eax
 mov [#vv],eax
 ;----------------
 ; FLOAT
 fld dword [#ff]
 fld1
 faddp st(1)
 fst dword [#ff]
 ret
;-----------------

