Msg: 5010 *Conference*

03-14-94 09:53:45

From: ROBERT BENSON

To : CARROLL LEWIS

Subj: REPLY TO MSG #5004 (4E-13)

-----
Carroll, try this:
 
 10 CLS:CLEAR:INPUT"TOTAL INCHES";L
 20 TF=INT(L/12)
 30 TR=(((L/12)-TF)*12)-TI
 40 TI=LMOD12
 50 PRINT"FEET",TF
 60 PRINT"INCHES",TI
 70 PRINT"FRACTIONS",TR
 80 INPUTA$:GOTO10
 
Note that lines 30 and 40 are reversed, and that I have added CLEAR to line 10
so that all variable are set to zero the next time around.  -=Robert=-