beautypg.com
12
IF C$ = - THEN
DEC = DEC * -1
END IF
CLS
LOCATE 13, 34
PRINT USING ######.#; DEC
E$ = INKEY$
IF E$ = THEN
GOTO ST2
GOTO ST1