#COMPILE EXE
#DIM ALL
GLOBAL result AS LONG
FUNCTION PBMAIN() AS LONG
 #XCODE OPT=2, SPILL=AUTO, FEATURES=BASELINE
  X.VREG value:U32
  X.VREG delta:U32
  X.MOVE V(value), 5
  X.MOVE V(delta), 7
  X.ADD V(value), V(delta)
  X.VREG lower:U32
  X.VREG upper:U32
  X.MOVE V(lower), 0
  X.MOVE V(upper), 10
  X.CLAMP V(value), V(lower), V(upper)
  X.STORE DWORD PTR [result], V(value)
 #ENDX
 IF result <> 10 THEN PBMAIN = 1 : EXIT FUNCTION
 PBMAIN = 0
END FUNCTION
