*** Daffodil Number CLOSE ALL CLEAR ALL CLEAR FOR nLoop_01 = 100 TO 999 IF (VAL(SUBSTR(ALLTRIM(STR(nLoop_01)),1,1)) ^ 3) + ; (VAL(SUBSTR(ALLTRIM(STR(nLoop_01)),2,1)) ^ 3) + ; (VAL(SUBSTR(ALLTRIM(STR(nLoop_01)),3,1)) ^ 3) = nLoop_01 nLoop_01 ENDIF NEXT RETURN