Have a button increase editbox value

[careca]

Hey guys, got a problem with editbox, the objective here is to increase the value by whatever in the editbox, say 50 (decimal)

$50 = "50"

$editup = GUICtrlCreateInput ("150", 110, 20, 50, 18)
$inc = GUICtrlCreateButton ("increase", 30, 70, 50, 20)
GUICtrlSetOnEvent ($inc, "incr")

Func incr()
$50up = GUICtrlRead ($editup)
$sysvolup = ($50 + $50up)
GUICtrlSetData ($editup, $sysvolup)
EndFunc

EDIT: Wasnt calling the $50up var so i could never add by 50, now is all good.

Edited November 7, 2011 by careca

[JoHanatCent]

Add

Opt("GUIOnEventMode", 1)

@ the top.