REM "In software, everything is possible but nothing is free." --Ryan Singer

 0 ENUM$ =  CHR$ (165) +  CHR$ (157) +  CHR$ (168) +  CHR$ (240) +  CHR$ (9) +  CHR$ (164) +  CHR$ (236) +  CHR$ (166) +  CHR$ (237) +  CHR$ (200) +  CHR$ (208) +  CHR$ (1) +  CHR$ (232) +  CHR$ (138) +  CHR$ (132) +  CHR$ (236)
 1 ENUM$ = ENUM$ +  CHR$ (133) +  CHR$ (237) +  CHR$ (76) +  CHR$ (242) +  CHR$ (226): POKE 11, PEEK (131): POKE 12, PEEK (132):ENUM =  PEEK (11) +  PEEK (12) * 256: POKE 11, PEEK (ENUM + 1): POKE 12, PEEK (ENUM + 2)
 2  DEF  FN ENUM(INC) =  USR (INC)

RUN
APPLE = FN ENUM(0) : BANANA = FN ENUM(1) : CHERRY = FN ENUM(1)
? APPLE, BANANA, CHERRY