RosettaCodeData/Task/Increment-a-numerical-string/DWScript/increment-a-numerical-string.dw

var value : String = "1234";
value := IntToStr(StrToInt(value) + 1);
PrintLn(value);