%%HP: T(1)A(R)F(.);
 CLEAR
"Zero FOR STEP
 from a till b
Enter a b c(step)"
"" INPUT OBJ  A B
S
   0 A B
    FOR C C + S
    STEP  D
     A "a" TAG B
"b" TAG S "step"
TAG D "  " A STR
"  " B STR + + +
TAG
    
  

